11
This commit is contained in:
@@ -15,10 +15,11 @@ BEGIN
|
||||
|
||||
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),@hexiao DECIMAL(18,2);
|
||||
DECLARE @FDATE DATETIME,@FBILLNO NVARCHAR(200),@ShouKuanFID INT,@FSALEORGID INT ,@F_contractnumber NVARCHAR(2000),@fid2 INT,@fid3 INT,@amount DECIMAL(18,2),@hexiao DECIMAL(18,2)
|
||||
,@remark NVARCHAR(200);
|
||||
-- 1. <20><><EFBFBD><EFBFBD><EFBFBD>α<EFBFBD>
|
||||
DECLARE cursor_name2 CURSOR FOR
|
||||
SELECT FDATE,FBILLNO,FID,FSALEORGID,F_contractnumber FROM T_AR_RECEIVEBILL
|
||||
SELECT FDATE,FBILLNO,FID,FSALEORGID,F_contractnumber,FREMARK FROM T_AR_RECEIVEBILL
|
||||
WHERE FDOCUMENTSTATUS='C' AND FDATE>=@BeginDATE
|
||||
ORDER BY FDATE
|
||||
|
||||
@@ -28,7 +29,7 @@ ORDER BY FDATE
|
||||
@FBILLNO,
|
||||
@ShouKuanFID,
|
||||
@FSALEORGID,
|
||||
@F_contractnumber
|
||||
@F_contractnumber,@remark
|
||||
WHILE @@FETCH_STATUS = 0
|
||||
BEGIN
|
||||
SELECT @hexiao=0;
|
||||
@@ -50,13 +51,16 @@ ORDER BY FDATE
|
||||
,[ShouKuanBillNo]
|
||||
,[ShouKuanFDate]
|
||||
,[BenCiHeXiao]
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType])
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType],Remark)
|
||||
( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE
|
||||
,(CASE WHEN b.FALLAMOUNT22<c.FALLAMOUNT33 THEN b.FALLAMOUNT22 ELSE c.FALLAMOUNT33 END)
|
||||
,@FSALEORGID,'<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD>Զ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',@fid2,dd.FExchangeRate,FSettleCurrId,FLocalCurrId,0 FROM T_SAL_ORDER a
|
||||
,@FSALEORGID,'<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD>Զ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',@fid2,dd.FExchangeRate,FSettleCurrId,FLocalCurrId,0
|
||||
,head.F_NOTE
|
||||
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
|
||||
LEFT JOIN T_AutoWrireRecord head ON b.FID=head.FID
|
||||
WHERE b.FID=@fid2 AND c.FBILLNO3=@FBILLNO )
|
||||
END
|
||||
end
|
||||
@@ -68,7 +72,7 @@ ORDER BY FDATE
|
||||
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
|
||||
SELECT @F_contractnumber=FCONTRACTNUMBER,@amount=FALLAMOUNT22 FROM VRYF_t_Cust_Entry100024 a WHERE a.FID=@fid2
|
||||
SELECT @hexiao=@amount;
|
||||
INSERT INTO [dbo].[ZZZ_HeXiaoBook]
|
||||
([XiaoShouFid]
|
||||
@@ -78,8 +82,9 @@ ORDER BY FDATE
|
||||
,[ShouKuanBillNo]
|
||||
,[ShouKuanFDate]
|
||||
,[BenCiHeXiao]
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType])
|
||||
( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,@amount,@FSALEORGID,'<EFBFBD><EFBFBD><EFBFBD><EFBFBD>֪ͨ<EFBFBD><EFBFBD><EFBFBD>ĺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',@fid2, dd.FExchangeRate,FSettleCurrId,FLOCALCURRID,0 FROM T_SAL_ORDER a
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType],Remark)
|
||||
( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,@amount,@FSALEORGID,'<EFBFBD><EFBFBD><EFBFBD><EFBFBD>֪ͨ<EFBFBD><EFBFBD><EFBFBD>ĺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',@fid2, dd.FExchangeRate,FSettleCurrId,FLOCALCURRID,0
|
||||
,@remark 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
|
||||
@@ -109,9 +114,9 @@ LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID WHERE b.FSRCBILLNO=@FBILLN
|
||||
,[ShouKuanBillNo]
|
||||
,[ShouKuanFDate]
|
||||
,[BenCiHeXiao]
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType])
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType],Remark)
|
||||
( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,d.FCURWRITTENOFFAMOUNTFOR,@FSALEORGID,'Ӧ<EFBFBD>պ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',@fid3
|
||||
,dd.FEXCHANGERATE,FSettleCurrId,FLOCALCURRID,0
|
||||
,dd.FEXCHANGERATE,FSettleCurrId,FLOCALCURRID,0 ,@remark
|
||||
FROM T_SAL_ORDER a
|
||||
LEFT JOIN T_SAL_ORDERFIN dd ON a.FID=dd.FID
|
||||
LEFT JOIN T_AR_receivable c ON c.F_PAPERPRO=a.F_CONTRACTNUMBER AND c.FSALEORGID=a.FSALEORGID
|
||||
@@ -135,9 +140,9 @@ LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID WHERE b.FSRCBILLNO=@FBILLN
|
||||
,[ShouKuanBillNo]
|
||||
,[ShouKuanFDate]
|
||||
,[BenCiHeXiao]
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType])
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType],Remark)
|
||||
( SELECT aa.fid,aa.FBILLNO,aa.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,b.FREALRECAMOUNT,@FSALEORGID,'<EFBFBD>տ<EFBFBD><EFBFBD>Դ<EFBFBD><EFBFBD>ϸ',@fid2
|
||||
,dd.FEXCHANGERATE,FSettleCurrId,FLOCALCURRID,0
|
||||
,dd.FEXCHANGERATE,FSettleCurrId,FLOCALCURRID,0 ,@remark
|
||||
FROM T_AR_RECEIVEBILL a LEFT JOIN T_AR_RECEIVEBILLSRCENTRY b ON a.FID=b.FID
|
||||
LEFT JOIN dbo.T_SAL_ORDER aa ON b.FSRCBILLID=aa.FID
|
||||
LEFT JOIN T_SAL_ORDERFIN dd ON aa.FID=dd.FID
|
||||
@@ -156,8 +161,8 @@ LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID WHERE b.FSRCBILLNO=@FBILLN
|
||||
,[ShouKuanBillNo]
|
||||
,[ShouKuanFDate]
|
||||
,[BenCiHeXiao]
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType])
|
||||
( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,F_shareAmount,@FSALEORGID,'<EFBFBD><EFBFBD>ʷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',c.FEntryID ,dd.FEXCHANGERATE,FSettleCurrId,FLOCALCURRID,0
|
||||
,[FSaleOrgId],Note,NoteFid,FExchangeRate,FSettleCurrId,FLOCALCURRID,[ShouKuanType],Remark)
|
||||
( SELECT a.fid,a.FBILLNO,a.F_CONTRACTNUMBER,@ShouKuanFID,@FBILLNO,@FDATE,F_shareAmount,@FSALEORGID,'<EFBFBD><EFBFBD>ʷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>¼<EFBFBD><EFBFBD>',c.FEntryID ,dd.FEXCHANGERATE,FSettleCurrId,FLOCALCURRID,0 ,@remark
|
||||
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
|
||||
@@ -170,7 +175,8 @@ LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID WHERE b.FSRCBILLNO=@FBILLN
|
||||
@FBILLNO,
|
||||
@ShouKuanFID,
|
||||
@FSALEORGID,
|
||||
@F_contractnumber;
|
||||
@F_contractnumber
|
||||
,@remark;
|
||||
END
|
||||
|
||||
-- 4. <20>ر<EFBFBD><D8B1>α<EFBFBD>
|
||||
@@ -178,4 +184,17 @@ LEFT JOIN dbo.T_AR_RECMACTHLOGENTRY b ON a.FID=b.FID WHERE b.FSRCBILLNO=@FBILLN
|
||||
|
||||
-- 5. <20>ͷ<EFBFBD><CDB7>α<EFBFBD><CEB1><EFBFBD>Դ
|
||||
DEALLOCATE cursor_name2;
|
||||
END
|
||||
|
||||
--SELECT a.XiaoShouFid,a.XiaoShouBillNo,[XiaoShouHeTong],a.ShouKuanFDate,b.Ԥ<EFBFBD>Ƶ<EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>,b.<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD> FROM [ZZZ_HeXiaoBook] a
|
||||
--LEFT JOIN (SELECT b.<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID,MAX(b.Ԥ<EFBFBD>Ƶ<EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>) AS Ԥ<EFBFBD>Ƶ<EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD> ,max (b.<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>) AS <EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD> FROM [ZRP_YingShouMingXi_yuyubo] b GROUP BY <EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID) b
|
||||
--ON a.XiaoShouFid=b.<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID
|
||||
--ORDER BY a.XiaoShouFid
|
||||
|
||||
UPDATE [ZZZ_HeXiaoBook] SET ZhangLing= ISNULL( ROUND( DATEDIFF(DAY,[<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>],[ZZZ_HeXiaoBook].ShouKuanFDate) / 30.00,2) ,0 )
|
||||
FROM (SELECT a.XiaoShouFid,a.XiaoShouBillNo,[XiaoShouHeTong],a.ShouKuanFDate,b.Ԥ<EFBFBD>Ƶ<EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>,b.<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD> FROM [ZZZ_HeXiaoBook] a
|
||||
LEFT JOIN (SELECT b.<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID,MAX(b.Ԥ<EFBFBD>Ƶ<EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>) AS Ԥ<EFBFBD>Ƶ<EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD> ,max (b.<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD>) AS <EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʱ<EFBFBD><EFBFBD> FROM [ZRP_YingShouMingXi_yuyubo] b GROUP BY <EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID) b
|
||||
ON a.XiaoShouFid=b.<EFBFBD><EFBFBD><EFBFBD>۵<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID) b
|
||||
WHERE [ZZZ_HeXiaoBook].XiaoShouFid=b.XiaoShouFid
|
||||
|
||||
END
|
||||
|
||||
|
||||
Reference in New Issue
Block a user