using System; using System.Collections; using System.Collections.Generic; using System.ComponentModel; using System.Windows.Forms; using System.Drawing; using System.Data; using FastReport; using FastReport.Data; using FastReport.Dialog; using FastReport.Barcode; using FastReport.Table; using FastReport.Utils; namespace FastReport { public class ReportScript { private void Form1_Shown(object sender, EventArgs e) { if (ComboBox2.Items.Count == 0) { ComboBox1.Items.Add("No suppliers owing"); ComboBox1.Text = "No suppliers owing"; } dtpFromDate.Value = System.DateTime.Now; dtpToDate.Value = System.DateTime.Now; } private void chkIncludeTrans_Click(object sender, EventArgs e) { if (chkIncludeTrans.Checked) { Form1.Height = 375; lblFromDate.Visible = true; dtpFromDate.Visible = true; lblToDate.Visible = true; dtpToDate.Visible = true; } else { Form1.Height = 275; lblFromDate.Visible = false; dtpFromDate.Visible = false; lblToDate.Visible = false; dtpToDate.Visible = false; } } private void btnOk_Click(object sender, EventArgs e) { TableDataSource tStatement = Report.GetDataSource("statement") as TableDataSource; //The default strings string selectCreditPurchases = "((TotalIncl - (TotalPaid + TotalDtNotesIncl) <> 0) OR DATE_FORMAT(`Date`,'%Y-%m') = DATE_FORMAT(CURDATE(),'%Y-%m'))"; string selectPaymentsAndNotes = "DATE_FORMAT(`Date`,'%Y-%m') = DATE_FORMAT(CURDATE(),'%Y-%m')"; string selectJournals = "((ABS(Amount) - ABS(TotalPaid) <> 0) OR (DATE_FORMAT(`Date`,'%Y-%m') = DATE_FORMAT(CURDATE(),'%Y-%m')))"; //Override the default strings if (chkIncludeTrans.Checked) { Report.SetParameterValue("FromDate", dtpFromDate.Value.ToString("yyyy-MM-dd")); Report.SetParameterValue("ToDate", dtpToDate.Value.ToString("yyyy-MM-dd")); selectCreditPurchases = "((TotalIncl - (TotalPaid + TotalDtNotesIncl) <> 0) OR DATE_FORMAT(`Date`,'%Y-%m') = DATE_FORMAT(CURDATE(),'%Y-%m') OR (DATE_FORMAT(`Date`,'%Y-%m-%d') BETWEEN DATE_FORMAT(@FromDate,'%Y-%m-%d') AND DATE_FORMAT(@ToDate,'%Y-%m-%d')))"; selectPaymentsAndNotes = "(DATE_FORMAT(`Date`,'%Y-%m') = DATE_FORMAT(CURDATE(),'%Y-%m') OR (DATE_FORMAT(`Date`,'%Y-%m-%d') BETWEEN DATE_FORMAT(@FromDate,'%Y-%m-%d') AND DATE_FORMAT(@ToDate,'%Y-%m-%d')))"; selectJournals = "(((ABS(Amount) - ABS(TotalPaid) <> 0) OR (DATE_FORMAT(`Date`,'%Y-%m') = DATE_FORMAT(CURDATE(),'%Y-%m'))) OR (DATE_FORMAT(`Date`,'%Y-%m-%d') BETWEEN DATE_FORMAT(@FromDate,'%Y-%m-%d') AND DATE_FORMAT(@ToDate,'%Y-%m-%d')))"; } //Apply the selection strings tStatement.SelectCommand = tStatement.SelectCommand.ToString().Replace("@SelectCreditPurchases", selectCreditPurchases); tStatement.SelectCommand = tStatement.SelectCommand.ToString().Replace("@SelectPaymentsAndNotes", selectPaymentsAndNotes); tStatement.SelectCommand = tStatement.SelectCommand.ToString().Replace("@SelectJournals", selectJournals); } private void _FinishReport(object sender, EventArgs e) { //Add the client's email to the report settings string[] names = new string[1] {Report.GetColumnValue("SelSupplier.Email").ToString()}; Report.EmailSettings.Recipients = names; Report.EmailSettings.Subject = string.Format("Statement from - {0}", Report.GetColumnValue("companies.Name").ToString()); } } }