Pilot_KD_Parino_yuyubo/更新核销金额.sql

--UpdateSalOrderAmount
--Select * From T_TempModelPath
--Insert into T_TempModelPath Values('SX-1','D:\ģ<><C4A3>\SXϵͳģ<CDB3>壨<EFBFBD><E5A3A8><EFBFBD><EFBFBD><EFBFBD>ԣ<EFBFBD>.docx'),('SX-2','D:\ģ<><C4A3>\SXϵͳģ<CDB3>壨<EFBFBD><E5A3A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ԣ<EFBFBD>.docx')
--Update T_TempModelPath Set FTempPath = 'D:\ģ<><C4A3>\SXϵͳģ<CDB3>壨<EFBFBD><E5A3A8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ԣ<EFBFBD>.docx' Where FKeyId = 'SX-2';
go
--sp_helptext UpdateSalOrderAmount
Alter proc UpdateSalOrderAmount   
(  
 @fid BIGINT
)  
AS   
BEGIN   
--<EFBFBD>޸<EFBFBD><EFBFBD><EFBFBD><EFBFBD>۶<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۼƺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
UPDATE T_AutoWrireRecordEntry SET FALLAMOUNT2=FALLAMOUNT22
WHERE fid=@fid


UPDATE T_AutoWrireRecordEntry2 SET FALLAMOUNT3=FALLAMOUNT33,FCONTRACTNUMBER2=(SELECT STRING_AGG(FCONTRACTNUMBER,',')  FROM T_AutoWrireRecordEntry WHERE fid= T_AutoWrireRecordEntry2.FID)
WHERE fid=@fid

DECLARE @custID1 INT=0,@cusId2 INT=0,@custIDcount INT =0;

SELECT @custID1=a.FCustId FROM dbo.T_SAL_ORDER a 
LEFT JOIN T_AutoWrireRecordEntry b ON a.FBILLNO=b.FBILLNO2
WHERE b.fid=@fid

SELECT  @custIDcount=COUNT(DISTINCT a.FCustId )  FROM dbo.T_SAL_ORDER a 
LEFT JOIN T_AutoWrireRecordEntry b ON a.FBILLNO=b.FBILLNO2
WHERE b.fid=@fid

SELECT @cusId2=a.FCONTACTUNIT FROM dbo.T_AR_RECEIVEBILL a 
LEFT JOIN T_AutoWrireRecordEntry2 b ON a.FBILLNO=b.FBILLNO3
WHERE b.fid=@fid

IF(@custID1 >0 AND @cusId2 >0 and @custID1 !=@cusId2  OR @custIDcount >1)
begin 
  UPDATE T_AutoWrireRecord SET F_KUAKEHU='<EFBFBD><EFBFBD>' WHERE FID=@fid
  update T_AutoWrireRecord SET F_YeWuDate=FCreateDate
  WHERE T_AutoWrireRecord.FID=@fid AND F_YeWuDate IS NULL 
 end
ELSE
begin
   UPDATE T_AutoWrireRecord SET F_KUAKEHU='<EFBFBD><EFBFBD>' WHERE FID=@fid
  
	UPDATE T_AutoWrireRecord SET F_YeWuDate=b.FDATE3
	FROM T_AutoWrireRecordEntry2 b 
	WHERE T_AutoWrireRecord.FID=@fid AND F_YeWuDate IS NULL AND b.FID=T_AutoWrireRecord.FID
END

 UPDATE C SET F_Amount =c.F_Amount+ISNULL( d.<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,0)  
 FROM T_AutoWrireRecord A   
 INNER JOIN  T_AutoWrireRecordEntry B ON A.FID = B.FID   
 INNER JOIN T_SAL_ORDER C ON C.FBILLNO = B.FBILLNO2  
 LEFT JOIN   
 (  
  SELECT FBILLNO2,SUM(CONVERT(DECIMAL(18,2), FALLAMOUNT2)) AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>' FROM T_AutoWrireRecord Aa   
  INNER JOIN  T_AutoWrireRecordEntry B ON Aa.FID = B.FID   
  WHERE  Aa.FID =@FID 
  GROUP BY B.FBILLNO2  
 ) d ON d.FBILLNO2 =b.FBILLNO2  
 WHERE a.FID =@FID  ;
 

--<EFBFBD>޸<EFBFBD>Ӧ<EFBFBD>յ<EFBFBD><EFBFBD>ۼƺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
 UPDATE C SET F_Amount =c.F_Amount+ISNULL( d.<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,0)  
 FROM T_AutoWrireRecord A   
 INNER JOIN  T_AutoWrireRecordEntry B ON A.FID = B.FID   
 INNER JOIN T_AR_RECEIVABLE C ON C.FBILLNO = B.FBILLNO2  
 LEFT JOIN   
 (  
  SELECT FBILLNO2,SUM(CONVERT(DECIMAL(18,2), FALLAMOUNT2)) AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>' FROM T_AutoWrireRecord Aa   
  INNER JOIN  T_AutoWrireRecordEntry B ON Aa.FID = B.FID   
    WHERE  Aa.FID =@FID  
  GROUP BY B.FBILLNO2  
 ) d ON d.FBILLNO2 =b.FBILLNO2  
 WHERE a.FID =@FID  ;
 --<EFBFBD>޸<EFBFBD><EFBFBD>տ<EFBFBD>ۼƺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
 UPDATE C SET F_Amount =c.F_Amount+ISNULL( d.<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>,0)  ,C.F_CONTRACTNUMBER=CASE WHEN C.F_CONTRACTNUMBER ='' THEN b.FCONTRACTNUMBER2 ELSE  C.F_CONTRACTNUMBER +';'+ b.FCONTRACTNUMBER2 END 
 FROM T_AutoWrireRecord A   
 INNER JOIN  T_AutoWrireRecordEntry2 B ON A.FID = B.FID   
 INNER JOIN T_AR_RECEIVEBILL C ON C.FBILLNO = B.FBILLNO3  
 LEFT JOIN   
 (  
  SELECT FBILLNO3,SUM(CONVERT(DECIMAL(18,2), FALLAMOUNT3)) AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>' FROM T_AutoWrireRecord Aa   
  INNER JOIN  T_AutoWrireRecordEntry2 B ON Aa.FID = B.FID   
  WHERE  Aa.FID =@FID  
  GROUP BY B.FBILLNO3  
 ) d ON d.FBILLNO3 =b.FBILLNO3  
 WHERE a.FID =@FID  ;
end 



--SKD00000003
 --SELECT FBILLNO3,SUM(CONVERT(decimal(18,2), FALLAMOUNT3)) AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>' FROM T_AutoWrireRecord A   
 -- INNER JOIN  T_AutoWrireRecordEntry2 B ON A.FID = B.FID   
 -- WHERE A.FDOCUMENTSTATUS = 'C'  
 -- GROUP BY B.FBILLNO3
  

  go
  --Select * From T_SAL_ORDER Where FBILLNO = 'PL-XSDD20250200007'
  --Update T_SAL_ORDER Set FDOCUMENTSTATUS = 'D' Where FBILLNO = 'PL-XSDD20250200007'