惠康WEBS代码,做二次开发用
生产领料出库,添加物料条码剩余可出库数量赋值判断;拆分物料条码扫码记录
1个文件已修改
66 ■■■■■ 已修改文件
CLOUDWEB/WebService1.asmx.cs 66 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
CLOUDWEB/WebService1.asmx.cs
@@ -23877,6 +23877,7 @@
                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))
@@ -23958,13 +23959,20 @@
                        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++)
@@ -23981,6 +23989,7 @@
                        }
                        string sJson_End = "  ]  }}";
                        string sJson = sJson_Main + sJson_Entry + sJson_End;
                        LogService.Write("保存修改生产领料单:" + sJson);
                        //验证用户信息
                        string HReturn;
@@ -24013,11 +24022,16 @@
                            }
                            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 + "\"]}";
@@ -24043,7 +24057,11 @@
                                    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;
@@ -56870,6 +56888,29 @@
                        }
                    }
                }
                //获取唯一条码剩余可扫描数量
                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)
@@ -62681,6 +62722,29 @@
                        }
                    }
                }
                //获取唯一条码剩余可扫描数量
                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)