采购入库扫码上传生成WISE单据时，主表增加写入到货时间HArrivalDate；扫描物料条码启用ERP库存管理、条码类型为批次码时，ERP库存数量获取修改

yxj

2022-05-19 47819def1cb13bd5d080bd396f2c38c2cb218e47

采购入库扫码上传生成WISE单据时，主表增加写入到货时间HArrivalDate；扫描物料条码启用ERP库存管理、条码类型为批次码时，ERP库存数量获取修改

 CLOUDWEB/WebService1.asmx.cs

@@ -21706,11 +21706,13 @@
                ",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子表、主表
@@ -33383,6 +33385,7 @@
                                {
                                    dal.omodel_View.HMaterID = DBUtility.ClsPub.isLong(ds6.Tables[0].Rows[0]["HMaterID"]);
                                    HQty = DBUtility.ClsPub.isDoule(ds6.Tables[0].Rows[0]["HQty"]);
                                    sRelQty = HQty;
                                }
                                else
                                {
@@ -36346,7 +36349,7 @@
            double sERPQty = 0;     //ERP库存数量

            //库存控制-WMS负库存控制
            if (oSystemParameterMain.WMS_WMSStockCtl == "Y")
            if (omodel_View.HBarCodeType == "唯一条码" && oSystemParameterMain.WMS_WMSStockCtl == "Y")
            {
                //判断ERP库存   返回ERP库存数量
                DataSet DsWMS = oCn.RunProcReturn("exec h_p_KF_ICInventory_WMS_GetWHAndSP " + HBillID.ToString() + ",'" + HBillType + "','" + omodel_View.HBarCode + "'," + HSCWHID.ToString() + "," + HSCSPID.ToString(), "h_p_KF_ICInventory_WMS_GetWHAndSP");
@@ -36596,7 +36599,7 @@
                || HBillType == "1254")
            {
                //库存控制-WMS负库存控制
                if (oSystemParameterMain.WMS_WMSStockCtl == "Y")
                if (omodel_View.HBarCodeType == "唯一条码" && oSystemParameterMain.WMS_WMSStockCtl == "Y")
                {
                    //判断ERP库存   返回ERP库存数量
                    DataSet DsWMS = oCn.RunProcReturn("exec h_p_KF_ICInventory_WMS_GetWHAndSP " + HBillID.ToString() + ",'" + HBillType + "','" + omodel_View.HBarCode + "'," + HWhID.ToString() + "," + HSPID.ToString(), "h_p_KF_ICInventory_WMS_GetWHAndSP");

 DLL/Model.dll

Binary files differ