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

namespace Pilot.Report.Exploitation.AccountsReceivableStatements
{
    /// <summary>
    /// 应收账款对账报表【简易版】
    /// </summary>
    [Description("【列表插件】应收账款对账报表【简易版】"), HotUpdate]
    public class AccountsReceivableReport: 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("OrderAmount", new LocaleValue("订单金额"), SqlStorageType.SqlDecimal);
            header.AddChild("ShipmentsAmount", new LocaleValue("发货金额"), SqlStorageType.SqlDecimal);
            header.AddChild("FBillAllAmount", new LocaleValue("退货金额"), SqlStorageType.SqlDecimal);
            header.AddChild("FALLAMOUNTFOR", new LocaleValue("开票金额"), SqlStorageType.SqlDecimal);
            header.AddChild("PaymentAmount", new LocaleValue("回款金额"), SqlStorageType.Sqlvarchar);
            header.AddChild("ShippedDebt", new LocaleValue("已出货欠款"), SqlStorageType.SqlDecimal);
            header.AddChild("InvoicedDebt", new LocaleValue("已开票欠款"), SqlStorageType.Sqlvarchar);
            header.AddChild("OwedTickets", new LocaleValue("欠票"), SqlStorageType.Sqlvarchar);
            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
            CAST(ROW_NUMBER() OVER (ORDER BY A.FDate DESC) as nvarchar(MAX)) AS 'Number',
            A.FDate as 'DATE', --签订日期
            A.F_CONTRACTNUMBER as 'CONTRACTNUMBER', --订单号
            ISNULL(H.FNAME,'') as 'ProjectName', --项目名称
            ISNULL(AA.FBillAllAmount,0) as 'OrderAmount', --订单金额
            ISNULL(H2.FALLAMOUNT,0) as 'ShipmentsAmount', --发货金额
            ISNULL(H3.FBillAllAmount,0) as 'FBillAllAmount', --退货金额
            ISNULL(H4.FALLAMOUNTFOR,0) as 'FALLAMOUNTFOR', --开票金额
            ISNULL(A.F_AMOUNT,0) as 'PaymentAmount', --回款金额
            ISNULL(H2.FALLAMOUNT,0)-ISNULL(H3.FBillAllAmount,0) -ISNULL(H6.FWRITTENOFFAMOUNTFOR,0) as 'ShippedDebt', --已出货欠款
            ISNULL(H4.FALLAMOUNTFOR,0) -ISNULL(H6.FWRITTENOFFAMOUNTFOR,0) as 'InvoicedDebt', --已开票欠款
            ISNULL((ISNULL(H2.FALLAMOUNT,0)-ISNULL(H3.FBillAllAmount,0) -0)-(ISNULL(H4.FALLAMOUNTFOR,0) -0),0) as 'OwedTickets', --欠票
            CASE 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', --是否已完结
            A.FNOTE as 'Remark' --备注
            INTO #TEMPTABLE1 --临时表
            From 
            T_SAL_ORDER A 
            JOIN
            T_SAL_ORDERFIN AA
            on A.FID = AA.FID
            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' FROM 
            (Select q2.FAllAmount,q2.FENTRYID 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 A1.FSBILLID,SUM(A2.FRetNoticeQty*A3.FTaxPrice) as 'FBillAllAmount' FROM 
            (SELECT W2.FSBILLID,W1.FENTRYID FROM 
            (Select q1.* From 
            T_SAL_ORDERENTRY q1
            JOIN
            T_SAL_ORDER q2
            on q1.FID = q2.FID
            Where q2.FBusinessType = 'RETURNSO'
            AND q2.FDocumentStatus = 'C') W1
            JOIN T_SAL_ORDERENTRY_LK W2 on W1.FENTRYID = W2.FENTRYID) A1
            JOIN T_SAL_ORDERENTRY_R A2 on A1.FENTRYID = A2.FENTRYID JOIN
            T_SAL_ORDERENTRY_F A3 on A2.FENTRYID = A3.FENTRYID GROUP BY A1.FSBILLID) H3 --销售订单（退货）
            on A.FID = H3.FSBILLID
            LEFT JOIN
            (SELECT W2.FSBILLID,SUM(W1.FALLAMOUNTFOR) as 'FALLAMOUNTFOR' FROM
            (Select B.FALLAMOUNTFOR,B.FENTRYID 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 a1.FID,a1.F_CONTRACTNUMBER,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) H6
            on H6.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 * INTO #TEMPTABLE3 From
            #TEMPTABLE1
            UNION ALL
            Select
            '合计',null,'','',
            SUM(OrderAmount),
            SUM(ShipmentsAmount),
            SUM(FBillAllAmount),
            SUM(FALLAMOUNTFOR),
            SUM(PaymentAmount),
            SUM(ShippedDebt),
            SUM(InvoicedDebt),
            SUM(OwedTickets),
            '',''
            From #TEMPTABLE2");

            sql += string.Format(@"/*dialect*/
            Select
            *,
            ROW_NUMBER() OVER (ORDER BY Date DESC) AS FID,
            ROW_NUMBER() OVER (ORDER BY Date DESC) AS FIDENTITYID 
            INTO {0}
            From 
            #TEMPTABLE3", 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;
        }
    }
}