| | |
| | | oCn.BeginTran(); |
| | | //写入条码出入库表 |
| | | oCn.RunProc("EXEC h_p_Kf_ICStockBillSub_WMS_Insert_New " + oMain.HInterID.ToString() + ",'" + oMain.HBillType + "','" + oMain.HBillNo + "'"); |
| | | LogService.Write(DateTime.Now + "写入条码出入库表:" + "EXEC h_p_Kf_ICStockBillSub_WMS_Insert_New " + oMain.HInterID.ToString() + ",'" + oMain.HBillType + "','" + oMain.HBillNo + "'"); |
| | | |
| | | //从配置文件获取 CLOUD网址、账套信息、登录用户、登录密码 |
| | | if (!Pub_Class.ClsPub.GetCLOUDLoginInfo(ref Pub_Class.ClsPub.sExeReturnInfo)) |
| | |
| | | sErrMsg = "获取子表信息失败!"; |
| | | oCn.RollBack(); |
| | | return false; |
| | | } else if (Ds2.Tables[0].Rows[0]["HBack"].ToString() == "1") |
| | | { |
| | | sErrMsg = Ds2.Tables[0].Rows[0]["HBackRemark"].ToString(); |
| | | oCn.RollBack(); |
| | | return false; |
| | | } |
| | | else |
| | | { |
| | | |
| | | string sJson_Main = "{\"Creator\":\"\",\"NeedUpDateFields\":[\"FEntity\",\"F_SMRKS\"]," + |
| | | "\"NeedReturnFields\":[],\"IsDeleteEntry\":\"false\",\"SubSystemId\":\"\",\"IsVerifyBaseDataField\":\"false\"," + |
| | | "\"IsEntryBatchFill\":\"True\",\"ValidateFlag\":\"True\",\"NumberSearch\":\"True\",\"InterationFlags\":\"\"," + |
| | | "\"Model\": { \"FID\":\"" + Pub_Class.ClsPub.isStrNull(Ds2.Tables[0].Rows[0]["FID"]) + "\"," + |
| | | "\"FDATE\":\"" + Ds2.Tables[0].Rows[0]["FDATE"] + "\"," + |
| | | "\"FEntity\": [ "; |
| | | string sJson_Entry = ""; |
| | | for (int i = 0; i < Ds2.Tables[1].Rows.Count; i++) |
| | |
| | | } |
| | | string sJson_End = " ] }}"; |
| | | string sJson = sJson_Main + sJson_Entry + sJson_End; |
| | | LogService.Write("保存修改生产领料单:" + sJson); |
| | | |
| | | //验证用户信息 |
| | | string HReturn; |
| | |
| | | } |
| | | else |
| | | { |
| | | LogService.Write("校验修改生产领料单成功!" + sJson); //写入txt文本 |
| | | HReturn = ""; |
| | | //提交单据 |
| | | string sJson2 = "{\"CreateOrgId\":0,\"Numbers\":[\"" + oMain.HBillNo + "\"]}"; |
| | | var result2 = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.Submit", |
| | | new object[] { "PRD_PickMtrl", sJson2 }); |
| | | |
| | | if (result2.ToString().Contains("\"IsSuccess\":false") == true) { |
| | | LogService.Write("提交领料单!" + result2.ToString() + sJson2 + sCLOUDUseName); //写入txt文本 |
| | | } |
| | | |
| | | //审核单据 |
| | | string sJson3 = "{\"CreateOrgId\":0,\"Numbers\":[\"" + oMain.HBillNo + "\"]}"; |
| | |
| | | return false; |
| | | } |
| | | else |
| | | { |
| | | { |
| | | LogService.Write("开始拆分扫码记录!单据号为:" + "exec h_p_Kf_MateOutSplitQty '" + oMain.HBillNo + "'"); //写入txt文本 |
| | | //拆分扫码记录 |
| | | oCn.RunProc("exec h_p_Kf_MateOutSplitQty '" + oMain.HBillNo + "'"); |
| | | LogService.Write("扫码记录拆除成功!单据号为:" + oMain.HBillNo); //写入txt文本 |
| | | //重新同步生产领料单 |
| | | oCn.RunProc("exec h_p_IFCLD_ERPSourceBillToLocal_MateOut '" + oMain.HBillNo + "'"); |
| | | sErrMsg = "修改并审核生产领料单成功!单据号为:" + oMain.HBillNo; |
| | |
| | | } |
| | | } |
| | | } |
| | | |
| | | //获取唯一条码剩余可扫描数量 |
| | | if (omodel_View.HBarCodeType == "唯一条码" && HBillType.ToString() == "1204") |
| | | { |
| | | DataSet DsOutQty = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_GetInBillQty '" + omodel_View.HBarCode + "','" + HBillType + "'," + omodel_View.HQty.ToString(), "h_p_WMS_AddBarCode_GetInBillQty"); |
| | | if (DsOutQty == null || DsOutQty.Tables[0].Rows.Count == 0) |
| | | { |
| | | //正常,不存在已扫码上传记录 |
| | | } |
| | | else |
| | | { |
| | | if (DBUtility.ClsPub.isDoule(DsOutQty.Tables[0].Rows[0]["HQty"]) == 0) |
| | | { |
| | | sErrMsg = "所扫描物料条码: " + omodel_View.HBarCode + " ,已被其他单据扫描上传,不允许再次扫码!"; |
| | | return null; |
| | | } |
| | | else if (DBUtility.ClsPub.isDoule(DsOutQty.Tables[0].Rows[0]["HQty"]) < sRelQty) |
| | | { |
| | | sRelQty = DBUtility.ClsPub.isDoule(DsOutQty.Tables[0].Rows[0]["HQty"]); |
| | | } |
| | | } |
| | | } |
| | | |
| | | } |
| | | //采购入库(1201)、产品入库(1202)、其他入库蓝字(1203)、委外入库(1210)、生产汇报(3711) |
| | | //生产退料(1244)、销售退库(1247)、其他出库红字(1249)、委外退料(1238) |
| | |
| | | } |
| | | } |
| | | } |
| | | |
| | | //获取唯一条码剩余可扫描数量 |
| | | if (omodel_View.HBarCodeType == "唯一条码" && HBillType.ToString() == "1204") |
| | | { |
| | | DataSet DsOutQty = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_GetInBillQty '" + omodel_View.HBarCode + "','" + HBillType + "'," + omodel_View.HQty.ToString(), "h_p_WMS_AddBarCode_GetInBillQty"); |
| | | if (DsOutQty == null || DsOutQty.Tables[0].Rows.Count == 0) |
| | | { |
| | | //正常,不存在已扫码上传记录 |
| | | } |
| | | else |
| | | { |
| | | if (DBUtility.ClsPub.isDoule(DsOutQty.Tables[0].Rows[0]["HQty"]) == 0) |
| | | { |
| | | sErrMsg = "所扫描物料条码: " + omodel_View.HBarCode + " ,已被其他单据扫描上传,不允许再次扫码!"; |
| | | return false; |
| | | } |
| | | else if (DBUtility.ClsPub.isDoule(DsOutQty.Tables[0].Rows[0]["HQty"]) < sRelQty) |
| | | { |
| | | sRelQty = DBUtility.ClsPub.isDoule(DsOutQty.Tables[0].Rows[0]["HQty"]); |
| | | } |
| | | } |
| | | } |
| | | |
| | | } |
| | | //采购入库(1201)、产品入库(1202)、其他入库蓝字(1203)、委外入库(1210) |
| | | //生产退料(1244)、销售退库(1247)、其他出库红字(1249)、委外退料(1238) |