Pilot_KD_Parino_yuyubo/发货通知单的核销记录审核.sql
2025-05-08 16:03:24 +08:00

50 lines
1.5 KiB
Transact-SQL

ALTER proc UpdateSalOrderAmount2
(
@fid nvarchar(1000)
)
as
begin
DECLARE @F_Amount DECIMAL(18,2)=0,@FBILLNO NVARCHAR(50),@saleOrgId INT,@F_Papercontract NVARCHAR(2000)
SELECT @F_Amount=ISNULL(SUM(CONVERT(decimal(18,2), FALLAMOUNT2)),0), @FBILLNO=FBILLNO2 FROM VRYF_t_Cust100015 A
INNER JOIN VRYF_t_Cust_Entry100024 B ON A.FID = B.FID
WHERE a.FID =@FID
GROUP BY FBILLNO2
SELECT @saleOrgId= a.FSALEORGID,@F_Papercontract=F_Papercontract FROM T_SAL_DELIVERYNOTICE a
WHERE a.FBILLNO=@FBILLNO
--修改发货通知单的累计核销金额
UPDATE T_SAL_DELIVERYNOTICE SET F_Amount =ISNULL(F_Amount,0)+@F_Amount
WHERE FBILLNO =@FBILLNO ;
UPDATE dbo.T_SAL_ORDER SET F_AMOUNT=ISNULL(F_AMOUNT,0)+@F_Amount
WHERE F_SALEORGID=@saleOrgId AND F_contractnumber=@F_Papercontract
--修改收款单累计核销金额
SELECT @F_Amount=ISNULL(SUM(CONVERT(decimal(18,2), FALLAMOUNT3)),0), @FBILLNO=FBILLNO3 FROM VRYF_t_Cust100015 A
INNER JOIN VRYF_t_Cust_Entry100025 B ON A.FID = B.FID
WHERE a.FID =@FID
GROUP BY FBILLNO3
UPDATE T_AR_RECEIVEBILL SET F_Amount=ISNULL(F_Amount,0)+@F_Amount
WHERE FBILLNO =@FBILLNO ;
end
--SKD00000003
--SELECT FBILLNO3,SUM(CONVERT(decimal(18,2), FALLAMOUNT3)) AS '核销金额' 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'