Pilot_KD_Parino_yuyubo/反审核销记录单.sql
2025-04-19 14:44:32 +08:00

35 lines
2.3 KiB
Transact-SQL
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

USE [AIS20250407114823]
GO
/****** Object: StoredProcedure [dbo].[FUpdateSalOrderAmount] Script Date: 2025/4/19 14:41:18 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER proc [dbo].[FUpdateSalOrderAmount]
(
@fid nvarchar(1000)
)
as
begin
--修改销售订单累计核销金额
UPDATE C SET F_Amount = ( ISNULL(c.F_AMOUNT,0) - isnull( b.FALLAMOUNT2,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
WHERE a.FID =@FID;
--修改应收单累计核销金额
UPDATE C SET F_Amount = ( ISNULL(c.F_AMOUNT,0) - isnull( b.FALLAMOUNT2,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
WHERE a.FID =@FID;
--修改收款单累计核销金额
UPDATE C SET F_Amount = ( ISNULL(c.F_AMOUNT,0) - isnull( b.FALLAMOUNT3,0)) ,C.F_CONTRACTNUMBER=''
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
WHERE a.FID =@FID;
end