11

K3数据.txt

@@ -0,0 +1,33 @@
+SELECT TOP 1000  a.FSourceTranType,a.FSourceInterId,a.FSourceBillNo,aa.FBillNo,a.FOrderInterID,a.FOrderEntryID, b.FNumber,FAuxQty [数量],a.FTaxPrice [含税价]
+,a.FStdAmount [金额（本位币）],a.FStdAmountIncludeTax [价税合计（本位币）],a.FStdTaxAmount [税额（本位币）]
+ 
+,aa.FHeadSelfI0553
+,aa.FHeadSelfI0456,
+  aa.FDate
+ 
+,frob,aa.FTranType,a.FInterID,a.FEntryID
+ 
+--,c.FBillNo
+
+FROM k3.AIS20130323140156.dbo.icsaleentry a 
+LEFT JOIN  k3.AIS20130323140156.dbo.icsale aa ON a.FInterID=aa.FInterID 
+LEFT JOIN  k3.AIS20130323140156.dbo.t_icitem b ON a.FItemID=b.FItemID 
+INNER JOIN [AIS2025].[dbo].[ZZZ_ZZ_FaPiaoLosed] ddd ON a.FInterID=ddd.[FInterID] AND a.[FEntryID]=ddd.[FEntryID]
+INNER JOIN (SELECT DISTINCT 合同号 FROM  [AIS20250707104732].[dbo].[oldk3seorder0701]) vv  ON aa.FHeadSelfI0456=vv.合同号 -- AND vv.物料编码= b.FNumber
+INNER JOIN dbo.T_SAL_ORDER gg WITH(NOLOCK) ON vv.合同号=gg.F_CONTRACTNUMBER
+  --WHERE [合同号] ='S110403-PLR01'   AND  FNumber='H.01.020.0006'
+ORDER BY aa.FDate desc, a.FInterID,a.FEntryID
+--WHERE a.FInterID=1791
+--WHERE aa.FROB=-1
+--WHERE FHeadSelfI0456='S110301-ZWH01'
+--WHERE aa.FHeadSelfI0553 ='' AND aa.FHeadSelfI0456 =''
+--WHERE a.FSourceInterId =0 OR a.FOrderInterID=0
+
+--FHeadSelfI0456 
+
+--SELECT DISTINCT FTranType FROM k3.AIS20130323140156.dbo.icsale a 
+
+--SELECT COUNT(1)
+--FROM k3.AIS20130323140156.dbo.icsaleentry a 
+--LEFT JOIN  k3.AIS20130323140156.dbo.icsale aa ON a.FInterID=aa.FInterID 
+--LEFT JOIN  k3.AIS20130323140156.dbo.t_icitem b ON a.FItemID=b.FItemID 

Pilot.Report.Exploitation/SBUYingShouBiao/SBUYingShouBiao.cs

@@ -115,7 +115,7 @@ namespace Pilot.Report.Exploitation.SBUYingShouBiao
             header.AddChild("本年回款额", new LocaleValue("本年回款额(含子公司)", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
             header.AddChild("本年专责小组回款额", new LocaleValue("本年专责小组回款额", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
             header.AddChild("本年实际业绩额", new LocaleValue("本年实际业绩额(含往年变更金额)", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
-            header.AddChild("上年度应收额", new LocaleValue("上年度应收额", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
+            //header.AddChild("上年度应收额", new LocaleValue("上年度应收额", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
             header.AddChild("本年专责小组应收额", new LocaleValue("本年专责小组应收额", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
             header.AddChild("回款率", new LocaleValue("回款率", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);
             header.AddChild("预发货到期应收账款", new LocaleValue("预发货到期应收账款", this.Context.UserLocale.LCID), SqlStorageType.SqlMoney);

刷K3发票金额SQL.sql

@@ -0,0 +1,73 @@
+
+UPDATE [oldk3seorder0701] SET רƱ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>=0,[<EFBFBD><EFBFBD>Ʊ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>]=0;
+TRUNCATE TABLE [ZZZ_ZZ_FaPiaoLosed];
+
+DECLARE @FDATE DATETIME,@FSourceBillNo NVARCHAR(200),@FSourceTranType INT,@FSourceInterId INT ,@F_contractnumber NVARCHAR(2000)
+ ,@F_contractnumber2 NVARCHAR(2000),@F_contractnumber3 NVARCHAR(2000),@F_contractnumber4 NVARCHAR(2000),@FOrderInterID INT,@FOrderEntryID INT,@frob INT,@FNumber NVARCHAR(200),@FAuxQty DECIMAL(18,2)
+,@amount DECIMAL(18,2),@hexiao DECIMAL(18,2),@FTranType INT,@saleBill NVARCHAR(200),@ifok INT=0,@id INT,@fid1 INT ,@fid2 INT,@row INT=0;
+-- 1. <20><><EFBFBD><EFBFBD><EFBFBD>α<EFBFBD>
+    DECLARE cursor_name2 CURSOR FOR
+  SELECT  a.FInterID,a.FEntryID,a.FSourceTranType,a.FSourceInterId,a.FOrderInterID,a.FOrderEntryID,c.FBillNo AS [<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD>], b.FNumber,FAuxQty [<EFBFBD><EFBFBD><EFBFBD><EFBFBD>]
+-- ,a.FTaxPrice [<5B><>˰<EFBFBD><CBB0>]
+--,a.FStdAmount [<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD>ң<EFBFBD>]
+,a.FStdAmountIncludeTax [<EFBFBD><EFBFBD>˰<EFBFBD>ϼƣ<EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD>ң<EFBFBD>]
+--,a.FStdTaxAmount [˰<EFBFBD><EFBFBD><EFBFBD>λ<EFBFBD>ң<EFBFBD>] 
+,aa.FHeadSelfI0553
+,aa.FHeadSelfI0456
+,c.FHeadSelfS01108,c.FHeadSelfS0171
+  ,aa.FDate 
+,frob,aa.FTranType --,aa.FBillNo,a.FInterID,a.FEntryID,a.FSourceBillNo,FHeadSelfS0172
+FROM k3.AIS20130323140156.dbo.icsaleentry a 
+LEFT JOIN  k3.AIS20130323140156.dbo.icsale aa ON a.FInterID=aa.FInterID 
+LEFT JOIN  k3.AIS20130323140156.dbo.t_icitem b ON a.FItemID=b.FItemID 
+LEFT JOIN  k3.AIS20130323140156.dbo.SEOrder c  ON a.FOrderInterID=c.FInterID 
+--WHERE FTranType NOT IN (80,86)
+--WHERE   c.FBillNo='S110301-ZWH01'
+ORDER BY a.FInterID,a.FEntryID
+ OPEN cursor_name2;
+  FETCH NEXT FROM cursor_name2
+    INTO  @fid1,@fid2,@FSourceTranType,    @FSourceInterId,@FOrderInterID,@FOrderEntryID,@saleBill,@FNumber,@FAuxQty,@amount,@F_contractnumber,@F_contractnumber2,@F_contractnumber3,@F_contractnumber4
+	   ,@FDATE,@frob,@FTranType
+    WHILE @@FETCH_STATUS = 0
+    BEGIN
+	  SELECT @row=@row+1;
+      SELECT @ifok=0,@id=0;
+	 IF(@saleBill IS NOT NULL AND @saleBill !='')
+	 BEGIN
+	     SELECT @ifok=1;
+		 SELECT @id=id FROM [oldk3seorder0701] WHERE @saleBill=[<EFBFBD><EFBFBD><EFBFBD>ݱ<EFBFBD><EFBFBD><EFBFBD>] AND [<EFBFBD><EFBFBD><EFBFBD><EFBFBD>]=@FOrderInterID AND [<EFBFBD>к<EFBFBD>]=@FOrderEntryID;
+	 END
+     ELSE IF(@F_contractnumber2 IS NOT NULL AND @F_contractnumber2 !='')
+	 BEGIN
+	      SELECT @ifok=2;
+		 SELECT @id=id FROM [oldk3seorder0701] WHERE @F_contractnumber2=[<EFBFBD><EFBFBD>ͬ<EFBFBD><EFBFBD>] AND  @FNumber=[<EFBFBD><EFBFBD><EFBFBD>ϱ<EFBFBD><EFBFBD><EFBFBD>] AND @FAuxQty=[<EFBFBD><EFBFBD><EFBFBD><EFBFBD>];
+	 END
+	   PRINT CONCAT('id=',@id,' <20>ڼ<EFBFBD><DABC><EFBFBD>: ',@row,' FInterID: ',@fid1,'  FEntryID: ',@fid2,'  [<5B><>˰<EFBFBD>ϼƣ<CFBC><C6A3><EFBFBD>λ<EFBFBD>ң<EFBFBD>]  ',@amount);
+     IF(@id=0)
+	 BEGIN 
+		INSERT INTO [dbo].[ZZZ_ZZ_FaPiaoLosed]    ([FInterID]  ,[FEntryID])
+		 VALUES      (@fid1 ,@fid2)
+	 END
+      -- @FTranType 80 רƱ  86 <20><>Ʊ 602 רƱ 601 <20><>Ʊ
+	 IF(@FTranType IN (80,602) AND @id>0)
+	 BEGIN
+	    UPDATE [oldk3seorder0701] SET [רƱ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>]=ISNULL([רƱ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>],0)+@amount
+		WHERE id=@id
+	 end 
+	 
+	 IF(@FTranType IN (86,601) AND @id>0)
+	 BEGIN
+	    UPDATE [oldk3seorder0701] SET [<EFBFBD><EFBFBD>Ʊ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>]=ISNULL([<EFBFBD><EFBFBD>Ʊ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>],0)+@amount
+		WHERE id=@id
+	 end
+
+	   -- <20><>ȡ<EFBFBD><C8A1>һ<EFBFBD><D2BB><EFBFBD><EFBFBD>¼
+        FETCH NEXT FROM cursor_name2
+        INTO  @fid1,@fid2,@FSourceTranType,    @FSourceInterId,@FOrderInterID,@FOrderEntryID,@saleBill,@FNumber,@FAuxQty,@amount,@F_contractnumber,@F_contractnumber2,@F_contractnumber3,@F_contractnumber4
+	   ,@FDATE,@frob,@FTranType;
+	END
+	 -- 4. <20>ر<EFBFBD><D8B1>α<EFBFBD>
+    CLOSE cursor_name2;
+
+    -- 5. <20>ͷ<EFBFBD><CDB7>α<EFBFBD><CEB1><EFBFBD>Դ
+    DEALLOCATE cursor_name2;

收款单核销流水过程SQL.sql

@@ -0,0 +1,159 @@
+SELECT TOP 100 FSRCBILLID,d.FDATE,FBILLFORMID, FVERIFYSEQ,FSOURCETYPE,FCURWRITTENOFFAMOUNTFOR,FCURWRITTENOFFAMOUNT,FSRCBILLNO,B.FEXCHANGERATE,FCURTAXMATCHAMOUNT,FCURNOTAXMATCHAMOUNT , B.FSettleCurrId
+FROM T_AR_RECMacthLog A 
+LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY B ON A.FID=B.FID
+LEFT JOIN T_BAS_BILLTYPE C ON B.FSOURCETYPE=C.FBILLTYPEID
+LEFT JOIN t_AR_RECEIVEBILL d ON d.FBILLNO=B.FSRCBILLNO
+--WHERE FBILLFORMID IN ('AR_receivable','AR_RECEIVEBILL','AR_AdjustExchangeRate')
+ORDER BY FVERIFYSEQ
+
+
+SELECT FSOURCETYPE,FCURWRITTENOFFAMOUNTFOR,FCURWRITTENOFFAMOUNT,FSRCBILLNO,FEXCHANGERATE,FCURTAXMATCHAMOUNT,FCURNOTAXMATCHAMOUNT ,FSettleCurrId FROM  T_AR_RECMacthLogENTRY
+WHERE FSRCBILLNO IN ('PL-AR202412000100','XN-QC202412000154')
+
+SELECT DISTINCT FSOURCETYPE,b.FBILLFORMID  FROM T_AR_RECMacthLogENTRY a 
+LEFT JOIN T_BAS_BILLTYPE b ON a.FSOURCETYPE=b.FBILLTYPEID
+
+SELECT FDATE,FDOCUMENTSTATUS FROM T_AR_RECEIVEBILL
+
+
+SELECT * FROM T_BAS_BILLTYPE
+WHERE  FBILLTYPEID IN ('180ecd4afd5d44b5be78a6efe4a7e041','180ecd4afd5d44b5be78a6efe4a7e041')
+OR FBILLFORMID='AR_RECEIVEBILL'
+
+
+SELECT F_VRYF_Text_83g,* FROM t_AR_receivable
+WHERE FBILLNO='PL-XSCKD20250601337-000001'
+ORDER BY FDATE DESC
+
+
+
+SELECT FDATE,FDOCUMENTSTATUS,FBILLNO,FID,FSALEORGID,F_contractnumber FROM T_AR_RECEIVEBILL
+WHERE FDOCUMENTSTATUS='C'  
+ORDER BY FDATE
+
+DELETE [ZZZ_HeXiaoBook] WHERE [ShouKuanFDate]>=@BeginDATE
+
+DECLARE @FDATE DATETIME,@FBILLNO NVARCHAR(200),@ShouKuanFID INT,@FSALEORGID INT ,@F_contractnumber NVARCHAR(2000),@fid2 INT,@fid3 INT,@amount DECIMAL(18,2);
+-- 1. <20><><EFBFBD><EFBFBD><EFBFBD>α<EFBFBD>
+    DECLARE cursor_name2 CURSOR FOR
+   SELECT FDATE,FBILLNO,FID,FSALEORGID,F_contractnumber FROM T_AR_RECEIVEBILL
+WHERE FDOCUMENTSTATUS='C'  
+ORDER BY FDATE
+
+ OPEN cursor_name2;
+  FETCH NEXT FROM cursor_name2
+    INTO @FDATE,
+         @FBILLNO,
+         @ShouKuanFID,
+         @FSALEORGID,
+         @F_contractnumber
+    WHILE @@FETCH_STATUS = 0
+    BEGIN
+	   ---<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD>Զ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>--
+	   SELECT @fid2=0,@fid3=0;
+	   SELECT @fid2=FID FROM dbo.T_AutoWrireRecordEntry2  WHERE FBILLNO3=@FBILLNO
+	   
+	   SELECT @FDATE=ISNULL(F_YeWuDate,FCREATEDATE),@fid3=FID  FROM  T_AutoWrireRecord  
+        WHERE FID=@fid2 AND  FDOCUMENTSTATUS='C'  
+      IF(@fid3>0)
+	    BEGIN    
+	   INSERT INTO [dbo].[ZZZ_HeXiaoBook]
+           ([XiaoShouFid]
+           ,[XiaoShouBillNo]
+           ,[XiaoShouHeTong]
+           ,[ShouKuanFid]
+           ,[ShouKuanBillNo]
+           ,[ShouKuanFDate]
+           ,[BenCiHeXiao]
+           ,[FSaleOrgId])
+		   ( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE
+		   ,(CASE WHEN  b.FALLAMOUNT22<c.FALLAMOUNT33 THEN b.FALLAMOUNT22 ELSE c.FALLAMOUNT33 END) *  dd.FExchangeRate
+		   ,@FSALEORGID FROM T_SAL_ORDER a
+		   LEFT JOIN T_AutoWrireRecordEntry  b ON a.FBILLNO=b.FBILLNO2
+		   LEFT JOIN T_AutoWrireRecordEntry2 c  ON b.FID=c.FID
+		   LEFT JOIN T_SAL_ORDERFIN dd ON a.FID=dd.FID
+		   WHERE b.FID=@fid2 )
+		END
+	   ------<EFBFBD><EFBFBD><EFBFBD><EFBFBD>֪ͨ<EFBFBD><EFBFBD><EFBFBD>ĺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>--------------
+	     SELECT @fid2=0,@fid3=0,@F_contractnumber='',@amount=0;
+	   SELECT @fid2=FID FROM dbo.VRYF_t_Cust_Entry100025  WHERE FBILLNO3=@FBILLNO
+	   
+	   SELECT @FDATE=FCREATEDATE,@fid3=FID  FROM  VRYF_t_Cust100015  
+        WHERE FID=@fid2 AND  FDOCUMENTSTATUS='C'  
+      IF(@fid3>0)	    
+	    BEGIN    
+		 SELECT  @F_contractnumber=FCONTRACTNUMBER,@amount=FALLAMOUNT22 FROM VRYF_t_Cust_Entry100024  a  WHERE a.FID=@fid2		 
+     
+		   INSERT INTO [dbo].[ZZZ_HeXiaoBook]
+			   ([XiaoShouFid]
+			   ,[XiaoShouBillNo]
+			   ,[XiaoShouHeTong]
+			   ,[ShouKuanFid]
+			   ,[ShouKuanBillNo]
+			   ,[ShouKuanFDate]
+			   ,[BenCiHeXiao]
+			   ,[FSaleOrgId])
+			   ( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,@amount *  dd.FExchangeRate,@FSALEORGID FROM T_SAL_ORDER a
+			     LEFT JOIN T_SAL_ORDERFIN dd ON a.FID=dd.FID
+			     WHERE a.FSALEORGID=[FSaleOrgId] and a.F_CONTRACTNUMBER=@F_contractnumber)
+		END
+	   ---Ӧ<EFBFBD>պ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>---------
+	        SELECT @fid2=0,@fid3=0,@F_contractnumber='',@amount=0;
+			SELECT d.FDATE,FBILLFORMID, FVERIFYSEQ,FSOURCETYPE,FCURWRITTENOFFAMOUNTFOR,FCURWRITTENOFFAMOUNT,FSRCBILLNO,b.FEXCHANGERATE,FCURTAXMATCHAMOUNT,FCURNOTAXMATCHAMOUNT , b.FSettleCurrId
+			INTO #temp2
+FROM T_AR_RECMacthLog a 
+LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID
+LEFT JOIN T_BAS_BILLTYPE c ON b.FSOURCETYPE=c.FBILLTYPEID
+LEFT JOIN t_AR_RECEIVEBILL d ON d.FBILLNO=b.FSRCBILLNO
+WHERE FVERIFYSEQ IN (SELECT FVERIFYSEQ FROM T_AR_RECMacthLog a 
+LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID WHERE  b.FSRCBILLNO=@FBILLNO AND c.FBILLFORMID='AR_RECEIVEBILL')
+    SELECT @amount= SUM(FCURTAXMATCHAMOUNT) FROM #temp2 WHERE FBILLFORMID!='AR_RECEIVEBILL'
+	SELECT @fid2 FROM #temp2 WHERE FBILLFORMID ='AR_receivable'
+	SELECT @F_contractnumber= F_PAPERPRO FROM T_AR_receivable WHERE fid=@fid2
+	
+		   INSERT INTO [dbo].[ZZZ_HeXiaoBook]
+			   ([XiaoShouFid]
+			   ,[XiaoShouBillNo]
+			   ,[XiaoShouHeTong]
+			   ,[ShouKuanFid]
+			   ,[ShouKuanBillNo]
+			   ,[ShouKuanFDate]
+			   ,[BenCiHeXiao]
+			   ,[FSaleOrgId])
+			   ( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,@amount,@FSALEORGID FROM T_SAL_ORDER a
+			     LEFT JOIN T_SAL_ORDERFIN dd ON a.FID=dd.FID
+			     WHERE a.FSALEORGID=[FSaleOrgId] and a.F_CONTRACTNUMBER=@F_contractnumber)
+	   --------<EFBFBD><EFBFBD>ʷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>--------------
+	   IF(@FSALEORGID=100302)
+	   begin
+	   SELECT F_ORDERNO,F_RECEIPTNUMBER,* FROM VRYF_t_Cust_Entry100021 WHERE F_matched=1 AND F_Receiptnumber=@FBILLNO
+	      INSERT INTO [dbo].[ZZZ_HeXiaoBook]
+			   ([XiaoShouFid]
+			   ,[XiaoShouBillNo]
+			   ,[XiaoShouHeTong]
+			   ,[ShouKuanFid]
+			   ,[ShouKuanBillNo]
+			   ,[ShouKuanFDate]
+			   ,[BenCiHeXiao]
+			   ,[FSaleOrgId])
+			   ( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,F_shareAmount,@FSALEORGID FROM T_SAL_ORDER a
+			    LEFT JOIN VRYF_t_Cust_Entry100021 c ON a.F_CONTRACTNUMBER=c.F_ORDERNO 
+			     LEFT JOIN T_SAL_ORDERFIN dd ON a.FID=dd.FID
+			     WHERE a.FSALEORGID=[FSaleOrgId] AND F_matched=1 AND c.F_Receiptnumber=@FBILLNO )
+	   END
+
+	   -- <20><>ȡ<EFBFBD><C8A1>һ<EFBFBD><D2BB><EFBFBD><EFBFBD>¼
+        FETCH NEXT FROM cursor_name2
+        INTO  @FDATE,
+         @FBILLNO,
+         @ShouKuanFID,
+         @FSALEORGID,
+         @F_contractnumber;
+	END
+
+	 -- 4. <20>ر<EFBFBD><D8B1>α<EFBFBD>
+    CLOSE cursor_name2;
+
+    -- 5. <20>ͷ<EFBFBD><CDB7>α<EFBFBD><CEB1><EFBFBD>Դ
+    DEALLOCATE cursor_name2;
+