using Kingdee.BOS.App.Data;
using Kingdee.BOS.Contracts.Report;
using Kingdee.BOS.Core.Report;
using Kingdee.BOS.Orm.DataEntity;
using Kingdee.BOS.Util;
using Kingdee.BOS;
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Data;

namespace Pilot.Report.Exploitation.AccountsReceivableStatements
{
    /// <summary>
    /// 应收账款对账报表【明细版】
    /// </summary>
    [Description("【列表插件】应收账款对账报表【明细版】"), HotUpdate]
    public class AccountsReceivableReport2 : SysReportBaseService
    {
        /// <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("Number", new LocaleValue("序号"), SqlStorageType.Sqlvarchar);
            header.AddChild("DATE", new LocaleValue("签订日期"), SqlStorageType.SqlDatetime);
            header.AddChild("CONTRACTNUMBER", new LocaleValue("订单号"), SqlStorageType.Sqlvarchar);
            header.AddChild("ProjectName", new LocaleValue("项目名称"), SqlStorageType.Sqlvarchar);
            header.AddChild("SizeModel", new LocaleValue("规格型号"), SqlStorageType.Sqlvarchar);
            header.AddChild("FQty", new LocaleValue("数量/台"), SqlStorageType.SqlInt);
            header.AddChild("FTaxPrice", new LocaleValue("单价"), SqlStorageType.SqlDecimal);
            header.AddChild("FAllAmount", new LocaleValue("价税合计"), SqlStorageType.SqlDecimal);
            header.AddChild("OrderAmount", new LocaleValue("订单金额"), SqlStorageType.SqlDecimal);
            header.AddChild("ShipmentsDate", new LocaleValue("发货日期"), SqlStorageType.Sqlvarchar);
            header.AddChild("ShipmentsNum", new LocaleValue("发货数量"), SqlStorageType.SqlInt);
            header.AddChild("ShipmentsAmount", new LocaleValue("发货金额"), SqlStorageType.SqlDecimal);
            header.AddChild("ReturnDate", new LocaleValue("退货日期"), SqlStorageType.Sqlvarchar);
            header.AddChild("ReturnNum", new LocaleValue("退货数量"), SqlStorageType.SqlInt);
            header.AddChild("ReturnAmount", new LocaleValue("退货金额"), SqlStorageType.SqlDecimal);
            header.AddChild("BillingDate", new LocaleValue("开票日期"), SqlStorageType.Sqlvarchar);
            header.AddChild("BillingAmount", new LocaleValue("开票金额"), SqlStorageType.SqlDecimal);
            header.AddChild("PaymentDate", new LocaleValue("回款日期"), SqlStorageType.Sqlvarchar);
            header.AddChild("PaymentAmount", new LocaleValue("回款金额"), SqlStorageType.SqlDecimal);
            header.AddChild("ShippedDebt", new LocaleValue("已出货欠款"), SqlStorageType.SqlDecimal);
            header.AddChild("InvoicedDebt", new LocaleValue("已开票欠款"), SqlStorageType.SqlDecimal);
            header.AddChild("OwedTickets", new LocaleValue("欠票"), SqlStorageType.SqlDecimal);
            header.AddChild("IsEnded", new LocaleValue("是否已完结"), SqlStorageType.Sqlvarchar);
            header.AddChild("Remark", new LocaleValue("备注"), 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 fClient = customFilter["FClient_Id"]?.ToString();
            // 工程项目名称
            var fProjectList = (customFilter["FProject"] as DynamicObjectCollection)?.Select(n => (n["FProject"] as DynamicObject)["ID"].ToString()).ToList();
            // 截止对账日期
            var fDate = customFilter["FDate"]?.ToString();
            // 订单状态
            var fGROUP = customFilter["F_ALL_GROUP"]?.ToString();

            var fProject = fProjectList == null ? "" : (string.Join(",", fProjectList));

            base.BuilderReportSqlAndTempTable(filter, tableName);

            string sql = string.Format(@"/*dialect*/
            Select * INTO #TABLEXYX From 
            (Select A.FID From View_Table_Temp2 A JOIN View_Table_Temp3 B 
            on A.FCONTRACTNUMBER=B.FCONTRACTNUMBER AND A.FCREATEDATE = B.FCREATEDATE
            UNION ALL
            Select * From View_Table_Temp1) W
            Select
            A.FDATE,
            CAST(ROW_NUMBER() OVER (ORDER BY A.FDate DESC) as nvarchar(MAX)) AS Number,
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE A.FDate END as 'DATE', --签订日期
            CASE WHEN B.FSEQ != 1 THEN ''
            ELSE A.F_CONTRACTNUMBER END as 'CONTRACTNUMBER', --订单号
            CASE WHEN B.FSEQ != 1 THEN ''
            ELSE ISNULL(H.FNAME,'') END as 'ProjectName', --项目名称
            ISNULL(G.FSpecification,'') as 'SizeModel', --规格型号
            B.FQty, --数量/台
            B2.FTaxPrice, --单价
            B2.FAllAmount, --价税合计
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(A2.FBILLALLAMOUNT,0) END as 'OrderAmount', --订单金额
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H2.FDate,'') END as 'ShipmentsDate', --发货日期
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H2.FPRICEBASEQTY,0) END as 'ShipmentsNum', --发货数量
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H2.FALLAMOUNT,0) END as 'ShipmentsAmount', --发货金额
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H3.FDate,'') END as 'ReturnDate', --退货日期
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H3.FRETNOTICEQTY,0) END as 'ReturnNum', --退货数量
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H3.FBillAllAmount,0) END as 'ReturnAmount',--退货金额
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H4.FDate,'') END as 'BillingDate', --开票日期
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H4.FALLAMOUNTFOR,0) END as 'BillingAmount', --开票金额
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE (Select STRING_AGG((CONVERT(nvarchar,aa1.FDATE,23)),',') as 'FDate'
            From T_AR_RECEIVEBILL aa1 JOIN T_SEC_USER aa2 on aa1.FCREATORID = aa2.FUSERID
            Where FBILLNO in (Select FBILLNO3 From T_AutoWrireRecordEntry a1 JOIN T_AutoWrireRecordEntry2 a2
            on a1.FID = a2.FID Where FBILLNO2 = A.FBILLNO)) 
            END as 'PaymentDate', --回款日期
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(A.F_AMOUNT,0) END as 'PaymentAmount', --回款金额
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H2.FALLAMOUNT,0)-ISNULL(H3.FBillAllAmount,0) -ISNULL(E.FWRITTENOFFAMOUNTFOR,0) END as 'ShippedDebt', --已出货欠款
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL(H4.FALLAMOUNTFOR,0) -ISNULL(E.FWRITTENOFFAMOUNTFOR,0) END as 'InvoicedDebt', --已开票欠款
            CASE WHEN B.FSEQ != 1 THEN null
            ELSE ISNULL((ISNULL(H2.FALLAMOUNT,0)-ISNULL(H3.FBillAllAmount,0) -0)-(ISNULL(H4.FALLAMOUNTFOR,0) -0),0) 
            END as 'OwedTickets', --欠票
            CASE WHEN B.FSEQ != 1 THEN ''
            WHEN (ISNULL(AA.FBillAllAmount,0)-ISNULL(H3.FBillAllAmount,0)) = ISNULL(H2.FALLAMOUNT,0) --订单金额-退货金额 = 发货金额
            AND (ISNULL(AA.FBillAllAmount,0)-ISNULL(H3.FBillAllAmount,0)) = ISNULL(H4.FALLAMOUNTFOR,0) --订单金额-退货金额 = 开票金额
            AND (ISNULL(AA.FBillAllAmount,0)-ISNULL(H3.FBillAllAmount,0)) = ISNULL(H5.FREALRECAMOUNTFOR,0) --订单金额-退货金额 = 收款金额
            THEN '已完结'
            ELSE '未完结'
            END as 'IsEnded', --是否已完结
            CASE WHEN B.FSEQ != 1 THEN ''
            ELSE A.FNOTE  END as 'Remark' --备注
            INTO #TEMPTABLE1 --临时表
            From
            T_SAL_ORDER A
            JOIN
            T_SAL_ORDERFIN AA
            on A.FID = AA.FID
            JOIN
            T_SAL_ORDERFIN A2
            on A.FID = A2.FID
            JOIN
            T_SAL_ORDERENTRY B
            on A.FID = B.FID
            JOIN
            T_SAL_ORDERENTRY_F B2
            on B.FENTRYID = B2.FENTRYID
            LEFT JOIN
            (Select q2.FNAME,q1.* From 
            T_BAS_PREBDONE q1
            JOIN
            T_BAS_PREBDONE_L q2
            on q1.FID = q2.FID
            Where q2.FLocaleID = 2052
            AND q1.FDocumentStatus = 'C'
            AND q1.FForbidStatus = 'A') H --工程项目表（预置基础资料1）
            on H.FID = A.F_projectname
            LEFT JOIN
            (SELECT W2.FSBILLID,SUM(W1.FALLAMOUNT) as 'FALLAMOUNT',SUM(W1.FPRICEBASEQTY) as 'FPRICEBASEQTY',
            STRING_AGG(CONVERT(nvarchar,W1.FDATE, 23), ',') as 'FDate' FROM 
            (Select q2.FAllAmount,q2.FENTRYID,q2.FPriceBaseQty,q1.FDate From T_SAL_DELIVERYNOTICE q1
            JOIN T_SAL_DELIVERYNOTICEENTRY_F q2
            on q1.FID = q2.FID Where q1.FDocumentStatus = 'C'
            AND q1.FCancelStatus = 'A') W1
            JOIN T_SAL_DELIVERYNOTICEENTRY_LK W2 on W1.FENTRYID = W2.FENTRYID
            Where W2.FSTABLENAME = 'T_SAL_ORDERENTRY' GROUP BY W2.FSBILLID) H2 --发货通知单表
            on A.FID = H2.FSBILLID
            LEFT JOIN
            (SELECT W2.FSBILLID,STRING_AGG(CONVERT(nvarchar,W1.FDATE, 23), ',') as 'FDate',SUM(W1.FPriceUnitQty) as 'FRETNOTICEQTY',SUM(W1.FALLAMOUNT) as 'FBillAllAmount' FROM 
            (Select q1.FDATE,q3.FSID,q2.FAllAmount,q2.FPriceUnitQty From T_SAL_RETURNNOTICE q1 JOIN T_SAL_RETURNNOTICEENTRY_F q2
            on q1.FID = q2.FID JOIN T_SAL_RETURNNOTICEENTRY_LK q3 on q2.FENTRYID = q3.FENTRYID
            Where q1.FDocumentStatus = 'C' AND q1.FCancelStatus = 'A' AND q3.FSTABLENAME = 'T_SAL_ORDERENTRY') W1
            JOIN T_SAL_ORDERENTRY_LK W2 on W1.FSID = W2.FENTRYID GROUP BY W2.FSBILLID) H3 --退货订单表
            on A.FID = H3.FSBILLID
            LEFT JOIN
            (SELECT W2.FSBILLID,SUM(W1.FALLAMOUNTFOR) as 'FALLAMOUNTFOR',STRING_AGG(CONVERT(nvarchar,W1.FDATE,23),',') as 'FDate' FROM
            (Select B.FALLAMOUNTFOR,B.FENTRYID,B.FOPENAMOUNTFOR,A.FDATE From T_AR_RECEIVABLE A
            JOIN T_AR_RECEIVABLEENTRY B on A.FID = B.FID Where A.FDocumentStatus = 'C'
            AND B.FORDERNUMBER !='' AND A.F_GeneralInvoice != 'Y') W1
            JOIN T_AR_RECEIVABLEENTRY_LK W2 on W1.FENTRYID = W2.FENTRYID 
            Where W2.FSTABLENAME = 'T_SAL_ORDERENTRY' GROUP BY W2.FSBILLID) H4 --应收单表
            on A.FID = H4.FSBILLID
            LEFT JOIN
            (Select q2.FSALEORDERNO,SUM(q1.FREALRECAMOUNTFOR) as 'FREALRECAMOUNTFOR' From T_AR_RECEIVEBILL q1
            JOIN T_AR_RECEIVEBILLENTRY q2 on q1.FID = q2.FID Where q1.FDOCUMENTSTATUS = 'C' 
            AND q1.FCancelStatus = 'A' AND q2.FSALEORDERNO != '' GROUP BY q2.FSALEORDERNO) H5 --收款单表
            on A.FBILLNO = H5.FSALEORDERNO
            LEFT JOIN
            (Select B.FNAME,B.FSPECIFICATION,A.* From 
            T_BD_MATERIAL A
            JOIN
            T_BD_MATERIAL_L B
            on A.FMATERIALID = B.FMATERIALID
            Where B.FLOCALEID = 2052
            AND A.FDocumentStatus = 'C' AND A.FForbidStatus = 'A') G --物料表
            on G.FMATERIALID = B.FMaterialId
            LEFT JOIN 
            (Select a1.FID,a1.F_CONTRACTNUMBER,STRING_AGG(CONVERT(nvarchar,a1.FDATE, 23), ',') as 'FDate',SUM(a2.FWRITTENOFFAMOUNTFOR) as 'FWRITTENOFFAMOUNTFOR'
            From T_AR_RECEIVEBILL a1 JOIN T_AR_RECEIVEBILLENTRY a2 on a1.FID = a2.FID
            WHere a1.F_CONTRACTNUMBER!='' GROUP BY a1.FID,a1.F_CONTRACTNUMBER) E on E.F_CONTRACTNUMBER = A.F_CONTRACTNUMBER
            Where A.FDocumentStatus = 'C' AND A.FBusinessType = 'NORMAL' AND A.FID in (Select * From #TABLEXYX)");

            if (!string.IsNullOrEmpty(fClient) && fClient != "0")
            {
                sql += string.Format(@" AND A.FCustId in ({0})", fClient);
            }
            if (!string.IsNullOrEmpty(fProject))
            {
                sql += string.Format(@" AND A.F_projectname in ({0})", fProject);
            }
            if (!string.IsNullOrEmpty(fDate))
            {
                sql += string.Format(@" AND A.FAPPROVEDATE <= EOMONTH('{0}')", fDate);
            }

            sql += string.Format(@";");

            sql += string.Format(@"/*dialect*/
            Select * INTO #TEMPTABLE2 From #TEMPTABLE1
            Where 1=1");

            if (!string.IsNullOrEmpty(fGROUP) && fGROUP == "2")
            {
                sql += string.Format(@" AND IsEnded = '否'");
            }

            sql += string.Format(@";");

            sql += string.Format(@"/*dialect*/
            Select
            *,
            ROW_NUMBER() OVER (ORDER BY FDate DESC) AS FID,
            ROW_NUMBER() OVER (ORDER BY FDate DESC) AS FIDENTITYID 
            INTO {0}
            From 
            #TEMPTABLE2", 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)
            {
                // 客户
                var fClientList = (customFilter["FClient"] as DynamicObject)?["Name"]?.ToString();
                // 工程项目名称
                var fProjectList = (customFilter["FProject"] as DynamicObjectCollection)?.Select(n => (n["FProject"] as DynamicObject)["Name"].ToString()).ToList();
                // 截止对账日期
                var fDate = customFilter["FDate"]?.ToString();
                // 订单状态
                var fGROUP = customFilter["F_ALL_GROUP"]?.ToString();

                string fState = "";
                if (fGROUP == "1")
                {
                    fState = "全部订单";
                }
                if (fGROUP == "2")
                {
                    fState = "未完结订单";
                }

                //这里是报表页面的标识
                reportTitles.AddTitle("FState", fGROUP == null ? "" : fState);
                reportTitles.AddTitle("FClient", fClientList == null ? "" : fClientList);
                reportTitles.AddTitle("FDate", fDate == null ? "" : Convert.ToDateTime(fDate).ToString("yyyy-MM-dd"));
                reportTitles.AddTitle("FProject", fProjectList == null ? "" : string.Join(",", fProjectList));
            }
            return reportTitles;
        }

        /// <summary>
        /// TableName表显示后追加数据
        /// </summary>
        /// <param name="sSQL"></param>
        /// <returns></returns>
        protected override DataTable GetListData(string sSQL)
        {
            var last = sSQL.Trim().Split(' ').ToList().Last();
            int rowId = int.Parse(last);
            string sql = @"
            SELECT * FROM({0}UNION ALL
            SELECT
            '','合计',null,'','','',
            SUM(FQTY),
            SUM(FTAXPRICE),
            SUM(FALLAMOUNT),
            SUM(OrderAmount),
            null,
            SUM(ShipmentsNum),
            SUM(ShipmentsAmount),
            null,
            SUM(ReturnNum),
            SUM(ReturnAmount),
            null,
            SUM(BillingAmount),
            null,
            SUM(PaymentAmount),
            SUM(ShippedDebt),
            SUM(InvoicedDebt),
            SUM(OwedTickets),
            '','',
            {2} FID,
            {2} FIDENTITYID
            FROM
            ({0}) 
            temp2
            ) temp
            ";
            string SqlStr = string.Format(sql, sSQL, rowId + 1, rowId + 2, rowId + 1024);
            return base.GetListData(SqlStr);
        }
    }
}