From 93bc5cec8a50d51f1a7f1c41e8fa7c3f455727f8 Mon Sep 17 00:00:00 2001
From: yxj <yxj@hz-kingdee.com>
Date: 星期二, 14 十月 2025 16:50:20 +0800
Subject: [PATCH] 采购入库扫描源单调用方法修改，增加通过WEBAPI同步金蝶云采购订单至本地数据库功能
---
CLOUDWEB/WebService1.asmx.cs | 312 ++++++++++++++++++++++++++++++++++++++++++++++++++-
1 files changed, 303 insertions(+), 9 deletions(-)
diff --git a/CLOUDWEB/WebService1.asmx.cs b/CLOUDWEB/WebService1.asmx.cs
index e50a435..7de0423 100644
--- a/CLOUDWEB/WebService1.asmx.cs
+++ b/CLOUDWEB/WebService1.asmx.cs
@@ -35,6 +35,270 @@
#region 鍗曟嵁鍚屾
+ #region 閲囪喘璁㈠崟鍚屾 鏍规嵁鍗曟嵁鍙峰悓姝�
+
+ [WebMethod]
+ public bool GetWebAPIToLocal_POOrder(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[] { "PUR_PurchaseOrder", 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
+ {
+ //涓昏〃鏁版嵁璧嬪��
+ var MainData = new
+ {
+ HInterID = _saveObj.SelectToken("Result.Result.Id")?.ToString() ?? "0",
+ HYear = DateTime.Now.Year,
+ HPeriod = DateTime.Now.Month,
+ HBillType = HBillType,
+ HBillSubType = HBillType,
+ HDate = _saveObj.SelectToken("Result.Result.Date")?.ToString(),
+ HBillNo = _saveObj.SelectToken("Result.Result.BillNo")?.ToString() ?? "",
+ HBillStatus = _saveObj.SelectToken("Result.Result.ApproverId_Id")?.ToString() == "0" ? 1 : 2,
+ HAddress = "",
+ HSSID = 0,
+ HSSDate = _saveObj.SelectToken("Result.Result.Date")?.ToString(),
+ HPSStyleID = 0,
+ HSupID = _saveObj.SelectToken("Result.Result.SupplierId_Id")?.ToString() ?? "0",
+ HCurID = 0,
+ HExRate = 0,
+ HEmpID = _saveObj.SelectToken("Result.Result.PurchaserId_Id")?.ToString() ?? "0",
+ HPURCHASERNumber = _saveObj.SelectToken("Result.Result.PurchaserId.Number")?.ToString() ?? "",
+ HManagerID = 0,
+ HDeptID = _saveObj.SelectToken("Result.Result.PurchaseDeptId_Id")?.ToString() ?? "0",
+ HExplanation = "WebAPI瀵煎叆",
+ HRemark = "",
+ HInnerBillNo = _saveObj.SelectToken("Result.Result.BillNo")?.ToString() ?? "",
+ 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.CancellerId.Name")?.ToString() ?? "",
+ HDeleteDate = _saveObj.SelectToken("Result.Result.CancelDate")?.ToString(),
+ HCloseMan = _saveObj.SelectToken("Result.Result.CloserId.Name")?.ToString() ?? "",
+ HCloseDate = _saveObj.SelectToken("Result.Result.CloseDate")?.ToString(),
+ HCloseType = _saveObj.SelectToken("Result.Result.CloseStatus")?.ToString() == "A" ? 0 : 1,
+ HERPInterID = _saveObj.SelectToken("Result.Result.Id")?.ToString() ?? "0",
+ HERPBillType = _saveObj.SelectToken("Result.Result.BillTypeId_Id")?.ToString() ?? "",
+ HPURCHASEORGID = _saveObj.SelectToken("Result.Result.PurchaseOrgId_Id")?.ToString() ?? "0",
+ HPURCHASERGROUPID = _saveObj.SelectToken("Result.Result.PurchaserGroupId_Id")?.ToString() ?? "0",
+ HPURCHASERGROUPNumber = _saveObj.SelectToken("Result.Result.PurchaserGroupId.Number")?.ToString() ?? "",
+ HPROVIDERID = _saveObj.SelectToken("Result.Result.ProviderId_Id")?.ToString() ?? "0",
+ HSETTLEID = _saveObj.SelectToken("Result.Result.SettleId_Id")?.ToString() ?? "0",
+ HCHARGEID = _saveObj.SelectToken("Result.Result.ChargeId_Id")?.ToString() ?? "0",
+ HBUSINESSTYPE = _saveObj.SelectToken("Result.Result.BusinessType")?.ToString() ?? "",
+ HPROVIDERADDRESS = _saveObj.SelectToken("Result.Result.ProviderAddress")?.ToString() ?? "",
+ HCORRESPONDORGID = _saveObj.SelectToken("Result.Result.CorrespondOrgId_Id")?.ToString() ?? "0",
+ HPROVIDERCONTACTID = _saveObj.SelectToken("Result.Result.ProviderContactId_Id")?.ToString() ?? "0",
+ HPROVIDERCONTACTNumber = _saveObj.SelectToken("Result.Result.ProviderContactId.CONTACTNUMBER")?.ToString() ?? "",
+ HSETTLEMODEID = _saveObj.SelectToken("Result.Result.POOrderFinance[0].SettleModeId_Id")?.ToString() ?? "0",
+ HSETTLEMODENumber = _saveObj.SelectToken("Result.Result.POOrderFinance[0].SettleModeId.Number")?.ToString() ?? "",
+ HSETTLECURRID = _saveObj.SelectToken("Result.Result.POOrderFinance[0].SettleCurrId_Id")?.ToString() ?? "0",
+ HSETTLECURRNumber = _saveObj.SelectToken("Result.Result.POOrderFinance[0].SettleCurrId.Number")?.ToString() ?? "",
+ HEXCHANGETYPEID = _saveObj.SelectToken("Result.Result.POOrderFinance[0].ExchangeTypeId_Id")?.ToString() ?? "0",
+ HEXCHANGETYPENumber = _saveObj.SelectToken("Result.Result.POOrderFinance[0].ExchangeTypeId.Number")?.ToString() ?? "",
+ HPAYCONDITIONID = _saveObj.SelectToken("Result.Result.POOrderFinance[0].PayConditionId_Id")?.ToString() ?? "0",
+ HPAYCONDITIONNumber = _saveObj.SelectToken("Result.Result.POOrderFinance[0].PayConditionId.Number")?.ToString() ?? "",
+ HEXCHANGERATE = _saveObj.SelectToken("Result.Result.POOrderFinance[0].ExchangeRate")?.ToString() ?? "0",
+ HLOCALCURRID = _saveObj.SelectToken("Result.Result.POOrderFinance[0].LocalCurrId_Id")?.ToString() ?? "0",
+ HLOCALCURRNumber = _saveObj.SelectToken("Result.Result.POOrderFinance[0].LocalCurrId.Number")?.ToString() ?? "",
+ HISINCLUDEDTAX = _saveObj.SelectToken("Result.Result.POOrderFinance[0].IsIncludedTax")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HISPRICEEXCLUDETAX = _saveObj.SelectToken("Result.Result.POOrderFinance[0].FISPRICEEXCLUDETAX")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ };
+
+ //鏍规嵁鍗曟嵁ID锛屽垹闄ゆ湰鍦版暟鎹�
+ oCn.RunProc("Delete from Cg_POOrderBillMain where HInterID=" + MainData.HInterID.ToString(), ref DBUtility.ClsPub.sExeReturnInfo);
+ oCn.RunProc("Delete from Cg_POOrderBillSub where HInterID=" + MainData.HInterID.ToString(), ref DBUtility.ClsPub.sExeReturnInfo);
+
+ //鎻掑叆涓昏〃
+ oCn.RunProc("Insert Into Cg_POOrderBillMain " +
+ "(HInterID,HYear,HPeriod,HBillType,HBillSubType,HDate" +
+ ",HBillNo,HBillStatus,HAddress,HSSID,HSSDate,HPSStyleID" +
+ ",HSupID,HCurID,HExRate,HEmpID,HManagerID,HDeptID" +
+ ",HExplanation,HRemark,HInnerBillNo" +
+ ",HMaker,HMakeDate,HChecker,HCheckDate" +
+ ",HUpDater,HUpDateDate,HDeleteMan,HDeleteDate" +
+ ",HCloseMan,HCloseDate,HCloseType" +
+ ",HERPInterID,HERPBillType,HPURCHASEORGID,HPURCHASERGROUPID,HPURCHASERGROUPNumber" +
+ ",HPROVIDERID,HSETTLEID,HCHARGEID,HBUSINESSTYPE,HPROVIDERADDRESS" +
+ ",HCORRESPONDORGID,HPROVIDERCONTACTID,HPROVIDERCONTACTNumber,HPURCHASERNumber,HSETTLEMODENumber" +
+ ",HSETTLECURRNumber,HEXCHANGETYPENumber,HPAYCONDITIONNumber,HLOCALCURRNumber" +
+ ") " +
+ " values(" + MainData.HInterID.ToString() + "," + MainData.HYear.ToString() + "," + MainData.HPeriod.ToString() + ",'" + MainData.HBillType + "','" + MainData.HBillSubType + "','" + MainData.HDate + "'" +
+ ",'" + MainData.HBillNo + "'," + MainData.HBillStatus.ToString() + ",'" + MainData.HAddress + "'," + MainData.HSSID.ToString() + ",'" + MainData.HSSDate + "'," + MainData.HPSStyleID.ToString() +
+ ", " + MainData.HSupID.ToString() + "," + MainData.HCurID.ToString() + "," + MainData.HExRate.ToString() + "," + MainData.HEmpID.ToString() + "," + MainData.HManagerID.ToString() + "," + MainData.HDeptID.ToString() +
+ ",'" + MainData.HExplanation + "','" + MainData.HRemark + "','" + MainData.HInnerBillNo + "'" +
+ ",'" + 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.HCloseMan + "'," + (MainData.HCloseDate == "" ? "NULL" : "'" + MainData.HCloseDate + "'") + "," + DBUtility.ClsPub.BoolToString(MainData.HCloseType) +
+ ", " + MainData.HERPInterID.ToString() + ",'" + MainData.HERPBillType + "'," + MainData.HPURCHASEORGID.ToString() + "," + MainData.HPURCHASERGROUPID.ToString() + ",'" + MainData.HPURCHASERGROUPNumber + "'" +
+ ", " + MainData.HPROVIDERID.ToString() + "," + MainData.HSETTLEID.ToString() + "," + MainData.HCHARGEID.ToString() + ",'" + MainData.HBUSINESSTYPE + "','" + MainData.HPROVIDERADDRESS + "'" +
+ ", " + MainData.HCORRESPONDORGID.ToString() + "," + MainData.HPROVIDERCONTACTID.ToString() + ",'" + MainData.HPROVIDERCONTACTNumber + "','" + MainData.HPURCHASERNumber + "','" + MainData.HSETTLEMODENumber + "'" +
+ ",'" + MainData.HSETTLECURRNumber + "','" + MainData.HEXCHANGETYPENumber + "','" + MainData.HPAYCONDITIONNumber + "','" + MainData.HLOCALCURRNumber + "'" +
+ ") ");
+
+ //瀛愯〃鏁版嵁璧嬪��
+ var dataArr = _saveObj.SelectToken("Result.Result.POOrderEntry") as JArray;
+
+ if (dataArr != null)
+ {
+ foreach (var oSub in dataArr)
+ {
+ var SubData = new
+ {
+ HInterID = _saveObj.SelectToken("Result.Result.Id")?.ToString() ?? "0",
+ HEntryID = oSub.SelectToken("Id")?.ToString() ?? "0",
+ HMaterID = oSub.SelectToken("MaterialId_Id")?.ToString() ?? "0",
+ HUnitID = oSub.SelectToken("UnitId_Id")?.ToString() ?? "0",
+ HQty = oSub.SelectToken("Qty")?.ToString() ?? "0",
+ HPrice = oSub.SelectToken("Price")?.ToString() ?? "0",
+ HTaxPrice = oSub.SelectToken("TaxPrice")?.ToString() ?? "0",
+ HDiscountRate = oSub.SelectToken("DiscountRate")?.ToString() ?? "0",
+ HRelTaxPrice = 0,
+ HMoney = oSub.SelectToken("Amount")?.ToString() ?? "0",
+ HTaxRate = oSub.SelectToken("TaxRate")?.ToString() ?? "0",
+ HTaxMoney = oSub.SelectToken("TaxAmount")?.ToString() ?? "0",
+ HLineTotal = 0,
+ HlineTotalBB = 0,
+ HDate = oSub.SelectToken("DeliveryDate")?.ToString() ?? "",
+ HInStockQty = 0,
+ HInvoiceQty = 0,
+ HRemark = oSub.SelectToken("Note")?.ToString() ?? "",
+ HSeOrderBillNo = "",
+ HSeOrderInterID = 0,
+ HSeOrderEntryID = 0,
+ HSourceInterID = 0,
+ HSourceEntryID = 0,
+ HSourceBillNo = "",
+ HSourceBillType = "",
+ HRelationQty = oSub.SelectToken("JOINQTY")?.ToString() ?? "0",
+ HBackRelationQty = oSub.SelectToken("STOCKRETQTY")?.ToString() ?? "0",
+ HPropertyID = oSub.SelectToken("AuxPropId_Id")?.ToString() ?? "0",
+ HBatChNo = oSub.SelectToken("FLot_Text")?.ToString() ?? "",
+ HAuxPropID = oSub.SelectToken("AuxPropId_Id")?.ToString() ?? "0",
+ HMTONo = oSub.SelectToken("MtoNo")?.ToString() ?? "",
+ HERPInterID = _saveObj.SelectToken("Result.Result.Id")?.ToString() ?? "0",
+ HERPEntryID = oSub.SelectToken("Id")?.ToString() ?? "0",
+ HSEQ = oSub.SelectToken("Seq")?.ToString() ?? "0",
+ HRECEIVEDEPTID = oSub.SelectToken("ReceiveDeptId_Id")?.ToString() ?? "0",
+ HSUPPLIERLOT = oSub.SelectToken("SupplierLot")?.ToString() ?? "",
+ HBOMID = oSub.SelectToken("BomId_Id")?.ToString() ?? "0",
+ HSTOCKUNITID = oSub.SelectToken("StockUnitID_Id")?.ToString() ?? "0",
+ HBASEUNITID = oSub.SelectToken("BaseUnitId_Id")?.ToString() ?? "0",
+ HBFLOWID = oSub.SelectToken("FBFLowId_Id")?.ToString() ?? "",
+ HGIVEAWAY = oSub.SelectToken("GiveAway")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HROWTYPE = oSub.SelectToken("RowType")?.ToString() ?? "",
+ HBASEUNITQTY = oSub.SelectToken("BaseUnitQty")?.ToString() ?? "0",
+ HSTOCKBASEQTY = oSub.SelectToken("StockBaseQty")?.ToString() ?? "0",
+ HREQTRACENO = oSub.SelectToken("ReqTraceNo")?.ToString() ?? "",
+ HMATERIALDESC = oSub.SelectToken("MaterialDesc[0].Value")?.ToString() ?? "",
+ HRECEIVEORGID = oSub.SelectToken("ReceiveOrgId_Id")?.ToString() ?? "0",
+ HREQUIREORGID = oSub.SelectToken("RequireOrgId_Id")?.ToString() ?? "0",
+ HTAXNETPRICE = oSub.SelectToken("TaxNetPrice")?.ToString() ?? "0",
+ HPRICECOEFFICIENT = oSub.SelectToken("PriceCoefficient")?.ToString() ?? "0",
+ HTAXCOMBINATION = oSub.SelectToken("FTaxCombination_Id")?.ToString() ?? "0",
+ HTAXCOMBINATIONNumber = oSub.SelectToken("FTaxCombination.Number")?.ToString() ?? "",
+ HPRICEUNITID = oSub.SelectToken("PriceUnitId_Id")?.ToString() ?? "0",
+ HPRICELISTENTRY = oSub.SelectToken("PriceListEntry_Id")?.ToString() ?? "0",
+ HPRICELISTENTRYNumber = oSub.SelectToken("PriceListEntry.Number")?.ToString() ?? "",
+ HPAYORGID = oSub.SelectToken("PayOrgId_Id")?.ToString() ?? "0",
+ HSETTLEORGID = oSub.SelectToken("SettleOrgId_Id")?.ToString() ?? "0",
+ HTaxRate_TAX = oSub.SelectToken("POORDERENTRY_TAX[0].TaxRate")?.ToString() ?? "0",
+ HTaxMoney_TAX = oSub.SelectToken("POORDERENTRY_TAX[0].TaxAmount")?.ToString() ?? "0",
+ HTAXRATEID = oSub.SelectToken("POORDERENTRY_TAX[0].TaxRateId_Id")?.ToString() ?? "0",
+ HTAXRATENumber = oSub.SelectToken("POORDERENTRY_TAX[0].TaxRateId.Number")?.ToString() ?? "",
+ HCOSTPERCENT = oSub.SelectToken("POORDERENTRY_TAX[0].CostPercent")?.ToString() ?? "0",
+ HCOSTAMOUNT = oSub.SelectToken("POORDERENTRY_TAX[0].CostAmount")?.ToString() ?? "0",
+ HVAT = oSub.SelectToken("POORDERENTRY_TAX[0].VAT")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HSELLERWITHHOLDING = oSub.SelectToken("POORDERENTRY_TAX[0].SellerWithholding")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HBUYERWITHHOLDING = oSub.SelectToken("POORDERENTRY_TAX[0].BuyerWithholding")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ };
+
+ //鎻掑叆瀛愯〃
+ oCn.RunProc("Insert Into Cg_POOrderBillSub " +
+ "(HInterID,HEntryID,HMaterID,HUnitID,HQty,HPrice" +
+ ",HTaxPrice,HDiscountRate,HRelTaxPrice,HMoney,HTaxRate,HTaxMoney" +
+ ",HLineTotal,HlineTotalBB,HDate,HInStockQty,HInvoiceQty,HRemark" +
+ ",HSeOrderBillNo,HSeOrderInterID,HSeOrderEntryID,HSourceInterID,HSourceEntryID,HSourceBillNo,HSourceBillType" +
+ ",HRelationQty,HBackRelationQty,HPropertyID,HBatChNo,HAuxPropID,HMTONo" +
+ ",HERPInterID,HERPEntryID,HSEQ,HRECEIVEDEPTID,HSUPPLIERLOT,HBOMID" +
+ ",HSTOCKUNITID,HBASEUNITID,HBFLOWID,HGIVEAWAY,HROWTYPE,HBASEUNITQTY" +
+ ",HSTOCKBASEQTY,HREQTRACENO,HMATERIALDESC,HRECEIVEORGID,HREQUIREORGID,HTAXNETPRICE" +
+ ",HPRICECOEFFICIENT,HTAXCOMBINATION,HTAXCOMBINATIONNumber,HPRICEUNITID,HPRICELISTENTRY,HPRICELISTENTRYNumber" +
+ ",HPAYORGID,HSETTLEORGID,HTaxRate_TAX,HTaxMoney_TAX,HTAXRATEID,HTAXRATENumber" +
+ ",HCOSTPERCENT,HCOSTAMOUNT,HVAT,HSELLERWITHHOLDING,HBUYERWITHHOLDING" +
+ ",HSETTLEMODEID,HSETTLECURRID,HEXCHANGETYPEID,HPAYCONDITIONID,HEXCHANGERATE,HLOCALCURRID" +
+ ",HISINCLUDEDTAX,HISPRICEEXCLUDETAX" +
+ ") " +
+ " values(" + SubData.HInterID.ToString() + "," + SubData.HEntryID.ToString() + "," + SubData.HMaterID.ToString() + "," + SubData.HUnitID.ToString() + "," + SubData.HQty.ToString() + "," + SubData.HPrice.ToString() +
+ ", " + SubData.HTaxPrice.ToString() + "," + SubData.HDiscountRate.ToString() + "," + SubData.HRelTaxPrice.ToString() + "," + SubData.HMoney.ToString() + "," + SubData.HTaxRate.ToString() + "," + SubData.HTaxMoney.ToString() +
+ ", " + SubData.HLineTotal.ToString() + "," + SubData.HlineTotalBB.ToString() + ",'" + SubData.HDate + "'," + SubData.HInStockQty.ToString() + "," + SubData.HInvoiceQty.ToString() + ",'" + SubData.HRemark + "'" +
+ ",'" + SubData.HSeOrderBillNo + "'," + SubData.HSeOrderInterID.ToString() + "," + SubData.HSeOrderEntryID.ToString() + "," + SubData.HSourceInterID.ToString() + "," + SubData.HSourceEntryID.ToString() + ",'" + SubData.HSourceBillNo + "','" + SubData.HSourceBillType + "'" +
+ ", " + SubData.HRelationQty.ToString() + "," + SubData.HBackRelationQty.ToString() + "," + SubData.HPropertyID.ToString() + ",'" + SubData.HBatChNo + "'," + SubData.HAuxPropID.ToString() + ",'" + SubData.HMTONo + "'" +
+ ", " + SubData.HERPInterID.ToString() + "," + SubData.HERPEntryID.ToString() + "," + SubData.HSEQ.ToString() + "," + SubData.HRECEIVEDEPTID.ToString() + ",'" + SubData.HSUPPLIERLOT + "'," + SubData.HBOMID.ToString() +
+ ", " + SubData.HSTOCKUNITID.ToString() + "," + SubData.HBASEUNITID.ToString() + ",'" + SubData.HBFLOWID + "'," + DBUtility.ClsPub.BoolToString(SubData.HGIVEAWAY) + ",'" + SubData.HROWTYPE + "'," + SubData.HBASEUNITQTY.ToString() +
+ ", " + SubData.HSTOCKBASEQTY.ToString() + ",'" + SubData.HREQTRACENO + "','" + SubData.HMATERIALDESC + "'," + SubData.HRECEIVEORGID.ToString() + "," + SubData.HREQUIREORGID.ToString() + "," + SubData.HTAXNETPRICE.ToString() +
+ ", " + SubData.HPRICECOEFFICIENT.ToString() + "," + SubData.HTAXCOMBINATION.ToString() + ",'" + SubData.HTAXCOMBINATIONNumber + "'," + SubData.HPRICEUNITID.ToString() + "," + SubData.HPRICELISTENTRY.ToString() + ",'" + SubData.HPRICELISTENTRYNumber + "'" +
+ ", " + SubData.HPAYORGID.ToString() + "," + SubData.HSETTLEORGID.ToString() + "," + SubData.HTaxRate_TAX.ToString() + "," + SubData.HTaxMoney_TAX.ToString() + "," + SubData.HTAXRATEID.ToString() + ",'" + SubData.HTAXRATENumber + "'" +
+ ", " + SubData.HCOSTPERCENT.ToString() + "," + SubData.HCOSTAMOUNT.ToString() + "," + DBUtility.ClsPub.BoolToString(SubData.HVAT) + "," + DBUtility.ClsPub.BoolToString(SubData.HSELLERWITHHOLDING) + "," + DBUtility.ClsPub.BoolToString(SubData.HBUYERWITHHOLDING) +
+ ", " + MainData.HSETTLEMODEID.ToString() + "," + MainData.HSETTLECURRID.ToString() + "," + MainData.HEXCHANGETYPEID.ToString() + "," + MainData.HPAYCONDITIONID.ToString() + "," + MainData.HEXCHANGERATE.ToString() + "," + MainData.HLOCALCURRID.ToString() +
+ ", " + DBUtility.ClsPub.BoolToString(MainData.HISINCLUDEDTAX) + "," + DBUtility.ClsPub.BoolToString(MainData.HISPRICEEXCLUDETAX) +
+ ") ");
+ }
+ }
+ return true;
+ }
+ }
+ else
+ {
+ sErrMsg = "鍚屾鍗曟嵁澶辫触锛侀噾铦朵簯鐧诲綍澶辫触锛�";
+ return false;
+ }
+ }
+
+ #endregion
+
#region 閲囪喘鍏ュ簱鍗曞悓姝� 鏍规嵁鍗曟嵁鍙峰悓姝�
[WebMethod]
@@ -290,15 +554,15 @@
HSNUNITID = oSub.SelectToken("SNUnitID_Id")?.ToString() ?? "0",
HREMAININSTOCKUNITID = oSub.SelectToken("RemainInStockUnitId_Id")?.ToString() ?? "0",
HEXTAUXUNITID = oSub.SelectToken("ExtAuxUnitId_Id")?.ToString() ?? "0",
- HTAXRATEID = oSub.SelectToken("STK_INSTOCKENTRY_TAX.TaxRateId_Id")?.ToString() ?? "0",
- HTAXRATENumber = oSub.SelectToken("STK_INSTOCKENTRY_TAX.TaxRateId.Number")?.ToString() ?? "",
- HTAXRATE_TAX = oSub.SelectToken("STK_INSTOCKENTRY_TAX.TaxRate")?.ToString() ?? "0",
- HTAXAMOUNT = oSub.SelectToken("STK_INSTOCKENTRY_TAX.TaxAmount")?.ToString() ?? "0",
- HCOSTPERCENT = oSub.SelectToken("STK_INSTOCKENTRY_TAX.CostPercent")?.ToString() ?? "0",
- HCOSTAMOUNT = oSub.SelectToken("STK_INSTOCKENTRY_TAX.CostAmount")?.ToString() ?? "0",
- HVAT = oSub.SelectToken("STK_INSTOCKENTRY_TAX.VAT")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
- HSELLERWITHHOLDING = oSub.SelectToken("STK_INSTOCKENTRY_TAX.SellerWithholding")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
- HBUYERWITHHOLDING = oSub.SelectToken("STK_INSTOCKENTRY_TAX.BuyerWithholding")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HTAXRATEID = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].TaxRateId_Id")?.ToString() ?? "0",
+ HTAXRATENumber = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].TaxRateId.Number")?.ToString() ?? "",
+ HTAXRATE_TAX = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].TaxRate")?.ToString() ?? "0",
+ HTAXAMOUNT = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].TaxAmount")?.ToString() ?? "0",
+ HCOSTPERCENT = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].CostPercent")?.ToString() ?? "0",
+ HCOSTAMOUNT = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].CostAmount")?.ToString() ?? "0",
+ HVAT = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].VAT")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HSELLERWITHHOLDING = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].SellerWithholding")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
+ HBUYERWITHHOLDING = oSub.SelectToken("STK_INSTOCKENTRY_TAX[0].BuyerWithholding")?.ToString().ToUpper() == "TRUE" ? 1 : 0,
};
//鎻掑叆瀛愯〃
@@ -55097,10 +55361,40 @@
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涓轰笉鍚屾锛�
if (oSystemParameterMain.Kf_POStockInBill_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 (oSystemParameterMain.WMS_CloudMode.ToUpper() == "N") //绯荤粺鍙傛暟 鏄惁涓虹鏈変簯妯″紡(N涓哄叕鏈変簯妯″紡锛孻涓虹鏈変簯妯″紡)
+ {
+ if (HSourceBillType == "1102")
+ {
+ //閲囪喘璁㈠崟
+ GetWebAPIToLocal_POOrder(HSourceBillNo, HSourceBillType, HMaker, ref sErrMsg);
+ }
+ }
+ else
+ {
+ //绉佹湁浜戞ā寮�
+ oCn.RunProc("exec h_p_WMS_ERPSourceBillToLocal '" + HSourceBillNo + "','" + HSourceBillType + "'");
+ }
}
//灏嗘簮鍗曚俊鎭瓨鍏ユ潯鐮佸嚭鍏ュ簱涓存椂琛�
--
Gitblit v1.9.1