350 lines
14 KiB
C#
350 lines
14 KiB
C#
|
using Kingdee.BOS.App.Data;
|
|||
|
|
using Kingdee.BOS;
|
|||
|
|
using Kingdee.BOS.Contracts.Report;
|
|||
|
|
using Kingdee.BOS.Core.Report;
|
|||
|
|
using Kingdee.BOS.Util;
|
|||
|
|
using System;
|
|||
|
|
using System.Collections.Generic;
|
|||
|
|
using System.ComponentModel;
|
|||
|
|
using System.Linq;
|
|||
|
|
using System.Text;
|
|||
|
|
using System.Threading.Tasks;
|
|||
|
|
using Kingdee.BOS.Orm.DataEntity;
|
|||
|
|
using Pilot.Report.Exploitation.PublicClass;
|
|||
|
|
|
|||
|
|
namespace Pilot.Report.Exploitation.ContractDetails
|
|||
|
|
{
|
|||
|
|
[Description("【列表插件】派诺合同明细报表【报表】"), HotUpdate]
|
|||
|
|
public class ContractDetailsReport: SysReportBaseService
|
|||
|
|
{
|
|||
|
|
private string tableNameView = EnvironmentTEST.tableNameView_TEST;
|
|||
|
|
|
|||
|
|
/// <summary>
|
|||
|
|
/// 初始化
|
|||
|
|
/// </summary>
|
|||
|
|
public override void Initialize()
|
|||
|
|
{
|
|||
|
|
base.Initialize();
|
|||
|
|
this.ReportProperty.ReportName = new LocaleValue("派诺合同明细", base.Context.UserLocale.LCID);
|
|||
|
|
this.ReportProperty.IsUIDesignerColumns = false;
|
|||
|
|
// 简单账表类型：普通、树形、分页
|
|||
|
|
this.ReportProperty.ReportType = ReportType.REPORTTYPE_NORMAL;
|
|||
|
|
this.IsCreateTempTableByPlugin = true;
|
|||
|
|
//
|
|||
|
|
this.IsCreateTempTableByPlugin = true;
|
|||
|
|
//
|
|||
|
|
this.ReportProperty.IsGroupSummary = true;
|
|||
|
|
//
|
|||
|
|
this.ReportProperty.SimpleAllCols = false;
|
|||
|
|
// 单据主键：两行FID相同，则为同一单的两条分录，单据编号可以不重复显示
|
|||
|
|
this.ReportProperty.PrimaryKeyFieldName = "FID";
|
|||
|
|
//
|
|||
|
|
this.ReportProperty.IsDefaultOnlyDspSumAndDetailData = true;
|
|||
|
|
|
|||
|
|
// 设置精度控制
|
|||
|
|
var list = new List<DecimalControlField>
|
|||
|
|
{
|
|||
|
|
new DecimalControlField("FDECIMALS", "OrigInvoiceAmount"),
|
|||
|
|
new DecimalControlField("FDECIMALS", "ExchangeRate"),
|
|||
|
|
new DecimalControlField("FDECIMALS", "InvoiceAmountTHB"),
|
|||
|
|
new DecimalControlField("FDECIMALS", "MonthEndExRate"),
|
|||
|
|
new DecimalControlField("FDECIMALS", "RevaluationAountInTHB"),
|
|||
|
|
new DecimalControlField("FDECIMALS", "UnrealizedGainLoss"),
|
|||
|
|
};
|
|||
|
|
this.ReportProperty.DecimalControlFieldList = list;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/// <summary>
|
|||
|
|
/// 报表列表头
|
|||
|
|
/// </summary>
|
|||
|
|
/// <param name="filter"></param>
|
|||
|
|
/// <returns></returns>
|
|||
|
|
public override ReportHeader GetReportHeaders(IRptParams filter)
|
|||
|
|
{
|
|||
|
|
base.GetReportHeaders(filter);
|
|||
|
|
|
|||
|
|
ReportHeader header = new ReportHeader();
|
|||
|
|
|
|||
|
|
header.AddChild("Month", new LocaleValue("月份"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("BelongsRegion", new LocaleValue("所属区域"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("Salesman", new LocaleValue("销售员"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("PurchasesUnit", new LocaleValue("购货单位"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("SignedDate", new LocaleValue("签订日期"), SqlStorageType.SqlDatetime);
|
|||
|
|
header.AddChild("OrderNumber", new LocaleValue("订单号"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("ProductsName", new LocaleValue("产品名称"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("Model/Size/Standard", new LocaleValue("型号/规格/标准"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("Number/Platform", new LocaleValue("数量/台"), SqlStorageType.SqlDecimal);
|
|||
|
|
header.AddChild("Price/Platform", new LocaleValue("单价元/台"), SqlStorageType.SqlDecimal);
|
|||
|
|
header.AddChild("ContractPrice", new LocaleValue("合同总价"), SqlStorageType.SqlDecimal);
|
|||
|
|
header.AddChild("NumberDelivered", new LocaleValue("已交货数"), SqlStorageType.SqlDecimal);
|
|||
|
|
header.AddChild("NumberUnDelivered", new LocaleValue("未交货数"), SqlStorageType.SqlDecimal);
|
|||
|
|
header.AddChild("Invoicing", new LocaleValue("开票情况"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("ProjectName", new LocaleValue("项目名称"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("ProjectField", new LocaleValue("所属领域"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("BusinessType", new LocaleValue("集采业务分类"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("ClientQuality", new LocaleValue("客户性质"), SqlStorageType.Sqlvarchar);
|
|||
|
|
header.AddChild("SBU", new LocaleValue("SBU"), SqlStorageType.Sqlvarchar);
|
|||
|
|
|
|||
|
|
foreach (var item in header.GetChilds())
|
|||
|
|
{
|
|||
|
|
item.Width = 160;
|
|||
|
|
}
|
|||
|
|
return header;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/// <summary>
|
|||
|
|
/// 显示报表数据
|
|||
|
|
/// </summary>
|
|||
|
|
/// <param name="filter"></param>
|
|||
|
|
/// <param name="tableName"></param>
|
|||
|
|
public override void BuilderReportSqlAndTempTable(IRptParams filter, string tableName)
|
|||
|
|
{
|
|||
|
|
DynamicObject customFilter = filter.FilterParameter.CustomFilter;
|
|||
|
|
|
|||
|
|
// 下单时间
|
|||
|
|
string fDate = customFilter["FDate"]?.ToString();
|
|||
|
|
// 纸质合同号
|
|||
|
|
string fPaperContract = customFilter["FPaperContract"]?.ToString();
|
|||
|
|
// 组织
|
|||
|
|
var organizationList = (customFilter["FZuZhi"] as DynamicObjectCollection)?.Select(n => (n["FZuZhi"] as DynamicObject)["ID"].ToString()).ToList();
|
|||
|
|
|
|||
|
|
var organization = organizationList == null ? "" : (string.Join(",", organizationList));
|
|||
|
|
|
|||
|
|
base.BuilderReportSqlAndTempTable(filter, tableName);
|
|||
|
|
|
|||
|
|
string sql = string.Format(@"/*dialect*/
|
|||
|
|
Select
|
|||
|
|
MONTH(A.FDATE) as 'Month', --月份
|
|||
|
|
(SELECT FNAME FROM T_BD_DEPARTMENT_L WHERE FDEPTID = A.FSaleDeptId) as 'BelongsRegion', --所属区域
|
|||
|
|
(Select FNAME From V_BD_SALESMAN_L Where fid = A.FSalerId) as 'Salesman', --销售员
|
|||
|
|
(SELECT FNAME FROM T_BD_CUSTOMER_L WHERE FCUSTID = A.FCustId) as 'PurchasesUnit', --购货单位
|
|||
|
|
A.FDATE as 'SignedDate', --签订日期
|
|||
|
|
A.F_contractnumber as 'OrderNumber', --订单号
|
|||
|
|
C.FNAME as 'ProductsName', --产品名称
|
|||
|
|
C.FSPECIFICATION as 'ModelSizeStandard', --型号\规格\标准
|
|||
|
|
B.FQty as 'NumberPlatform', --数量/台
|
|||
|
|
(Select FTaxPrice From T_SAL_ORDERENTRY_F Where FENTRYID = B.FENTRYID) as 'PricePlatform', --单价元/台
|
|||
|
|
(Select FAllAmount_LC From T_SAL_ORDERENTRY_F Where FENTRYID = B.FENTRYID) as 'ContractPrice', --合同总价
|
|||
|
|
(Select FStockOutQty From T_SAL_ORDERENTRY_R Where FENTRYID = B.FENTRYID) as 'NumberDelivered', --已交货数
|
|||
|
|
(Select FRemainOutQty From T_SAL_ORDERENTRY_R Where FENTRYID = B.FENTRYID) as 'NumberUnDelivered', --未交货数
|
|||
|
|
CASE WHEN
|
|||
|
|
(D.FOPENSTATUS) --A=空,B=部分,C=完全
|
|||
|
|
= 'A'
|
|||
|
|
Then '空'
|
|||
|
|
When (D.FOPENSTATUS) --A=空,B=部分,C=完全
|
|||
|
|
= 'B'
|
|||
|
|
Then '部分'
|
|||
|
|
When (D.FOPENSTATUS) --A=空,B=部分,C=完全
|
|||
|
|
= 'C'
|
|||
|
|
Then '完全'
|
|||
|
|
Else ''
|
|||
|
|
END as 'Invoicing', --开票情况 A.F_VRYF_Assistant_k79
|
|||
|
|
(Select FNAME From T_BAS_PREBDONE_L Where FID = A.F_projectname) as 'ProjectName', --项目名称
|
|||
|
|
CASE WHEN --项目所属1
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 1
|
|||
|
|
THEN '建筑楼宇'
|
|||
|
|
WHEN --项目所属2
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 2
|
|||
|
|
THEN '医疗卫生'
|
|||
|
|
WHEN --项目所属3
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 3
|
|||
|
|
THEN '学校'
|
|||
|
|
WHEN --项目所属4
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 4
|
|||
|
|
THEN '文娱康乐'
|
|||
|
|
WHEN --项目所属5
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 5
|
|||
|
|
THEN '市政工程'
|
|||
|
|
WHEN --项目所属6
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 6
|
|||
|
|
THEN '能源'
|
|||
|
|
WHEN --项目所属7
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 7
|
|||
|
|
THEN '工业'
|
|||
|
|
WHEN --项目所属8
|
|||
|
|
(Select
|
|||
|
|
aq.F_Projectfield
|
|||
|
|
From
|
|||
|
|
T_BAS_PREBDTHREE aq
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_PREBDTHREE_L aw
|
|||
|
|
on aq.FID = aw.FID
|
|||
|
|
Where aq.FID = A.F_BON) = 8
|
|||
|
|
THEN '交通运输'
|
|||
|
|
ELSE ''
|
|||
|
|
END as 'ProjectField', --项目所属领域
|
|||
|
|
CASE WHEN --集采业务分类
|
|||
|
|
A.F_PurchasingPro = 'LH'
|
|||
|
|
THEN '龙湖'
|
|||
|
|
WHEN --集采业务分类
|
|||
|
|
A.F_PurchasingPro = 'BL'
|
|||
|
|
THEN '保利地产'
|
|||
|
|
WHEN --集采业务分类
|
|||
|
|
A.F_PurchasingPro = 'HR'
|
|||
|
|
THEN '华润'
|
|||
|
|
WHEN --集采业务分类
|
|||
|
|
A.F_PurchasingPro = 'N'
|
|||
|
|
THEN '否'
|
|||
|
|
WHEN --集采业务分类
|
|||
|
|
A.F_PurchasingPro = 'HEF'
|
|||
|
|
THEN '华润非集采'
|
|||
|
|
WHEN --集采业务分类
|
|||
|
|
A.F_PurchasingPro = 'LD'
|
|||
|
|
THEN '绿地'
|
|||
|
|
ELSE ''
|
|||
|
|
END as 'BusinessType', --集采业务分类 LH=龙湖,BL=保利地产,HR=华润,N=否,HEF=华润非集采,LD=绿地
|
|||
|
|
(Select wa.FDATAVALUE From
|
|||
|
|
T_BAS_ASSISTANTDATAENTRY aw
|
|||
|
|
JOIN
|
|||
|
|
T_BAS_ASSISTANTDATAENTRY_L wa
|
|||
|
|
on aw.FENTRYID = wa.FENTRYID
|
|||
|
|
Where wa.FENTRYID = (Select F_CreditClassification From T_BD_CUSTOMER where FCUSTID = A.FCustId)
|
|||
|
|
AND FDocumentStatus = 'C' AND FFORBIDSTATUS = 'A') as 'ClientQuality', --客户性质
|
|||
|
|
(Select V1.区域 From
|
|||
|
|
{0} V1
|
|||
|
|
JOIN
|
|||
|
|
(Select FName From V_BD_SALESMAN_L
|
|||
|
|
Where
|
|||
|
|
fid in (Select A1.FSALEID From
|
|||
|
|
(Select a2.* From
|
|||
|
|
T_PerformanceSharing a1
|
|||
|
|
JOIN
|
|||
|
|
T_PerformanceSharingEntry a2
|
|||
|
|
on a1.FID = a2.FID
|
|||
|
|
Where a1.FDocumentStatus = 'C') A1
|
|||
|
|
JOIN
|
|||
|
|
T_PerformanceSharing_LK A2
|
|||
|
|
on A2.FID = A1.FID
|
|||
|
|
Where A2.FSTableName = 'T_SAL_ORDER1'
|
|||
|
|
AND A2.FSId = B.FID AND A1.FSALEID = A.FSalerId
|
|||
|
|
)) V2
|
|||
|
|
on V1.名称 = V2.FNAME GROUP BY V1.区域)
|
|||
|
|
as 'SBU' --SBU
|
|||
|
|
Into #TempTable1 ", tableNameView);
|
|||
|
|
|
|||
|
|
sql += string.Format(@"From
|
|||
|
|
T_SAL_ORDER A
|
|||
|
|
JOIN
|
|||
|
|
T_SAL_ORDERENTRY B
|
|||
|
|
on B.FID = A.FID
|
|||
|
|
Left JOIN
|
|||
|
|
(Select aq.FMATERIALID,qa.FNAME,aq.F_XHDL,aq.F_116,qa.FSpecification
|
|||
|
|
From
|
|||
|
|
T_BD_MATERIAL aq
|
|||
|
|
Left JOIN
|
|||
|
|
T_BD_MATERIAL_L qa
|
|||
|
|
on aq.FMATERIALID = qa.FMATERIALID) C
|
|||
|
|
on B.FMaterialId = C.FMATERIALID
|
|||
|
|
LEFT JOIN
|
|||
|
|
(Select A2.FOPENSTATUS,A1.FID,A1.FORDERNUMBER From T_AR_RECEIVABLEENTRY A1 JOIN T_AR_RECEIVABLE A2 on A1.FID = A2.FID
|
|||
|
|
Where A2.FSETACCOUNTTYPE = 3 Group by A2.FOPENSTATUS,A1.FID,A1.FORDERNUMBER) D on A.FBILLNO = D.FORDERNUMBER
|
|||
|
|
--条件
|
|||
|
|
Where A.FDocumentStatus = 'C'
|
|||
|
|
AND A.FCloseStatus = 'A'
|
|||
|
|
AND A.FCancelStatus = 'A'");
|
|||
|
|
|
|||
|
|
if (!string.IsNullOrEmpty(fDate))
|
|||
|
|
{
|
|||
|
|
sql += string.Format(@" AND A.FDATE = '{0}'", fDate);
|
|||
|
|
}
|
|||
|
|
if (!string.IsNullOrEmpty(fPaperContract))
|
|||
|
|
{
|
|||
|
|
sql += string.Format(@" AND A.F_contractnumber like '%{0}%'", fPaperContract);
|
|||
|
|
}
|
|||
|
|
if (!string.IsNullOrEmpty(organization))
|
|||
|
|
{
|
|||
|
|
sql += string.Format(@" AND A.FSaleOrgId in ({0})", organization);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
sql += string.Format(@";");
|
|||
|
|
|
|||
|
|
sql += string.Format(@"/*dialect*/
|
|||
|
|
Select
|
|||
|
|
ROW_NUMBER() OVER (ORDER BY SignedDate) AS FID,
|
|||
|
|
ROW_NUMBER() OVER (ORDER BY SignedDate) AS FIDENTITYID,
|
|||
|
|
*
|
|||
|
|
into {0}
|
|||
|
|
From #TempTable1", tableName);
|
|||
|
|
|
|||
|
|
DBUtils.Execute(this.Context, sql);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/// <summary>
|
|||
|
|
/// 获取前端组件转换过滤条件
|
|||
|
|
/// </summary>
|
|||
|
|
/// <param name="filter"></param>
|
|||
|
|
/// <returns></returns>
|
|||
|
|
public override ReportTitles GetReportTitles(IRptParams filter)
|
|||
|
|
{
|
|||
|
|
ReportTitles reportTitles = new ReportTitles();
|
|||
|
|
DynamicObject customFilter = filter.FilterParameter.CustomFilter;
|
|||
|
|
|
|||
|
|
if (customFilter != null)
|
|||
|
|
{
|
|||
|
|
// 下单时间
|
|||
|
|
string fDate = customFilter["FDate"]?.ToString();
|
|||
|
|
// 纸质合同号
|
|||
|
|
string fPaperContract = customFilter["FPaperContract"]?.ToString();
|
|||
|
|
// 组织
|
|||
|
|
var organizationList = (customFilter["FZuZhi"] as DynamicObjectCollection)?.Select(n => (n["FZuZhi"] as DynamicObject)["Name"].ToString()).ToList();
|
|||
|
|
|
|||
|
|
//这里是报表页面的标识
|
|||
|
|
reportTitles.AddTitle("FPaperContract", fPaperContract == null ? "" : fPaperContract);
|
|||
|
|
reportTitles.AddTitle("FDate", fDate == null ? "" : Convert.ToDateTime(fDate).ToString("yyyy-MM-dd"));
|
|||
|
|
reportTitles.AddTitle("FZuZhi", organizationList == null ? "" : string.Join(",", organizationList));
|
|||
|
|
}
|
|||
|
|
return reportTitles;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|