From 7bf3d3a373b61def534d6110d393c1b9db3422d6 Mon Sep 17 00:00:00 2001
From: duhe <226547893@qq.com>
Date: 星期二, 21 五月 2024 16:28:24 +0800
Subject: [PATCH] 销售订单关闭和行关闭 增加 关闭后控制的 存储过程 :h_p_Xs_SeOrderBill_AfterCloseCtrl 增加 行关闭后控制的 存储过程:h_p_Xs_SeOrderBill_AfterEntryCloseCtrl 参数 @HInterID int, --单据ID @HBillNo varchar(50), --单据号 @HUser varchar(100) --用户 存储过程里 增加 控制, 当 这个销售订单 出库数量为0, 但是 下推的 工序流转卡 已经 染厂(工序可以写死)进站或出站记录后。 进行报错,不允许关闭;(行关闭,只考虑本行; 整单关闭则 需要 全部行都考虑)

---
 WebAPI/DLL/ClsGy_BadReason_Ctl.cs |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/WebAPI/DLL/ClsGy_BadReason_Ctl.cs b/WebAPI/DLL/ClsGy_BadReason_Ctl.cs
index 13d9431..558e765 100644
--- a/WebAPI/DLL/ClsGy_BadReason_Ctl.cs
+++ b/WebAPI/DLL/ClsGy_BadReason_Ctl.cs
@@ -21,10 +21,10 @@
                 oCn.RunProc("Insert into " + MvarItemKey + " " +
                     " (HNumber,HName,HHelpCode,HShortNumber,HParentID" +
                     ",HDeptID,HProcID" +
-                    ",HLevel,HEndFlag,HStopflag,HRemark) " +
+                    ",HLevel,HEndFlag,HStopflag,HRemark,HBadTypeID) " +
                     " Values('" + oModel.HNumber + "','" + oModel.HName + "','" + oModel.HHelpCode + "','" + oModel.HShortNumber + "'," + oModel.HParentID.ToString() +
                     "," + oModel.HDeptID.ToString() + "," + oModel.HProcID.ToString() +
-                    "," + oModel.HLevel.ToString() + "," + Convert.ToString(oModel.HEndFlag ? 1 : 0) + "," + Convert.ToString(oModel.HStopflag ? 1 : 0) + ",'" + oModel.HRemark + "')", ref DBUtility.ClsPub.sExeReturnInfo);
+                    "," + oModel.HLevel.ToString() + "," + Convert.ToString(oModel.HEndFlag ? 1 : 0) + "," + Convert.ToString(oModel.HStopflag ? 1 : 0) + ",'" + oModel.HRemark + "',"+oModel.HBadTypeID + ")", ref DBUtility.ClsPub.sExeReturnInfo);
                 //淇敼涓婄骇涓洪潪鏈骇浠g爜
                 oCn.RunProc("Update " + MvarItemKey + " set HEndflag=0 where HItemID=" + oModel.HParentID, ref DBUtility.ClsPub.sExeReturnInfo);
                 oCn.Commit();
@@ -50,6 +50,7 @@
                     ",HHelpCode='" + oModel.HHelpCode + "'" +
                     ",HLevel=" + oModel.HLevel.ToString() +
                     ",HDeptID=" + oModel.HDeptID.ToString() +
+                    ",HBadTypeID=" + oModel.HBadTypeID.ToString() +
                     ",HProcID=" + oModel.HProcID.ToString() +
                     ",HEndflag=" + Convert.ToString(oModel.HEndFlag ? 1 : 0) +
                     ",HStopflag=" + Convert.ToString(oModel.HStopflag ? 1 : 0) +

--
Gitblit v1.9.1