50 lines
1.5 KiB
MySQL
50 lines
1.5 KiB
MySQL
|
|
|||
|
|
ALTER PROC FUpdateSalOrderAmount2
|
|||
|
|
(
|
|||
|
|
@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
|
|||
|
|
|
|||
|
|
--<EFBFBD>ķ<EFBFBD><EFBFBD><EFBFBD>֪ͨ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ۼƺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
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
|
|||
|
|
|
|||
|
|
|
|||
|
|
--<EFBFBD><EFBFBD><EFBFBD>տ<EFBFBD>ۼƺ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
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 '<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'
|