yuyubo/Pilot_KD_Parino_yuyubo
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

11

Browse Source
This commit is contained in:
余宇波 2025-05-27 14:19:13 +08:00
parent a8d0d89b75
commit 0fb1617563
4 changed files with 27 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Pilot_KD_Parino/QPHY_AutoWrireRecord/FUpdateAmount.cs
View File

@ -31,6 +31,8 @@ namespace Pilot_KD_Parino.QPHY_AutoWrireRecord
var Billobj = rows.DataEntity;
//获取销售订单核销金额数据
SqlManage.FUpdateSalOrderAmount(this.Context, Convert.ToString(Billobj["Id"]));
//int id = Convert.ToInt32(Billobj["Id"]);
string sql1 = string.Format(@"/*dialect*/Select B.FBILLNO2,B.FALLAMOUNT2 From T_AutoWrireRecord A
JOIN T_AutoWrireRecordEntry B

2
Pilot_KD_Parino/SQL/SqlManage.cs
View File

@ -1,4 +1,5 @@
using Kingdee.BOS;
using Kingdee.BOS.Log;
using Kingdee.BOS.Orm.DataEntity;
using Kingdee.BOS.ServiceHelper;
using System;
@ -36,6 +37,7 @@ namespace Pilot_KD_Parino.SQL
//定义SQL,调用物料视图
string sql = string.Format(@"/*dialect*/
EXEC FUpdateSalOrderAmount {0} ", FID);
Logger.Error("FUpdateSalOrderAmount", sql, new Exception());
//执行SQL
DBServiceHelper.ExecuteDynamicObject(ctx, sql.ToString(), null, null, CommandType.Text, null);
}

BIN
反审核销记录单.sql
View File

Binary file not shown.

44
更新核销金额.sql
View File

@ -6,46 +6,48 @@ go
--sp_helptext UpdateSalOrderAmount
Alter proc UpdateSalOrderAmount
(
@fid nvarchar(1000)
@fid NVARCHAR(1000)
)
as
begin
AS
BEGIN
--錦맣饋簡땐데작셕뵙饋쏜띨
UPDATE C SET F_Amount =isnull( d.ºËÏú½ðî,0)
UPDATE C SET F_Amount =c.F_Amount+ISNULL( d.ºËÏú½ðî,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 'ºËÏú½ð¶î' FROM T_AutoWrireRecord A
INNER JOIN T_AutoWrireRecordEntry B ON A.FID = B.FID
WHERE A.FDOCUMENTSTATUS = 'C'
SELECT FBILLNO2,SUM(CONVERT(DECIMAL(18,2), FALLAMOUNT2)) AS 'ºËÏú½ð¶î' 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
) d ON d.FBILLNO2 =b.FBILLNO2
WHERE a.FID =@FID ;
--錦맣壇澗데작셕뵙饋쏜띨
UPDATE C SET F_Amount =isnull( d.ºËÏú½ðî,0)
UPDATE C SET F_Amount =c.F_Amount+ISNULL( d.ºËÏú½ðî,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 'ºËÏú½ð¶î' FROM T_AutoWrireRecord A
INNER JOIN T_AutoWrireRecordEntry B ON A.FID = B.FID
WHERE A.FDOCUMENTSTATUS = 'C'
SELECT FBILLNO2,SUM(CONVERT(DECIMAL(18,2), FALLAMOUNT2)) AS 'ºËÏú½ð¶î' 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
) d ON d.FBILLNO2 =b.FBILLNO2
WHERE a.FID =@FID ;
--錦맣澗운데작셕뵙饋쏜띨
UPDATE C SET F_Amount =isnull( d.ºËÏú½ðî,0) ,C.F_CONTRACTNUMBER=b.FCONTRACTNUMBER2
UPDATE C SET F_Amount =c.F_Amount+ISNULL( d.ºËÏú½ðî,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 'ºËÏú½ð¶î' FROM T_AutoWrireRecord A
INNER JOIN T_AutoWrireRecordEntry2 B ON A.FID = B.FID
WHERE A.FDOCUMENTSTATUS = 'C'
SELECT FBILLNO3,SUM(CONVERT(decimal(18,2), FALLAMOUNT3)) AS 'ºËÏú½ð¶î' 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 ;
@ -54,10 +56,10 @@ 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
--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