生产入库提交生成金蝶WISE单据增加源单生产汇报单；委外出库提交生成金蝶WISE单据委外投料单单据类型修改

yxj

2023-12-27 150b3f515ff30e8177a3f67ad0d7ebb9c43441a2

生产入库提交生成金蝶WISE单据增加源单生产汇报单；委外出库提交生成金蝶WISE单据委外投料单单据类型修改

 CLOUDWEB/WebService1.asmx.cs

@@ -23832,7 +23832,7 @@
                oCn.RunProc("exec h_p_IFK3_ToERP_EntrustOutBill_Insert_New " + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "'," + oMain.HBillerID.ToString() + ",'" + sHSourceType + "'");

                //更新关联数量
                if (sHSourceType == "3720")         //委外订单-投料
                if (sHSourceType == "1604")         //委外订单-投料
                {
                    oCn.RunProc("exec h_p_WW_UpDateRelation_WWPPBomToEntrustOut_Add " + oMain.HInterID.ToString());
                    //回填K3关联数量
@@ -28888,13 +28888,11 @@
                ",HYear,HPeriod,HRemark,HMaker,HMakeDate" +
                ",HSupID,HWHID,HSCWHID,HEmpID,HManagerID,HSecManagerID" +
                ",HKeeperID,HDeptID,HExplanation,HInnerBillNo,HRedBlueFlag" +
                ",HArrivalDate" +
                ") " +
                " values('1201','1201'," + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "',convert(varchar(10),getdate(),120),'" + oMain.HMainSourceBillType + "'" +
                ", " + oMain.HYear.ToString() + "," + oMain.HPeriod.ToString() + ",'" + oMain.HRemark + "','" + oMain.HMaker + "',convert(varchar(10),getdate(),120)" +
                ", " + oMain.HSupID.ToString() + "," + oMain.HWHID.ToString() + "," + oMain.HSCWHID.ToString() + "," + oMain.HEmpID.ToString() + "," + oMain.HManagerID.ToString() + "," + oMain.HSecManagerID.ToString() +
                ", " + oMain.HKeeperID.ToString() + "," + oMain.HDeptID.ToString() + ",'" + oMain.HExplanation + "','" + oMain.HInnerBillNo + "'," + DBUtility.ClsPub.BoolToString(oMain.HRedBlueFlag) +
                ",'" + oMain.HArrivalDate.ToShortDateString() + "'" +
                ") ");

                //新增K3子表、主表
@@ -32133,6 +32131,12 @@
                    //回填K3关联数量
                    oCn.RunProc("exec h_p_IFK3_ToERP_ProductInBill_UpdateBillRelateData_ICMO_New " + oMain.HInterID.ToString());
                }
                else if (sHSourceType == "3711")    //生产汇报单
                {
                    oCn.RunProc("exec h_p_Sc_UpDateRelation_ICMOReportToProductIn_Add " + oMain.HInterID.ToString());
                    //回填K3关联数量
                    oCn.RunProc("exec h_p_IFK3_ToERP_ProductInBill_UpdateBillRelateData_IICMOReport_New " + oMain.HInterID.ToString());
                }
                else    //无源单
                {
                    //回填K3关联数量