修复上下模删除时失败 产品验证清单和防错清单增加字段HPreventErrResult 防错结果

zrg

2025-07-16 0c026973c5382ce4a67398980b164b2b859a4b40

 DAL/车间管理/ClsGy_MaterPreventErrMouldBillMain.cs

@@ -79,7 +79,7 @@
                {
                    string subSql = "insert into Gy_MaterPreventErrMouldBillSub " +
                        "(HInterID,HEntryID,HSourceInterID,HSourceEntryID,HSourceBillNo,HSourceBillType,HRemark" +
                        ",HPreventErrMouldID,HPreventErrNote,HLoseMode,HLoseCheck) " +
                        ",HPreventErrMouldID,HPreventErrNote,HLoseMode,HLoseCheck,HPreventErrResult) " +
                        " values(" +
                        "" + omodel.HInterID.ToString() +
                        "," + oSub.HEntryID.ToString() +
@@ -92,6 +92,7 @@
                        "','" + oSub.HPreventErrNote +
                        "','" + oSub.HLoseMode +
                        "','" + oSub.HLoseCheck +
                        "','" + oSub.HPreventErrResult +
                        "')";
                    oCn.RunProc(subSql);
                }
@@ -189,7 +190,7 @@
                {
                    string subSql = "insert into Gy_MaterPreventErrMouldBillSub " +
                        "(HInterID,HEntryID,HSourceInterID,HSourceEntryID,HSourceBillNo,HSourceBillType,HRemark" +
                        ",HPreventErrMouldID,HPreventErrNote,HLoseMode,HLoseCheck) " +
                        ",HPreventErrMouldID,HPreventErrNote,HLoseMode,HLoseCheck,HPreventErrResult) " +
                        " values(" +
                        "" + omodel.HInterID.ToString() +
                        "," + oSub.HEntryID.ToString() +
@@ -202,6 +203,7 @@
                        "','" + oSub.HPreventErrNote +
                        "','" + oSub.HLoseMode +
                        "','" + oSub.HLoseCheck +
                        "','" + oSub.HPreventErrResult +
                        "')";
                    oCn.RunProc(subSql);
                }