From 4155a946a0993ed14aa9f1953378c45b0772d3b7 Mon Sep 17 00:00:00 2001
From: yxj <yxj@hz-kingdee.com>
Date: 星期二, 30 九月 2025 09:31:37 +0800
Subject: [PATCH] 生产退料扫描源单调用方法修改,增加通过WEBAPI同步金蝶云生产领料单至本地数据库功能

---
 CLOUDWEB/WebService1.asmx.cs |  306 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 files changed, 306 insertions(+), 0 deletions(-)

diff --git a/CLOUDWEB/WebService1.asmx.cs b/CLOUDWEB/WebService1.asmx.cs
index fed2a18..380192a 100644
--- a/CLOUDWEB/WebService1.asmx.cs
+++ b/CLOUDWEB/WebService1.asmx.cs
@@ -9,6 +9,7 @@
 using System.Data.SqlClient;
 using System.Globalization;
 using Newtonsoft.Json;
+using Newtonsoft.Json.Linq;
 
 namespace CLOUDWEB
 {
@@ -29,6 +30,281 @@
             return "Hello World";
         }
 
+
+        #region 閫氳繃WEBAPI鍚屾閲戣澏浜戞暟鎹嚦鏈湴
+
+        #region 鍗曟嵁鍚屾
+
+        #region 鐢熶骇棰嗘枡鍗曞悓姝�     鏍规嵁鍗曟嵁鍙峰悓姝�
+
+        [WebMethod]
+        public bool GetWebAPIToLocal_MateOut(string HBillNo, string HBillType, string HMaker, ref string sErrMsg)
+        {
+            SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
+
+            //浠庨厤缃枃浠惰幏鍙� CLOUD缃戝潃銆佽处濂椾俊鎭�佺櫥褰曠敤鎴枫�佺櫥褰曞瘑鐮�
+            if (!Pub_Class.ClsPub.GetCLOUDLoginInfo(ref Pub_Class.ClsPub.sExeReturnInfo))
+            {
+                sErrMsg = Pub_Class.ClsPub.sExeReturnInfo;
+                return false;
+            }
+
+            //鑾峰彇CLOUD璐﹀彿瀵嗙爜
+            string HReturn;
+            string sCLOUDUseName = Pub_Class.ClsPub.sCLOUDUseName;
+            string sCLOUDPsd = Pub_Class.ClsPub.sCLOUDPsd;
+            string dbId = Pub_Class.ClsPub.sCLOUDAcc;
+            ApiClient client = new ApiClient(Pub_Class.ClsPub.sCLOUDUrl);
+            bool bLogin = client.Login(dbId, sCLOUDUseName, sCLOUDPsd, 2052);
+
+            if (bLogin)
+            {
+                //鏌ョ湅鍗曟嵁
+                string sJson = "{\"CreateOrgId\":0,\"Number\":\"" + HBillNo + "\"}";
+                var result = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.View",
+                new object[] { "PRD_PickMtrl", sJson });
+                var _saveObj = JObject.Parse(result);
+
+                //鍒ゆ柇鏁版嵁鏄惁鑾峰彇鎴愬姛
+                if (_saveObj.SelectToken("Result.ResponseStatus.IsSuccess")?.ToString().ToUpper() != "TRUE")
+                {
+                    HReturn = result.ToString();
+                    //鍙嶅簭鍒楀寲json鏁版嵁
+                    var retModel = JsonConvert.DeserializeObject<KingdeeResponse>(HReturn);
+                    //鎺ユ敹閲戣澏鎶ラ敊淇℃伅
+                    var strErrorMsg = string.Empty;
+                    //閬嶅巻鑾峰彇鎶ラ敊淇℃伅
+                    foreach (var item in retModel.Result.ResponseStatus.Errors)
+                    {
+                        strErrorMsg += item.Message + "\r\n";
+                    };
+                    sErrMsg = "鍚屾鍗曟嵁澶辫触锛�" + strErrorMsg;
+                    return false;
+                }
+                else
+                {
+                    Int64 HInterID = 0;
+
+                    //鑾峰彇鍗曟嵁ID锛屾湰鍦拌〃涓凡瀛樺湪褰撳墠鍗曟嵁锛岃幏鍙栧綋鍓嶅崟鎹甀D锛屼笉瀛樺湪鍒欒幏鍙栨渶澶у崟鎹甀D
+                    DataSet dsID = oCn.RunProcReturn(" select HInterID from Kf_ICStockBillMain with(nolock) where HBillNo= '" + HBillNo + "' and HBillType= '" + HBillType + "'", "Kf_ICStockBillMain");
+                    if (dsID == null || dsID.Tables[0].Rows.Count == 0)
+                    {
+                        HInterID = DBUtility.ClsPub.CreateBillID_Prod(HBillType, ref sErrMsg);
+                    }
+                    else
+                    {
+                        HInterID = DBUtility.ClsPub.isLong(dsID.Tables[0].Rows[0]["HInterID"]);
+                        oCn.RunProc("Delete from Kf_ICStockBillMain where HInterID=" + HInterID.ToString(), ref DBUtility.ClsPub.sExeReturnInfo);
+                        oCn.RunProc("Delete from Kf_ICStockBillSub where HInterID=" + HInterID.ToString(), ref DBUtility.ClsPub.sExeReturnInfo);
+                    }
+
+                    //涓昏〃鏁版嵁璧嬪��
+                    var MainData = new
+                    {
+                        HInterID = HInterID,
+                        HYear = DateTime.Now.Year,
+                        HPeriod = DateTime.Now.Month,
+                        HBillNo = _saveObj.SelectToken("Result.Result.BillNo")?.ToString() ?? "",
+                        HBillType = HBillType,
+                        HBillSubType = HBillType,
+                        HMainSourceBillType = "",
+                        HDate = _saveObj.SelectToken("Result.Result.Date")?.ToString(),
+                        HSupID = 0,
+                        HWHID = 0,
+                        HSCWHID = 0,
+                        HEmpID = 0,
+                        HManagerID = 0,
+                        HSecManagerID = _saveObj.SelectToken("Result.Result.PickerId_Id")?.ToString() ?? "0",
+                        HKeeperID = _saveObj.SelectToken("Result.Result.FSTOCKERID_Id")?.ToString() ?? "0",
+                        HDeptID = 0,
+                        HCurID = _saveObj.SelectToken("Result.Result.CurrId_Id")?.ToString() ?? "0",
+                        HCurNumber = _saveObj.SelectToken("Result.Result.CurrId.Number")?.ToString() ?? "",
+                        HSeOrderBillNo = "",
+                        HExplanation = "WebAPI瀵煎叆",
+                        HRemark = "",
+                        HInnerBillNo = "",
+                        HRedBlueFlag = 0,
+                        HBillStatus = _saveObj.SelectToken("Result.Result.ApproverId_Id")?.ToString() == "0" ? 1 : 2,
+                        HMaker = _saveObj.SelectToken("Result.Result.CreatorId.Name")?.ToString() ?? "",
+                        HMakeDate = _saveObj.SelectToken("Result.Result.CreateDate")?.ToString(),
+                        HChecker = _saveObj.SelectToken("Result.Result.ApproverId.Name")?.ToString() ?? "",
+                        HCheckDate = _saveObj.SelectToken("Result.Result.ApproveDate")?.ToString(),
+                        HUpDater = _saveObj.SelectToken("Result.Result.ModifierId.Name")?.ToString() ?? "",
+                        HUpDateDate = _saveObj.SelectToken("Result.Result.ModifyDate")?.ToString(),
+                        HDeleteMan = _saveObj.SelectToken("Result.Result.CANCELER.Name")?.ToString() ?? "",
+                        HDeleteDate = _saveObj.SelectToken("Result.Result.CancelDate")?.ToString(),
+                        HOWNERID = _saveObj.SelectToken("Result.Result.OwnerId_Id")?.ToString() ?? "0",
+                        HOWNERTYPEID = _saveObj.SelectToken("Result.Result.OwnerTypeId")?.ToString() ?? "",
+                        HERPInterID = _saveObj.SelectToken("Result.Result.Id")?.ToString() ?? "0",
+                        HERPBillType = _saveObj.SelectToken("Result.Result.BillType_Id")?.ToString() ?? "",
+                        HERPBillNo = _saveObj.SelectToken("Result.Result.BillNo")?.ToString() ?? "",
+                        HPRDORGID = _saveObj.SelectToken("Result.Result.PrdOrgId_Id")?.ToString() ?? "0",
+                        HSTOCKORGID = _saveObj.SelectToken("Result.Result.StockOrgId_Id")?.ToString() ?? "0",
+                    };
+
+                    //鎻掑叆涓昏〃
+                    oCn.RunProc("Insert Into Kf_ICStockBillMain " +
+                    "(HInterID,HYear,HPeriod,HBillNo,HBillType,HBillSubType" +
+                    ",HMainSourceBillType,HDate,HSupID,HWHID,HSCWHID,HEmpID" +
+                    ",HManagerID,HSecManagerID,HKeeperID,HDeptID,HCurID,HCurNumber" +
+                    ",HSeOrderBillNo,HExplanation,HRemark,HInnerBillNo,HRedBlueFlag,HBillStatus" +
+                    ",HMaker,HMakeDate,HChecker,HCheckDate" +
+                    ",HUpDater,HUpDateDate,HDeleteMan,HDeleteDate" +
+                    ",HOWNERID,HOWNERTYPEID,HERPInterID,HERPBillType,HERPBillNo" +
+                    ",HPRDORGID,HSTOCKORGID" +
+                    ") " +
+                    " values(" + MainData.HInterID.ToString() + "," + MainData.HYear.ToString() + "," + MainData.HPeriod.ToString() + ",'" + MainData.HBillNo + "','" + MainData.HBillType + "','" + MainData.HBillSubType + "'" +
+                    ",'" + MainData.HMainSourceBillType + "','" + MainData.HDate + "'," + MainData.HSupID.ToString() + "," + MainData.HWHID.ToString() + "," + MainData.HSCWHID.ToString() + "," + MainData.HEmpID.ToString() +
+                    ", " + MainData.HManagerID.ToString() + "," + MainData.HSecManagerID.ToString() + "," + MainData.HKeeperID.ToString() + "," + MainData.HDeptID.ToString() + "," + MainData.HCurID.ToString() + ",'" + MainData.HCurNumber + "'" +
+                    ",'" + MainData.HSeOrderBillNo + "','" + MainData.HExplanation + "','" + MainData.HRemark + "','" + MainData.HInnerBillNo + "'," + DBUtility.ClsPub.BoolToString(MainData.HRedBlueFlag) + "," + MainData.HBillStatus.ToString() +
+                    ",'" + MainData.HMaker + "','" + MainData.HMakeDate + "','" + MainData.HChecker + "'," + (MainData.HCheckDate == "" ? "NULL" : "'" + MainData.HCheckDate + "'") +
+                    ",'" + MainData.HUpDater + "'," + (MainData.HUpDateDate == "" ? "NULL" : "'" + MainData.HUpDateDate + "'") + ",'" + MainData.HDeleteMan + "'," + (MainData.HDeleteDate == "" ? "NULL" : "'" + MainData.HDeleteDate + "'") +
+                    ", " + MainData.HOWNERID.ToString() + ",'" + MainData.HOWNERTYPEID + "'," + MainData.HERPInterID.ToString() + ",'" + MainData.HERPBillType + "','" + MainData.HERPBillNo + "'" +
+                    ", " + MainData.HPRDORGID.ToString() + "," + MainData.HSTOCKORGID.ToString() +
+                    ") ");
+
+                    //瀛愯〃鏁版嵁璧嬪��
+                    var dataArr = _saveObj.SelectToken("Result.Result.Entity") as JArray;
+
+                    if (dataArr != null)
+                    {
+                        foreach (var oSub in dataArr)
+                        {
+                            var SubData = new
+                            {
+                                HInterID = HInterID,
+                                HEntryID = oSub.SelectToken("Id")?.ToString() ?? "0",
+                                HMTONo = oSub.SelectToken("MTONO")?.ToString() ?? "",
+                                HPlanMode = 0,
+                                HRemark = "",
+                                HExpressNumber = "",
+                                HMaterID = oSub.SelectToken("MaterialId_Id")?.ToString() ?? "0",
+                                HUnitID = oSub.SelectToken("UnitId_Id")?.ToString() ?? "0",
+                                HBatchNo = oSub.SelectToken("Lot_Text")?.ToString() ?? "",
+                                HPropertyID = oSub.SelectToken("AuxPropId_Id")?.ToString() ?? "0",
+                                HWHID = oSub.SelectToken("StockId_Id")?.ToString() ?? "0",
+                                HSPID = oSub.SelectToken("StockLocId_Id")?.ToString() ?? "0",
+                                HSCWHID = 0,
+                                HSCSPID = 0,
+                                HQtyMust = oSub.SelectToken("AppQty")?.ToString() ?? "0",
+                                HQty = oSub.SelectToken("ActualQty")?.ToString() ?? "0",
+                                HPrice = oSub.SelectToken("FPrice")?.ToString() ?? "0",
+                                HMoney = oSub.SelectToken("FAmount")?.ToString() ?? "0",
+                                HTaxPrice = oSub.SelectToken("FPrice")?.ToString() ?? "0",
+                                HTaxRate = 1,
+                                HTaxMoney = oSub.SelectToken("FAmount")?.ToString() ?? "0",
+                                HRelationQty = oSub.SelectToken("SelPrcdReturnQty")?.ToString() ?? "0",
+                                HRelationMoney = 0,
+                                HSourceInterID = oSub.SelectToken("SrcInterId")?.ToString() ?? "0",
+                                HSourceEntryID = oSub.SelectToken("SrcEnteryId")?.ToString() ?? "0",
+                                HSourceBillNo = oSub.SelectToken("SrcBillNo")?.ToString() ?? "",
+                                HSourceBillType = oSub.SelectToken("SrcBillType")?.ToString() ?? "",
+                                HERPInterID = _saveObj.SelectToken("Result.Result.Id")?.ToString() ?? "0",
+                                HERPEntryID = oSub.SelectToken("Id")?.ToString() ?? "0",
+                                HERPBillNo_Sub = "",
+                                HPOOrderInterID = 0,
+                                HPOOrderEntryID = 0,
+                                HPOOrderBillNo = "",
+                                HSeOrderInterID = 0,
+                                HSeOrderEntryID = 0,
+                                HSeOrderBillNo = "",
+                                HICMOInterID = oSub.SelectToken("MoId")?.ToString() ?? "0",
+                                HICMOEntryID = oSub.SelectToken("MoEntryId")?.ToString() ?? "0",
+                                HICMOBillNo = oSub.SelectToken("MoBillNo")?.ToString() ?? "",
+                                HWWOrderInterID = 0,
+                                HWWOrderEntryID = 0,
+                                HWWOrderBillNo = "",
+                                HProduceDate = oSub.SelectToken("ProduceDate")?.ToString(),
+                                HExpiryDate = oSub.SelectToken("ExpiryDate")?.ToString(),
+                                HOWNERID = oSub.SelectToken("OwnerId_Id")?.ToString() ?? "0",
+                                HOWNERTYPEID = oSub.SelectToken("OwnerTypeId")?.ToString() ?? "",
+                                HKEEPERID = oSub.SelectToken("KeeperId_Id")?.ToString() ?? "0",
+                                HKEEPERTYPEID = oSub.SelectToken("KeeperTypeId")?.ToString() ?? "",
+                                HBASEUNITID = oSub.SelectToken("BaseUnitId_Id")?.ToString() ?? "0",
+                                HPROJECTNO = oSub.SelectToken("ProjectNo")?.ToString() ?? "",
+                                HSTOCKSTATUSID = oSub.SelectToken("StockStatusId_Id")?.ToString() ?? "0",
+                                HSTOCKSTATUSNumber = oSub.SelectToken("StockStatusId.Number")?.ToString() ?? "",
+                                HOPERID = oSub.SelectToken("OperId")?.ToString() ?? "0",
+                                HPROCESSID = oSub.SelectToken("ProcessId_Id")?.ToString() ?? "0",
+                                HPROCESSNumber = oSub.SelectToken("ProcessId.Number")?.ToString() ?? "",
+                                HWORKSHOPID = oSub.SelectToken("WorkShopId_Id")?.ToString() ?? "0",
+                                HRESERVETYPE = oSub.SelectToken("ReserveType")?.ToString() ?? "",
+                                HPARENTOWNERTYPEID = oSub.SelectToken("ParentOwnerTypeId")?.ToString() ?? "",
+                                HPARENTOWNERID = oSub.SelectToken("ParentOwnerId_Id")?.ToString() ?? "0",
+                                HICMOEntrySEQ = oSub.SelectToken("MoEntrySeq")?.ToString() ?? "0",
+                                HPPBOMENTRYID = oSub.SelectToken("PPBomEntryId")?.ToString() ?? "0",
+                                HPPBOMBILLNO = oSub.SelectToken("PPBomBillNo")?.ToString() ?? "",
+                                HSEQ = oSub.SelectToken("Seq")?.ToString() ?? "0",
+                                HSRCBIZBILLTYPE = oSub.SelectToken("SRCBIZBILLTYPE")?.ToString() ?? "",
+                                HSRCBIZBILLNO = oSub.SelectToken("SRCBIZBILLNO")?.ToString() ?? "",
+                                HSRCBIZINTERID = oSub.SelectToken("SRCBIZINTERID")?.ToString() ?? "0",
+                                HSRCBIZENTRYID = oSub.SelectToken("SRCBIZENTRYID")?.ToString() ?? "0",
+                                HSRCBIZENTRYSEQ = oSub.SelectToken("SRCBIZENTRYSEQ")?.ToString() ?? "0",
+                                HWORKCENTERID = oSub.SelectToken("WorkCenterId_Id")?.ToString() ?? "0",
+                                HWORKCENTERNumber = oSub.SelectToken("WorkCenterId.Number")?.ToString() ?? "",
+                                HOPTQUEUE = oSub.SelectToken("OptQueue")?.ToString() ?? "",
+                                HOPTPLANBILLNO = oSub.SelectToken("OptPlanBillNo")?.ToString() ?? "",
+                                HOPTPLANBILLID = oSub.SelectToken("OptPlanBillId")?.ToString() ?? "0",
+                                HOPTDETAILID = oSub.SelectToken("OptDetailId")?.ToString() ?? "0",
+                                HREQSRC = oSub.SelectToken("ReqSrc")?.ToString() ?? "",
+                                HREQBILLNO = oSub.SelectToken("ReqBillNo")?.ToString() ?? "",
+                                HREQBILLID = oSub.SelectToken("ReqBillId")?.ToString() ?? "0",
+                                HREQENTRYSEQ = oSub.SelectToken("ReqEntrySeq")?.ToString() ?? "0",
+                                HREQENTRYID = oSub.SelectToken("ReqEntryId")?.ToString() ?? "0",
+                                HPARENTMATERIALID = oSub.SelectToken("ParentMaterialId_Id")?.ToString() ?? "0",
+                            };
+
+                            //鎻掑叆瀛愯〃
+                            oCn.RunProc("Insert Into Kf_ICStockBillSub " +
+                            "(HInterID,HEntryID,HMTONo,HPlanMode,HRemark,HExpressNumber" +
+                            ",HMaterID,HUnitID,HBatchNo,HPropertyID,HWHID,HSPID" +
+                            ",HSCWHID,HSCSPID,HQtyMust,HQty,HPrice,HMoney" +
+                            ",HTaxPrice,HTaxRate,HTaxMoney,HRelationQty,HRelationMoney" +
+                            ",HSourceInterID,HSourceEntryID,HSourceBillNo,HSourceBillType" +
+                            ",HERPInterID,HERPEntryID,HERPBillNo_Sub" +
+                            ",HPOOrderInterID,HPOOrderEntryID,HPOOrderBillNo,HSeOrderInterID,HSeOrderEntryID,HSeOrderBillNo" +
+                            ",HICMOInterID,HICMOEntryID,HICMOBillNo,HWWOrderInterID,HWWOrderEntryID,HWWOrderBillNo" +
+                            ",HProduceDate,HExpiryDate,HOWNERID,HOWNERTYPEID,HKEEPERID,HKEEPERTYPEID" +
+                            ",HBASEUNITID,HPROJECTNO,HSTOCKSTATUSID,HOPERID,HPROCESSID,HWORKSHOPID" +
+                            ",HRESERVETYPE,HPARENTOWNERTYPEID,HPARENTOWNERID,HICMOEntrySEQ,HPPBOMENTRYID,HPPBOMBILLNO" +
+                            ",HSEQ,HSRCBIZBILLTYPE,HSRCBIZBILLNO,HSRCBIZINTERID,HSRCBIZENTRYID,HSRCBIZENTRYSEQ" +
+                            ",HWORKCENTERID,HOPTQUEUE,HOPTPLANBILLNO,HOPTPLANBILLID,HOPTDETAILID,HREQSRC" +
+                            ",HREQBILLNO,HREQBILLID,HREQENTRYSEQ,HREQENTRYID,HPARENTMATERIALID" +
+                            ",HSTOCKSTATUSNumber,HPROCESSNumber,HWORKCENTERNumber" +
+                            ") " +
+                            " values(" + SubData.HInterID.ToString() + "," + SubData.HEntryID.ToString() + ",'" + SubData.HMTONo + "'," + SubData.HPlanMode.ToString() + ",'" + SubData.HRemark + "','" + SubData.HExpressNumber + "'" +
+                            ", " + SubData.HMaterID.ToString() + "," + SubData.HUnitID.ToString() + ",'" + SubData.HBatchNo + "'," + SubData.HPropertyID.ToString() + "," + SubData.HWHID.ToString() + "," + SubData.HSPID.ToString() +
+                            ", " + SubData.HSCWHID.ToString() + "," + SubData.HSCSPID.ToString() + "," + SubData.HQtyMust.ToString() + "," + SubData.HQty.ToString() + "," + SubData.HPrice.ToString() + "," + SubData.HMoney.ToString() +
+                            ", " + SubData.HTaxPrice.ToString() + "," + SubData.HTaxRate.ToString() + "," + SubData.HTaxMoney.ToString() + "," + SubData.HRelationQty.ToString() + "," + SubData.HRelationMoney.ToString() +
+                            ", " + SubData.HSourceInterID.ToString() + "," + SubData.HSourceEntryID.ToString() + ",'" + SubData.HSourceBillNo + "','" + SubData.HSourceBillType + "'" +
+                            ", " + SubData.HERPInterID.ToString() + "," + SubData.HERPEntryID.ToString() + ",'" + SubData.HERPBillNo_Sub + "'" +
+                            ", " + SubData.HPOOrderInterID.ToString() + "," + SubData.HPOOrderEntryID.ToString() + ",'" + SubData.HPOOrderBillNo + "'," + SubData.HSeOrderInterID.ToString() + "," + SubData.HSeOrderEntryID.ToString() + ",'" + SubData.HSeOrderBillNo + "'" +
+                            ", " + SubData.HICMOInterID.ToString() + "," + SubData.HICMOEntryID.ToString() + ",'" + SubData.HICMOBillNo + "'," + SubData.HWWOrderInterID.ToString() + "," + SubData.HWWOrderEntryID.ToString() + ",'" + SubData.HWWOrderBillNo + "'" +
+                            ", " + (SubData.HProduceDate == "" ? "NULL" : "'" + SubData.HProduceDate + "'") + "," + (SubData.HExpiryDate == "" ? "NULL" : "'" + SubData.HExpiryDate + "'") + "," + SubData.HOWNERID.ToString() + ",'" + SubData.HOWNERTYPEID + "'," + SubData.HKEEPERID.ToString() + ",'" + SubData.HKEEPERTYPEID + "'" +
+                            ", " + SubData.HBASEUNITID.ToString() + ",'" + SubData.HPROJECTNO + "'," + SubData.HSTOCKSTATUSID.ToString() + "," + SubData.HOPERID.ToString() + "," + SubData.HPROCESSID.ToString() + "," + SubData.HWORKSHOPID.ToString() +
+                            ",'" + SubData.HRESERVETYPE + "','" + SubData.HPARENTOWNERTYPEID + "'," + SubData.HPARENTOWNERID.ToString() + "," + SubData.HICMOEntrySEQ.ToString() + "," + SubData.HPPBOMENTRYID.ToString() + ",'" + SubData.HPPBOMBILLNO + "'" +
+                            ", " + SubData.HSEQ.ToString() + ",'" + SubData.HSRCBIZBILLTYPE + "','" + SubData.HSRCBIZBILLNO + "'," + SubData.HSRCBIZINTERID.ToString() + "," + SubData.HSRCBIZENTRYID.ToString() + "," + SubData.HSRCBIZENTRYSEQ.ToString() +
+                            ", " + SubData.HWORKCENTERID.ToString() + ",'" + SubData.HOPTQUEUE + "','" + SubData.HOPTPLANBILLNO + "'," + SubData.HOPTPLANBILLID.ToString() + "," + SubData.HOPTDETAILID.ToString() + ",'" + SubData.HREQSRC + "'" +
+                            ",'" + SubData.HREQBILLNO + "'," + SubData.HREQBILLID.ToString() + "," + SubData.HREQENTRYSEQ.ToString() + "," + SubData.HREQENTRYID.ToString() + "," + SubData.HPARENTMATERIALID.ToString() +
+                            ",'" + SubData.HSTOCKSTATUSNumber + "','" + SubData.HPROCESSNumber + "','" + SubData.HWORKCENTERNumber + "'" +
+                            ") ");
+                        }
+                    }
+                    return true;
+                }
+            }
+            else
+            {
+                sErrMsg = "鍚屾鍗曟嵁澶辫触锛侀噾铦朵簯鐧诲綍澶辫触锛�";
+                return false;
+            }
+        }
+
+        #endregion
+
+        #endregion
+
+        #endregion
 
         #region  鍩虹璧勬枡
 
@@ -55749,6 +56025,7 @@
             SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
             Model.ClsKf_ICStockBill_WMS oBar = new Model.ClsKf_ICStockBill_WMS();
             Int64 sMulSourceFlag = 0;   //澶氭簮鍗曟爣蹇楋紙0涓洪潪澶氭簮鍗曟ā寮忥紝1涓哄婧愬崟妯″紡锛�
+            Int64 sHSourceFlag = 1;     //鏄惁閲嶆柊鍚屾婧愬崟淇℃伅锛�1涓哄悓姝ワ紝0涓轰笉鍚屾锛�
 
             //鑾峰彇绯荤粺鍙傛暟
             Pub_Class.ClsXt_SystemParameter oSystemParameter = new Pub_Class.ClsXt_SystemParameter();
@@ -55761,6 +56038,35 @@
             if (oSystemParameter.omodel.Kf_MateOutBackBill_MulSourceBill.ToUpper() == "Y") //绯荤粺鍙傛暟  鐢熶骇閫�鏂欏崟-澶氭簮鍗曟ā寮�
             {
                 sMulSourceFlag = 1;
+
+                //鍒ゆ柇婧愬崟鏄惁宸插瓨鍦ㄧ紦瀛樺垪琛ㄤ腑
+                DataSet dsSource = oCn.RunProcReturn(" select 1 from KF_PonderationBillMain_Temp with(nolock) where HInterID= " + HInterID.ToString() + " and HBillType= '" + HBillType + "' and HSourceBillNo= '" + HSourceBillNo + "' and HQtyMust<>0 ", "KF_PonderationBillMain_Temp");
+                if (dsSource == null || dsSource.Tables[0].Rows.Count == 0)
+                {
+                    sHSourceFlag = 1;
+                }
+                else
+                {
+                    sHSourceFlag = 0;
+                }
+            }
+
+            //閲嶆柊鍚屾婧愬崟淇℃伅
+            if (sHSourceFlag == 1)
+            {
+                if (oSystemParameter.omodel.WMS_CloudMode.ToUpper() == "N") //绯荤粺鍙傛暟  鏄惁涓虹鏈変簯妯″紡(N涓哄叕鏈変簯妯″紡锛孻涓虹鏈変簯妯″紡)
+                {
+                    if(HSourceBillType== "1204")
+                    {   
+                        //鐢熶骇棰嗘枡鍗�
+                        GetWebAPIToLocal_MateOut(HSourceBillNo, HSourceBillType, HMaker, ref sErrMsg);
+                    }
+                }
+                else
+                {
+                    //绉佹湁浜戞ā寮�
+                    oCn.RunProc("exec h_p_WMS_ERPSourceBillToLocal '" + HSourceBillNo + "','" + HSourceBillType + "'");
+                }
             }
 
             //灏嗘簮鍗曚俊鎭瓨鍏ユ潯鐮佸嚭鍏ュ簱涓存椂琛�

--
Gitblit v1.9.1