1

YSZKDZBaoBiao/AccountsReceivableReport2.cs

@@ -94,7 +94,7 @@ namespace Pilot.Report.Exploitation.AccountsReceivableStatements
             header.AddChild("PPBillingAmount", new LocaleValue("星空普票开票金额"), SqlStorageType.SqlDecimal);
             header.AddChild("ZPBillingDate", new LocaleValue("专票开票日期"), SqlStorageType.Sqlvarchar);
             header.AddChild("ZPBillingAmount", new LocaleValue("星空专票开票金额"), SqlStorageType.SqlDecimal);
-            header.AddChild("BillingAmount", new LocaleValue("总开票金额"), SqlStorageType.SqlDecimal);
+            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);

YSZKDZGongNeng_MX/LiteVersionPlugIn2.cs

@@ -35,7 +35,18 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
             // 判断 应收对账单【明细版】按钮
             if (e.BarItemKey == "Test_Button_1")
             {
-                string FPath = "应收账款对账单【明细版】.xlsx";
+                var reportModel = this.SysReportModel;
+
+                //单据头
+                var rptTitles = reportModel.ReportTitles;
+                string fClient = rptTitles.FirstOrDefault(a => a.TitleKey == "FClient").TitleValue.ToString();
+                string fDate = rptTitles.FirstOrDefault(a => a.TitleKey == "FDate").TitleValue.ToString();
+                string fProject = rptTitles.FirstOrDefault(a => a.TitleKey == "FProject").TitleValue.ToString();
+                string FState = rptTitles.FirstOrDefault(a => a.TitleKey == "FState").TitleValue.ToString();
+                string F_SFYJKH = rptTitles.FirstOrDefault(a => a.TitleKey == "F_SFYJKH").TitleValue.ToString();
+
+                //string FPath = "应收账款对账单【明细版】.xlsx";
+                string FPath = string.Format("{0}-{1}-应收账款对账单【明细版】.xlsx", DateTime.Now.ToString("yyyyMMdd"), fClient);
 
                 // 在临时文件目录，生成一个完整的文件名: C:\Program Files\Kingdee\K3Cloud\WebSite\...\JD.xls
                 string filePath = PathUtils.GetPhysicalPath(KeyConst.TEMPFILEPATH, Path.GetFileName(FPath));
@@ -49,15 +60,7 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 //显示
                 this.View.ShowForm(showParameter);
 
-                var reportModel = this.SysReportModel;
                 
-                //单据头
-                var rptTitles = reportModel.ReportTitles;
-                string fClient = rptTitles.FirstOrDefault(a => a.TitleKey == "FClient").TitleValue.ToString();
-                string fDate = rptTitles.FirstOrDefault(a => a.TitleKey == "FDate").TitleValue.ToString();
-                string fProject = rptTitles.FirstOrDefault(a => a.TitleKey == "FProject").TitleValue.ToString();
-                string FState = rptTitles.FirstOrDefault(a => a.TitleKey == "FState").TitleValue.ToString();
-                string F_SFYJKH = rptTitles.FirstOrDefault(a => a.TitleKey == "F_SFYJKH").TitleValue.ToString();
                 //单据体
                 var list = reportModel.DataSource.Rows;
 
@@ -110,7 +113,7 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
             cellStyle.Alignment = HorizontalAlignment.Center;
             // 设置垂直居中对齐
             cellStyle.VerticalAlignment = VerticalAlignment.Center;
-
+            //设置数值格式保留两位小数
             cellStyle.DataFormat = workbook.CreateDataFormat().GetFormat("0.00");
 
             // 创建一个单元格样式---------------------------------
@@ -169,6 +172,21 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
             // 将字体应用到单元格样式
             style3.SetFont(font3);
 
+            // 创建一个单元格样式-------------------------------
+            ICellStyle style4 = workbook.CreateCellStyle();
+
+            // 设置边框样式
+            style4.BorderTop = BorderStyle.Thin;
+            style4.BorderBottom = BorderStyle.Thin;
+            style4.BorderLeft = BorderStyle.Thin;
+            style4.BorderRight = BorderStyle.Thin;
+            // 设置水平居中对齐
+            style4.Alignment = HorizontalAlignment.Left;
+            // 设置垂直居中对齐
+            style4.VerticalAlignment = VerticalAlignment.Center;
+            // 将字体应用到单元格样式
+            style4.SetFont(font3);
+            style4.DataFormat = workbook.CreateDataFormat().GetFormat("0.00");
             #endregion
 
             #region 获取金额汇总数据
@@ -183,7 +201,8 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 {
                     YFHpriceSum = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]), 2);
                     YFPpriceSum = Math.Round(Convert.ToDecimal(list[i]["InvoicedDebt"]), 2);
-                    priceSum = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]) + Convert.ToDecimal(list[i]["InvoicedDebt"]), 2);
+                    //priceSum = Math.Round(Convert.ToDecimal(list[i]["ShippedDebt"]) + Convert.ToDecimal(list[i]["InvoicedDebt"]), 2);
+                    priceSum = Math.Round(Convert.ToDecimal(list[i]["OwedTickets"]), 2);
                 }
             }
 
@@ -244,7 +263,7 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 string BillingDate = string.IsNullOrWhiteSpace(list[i]["ZPBillingDate"].ToString()) ? "" : list[i]["ZPBillingDate"].ToString().Split(' ')[0];
                 string ReturnDate = string.IsNullOrWhiteSpace(list[i]["ReturnDate"].ToString()) ? "" : list[i]["ReturnDate"].ToString().Split(' ')[0];
 
-                BillingDate += string.IsNullOrWhiteSpace(list[i]["PPBillingDate"].ToString()) ? "" : (string.IsNullOrWhiteSpace(BillingDate) ?"":",")+list[i]["PPBillingDate"].ToString().Split(' ')[0];
+                //BillingDate += string.IsNullOrWhiteSpace(list[i]["PPBillingDate"].ToString()) ? "" : (string.IsNullOrWhiteSpace(BillingDate) ?"":",")+list[i]["PPBillingDate"].ToString().Split(' ')[0];
 
                 //将合计行放到最下方
                 IRow rowi = sheet.CreateRow(j + i);
@@ -271,7 +290,7 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 if(!string.IsNullOrWhiteSpace(list[i]["FTaxPrice"].ToString()))
                 {
                     decimal FTaxPrice = Math.Round(Convert.ToDecimal(list[i]["FTaxPrice"]), 2);
-                    c7.SetCellValue("" + FTaxPrice + ""); c7.CellStyle = cellStyle;
+                    c7.SetCellValue(Convert.ToDouble(FTaxPrice )); c7.CellStyle = cellStyle;
                 }
 
                 ICell c8 = rowi.CreateCell(7); c8.SetCellValue(""); c8.CellStyle = cellStyle;
@@ -458,9 +477,9 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
             ICell cc1 = rr1.GetCell(6);
             ICell cc2 = rr2.GetCell(6);
             ICell cc3 = rr3.GetCell(6);
-            cc1.SetCellValue("" + YFHpriceSum + "");
+            cc1.SetCellValue(Convert.ToDouble(YFHpriceSum));
-            cc2.SetCellValue("" + YFPpriceSum + "");
+            cc2.SetCellValue(Convert.ToDouble(YFPpriceSum));
-            cc3.SetCellValue("" + priceSum + "");
+            cc3.SetCellValue(Convert.ToDouble(priceSum));
 
             #endregion
 
@@ -492,10 +511,15 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 }
                 ICell CR1 = r1.CreateCell(i);
                 CR1.SetCellValue(test1);
-                if (i == 4 || i == 5 || i == 6 || i == 7 || i == 8 || i == 9)
+                if (i == 4 || i == 5 || i == 7 || i == 8 || i == 9)
                 {
                     CR1.CellStyle = style;
                 }
+                else if (i == 6)
+                {
+                    CR1.SetCellValue(Convert.ToDouble(test1));
+                    CR1.CellStyle = style4;
+                }
                 else
                 {
                     CR1.CellStyle = style2;
@@ -512,10 +536,15 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 }
                 ICell CR1 = r2.CreateCell(i);
                 CR1.SetCellValue(test1);
-                if (i == 4 || i == 5 || i == 6 || i == 7 || i == 8 || i == 9)
+                if (i == 4 || i == 5 || i == 7 || i == 8 || i == 9)
                 {
                     CR1.CellStyle = style;
                 }
+                else if (i == 6)
+                {
+                    CR1.SetCellValue(Convert.ToDouble(test1));
+                    CR1.CellStyle = style4;
+                }
                 else
                 {
                     CR1.CellStyle = style2;
@@ -532,10 +561,15 @@ namespace Pilot.Report.Exploitation.AccountsReceivable
                 }
                 ICell CR1 = r3.CreateCell(i);
                 CR1.SetCellValue(test1);
-                if (i == 4 || i == 5 || i == 6 || i == 7 || i == 8 || i == 9)
+                if (i == 4 || i == 5 || i == 7 || i == 8 || i == 9)
                 {
                     CR1.CellStyle = style;
                 }
+                else if (i == 6)
+                {
+                    CR1.SetCellValue(Convert.ToDouble(test1));
+                    CR1.CellStyle = style4;
+                }
                 else
                 {
                     CR1.CellStyle = style2;

派诺报表SQL文件/应收对账单明细更新发票金额存储过程.sql

@@ -193,7 +193,8 @@ WHERE B.
  SELECT                   
  A.FID,              
  A.FENTRYID,              
- SUM(ISNULL(A.ZPBillingAmount,0)) + SUM(ISNULL(A.PPBillingAmount,0)) + SUM(ISNULL(A.K3רƱ½ð¶î,0)) + SUM(ISNULL(A.K3ÆÕƱ½ð¶î,0)) AS 'רƱ½ð¶î'                  
+ --SUM(ISNULL(A.ZPBillingAmount,0)) + SUM(ISNULL(A.PPBillingAmount,0)) + SUM(ISNULL(A.K3רƱ½ð¶î,0)) + SUM(ISNULL(A.K3ÆÕƱ½ð¶î,0)) AS 'רƱ½ð¶î'
+ SUM(ISNULL(A.ZPBillingAmount,0)) + SUM(ISNULL(A.K3רƱ½ð¶î,0)) AS 'רƱ½ð¶î'                  
  INTO #TEMP3                  
  FROM YingShouZhanKuanMX_GZTH A 
  WHERE A.[ÊÇ·ñK3Êý¾Ý] = 0         
@@ -259,6 +260,7 @@ WHERE B.
     
 	UPDATE YingShouZhanKuanMX_GZTH
 	 SET OrderAmount=0,PaymentAmount=0,ShippedDebt=0,InvoicedDebt=0,IsEnded = NULL	,OwedTickets= 0,BillingAmount=0,PPBillingAmount=0,ZPBillingAmount=0,ZPBillingDate='',PPBillingDate='',PaymentDate = '',ShipmentsDate = ''
+	 ,ShipmentsAmount = 0,ReturnAmount = 0
 	from (
 		 SELECT   CASE WHEN ROW_NUMBER() OVER(PARTITION BY FBILLNO ORDER BY fid) = 1 THEN FBILLNO 
        END AS µ¥ºÅ,* FROM YingShouZhanKuanMX_GZTH
@@ -269,7 +271,7 @@ WHERE B.
 	UPDATE A                  
 	SET OwedTickets = B.QP                
 	FROM YingShouZhanKuanMX_GZTH A
-	JOIN (SELECT FID,SUM(ShipmentsAmount) - SUM(BillingAmount) AS 'QP'--SUM(OrderAmount) - SUM(BillingAmount) AS 'QP' 
+	JOIN (SELECT FID,SUM(ShipmentsAmount) -SUM(ReturnNum)- SUM(BillingAmount) AS 'QP' --SUM(ShipmentsAmount)- SUM(BillingAmount) AS 'QP'
 	FROM YingShouZhanKuanMX_GZTH GROUP BY FID) B ON A.FID = B.FID                
 	WHERE A.[ÊÇ·ñK3Êý¾Ý] = 0 AND A.row_num = 1
 

派诺报表SQL文件/应收对账表(明细版存储过程).sql

@@ -353,4 +353,16 @@ AND B.
  AND B.ShouKuanFDate < @EndDate
   --SELECT OrderAmount,PaymentAmount,ShippedDebt,InvoicedDebt,IsEnded 	,OwedTickets,BillingAmount, CASE WHEN ROW_NUMBER() OVER(PARTITION BY FBILLNO ORDER BY fid) = 1 THEN FBILLNO 
   --END AS µ¥ºÅ,* FROM YingShouZhanKuanMX_GZTH
+
+  --汇总发货金额、退货日期、退货金额、备注
+  SELECT A.FID,SUM(A.ShipmentsAmount) AS '发货金额', SUM(A.ReturnAmount) AS '退货金额',
+  STUFF((SELECT DISTINCT ','+ReturnDate FROM YingShouZhanKuanMX_GZTH WHERE FID = a.FID FOR XML PATH('')),1,1,'') AS '退货日期'
+  INTO #TEMP4
+  FROM YingShouZhanKuanMX_GZTH A
+  GROUP BY A.FID
+
+  UPDATE A                
+  SET A.ShipmentsAmount = ISNULL(B.发货金额,0),A.ReturnAmount = ISNULL(B.退货金额,0),A.ReturnDate = ISNULL(B.退货日期,'')                
+  FROM YingShouZhanKuanMX_GZTH A                 
+  INNER JOIN #TEMP4 B ON A.FID = B.FID
 END 

派诺报表SQL文件/应收对账表(简易)更新数据.sql

@@ -51,6 +51,17 @@ INNER JOIN #CFTEMP1 B On A.FID = B.FID
 DELETE FROM YingShouZhanKuanJY_GZTH          
 WHERE row_num <> 1; 
 
+UPDATE A
+SET A.Number = B.row_num1
+FROM YingShouZhanKuanJY_GZTH A
+INNER JOIN (
+	SELECT        
+	FID,           
+	ROW_NUMBER() OVER (ORDER BY FID) as row_num1 
+	FROM YingShouZhanKuanJY_GZTH  
+	) B On A.FID = B.FID 
+    
+      
 --更新专票和普票的开票时间          
 UPDATE A          
 SET A.PPBillingDate = B.PPBillingDate,A.ZPBillingDate = B.ZPBillingDate