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
WHERE fid=@fid

 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'