MESWMS-WEBS.git

			@@ -15414,6 +15414,216 @@

			#endregion

			#region 领料出库校验模式*

			//校验领料出库单
			[WebMethod]
			public bool set_SaveMateOutBill_BillCheck(Model.ClsKf_MateOutBillMain oMain, ref string sErrMsg)
			{
			if (set_SaveMateOutBill_CLD_BillCheck(oMain, ref sErrMsg) == true)
			{
			//上传成功
			return true;
			}
			else
			{
			//上传失败
			sErrMsg = "单据号：" + oMain.HBillNo + "，单据ID：" + oMain.HInterID + "；上传单据失败！" + sErrMsg;
			return false;
			}
			}

			public bool set_SaveMateOutBill_CLD_BillCheck(Model.ClsKf_MateOutBillMain oMain, ref string sErrMsg)
			{
			SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
			//获取系统参数
			Pub_Class.ClsXt_SystemParameter oSystemParameter = new Pub_Class.ClsXt_SystemParameter();
			if (oSystemParameter.ShowBill(ref sErrMsg) == false)
			{
			sErrMsg = "获取系统参数失败！ " + sErrMsg;
			return false;
			}
			//上传前判断
			DataSet Ds = oCn.RunProcReturn("exec h_p_WMS_BeforeUpload_MateOutBillCheck " + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "','" + oMain.HBillType + "','" + oSystemParameter.omodel.Kf_MateOutBillCheck_MustQtyCtl + "'", "h_p_WMS_BeforeUpload_MateOutBillCheck");
			if (Ds == null \|\| Ds.Tables[0].Rows.Count == 0)
			{
			sErrMsg = "校验上传前判断，发生错误！";
			return false;
			}
			else
			{
			if (DBUtility.ClsPub.isLong(Ds.Tables[0].Rows[0][0]) == 1)
			{
			sErrMsg = DBUtility.ClsPub.isStrNull(Ds.Tables[0].Rows[0]["HRemark"]);
			return false;
			}
			}

			try
			{
			oCn.BeginTran();
			//写入条码出入库表
			oCn.RunProc("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 = Pub_Class.ClsPub.sExeReturnInfo;
			return false;
			}

			//获取CLOUD账号密码
			string sCLOUDUseName = Pub_Class.ClsPub.sCLOUDUseName;
			string sCLOUDPsd = Pub_Class.ClsPub.sCLOUDPsd;
			DataSet ds11 = get_SaveCLOUDUseNameandPsd(oMain.HInterID);
			if (ds11 == null \|\| ds11.Tables[0].Rows.Count == 0)
			{
			}
			else
			{
			sCLOUDUseName = DBUtility.ClsPub.isStrNull(ds11.Tables[0].Rows[0]["HCloudUserName"]);
			sCLOUDPsd = DBUtility.ClsPub.isStrNull(ds11.Tables[0].Rows[0]["HCloudUserPsd"]);
			}

			if (oSystemParameter.omodel.Kf_MateOutBillCheck_MustQtyCtl == "完全等于应收")
			{
			string HReturn;
			ApiClient client = new ApiClient(Pub_Class.ClsPub.sCLOUDUrl);
			string dbId = Pub_Class.ClsPub.sCLOUDAcc; //AotuTest117
			bool bLogin = client.Login(dbId, sCLOUDUseName, sCLOUDPsd, 2052);
			if (bLogin)
			{
			//提交单据
			string sJson2 = "{\"CreateOrgId\":0,\"Numbers\":[\"" + oMain.HBillNo + "\"]}";
			var result2 = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.Submit",
			new object[] { "PRD_PickMtrl", sJson2 });
			//审核单据
			string sJson3 = "{\"CreateOrgId\":0,\"Numbers\":[\"" + oMain.HBillNo + "\"]}";
			var result3 = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.Audit",
			new object[] { "PRD_PickMtrl", sJson3 });

			HReturn = result3.ToString();

			if (HReturn.Contains("\"IsSuccess\":false") == true)
			{
			sErrMsg = "审核生产领料单失败！" + HReturn;
			oCn.RollBack();
			return false;
			}
			else
			{
			oCn.Commit();
			return true;
			}
			}
			else
			{
			sErrMsg = "校验审核生产领料单失败！金蝶云登录失败！";
			oCn.RollBack();
			return false;
			}
			}
			else
			{
			//根据TMP表返回修改信息
			DataSet Ds2;
			Ds2 = oCn.RunProcReturn("exec h_p_Kf_GetMateOutBillCheck " + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "'", "h_p_Kf_GetMateOutBillCheck");
			if (Ds2 == null \|\| Ds2.Tables[0].Rows.Count == 0 \|\| Ds2.Tables[1].Rows.Count == 0)
			{
			sErrMsg = "获取子表信息失败！";
			oCn.RollBack();
			return false;
			}
			else
			{
			string sJson_Main = "{\"Creator\":\"\",\"NeedUpDateFields\":[\"FEntity\",\"FActualQty\"]," +
			"\"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"]) + "\"," +
			"\"FEntity\": [ ";
			string sJson_Entry = "";
			for (int i = 0; i < Ds2.Tables[1].Rows.Count; i++)
			{
			if (sJson_Entry != "")
			{
			sJson_Entry = sJson_Entry + " , ";
			}

			sJson_Entry = sJson_Entry + "{" +
			"\"FEntryID\":\"" + Pub_Class.ClsPub.isStrNull(Ds2.Tables[1].Rows[i]["FEntryID"]) + "\"," +
			"\"FActualQty\":\"" + Pub_Class.ClsPub.isStrNull(Ds2.Tables[1].Rows[i]["FActualQty"]) + "\"," +
			"}";
			}
			string sJson_End = " ] }}";
			string sJson = sJson_Main + sJson_Entry + sJson_End;

			//验证用户信息
			string HReturn;
			ApiClient client = new ApiClient(Pub_Class.ClsPub.sCLOUDUrl);
			string dbId = Pub_Class.ClsPub.sCLOUDAcc; //AotuTest117
			bool bLogin = client.Login(dbId, sCLOUDUseName, sCLOUDPsd, 2052);
			if (bLogin)
			{
			//修改单据
			var result = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.Save",
			new object[] { "PRD_PickMtrl", sJson });

			HReturn = result.ToString();

			if (HReturn.Contains("\"IsSuccess\":false") == true)
			{
			sErrMsg = "修改生产领料单失败！" + HReturn + sJson;
			oCn.RollBack();
			return false;
			}
			else
			{
			HReturn = "";
			//提交单据
			string sJson2 = "{\"CreateOrgId\":0,\"Numbers\":[\"" + oMain.HBillNo + "\"]}";
			var result2 = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.Submit",
			new object[] { "PRD_PickMtrl", sJson2 });
			//审核单据
			string sJson3 = "{\"CreateOrgId\":0,\"Numbers\":[\"" + oMain.HBillNo + "\"]}";
			var result3 = client.Execute<string>("Kingdee.BOS.WebApi.ServicesStub.DynamicFormService.Audit",
			new object[] { "PRD_PickMtrl", sJson3 });

			HReturn =result3.ToString();

			if (HReturn.Contains("\"IsSuccess\":false") == true)
			{
			sErrMsg = "校验审核生产领料单失败！" + HReturn + sJson;
			oCn.RollBack();
			return false;
			}
			else
			{
			//重新同步生产领料单
			oCn.RunProc("exec h_p_IFCLD_ERPSourceBillToLocal_MateOut '" + oMain.HBillNo + "'");
			oCn.Commit();
			return true;
			}
			}
			}
			else
			{
			sErrMsg = "校验审核生产领料单失败！金蝶云登录失败！";
			oCn.RollBack();
			return false;
			}
			}
			}
			}
			catch (Exception e)
			{
			sErrMsg = "校验审核生产领料单失败！" + e.Message;
			oCn.RollBack();
			return false;
			}
			}

			#endregion

			#region 生产补料单 *

			//生成生产补料单
			@@ -35579,6 +35789,43 @@

			#endregion

			#region 扫描单据条码领料出库 *校验模式

			[WebMethod]
			public Model.ClsKf_ICStockBill_WMS get_BillBarCode_MateOutCheck(string HBillNo, string HBillType, string HMaker, Int64 HOWNERID, ref string sErrMsg)
			{
			SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
			Model.ClsKf_ICStockBill_WMS oBar = new Model.ClsKf_ICStockBill_WMS();
			//将单据信息存入条码出入库临时表
			DataSet ds1 = oCn.RunProcReturn("exec h_p_WMS_AddBillBarCode_MateOutCheck '" + HBillNo + "','" + HBillType + "','" + HMaker + "'," + HOWNERID.ToString(), "h_p_WMS_AddBillBarCode_MateOutCheck");
			if (ds1 == null \|\| ds1.Tables[0].Rows.Count == 0)
			{
			sErrMsg = "单据号：" + HBillNo + "；将单据信息存入条码出入库临时表失败！";
			return null;
			}
			else
			{
			if (DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0][0]) == 0)
			{
			oBar.HInterID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HInterID"]);
			oBar.HBillNo = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HBillNo"]);
			oBar.HWhID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HWhID"]);
			oBar.HWhName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HWhName"]);
			oBar.HSPFlag = DBUtility.ClsPub.isBool(ds1.Tables[0].Rows[0]["HSPFlag"]);
			oBar.HSPID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HSPID"]);
			oBar.HSPName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HSPName"]);
			return oBar;
			}
			else
			{
			sErrMsg = "单据号：" + HBillNo + "；" + DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HRemark"]);
			return null;
			}
			}
			}

			#endregion

			#region 扫描单据条码其他出库 *校验模式

			[WebMethod]
			@@ -35633,6 +35880,11 @@
			//其他出库单
			sBillTypeOneScan = "Y";
			}
			else if (HBillType == "1204" && oSystemParameterMain.Kf_MateOutBill_BillTypeOneScan == "Y")
			{
			//领料出库单
			sBillTypeOneScan = "Y";
			}

			//判断是否存在相同条码，判断是否启用一次扫码控制，判断所扫条码是否在单据中
			DataSet ds1 = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_BillCheck '" + sBarCode + "'," + HBillID.ToString() + ",'" + HBillNo + "','" + HBillType + "'," + HWhID + "," + HSPID + ",'" + sBillTypeOneScan + "'", "h_p_WMS_AddBarCode_BillCheck");
			@@ -35684,15 +35936,33 @@
			sRelQty = omodel_View.HQty;
			}

			if (omodel_View.HSourceQty == 0)
			//领料出库校验，根据系统参数：领料出库校验-应收数量控制扫码数量能否可超单据数量（小于等于应收、完全等于应收、不控制）
			if (HBillType == "1204" && (oSystemParameterMain.Kf_MateOutBillCheck_MustQtyCtl == "小于等于应收" \|\| oSystemParameterMain.Kf_MateOutBillCheck_MustQtyCtl == "完全等于应收"))
			{
			sErrMsg = "所扫物料在单据中剩余可扫数量为0，不允许扫码！";
			return false;
			if (omodel_View.HSourceQty == 0)
			{
			sErrMsg = "所扫物料在单据中剩余可扫数量为0，不允许扫码！";
			return false;
			}
			else if (sRelQty > omodel_View.HSourceQty)
			{
			sErrMsg = "所扫描条码数量为 " + sRelQty.ToString() + " 大于对应源单剩余可扫描数量" + omodel_View.HSourceQty.ToString() + "，不允许扫码！";
			return false;
			}
			}
			else if (sRelQty > omodel_View.HSourceQty)
			//其他出库校验，不可超单据数量
			else if (HBillType == "1206")
			{
			sErrMsg = "所扫描条码数量为 " + sRelQty.ToString() + " 大于对应单据剩余可扫描数量" + omodel_View.HSourceQty.ToString() + "，不允许扫码！";
			return false;
			if (omodel_View.HSourceQty == 0)
			{
			sErrMsg = "所扫物料在单据中剩余可扫数量为0，不允许扫码！";
			return false;
			}
			else if (sRelQty > omodel_View.HSourceQty)
			{
			sErrMsg = "所扫描条码数量为 " + sRelQty.ToString() + " 大于对应单据剩余可扫描数量" + omodel_View.HSourceQty.ToString() + "，不允许扫码！";
			return false;
			}
			}
			}
			else
			@@ -35711,15 +35981,33 @@
			sRelQty = omodel_View.HQty;
			}

			if (omodel_View.HSourceQty == 0)
			//领料出库校验，根据系统参数：领料出库校验-应收数量控制扫码数量能否可超单据数量（小于等于应收、完全等于应收、不控制）
			if (HBillType == "1204" && (oSystemParameterMain.Kf_MateOutBillCheck_MustQtyCtl == "小于等于应收" \|\| oSystemParameterMain.Kf_MateOutBillCheck_MustQtyCtl == "完全等于应收"))
			{
			sErrMsg = "所扫物料在单据中剩余可扫数量为0，不允许扫码！";
			return false;
			if (omodel_View.HSourceQty == 0)
			{
			sErrMsg = "所扫物料在单据中剩余可扫数量为0，不允许扫码！";
			return false;
			}
			else if (sRelQty > omodel_View.HSourceQty)
			{
			sErrMsg = "所扫描条码数量为 " + sRelQty.ToString() + " 大于对应源单剩余可扫描数量" + omodel_View.HSourceQty.ToString() + "，不允许扫码！";
			return false;
			}
			}
			else if (sRelQty > omodel_View.HSourceQty)
			//其他出库校验，不可超单据数量
			else if (HBillType == "1206")
			{
			sErrMsg = "所扫描条码数量为 " + sRelQty.ToString() + " 大于对应单据剩余可扫描数量" + omodel_View.HSourceQty.ToString() + "，不允许扫码！";
			return false;
			if (omodel_View.HSourceQty == 0)
			{
			sErrMsg = "所扫物料在单据中剩余可扫数量为0，不允许扫码！";
			return false;
			}
			else if (sRelQty > omodel_View.HSourceQty)
			{
			sErrMsg = "所扫描条码数量为 " + sRelQty.ToString() + " 大于对应单据剩余可扫描数量" + omodel_View.HSourceQty.ToString() + "，不允许扫码！";
			return false;
			}
			}
			}

			@@ -35777,7 +36065,7 @@

			if (sRelQty == 0)
			{
			sErrMsg = "所扫描条码无条码库存！";
			sErrMsg = "所扫描条码无条码库存或对应物料无ERP库存！";
			return false;
			}
			}
			@@ -36107,6 +36395,21 @@
			return oBar;
			}
			}
			//领料出库单源单：领料出库单
			else if (sBarBillName == "领料出库单" && HBillType == "1204")
			{
			oBar = get_BillBarCode_MateOutCheck(HBillNo, HBillType, HMaker, HOWNERID, ref sErrMsg);
			if (oBar == null)
			{
			sErrMsg = "启用一键扫码模式，" + sErrMsg;
			return null;
			}
			else
			{
			oBar.HBarType = "单据条码";
			return oBar;
			}
			}
			else
			{
			sErrMsg = "启用一键扫码模式，所扫条码前缀不属于当前模块单据号前缀！";

	CLOUDWEB/WebService1.asmx.cs	329 ●●●●● 补丁 \| 查看 \| 原始文档 \| blame \| 历史
	DLL/Pub_Class.dll	补丁 \| 查看 \| 原始文档 \| blame \| 历史