合并

yangle

2025-04-02 cee055eb7cdecf5d995cc65d379494e471bde9c8

 DAL/³µ¼ä¹ÜÀí/ClsSc_WorkBeginDotCheckBillMain.cs

@@ -37,9 +37,11 @@
            try
            {

                oCn.BeginTran();

                //保存前控制=========================================
                string HBillNote = "";
                DataSet ds = oCn.RunProcReturn("Exec h_p_Sc_WorkBeginDotCheckBill_BeforeSaveCtrl " + omodel.HInterID.ToString() + ", '" + omodel.HBillNo + "','" + HBillNote + "',1 ", "h_p_Sc_QualityReportBill_BeforeSaveCtrl");
                DataSet ds = oCn.RunProcReturn("Exec h_p_Sc_WorkBeginDotCheckBill_BeforeSaveCtrl " + omodel.HInterID.ToString() + ", '" + omodel.HBillNo + "','" + HBillNote + "',2", "h_p_Sc_QualityReportBill_BeforeSaveCtrl");
                if (ds == null)
                {
                    sReturn = "保存前判断失败！";
@@ -52,7 +54,7 @@
                }
                //=========================================================

                oCn.BeginTran();
              
                //更新主表
                oCn.RunProc("UpDate Sc_WorkBeginDotCheckBillMain set  " +
                " HBillNo='" + omodel.HBillNo + "'" +  
@@ -87,7 +89,7 @@
                {
                    string subSql = "insert into Sc_WorkBeginDotCheckBillSub " +
                   "(HInterID,HEntryID,HSourceInterID,HSourceEntryID,HSourceBillNo,HSourceBillType,HRemark" +
                   ",HCheckNoteItemID,HCheckPostID,HCheckResult,HDotCheckType,HRelationID) " +
                   ",HCheckNoteItemID,HCheckPostID,HCheckResult,HDotCheckType,HRelationID,HDotCheckVal) " +
                   " values(" +
                   "" + omodel.HInterID.ToString() +
                   "," + oSub.HEntryID.ToString() +
@@ -101,13 +103,14 @@
                   "','" + oSub.HCheckResult +
                   "','" + oSub.HDotCheckType +
                   "','" + oSub.HRelationID +
                    "','" + oSub.HDotCheckVal +
                   "')";
                    oCn.RunProc(subSql);
                }
                sReturn = "修改单据成功！";

                //=========================保存后控制  
                DataSet ds2 = oCn.RunProcReturn("h_p_Sc_WorkBeginDotCheckBill_AfterSaveCtrl " + omodel.HInterID.ToString() + ", '" + omodel.HBillNo + "',1 ", "h_p_Sc_QualityReportBill_AfterSaveCtrl");
                DataSet ds2 = oCn.RunProcReturn("h_p_Sc_WorkBeginDotCheckBill_AfterSaveCtrl " + omodel.HInterID.ToString() + ", '" + omodel.HBillNo + "',2 ", "h_p_Sc_QualityReportBill_AfterSaveCtrl");
                if (ds2 == null)
                {
                    sReturn = "保存后控制判断失败！";
@@ -139,6 +142,7 @@
            {

                DataSet ds;
                oCn.BeginTran();

                //保存前控制=========================================
                string HBillNote = "";
@@ -155,7 +159,7 @@
                }
                //=========================================================

                oCn.BeginTran();
            

                //检查主表内码是否重复，若重复则重新生成并继续检查，直到不再重复
                while (true)
@@ -208,7 +212,7 @@
                {
                    string subSql = "insert into Sc_WorkBeginDotCheckBillSub " +
                        "(HInterID,HEntryID,HSourceInterID,HSourceEntryID,HSourceBillNo,HSourceBillType,HRemark" +
                        ",HCheckNoteItemID,HCheckPostID,HCheckResult,HDotCheckType,HRelationID) " +
                        ",HCheckNoteItemID,HCheckPostID,HCheckResult,HDotCheckType,HRelationID,HDotCheckVal) " +
                        " values(" +
                        "" + omodel.HInterID.ToString() +
                        "," + oSub.HEntryID.ToString() +
@@ -222,6 +226,7 @@
                        "','" + oSub.HCheckResult +
                        "','" + oSub.HDotCheckType +
                        "','" + oSub.HRelationID +
                        "','" + oSub.HDotCheckVal +
                        "')";
                    oCn.RunProc(subSql);
                }