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 btnOk_Click(object sender, EventArgs e)
{
//Report.SetParameterValue("OrderBy", cboOrderBy.Text); DOES NOT WORK ?????
TableDataSource tProducts = Report.GetDataSource("products") as TableDataSource;
string costColumn = "CostPrice";
string sellingColumn = "SellingPrice";
//Set the Headers for the report
if (chkShowCost.Checked)
{
if (optCostAsTotal.Checked)
{
txtHeaderCost.Text = "Total Cost";
costColumn = "CostPrice * QtyAvailable";
}
else
{
txtHeaderCost.Text = "Unit Cost";
}
}
else
{
txtHeaderCost.Visible = false;
txtCostData.Visible = false;
txtTotalCost.Visible = false;
}
if (chkShowRetail.Checked)
{
if (optRetailAsTotal.Checked)
{
txtHeaderSelling.Text = "Total Selling";
if (chkSellingIncludeTax.Checked)
sellingColumn = "SellingPriceIncl * QtyAvailable";
else
sellingColumn = "SellingPrice * QtyAvailable";
}
else
{
txtHeaderSelling.Text = "Unit Selling";
if (chkSellingIncludeTax.Checked)
sellingColumn = "SellingPriceIncl";
}
}
else
{
txtHeaderSelling.Visible = false;
txtRetailData.Visible = false;
txtTotalSelling.Visible = false;
}
//Replaces the @CostColumn & @SellingColumn strings
tProducts.SelectCommand = tProducts.SelectCommand.ToString().Replace("@CostColumn", costColumn);
tProducts.SelectCommand = tProducts.SelectCommand.ToString().Replace("@SellingColumn", sellingColumn);
if (!chkShowQty.Checked)
{
txtHeaderQty.Visible = false;
txtQty.Visible = false;
}
string orderBy = String.Empty;
if (cboOrderBy.Text == "Item code")
orderBy = "ProductCode";
else if (cboOrderBy.Text == "Description")
orderBy = "Description";
else if (cboOrderBy.Text == "Qty Available")
orderBy = "QtyAvailable DESC";
tProducts.SelectCommand = tProducts.SelectCommand.ToString().Replace("@OrderBy", orderBy);
string selection = String.Empty;
string excludeZeroQtys = String.Empty;
if (chkExcludeZeroQtys.Checked)
excludeZeroQtys = " AND QtyAvailable <> 0";
if (cboSelection.Text == "All")
{
txtSelectionFeedback.Text = "Selection: All";
selection = "ID > 0" + excludeZeroQtys;
}
else if (cboSelection.Text == "Products Only")
{
txtSelectionFeedback.Text = "Selection: Products Only";
selection = "IsProduct = 1" + excludeZeroQtys;
}
else if (cboSelection.Text == "Services Only")
{
txtSelectionFeedback.Text = "Selection: Services Only";
selection = "IsProduct = 0";
}
else if (cboSelection.Text == "Category =")
{
txtSelectionFeedback.Text = "Selection: Category = " + cboCategory.Text;
selection = "Category = '" + cboCategory.Text + "'" + excludeZeroQtys;
}
else if (cboSelection.Text == "Sub Category =")
{
txtSelectionFeedback.Text = "Selection: Sub Category = " + cboSubCategory.Text;
selection = "SubCategory = '" + cboSubCategory.Text + "'" + excludeZeroQtys;
}
else if (cboSelection.Text == "Location =")
{
txtSelectionFeedback.Text = "Selection: Location = " + cboLocation.Text;
selection = "Location = '" + cboLocation.Text + "'" + excludeZeroQtys;
}
else if (cboSelection.Text == "Sub Location =")
{
txtSelectionFeedback.Text = "Selection: Sub Location = " + cboSubLocation.Text;
selection = "SubLocation = '" + cboSubLocation.Text + "'" + excludeZeroQtys;
}
else if (cboSelection.Text == "Below Min. Qty")
{
txtSelectionFeedback.Text = "Selection: Items below Min. Qty";
selection = "QtyAvailable < MinQty" + excludeZeroQtys;
}
else if (cboSelection.Text == "Main Supplier =")
{
txtSelectionFeedback.Text = "Selection: Main Supplier = " + cboSupplier.Text;
selection = "MainSupplierID = '" + ComboBox2.Text + "'" + excludeZeroQtys;
}
tProducts.SelectCommand = tProducts.SelectCommand.ToString().Replace("@Selection", selection);
}
private void Data1_AfterData(object sender, EventArgs e)
{
//total Qty Column format
int decimalValue = Convert.ToInt32(Report.GetColumnValue("programs_config.QtyDecimalValue"));
decimal qtyVal = 0;
if (Decimal.TryParse(txtQty.Text, out qtyVal))
{
txtQty.Text = String.Format("{0:F" + decimalValue + "}", qtyVal);
}
}
private void DataFooter1_AfterData(object sender, EventArgs e)
{
//total Qty Column format
int decimalValue = Convert.ToInt32(Report.GetColumnValue("programs_config.QtyDecimalValue"));
decimal qtyVal = 0;
if (Decimal.TryParse(txtQtyTotal.Text, out qtyVal))
{
txtQtyTotal.Text = String.Format("{0:F" + decimalValue + "}", qtyVal);
}
}
private void cboSelection_SelectedIndexChanged(object sender, EventArgs e)
{
cboCategory.Visible = false;
cboSubCategory.Visible = false;
cboLocation.Visible = false;
cboSubLocation.Visible = false;
cboSupplier.Visible = false;
if (cboSelection.Text == "Category =")
cboCategory.Visible = true;
else if (cboSelection.Text == "Sub Category =")
cboSubCategory.Visible = true;
else if (cboSelection.Text == "Location =")
cboLocation.Visible = true;
else if (cboSelection.Text == "Sub Location =")
cboSubLocation.Visible = true;
else if (cboSelection.Text == "Main Supplier =")
cboSupplier.Visible = true;
}
private void Form1_Shown(object sender, EventArgs e)
{
Form1.Height = 370;
cboSelection.Text = "All";
cboOrderBy.Text = "Description";
}
private void btnAdvanced_Click(object sender, EventArgs e)
{
Panel1.Visible = !Panel1.Visible;
if (Panel1.Visible)
Form1.Height = 560;
else
Form1.Height = 370;
}
}
}