/// <summary>
/// FastReports设计
/// </summary>
/// <param name="sender"></param>
/// <param name="e"></param>
public override void btnDesign_Click(object sender, EventArgs e)
{
try
{
if (!FCommon.RightCheck(this.FormID, this.RightFormID, this.FormListAID, this.FormListBID, RightSub.提交3))
{
this.ShowMessage("你没有此操作权限");
return;
}
DevComponents.DotNetBar.ComboBoxItem ci = this.ToolBarCItemGet(-1, ToolButtonName.drpPrintFile.ToString());
int tempReportID = SysConvert.ToInt32(((DevComponents.Editors.ComboItem)ci.SelectedItem).Tag);
if (tempReportID == 0)
{
this.ShowMessage("请选择报表模板");
return;
}
DataTable dt = null;
dt = WCommon.PrintDataTable(_HTDataList);
if (dt.Rows.Count != 0)
{
FastReport.ReportRunTable(tempReportID, (int)ReportPrintType.设计, dt);
}
else
{
this.ShowMessage("请选择要导出的数据");
}
}
catch (Exception E)
{
this.ShowMessage(E.Message);
}
}
public frmReportPreview(FastReport.Report rp)
{
InitializeComponent();
PreRepot = rp;
//设置报表控件新增数据源连接字符串
FastReport.Utils.Config.DesignerSettings.ApplicationConnection = Sunrise.ERP.BaseControl.ConnectSetting.SysSqlConnection;
}
public frmSaveReport(FastReport.Report rp, string rpGUID,int reportid)
{
InitializeComponent();
report = rp;
rpguid = rpGUID;
CurrentReportID = reportid;
GetReportData();
}
public frmReportDesign(FastReport.Report rp,int reportid)
{
InitializeComponent();
report = rp;
ReportID = reportid;
//设置报表控件新增数据源连接字符串
FastReport.Utils.Config.DesignerSettings.ApplicationConnection = Sunrise.ERP.BaseControl.ConnectSetting.SysSqlConnection;
}
private void Report_DataRegister_Billing_EAS(FastReport.Report FReport, string sDate)
{
DataTable dt = null;
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@sDate",
Direction = ParameterDirection.Input,
Value = sDate,
DbType = DbType.String
};
SqlParameter[] param = new SqlParameter[] { para1 };
dt = SqlHelper.GetDatatableBySP("proc_AmountSum_EAS", param);
FReport.RegisterData(dt, dt.TableName);
}
private void Report_DataRegister_Amout_Tug(FastReport.Report FReport, string st, string ed)
{
DataTable dt = null;
string str_report = string.Format(" ID > {0} and BillingDateTime>='{1}' and BillingDateTime<='{2}'", 0,st,ed);
//data
dt = SqlHelper.GetDataTableData("V_AmountSum_Billing", str_report);
FReport.RegisterData(dt, dt.TableName);
}
private void Report_DataRegister_Amout_ByTug(FastReport.Report FReport,string sDate, int year, int month)
{
DataTable dt = null;
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@sYear",
Direction = ParameterDirection.Input,
Value = year,
DbType = DbType.Int16
};
SqlParameter para2 = new SqlParameter()
{
ParameterName = "@sMonth",
Direction = ParameterDirection.Input,
Value = month,
DbType = DbType.Int16
};
SqlParameter[] param = new SqlParameter[] { para1, para2 };
dt = SqlHelper.GetDatatableBySP("proc_AmountSum_ByTug", param);
FReport.RegisterData(dt, dt.TableName);
if (dt.Rows.Count != 0)
{
FReport.Parameters.FindByName("month").Value = sDate;
FReport.Parameters.FindByName("lastyear").Value = Convert.ToDouble(dt.Compute("Sum(LastYearAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("lastyeartothis").Value = Convert.ToDouble(dt.Compute("Sum(LastYearToThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("thisyeartothis").Value = Convert.ToDouble(dt.Compute("Sum(ThisYearToThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("lastyearthismonth").Value = Convert.ToDouble(dt.Compute("Sum(LastYearThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("thisyearthismonth").Value = Convert.ToDouble(dt.Compute("Sum(ThisYearThisMonthAmount)", "")).ToString("f2");
}
}
public frmReportPreview(FastReport.Report rp)
{
InitializeComponent();
PreRepot = rp;
}
private void Report_DataRegister_Tug_ByDay(FastReport.Report FReport, string startdate, string enddate)
{
DataTable dt = null;
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@Date1",
Direction = ParameterDirection.Input,
Value = startdate,
DbType = DbType.DateTime
};
SqlParameter para2 = new SqlParameter()
{
ParameterName = "@Date2",
Direction = ParameterDirection.Input,
Value = enddate,
DbType = DbType.DateTime
};
SqlParameter[] param = new SqlParameter[] { para1, para2 };
dt = SqlHelper.GetDatatableBySP("proc_TugSum_ByDay", param);
FReport.RegisterData(dt, dt.TableName);
}
private void Report_DataRegister_tk(FastReport.Report FReport, int BillingID, int TimeTypeValue)
{
double ndiscount;
DataTable dtV_Inv_Head = null; DataTable dtV_Inv_OrdService = null; DataTable dtContenData = null; DataTable dtScheduler = null;
DataTable dtMData; DataTable dtSubTotal; DataTable dtDData; DataTable dtTotal; DataTable dtGrandTotal;
string strV_Inv_Head = string.Format(" IDX = {0}", BillingID);
string strV_Inv_OrdService = string.Format(" BillingID = {0} order by ServiceWorkDate,IDX", BillingID);
//head
dtV_Inv_Head = SqlHelper.GetDataTableData("V_Inv_Head", strV_Inv_Head);
FReport.RegisterData(dtV_Inv_Head, dtV_Inv_Head.TableName);
ndiscount = Util.tonumeric(dtV_Inv_Head.Rows[0]["Discount"]);
//百分比参数
FReport.Parameters.FindByName("RateGWFJF").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Ratio1"]);
FReport.Parameters.FindByName("Rate18To22GWFJF").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Ratio2"]);
FReport.Parameters.FindByName("Rate22To08GWFJF").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Ratio3"]);
FReport.Parameters.FindByName("RateJRFJF").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Ratio4"]);
FReport.Parameters.FindByName("RateTFFJF").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Ratio5"]);
FReport.Parameters.FindByName("Rate3600").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Ratio6"]);
FReport.Parameters.FindByName("RateDiscount").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Discount"]);
//获取长度或箱量信息
if (Util.checkdbnull(dtV_Inv_Head.Rows[0]["IsShowShipLengthRule"]) == "是")
{
FReport.Parameters.FindByName("strRule").Value = "VESSEL (LOA): " + Util.checkdbnull(dtV_Inv_Head.Rows[0]["ShipLength"]) + " M.";
FReport.Parameters.FindByName("CustomerShipLengthOrTeu").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["Length"]) + " M.";
}
else if (Util.checkdbnull(dtV_Inv_Head.Rows[0]["IsShowShipTEUSRule"]) == "是")
{
FReport.Parameters.FindByName("strRule").Value = "VOLUME (TEU): " + Util.checkdbnull(dtV_Inv_Head.Rows[0]["ShipTEUS"]);
FReport.Parameters.FindByName("CustomerShipLengthOrTeu").Value = Util.checkdbnull(dtV_Inv_Head.Rows[0]["TEUS"]) + " TEU.";
}
//上
dtV_Inv_OrdService = SqlHelper.GetDataTableData("V_Inv_OrdService", strV_Inv_OrdService);
FReport.RegisterData(dtV_Inv_OrdService, dtV_Inv_OrdService.TableName);
//获取内容数据，再过滤加载到内容区
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@BillingID",
Direction = ParameterDirection.Input,
Value = BillingID,
DbType = DbType.Int16
};
SqlParameter para2 = new SqlParameter()
{
ParameterName = "@TimeTypeValue",
Direction = ParameterDirection.Input,
Value = TimeTypeValue,
DbType = DbType.Int16
};
SqlParameter[] param = new SqlParameter[] { para1, para2 };
dtContenData = SqlHelper.GetDatatableBySP("proc_inv_item", param);
//中
dtMData=TugBusinessLogic.Utils.TableToChildTB(dtContenData,"ItemCode like 'A%' or ItemCode like 'B%'");
FReport.RegisterData(dtMData, "MData");
//中，Sub-total HK$
dtSubTotal = TugBusinessLogic.Utils.TableToChildTB(dtContenData, "ItemCode = 'T0'");
FReport.RegisterData(dtSubTotal, "SubTotal");
//下
dtDData = TugBusinessLogic.Utils.TableToChildTB(dtContenData, "ItemCode like 'C%'");
FReport.RegisterData(dtDData, "DData");
//下,Total HK$
dtTotal = TugBusinessLogic.Utils.TableToChildTB(dtContenData, "ItemCode = 'T1'");
FReport.RegisterData(dtTotal, "Total");
//脚,Grand Total HK$
dtGrandTotal = TugBusinessLogic.Utils.TableToChildTB(dtContenData, "ItemCode = 'T2'");
FReport.Parameters.FindByName("GrandTotalHK$").Value = Util.tonumeric(dtGrandTotal.Rows[0]["Value"]) - ndiscount * Util.tonumeric(dtGrandTotal.Rows[0]["Value"]) / 100;
//拖轮数量
string strV_Inv_Scheduler = string.Format(" BillingID = {0}", BillingID);
dtScheduler = SqlHelper.GetDataTableData("V_Inv_Scheduler", strV_Inv_Scheduler);
FReport.Parameters.FindByName("TugNum").Value = dtScheduler.Rows.Count;
FReport.Parameters.FindByName("Discount").Value = ndiscount * Util.tonumeric(dtGrandTotal.Rows[0]["Value"]) / 100;
}
private void Report_DataRegister_credit_youhuidan(FastReport.Report FReport, int BillingID)
{
DataTable dt_Credit = null;
string str_Credit = string.Format(" IDX = {0}", BillingID);
//head
dt_Credit = SqlHelper.GetDataTableData("V_Inv_Credit_youhuidan", str_Credit);
FReport.RegisterData(dt_Credit, dt_Credit.TableName);
}
/// <summary>
/// 默认打印样式
/// </summary>
public void LoadDefaultStyle(FastReport.Design.StandardDesigner.DesignerControl designerReport)
{
FastReport.Report rep = DefaultReport();
if (rep == null)
{
return;
}
designerReport.Report = rep;
designerReport.RefreshLayout();
}
public void SetReport(FastReport.Report fastReport)
{
ReportPage page = (ReportPage)fastReport.Pages[0];
//page.PageHeader
//page.Bands[0].ChildObjects
//page.Bands[0].Objects
}
public frmReportDesign(FastReport.Report rp)
{
InitializeComponent();
report = rp;
}
private void Report_DataRegister_Billing_List(FastReport.Report FReport, string startdate, string enddate, int customerid)
{
DataTable dt = null;
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@Date1",
Direction = ParameterDirection.Input,
Value = startdate,
DbType = DbType.DateTime
};
SqlParameter para2 = new SqlParameter()
{
ParameterName = "@Date2",
Direction = ParameterDirection.Input,
Value = enddate,
DbType = DbType.DateTime
};
SqlParameter para3 = new SqlParameter()
{
ParameterName = "@CustomerID",
Direction = ParameterDirection.Input,
Value = customerid,
DbType = DbType.Int32
};
SqlParameter[] param = new SqlParameter[] { para1, para2, para3 };
dt = SqlHelper.GetDatatableBySP("proc_billing_pt_ts_qt", param);
FReport.RegisterData(dt, dt.TableName);
if(dt.Rows.Count!=0)
{
FReport.Parameters.FindByName("totaltugnum").Value = dt.Compute("Sum(TugNum)","");
double dbdata = 0.55555;
string str1 = dbdata.ToString("f2 ");//fN 保留N位，四舍五入
FReport.Parameters.FindByName("totalbillamount").Value = Convert.ToDouble(dt.Compute("Sum(Amount)", "")).ToString("f2");
FReport.Parameters.FindByName("totaldiscount").Value = Convert.ToDouble(dt.Compute("Sum(TotalRebate)", "")).ToString("f2");
FReport.Parameters.FindByName("totalheji").Value = Convert.ToDouble(dt.Compute("Sum(FinalAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("totalfuel").Value = Convert.ToDouble(dt.Compute("Sum(FuelAmount)", "")).ToString("f2");
}
}
private void Report_DataRegister_credit_special(FastReport.Report FReport, int BillingID, int CreditID)
{
DataTable dtV_Inv_Head = null; DataTable dt_Credit = null;
string strV_Inv_Head = string.Format(" IDX = {0}", CreditID);
string str_Credit = string.Format(" IDX = {0}", CreditID);
//head
dtV_Inv_Head = SqlHelper.GetDataTableData("V_Inv_Head_Special_Credit", strV_Inv_Head);
FReport.RegisterData(dtV_Inv_Head, dtV_Inv_Head.TableName);
//creditnote,refundhk$
dt_Credit = SqlHelper.GetDataTableData("Credit", str_Credit);
FReport.Parameters.FindByName("CreditNote").Value = dt_Credit.Rows[0]["CreditContent"];
FReport.Parameters.FindByName("RefundHK$").Value = dt_Credit.Rows[0]["CreditAmount"];
}
/// <summary>
/// 加载打印样式
/// </summary>
/// <param name="fileName"></param>
public void LoadPrintStyle(string fileName, FastReport.Design.StandardDesigner.DesignerControl designerReport)
{
FastReport.Report rep = new FastReport.Report();
rep.Load(fileName);
if (dt != null && dt.Rows.Count > 0)
{
rep.RegisterData(dt, styleObject);
}
if (paperSize != null && rep.Pages.Count>0)
{
ReportPage page = (ReportPage)rep.Pages[0];
page.PaperWidth = paperSize.Width;
page.PaperHeight = paperSize.Height;
}
//designerReport.Report = rep;
//designerReport.RefreshLayout();
SetReport(rep, designerReport);
}
private void Report_DataRegister_special(FastReport.Report FReport, int BillingID)
{
DataTable dtV_Inv_Head = null; DataTable dtV_Inv_OrdService = null; DataTable dtV_Inv_OrdService_sort = null;
string strV_Inv_Head = string.Format(" IDX = {0}", BillingID);
string strV_Inv_OrdService = string.Format(" SpecialBillingID = {0}", BillingID);
//head
dtV_Inv_Head = SqlHelper.GetDataTableData("V_Inv_Head_Special", strV_Inv_Head);
FReport.RegisterData(dtV_Inv_Head, dtV_Inv_Head.TableName);
//数据
dtV_Inv_OrdService = SqlHelper.GetDataTableData("SpecialBillingItem", strV_Inv_OrdService);
dtV_Inv_OrdService_sort = TugBusinessLogic.Utils.TableToChildTB(dtV_Inv_OrdService, "", "ServiceDate,CustomerShipName,ServiceNature");
FReport.RegisterData(dtV_Inv_OrdService_sort, dtV_Inv_OrdService_sort.TableName);
object tugnum = dtV_Inv_OrdService.Compute("sum(TugNumber)", "TRUE");
FReport.Parameters.FindByName("srvprice").Value = dtV_Inv_OrdService_sort.Rows[0]["ServiceUnitPrice"];
FReport.Parameters.FindByName("feulprice").Value = dtV_Inv_OrdService_sort.Rows[0]["FeulUnitPrice"];
FReport.Parameters.FindByName("totalfeul").Value =Util.tonumeric(dtV_Inv_OrdService_sort.Rows[0]["FeulUnitPrice"]) * Util.toint(tugnum);
FReport.Parameters.FindByName("totalsrv").Value = Util.tonumeric(dtV_Inv_OrdService_sort.Rows[0]["ServiceUnitPrice"]) * Util.toint(tugnum);
}
private void SetReport(FastReport.Report rep, FastReport.Design.StandardDesigner.DesignerControl ctr)
{
Action<FastReport.Report> setReportAction = rep0 => { ctr.Report = rep0; ctr.RefreshLayout(); };//Action<T>本身就是delegate类型，省掉了delegate的定义
if (ctr.InvokeRequired)
{
ctr.Invoke(setReportAction, rep);
}
else
{
setReportAction(rep);
}
}
private void Report_DataRegister_TugNum_ByCustomer(FastReport.Report FReport, int year, int month)
{
DataTable dt = null;
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@sYear",
Direction = ParameterDirection.Input,
Value = year,
DbType = DbType.Int16
};
SqlParameter para2 = new SqlParameter()
{
ParameterName = "@sMonth",
Direction = ParameterDirection.Input,
Value = month,
DbType = DbType.Int16
};
SqlParameter[] param = new SqlParameter[] { para1, para2 };
dt = SqlHelper.GetDatatableBySP("proc_TugSum_ByCustomer", param);
FReport.RegisterData(dt, dt.TableName);
}
private void Report_DataRegister(FastReport.Report FReport)
{
string strWhereHead = string.Empty; string strWhereDetail = string.Empty;
DataTable dtHead = null; DataTable dtDetail = null;
strWhereHead = string.Format(" ID = {0}", 1);
strWhereDetail = string.Format(" IDX > {0}", 1);
foreach (DataSourceBase item in FReport.Dictionary.DataSources)
{
if (item.Alias.ToLower().Contains("head"))
{
//headAlias = item.Alias;
dtHead = SqlHelper.GetDataTableData(item.Name, strWhereHead);
}
if (item.Alias.ToLower().Contains("detail"))
{
//detailAlias = item.Alias;
dtDetail = SqlHelper.GetDataTableData(item.Name, strWhereDetail);
}
}
//FReport.RegisterData(dtHead, dtHead.TableName);
dtDetail = SqlHelper.GetDataTableData("OrderInfor", "IDX>1");
FReport.RegisterData(dtDetail, dtDetail.TableName);
}
private void Report_DataRegister_AmoutSum_ByCustomer(FastReport.Report FReport, string sDate, int year, int month)
{
try
{
DataTable dt = null;
SqlParameter para1 = new SqlParameter()
{
ParameterName = "@sYear",
Direction = ParameterDirection.Input,
Value = year,
DbType = DbType.Int16
};
SqlParameter para2 = new SqlParameter()
{
ParameterName = "@sMonth",
Direction = ParameterDirection.Input,
Value = month,
DbType = DbType.Int16
};
SqlParameter[] param = new SqlParameter[] { para1, para2 };
dt = SqlHelper.GetDatatableBySP("proc_AmountSum_ByCustomer", param);
FReport.RegisterData(dt, dt.TableName);
if (dt.Rows.Count != 0)
{
FReport.Parameters.FindByName("month").Value = sDate;
FReport.Parameters.FindByName("lastyear").Value = Convert.ToDouble(dt.Compute("Sum(LastYearAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("lastyeartothismonth").Value = Convert.ToDouble(dt.Compute("Sum(LastYearToThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("thisyeartothismonth").Value = Convert.ToDouble(dt.Compute("Sum(ThisYearToThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("lastyearthismonth").Value = Convert.ToDouble(dt.Compute("Sum(LastYearThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("thisyearthismonth").Value = Convert.ToDouble(dt.Compute("Sum(ThisYearThisMonthAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("fuelamount").Value = Convert.ToDouble(dt.Compute("Sum(FuelAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("submitcaiwu").Value = Convert.ToDouble(dt.Compute("Sum(SubmitFinanceAmount)", "")).ToString("f2");
FReport.Parameters.FindByName("turnnextmonth").Value = Convert.ToDouble(dt.Compute("Sum(TurnNextMonthAmount)", "")).ToString("f2");
}
}
catch (Exception ex)
{
throw ex;
}
}
public frmSaveReport(FastReport.Report rp, string rpGUID)
{
InitializeComponent();
report = rp;
rpguid = rpGUID;
GetReportData(rpguid);
initButtonsState("View");
}
