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)
{
dtpFromDate.Text = System.DateTime.Now.ToString("d MMMM yyy");
dtpToDate.Text = System.DateTime.Now.ToString("d MMMM yyy");
cboClientName.Items.Insert(0, "All");
cboClientName.Text = "All";
cboOrderBy.Text = cboOrderBy.Items[0].ToString();
}
private void btnOk_Click(object sender, EventArgs e)
{
Report.SetParameterValue("FromDate", dtpFromDate.Value.ToString("yyyy-MM-dd"));
Report.SetParameterValue("ToDate", dtpToDate.Value.ToString("yyyy-MM-dd"));
string orderBy = String.Empty;
if (cboOrderBy.Text == "Date")
orderBy = "DATE_FORMAT(`Date`,'%Y-%m-%d')";
else if (cboOrderBy.Text == "Document #")
orderBy = "TransID";
else if (cboOrderBy.Text == "Client Name")
orderBy = "ClientName";
else if (cboOrderBy.Text == "Sales Rep")
orderBy = "SalesRep";
//For a specific client
string forClient = "ID >= 0";
if (cboClientName.Text != "All")
forClient = String.Format("ClientName = '{0}'", cboClientName.Text);
TableDataSource tINV = Report.GetDataSource("credit_sales") as TableDataSource;
TableDataSource tCN = Report.GetDataSource("credit_notes") as TableDataSource;
TableDataSource tJNL = Report.GetDataSource("Journals") as TableDataSource;
TableDataSource tRCPT = Report.GetDataSource("receipts") as TableDataSource;
tINV.SelectCommand = tINV.SelectCommand.ToString().Replace("@OrderBy", orderBy);
tCN.SelectCommand = tCN.SelectCommand.ToString().Replace("@OrderBy", orderBy);
tJNL.SelectCommand = tJNL.SelectCommand.ToString().Replace("@OrderBy", orderBy);
tRCPT.SelectCommand = tRCPT.SelectCommand.ToString().Replace("@OrderBy", orderBy);
tINV.SelectCommand = tINV.SelectCommand.ToString().Replace("@ForClient", forClient);
tCN.SelectCommand = tCN.SelectCommand.ToString().Replace("@ForClient", forClient);
tJNL.SelectCommand = tJNL.SelectCommand.ToString().Replace("@ForClient", forClient);
tRCPT.SelectCommand = tRCPT.SelectCommand.ToString().Replace("@ForClient", forClient);
}
private void Child3_AfterData(object sender, EventArgs e)
{
txtTotExcl.Text = (Report.GetTotalValue("Total_Excl") - Report.GetTotalValue("Total_Excl_Refunds")).ToString();
txtTotVAT.Text = (Report.GetTotalValue("Total_VAT") - Report.GetTotalValue("Total_VAT_Refunds")).ToString();
txtTotIncl.Text = (Report.GetTotalValue("Total_Incl") - Report.GetTotalValue("Total_Incl_Refunds")).ToString();
//Format the total values
//Use the tryParse method if there is no data to print
decimal number = 0;
if (Decimal.TryParse(txtTotExcl.Text, out number))
txtTotExcl.Text = Convert.ToDecimal(txtTotExcl.Text).ToString("# ###.00");
if (Decimal.TryParse(txtTotVAT.Text, out number))
txtTotVAT.Text = Convert.ToDecimal(txtTotVAT.Text).ToString("# ###.00");
if (Decimal.TryParse(txtTotIncl.Text, out number))
txtTotIncl.Text = Convert.ToDecimal(txtTotIncl.Text).ToString("# ###.00");
}
}
}