新增夏宝专用调拨模块扫描源单条码、物料条码调用方法

yxj

2025-05-13 7bae7745c7014b98a20b7d98a3450d6f349b9813

新增夏宝专用调拨模块扫描源单条码、物料条码调用方法

 CLOUDWEB/WebService1.asmx.cs

@@ -53348,6 +53348,98 @@
            }
        }

        //夏宝专用调拨模块调用    20250513
        [WebMethod]
        public Model.ClsKf_ICStockBill_WMS get_SourceBarCode_MoveStock_XiaBao(Int64 HInterID, string HBillNo, string HBillType, string HSourceBillNo, string HSourceBillType, string HMaker, Int64 HFIFOWhID, Int64 HOWNERID, ref string sErrMsg)
        {
            SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
            Model.ClsKf_ICStockBill_WMS oBar = new Model.ClsKf_ICStockBill_WMS();
            Int64 sMulSourceFlag = 1;   //多源单标志（0为非多源单模式，1为多源单模式）

            //获取系统参数
            Pub_Class.ClsXt_SystemParameter oSystemParameter = new Pub_Class.ClsXt_SystemParameter();
            if (oSystemParameter.ShowBillByOrgID(HOWNERID, ref sErrMsg) == false)
            {
                sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；扫描源单时获取系统参数失败！ " + sErrMsg;
                return null;
            }

            //将源单信息存入条码出入库临时表
            DataSet ds1 = oCn.RunProcReturn("exec h_p_WMS_AddSourceBarCode_MoveStock_XiaBao " + HInterID.ToString() + ",'" + HBillNo + "','" + HBillType + "','" + HSourceBillNo + "','" + HSourceBillType + "'," + sMulSourceFlag.ToString() + ",'" + HMaker + "'," + HFIFOWhID.ToString() + "," + HOWNERID.ToString(), "h_p_WMS_AddSourceBarCode_MoveStock_XiaBao");
            if (ds1 == null || ds1.Tables[0].Rows.Count == 0)
            {
                sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；将源单信息存入条码出入库临时表失败！";
                return null;
            }
            else
            {
                if (DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0][0]) == 0)
                {
                    //先进先出控制
                    if (oSystemParameter.omodel.Kf_MoveStockBill_FIFOCtl == "Y")  //系统参数  直接调拨单-先进先出控制
                    {
                        DataSet FIFO = oCn.RunProcReturn("exec h_p_WMS_AddSourceFIFO_MoveStock " + HInterID.ToString() + ",'" + HBillType + "','" + HSourceBillNo + "','" + HSourceBillType + "'," + HFIFOWhID.ToString() + "," + HOWNERID.ToString(), "h_p_WMS_AddSourceFIFO_MoveStock");
                        if (FIFO == null || FIFO.Tables[0].Rows.Count == 0)
                        {
                            sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；存入先进先出临时表失败！";
                            return null;
                        }
                        else
                        {
                            if (DBUtility.ClsPub.isLong(FIFO.Tables[0].Rows[0][0]) == 1)
                            {
                                sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；" + DBUtility.ClsPub.isStrNull(FIFO.Tables[0].Rows[0]["HRemark"]);
                                return null;
                            }
                        }
                    }
                    //先进先出下架清单
                    else if (oSystemParameter.omodel.Kf_MoveStockBill_FIFOList == "Y")  //系统参数  直接调拨单-先进先出下架清单
                    {
                        DataSet FIFOList = oCn.RunProcReturn("exec h_p_WMS_AddSourceFIFOList_MoveStock " + HInterID.ToString() + ",'" + HBillType + "','" + HSourceBillNo + "','" + HSourceBillType + "'," + HFIFOWhID.ToString() + "," + HOWNERID.ToString(), "h_p_WMS_AddSourceFIFOList_MoveStock");
                        if (FIFOList == null || FIFOList.Tables[0].Rows.Count == 0)
                        {
                            sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；存入先进先出下架清单失败！";
                            return null;
                        }
                        else
                        {
                            if (DBUtility.ClsPub.isLong(FIFOList.Tables[0].Rows[0][0]) == 1)
                            {
                                sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；" + DBUtility.ClsPub.isStrNull(FIFOList.Tables[0].Rows[0]["HRemark"]);
                                return null;
                            }
                        }
                    }
                    oBar.HBarType = "源单条码";
                    oBar.HMulSourceFlag = sMulSourceFlag;
                    oBar.HSourceBillType = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HSourceBillType"]);
                    oBar.HSourceBillNo = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HSourceBillNo"]);
                    oBar.HSupID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HSupID"]);
                    oBar.HSupName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HSupName"]);
                    oBar.HDeptID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HDeptID"]);
                    oBar.HDeptName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HDeptName"]);
                    oBar.HStockOutOrgID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HStockOutOrgID"]);
                    oBar.HStockOutOrgName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HStockOutOrgName"]);
                    oBar.HStockInOrgID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HStockInOrgID"]);
                    oBar.HStockInOrgName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HStockInOrgName"]);
                    oBar.HStockStyle = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HStockStyle"]);
                    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.HSCWhID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HSCWhID"]);
                    oBar.HSCWhName = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HSCWhName"]);
                    oBar.HSCSPFlag = DBUtility.ClsPub.isBool(ds1.Tables[0].Rows[0]["HSCSPFlag"]);
                    return oBar;
                }
                else
                {
                    sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HInterID + "；" + DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HRemark"]);
                    return null;
                }
            }
        }

        #endregion

        #region 分步式调出    扫描源单条码
@@ -57573,6 +57665,603 @@
            }
        }


        #region 扫描物料条码      调拨  扫描物料条码自动带出源单信息    20250429
        [WebMethod]
        public Model.ClsKf_ICStockBill_WMS get_BarCode_MoveStock_AddSource(string sBarCode, Int64 HBillID, string HBillType, string HBillNo, string HMaker, Int64 HWhID, Int64 HSPID, Int64 HSCWHID, Int64 HSCSPID, Double HQty, bool SourceFlag, string HSourceBillNo, string HSourceBillType, Int64 HStockInOrgID, Int64 HStockOutOrgID, string HScanStyle, ref string sErrMsg, string HCustom1 = "", string HCustom2 = "")
        {
            try
            {
                //获取系统参数
                Pub_Class.ClsXt_SystemParameter oSystemParameter = new Pub_Class.ClsXt_SystemParameter();
                if (oSystemParameter.ShowBillByOrgID(HStockOutOrgID, ref sErrMsg) == false)
                {
                    sErrMsg = "获取系统参数失败！ " + sErrMsg;
                    return null;
                }

                sBarCode = sBarCode.Trim();
                if (sBarCode == "")
                {
                    sErrMsg = "条码不能为空，请扫描条码！";
                    return null;
                }
                else
                {
                    //判断条码是否含特殊符号 # ，如果含有则 拆分
                    string[] NewBarCode;
                    if (sBarCode.Contains("#"))
                    {
                        NewBarCode = sBarCode.Split(Convert.ToChar("#"));
                        sBarCode = NewBarCode[0];
                        if (HQty == 0)
                        {
                            HQty = DBUtility.ClsPub.isDoule(NewBarCode[1]);
                        }
                    }
                }

                SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
                Model.ClsKf_ICStockBill_WMS oBar = new Model.ClsKf_ICStockBill_WMS();
                DAL.ClsGy_BarCodeBill_View dal = new DAL.ClsGy_BarCodeBill_View();
                string sBarCodePrefix = sBarCode.Substring(0, Math.Min(3, sBarCode.Length));//截取条码前三位字符串

                //根据系统参数，判断是否启用一键扫码模式，Y为启用
                //未启用，只扫描物料条码
                if (oSystemParameter.omodel.WMS_OneKeyMode.ToUpper() == "N")
                {
                    if (dal.GetInfoByBarCode(sBarCode, HBillType, HStockOutOrgID))
                    {
                        if (dal.omodel_View.HStopflag)
                        {
                            sErrMsg = "条码已被禁用，不允许扫描！";
                            return null;
                        }
                        else
                        {
                            //判断条码类型是否为托盘条码，如果是托盘条码则分解并模拟扫码
                            if (dal.omodel_View.HBarCodeType == "托盘条码")
                            {
                                //将托条码信息写入条码出入库临时表
                                oBar = get_SavePonderationBillMain_Temp_PackBarCode(dal.omodel_View, HBillID, HBillType, HBillNo, HMaker, HWhID, HSPID, HSCWHID, HSCSPID, SourceFlag, HSourceBillType, HStockInOrgID, HStockOutOrgID, HCustom1, HCustom2, oSystemParameter.omodel, ref sErrMsg);
                                if (oBar == null)
                                {
                                    sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；扫描失败！" + sErrMsg;
                                    return null;
                                }
                                else
                                {
                                    return oBar;
                                }
                            }
                            else
                            //条码类型不为托盘条码
                            {
                                //将物料条码信息写入条码出入库临时表
                                oBar = get_SavePonderationBillMain_Temp_BarCode_MoveStock_AddSource(dal.omodel_View, HBillID, HBillType, HBillNo, HMaker, HWhID, HSPID, HSCWHID, HSCSPID, HQty, SourceFlag, HSourceBillType, HStockInOrgID, HStockOutOrgID, HCustom1, HCustom2, oSystemParameter.omodel, ref sErrMsg);
                                if (oBar == null)
                                {
                                    sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；扫描物料条码失败！" + sErrMsg;
                                    return null;
                                }
                                else
                                {
                                    return oBar;
                                }
                            }
                        }
                    }
                    else
                    {
                        sErrMsg = "条码档案中不存在该条码，请确认条码是否正确或是否已被删除！";
                        return null;
                    }
                }
                //启用，根据条码前缀走不同方法（仓库条码、仓位条码、部门条码、源单条码、物料条码）
                else
                {
                    //根据递入的条码前三位，判断条码类型（仓库条码、仓位条码、部门条码、源单条码、物料条码）
                    DataSet Dss = oCn.RunProcReturn(" select HSourceName,BarCodeType,HSourceBillType from Xt_BarCodeType with(nolock) where HSourceNumber= '" + sBarCodePrefix + "' and (HBillType = '' or HBillType ='" + HBillType + "')", "Xt_BarCodeType");

                    //无返回数据则为物料条码
                    if (Dss == null || Dss.Tables[0].Rows.Count == 0)
                    {
                        if (dal.GetInfoByBarCode(sBarCode, HBillType, HStockOutOrgID))
                        {
                            if (dal.omodel_View.HStopflag)
                            {
                                sErrMsg = "条码已被禁用，不允许扫描！";
                                return null;
                            }
                            else
                            {
                                //判断条码类型是否为托盘条码，如果是托盘条码则分解并模拟扫码
                                if (dal.omodel_View.HBarCodeType == "托盘条码")
                                {
                                    //将托条码信息写入条码出入库临时表
                                    oBar = get_SavePonderationBillMain_Temp_PackBarCode(dal.omodel_View, HBillID, HBillType, HBillNo, HMaker, HWhID, HSPID, HSCWHID, HSCSPID, SourceFlag, HSourceBillType, HStockInOrgID, HStockOutOrgID, HCustom1, HCustom2, oSystemParameter.omodel, ref sErrMsg);
                                    if (oBar == null)
                                    {
                                        sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；扫描失败！" + sErrMsg;
                                        return null;
                                    }
                                    else
                                    {
                                        return oBar;
                                    }
                                }
                                else
                                //条码类型不为托盘条码
                                {
                                    //将物料条码信息写入条码出入库临时表
                                    oBar = get_SavePonderationBillMain_Temp_BarCode_MoveStock_AddSource(dal.omodel_View, HBillID, HBillType, HBillNo, HMaker, HWhID, HSPID, HSCWHID, HSCSPID, HQty, SourceFlag, HSourceBillType, HStockInOrgID, HStockOutOrgID, HCustom1, HCustom2, oSystemParameter.omodel, ref sErrMsg);
                                    if (oBar == null)
                                    {
                                        sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；扫描物料条码失败！" + sErrMsg;
                                        return null;
                                    }
                                    else
                                    {
                                        return oBar;
                                    }
                                }
                            }
                        }
                        else
                        {
                            sErrMsg = "条码档案中不存在该条码，请确认条码是否正确或是否已被删除！";
                            return null;
                        }
                    }
                    //仓库条码、仓位条码、部门条码、源单条码
                    else
                    {
                        string sBarBillName = Pub_Class.ClsPub.isStrNull(Dss.Tables[0].Rows[0]["HSourceName"]);
                        string sBarBillType = Pub_Class.ClsPub.isStrNull(Dss.Tables[0].Rows[0]["BarCodeType"]);
                        string sSourceBillType = Pub_Class.ClsPub.isStrNull(Dss.Tables[0].Rows[0]["HSourceBillType"]);

                        //判断条码类型为 基础资料条码 或 源单条码
                        if (sBarBillType == "基础资料条码")
                        {
                            oBar = get_BaseSet(sBarCode, HStockOutOrgID, sBarBillName, ref sErrMsg);
                            if (oBar == null)
                            {
                                sErrMsg = "启用一键扫码模式，" + sErrMsg;
                                return null;
                            }
                            else
                            {
                                return oBar;
                            }
                        }
                        //源单条码
                        else if (sBarBillType == "源单条码")
                        {
                            oBar = get_SourceBarCode_MoveStock_XiaBao(HBillID, HBillNo, HBillType, sBarCode, sSourceBillType, HMaker, 0, HStockOutOrgID, ref sErrMsg);
                            if (oBar == null)
                            {
                                sErrMsg = "启用一键扫码模式，" + sErrMsg;
                                return null;
                            }
                            else
                            {
                                oBar.HBarType = "源单条码";
                                return oBar;
                            }
                        }
                        else
                        {
                            sErrMsg = "启用一键扫码模式，所扫条码前缀设置错误！";
                            return null;
                        }
                    }
                }
            }
            catch (Exception e)
            {
                sErrMsg = e.Message + ";" + e.StackTrace;
                return null;
            }
        }

        //扫描物料条码  存入条码出入库临时表      调拨   非托盘条码调用    扫描物料条码自动带出源单信息    20250429
        [WebMethod]
        public Model.ClsKf_ICStockBill_WMS get_SavePonderationBillMain_Temp_BarCode_MoveStock_AddSource(Model.ClsGy_BarCodeBill_WMS_Model_View omodel_View, Int64 HBillID, string HBillType, string HBillNo, string HMaker, Int64 HWhID, Int64 HSPID, Int64 HSCWHID, Int64 HSCSPID, Double HQty, bool SourceFlag, string HSourceBillType, Int64 HStockInOrgID, Int64 HStockOutOrgID, string HCustom1, string HCustom2, Pub_Class.ClsXt_SystemParameterMain oSystemParameterMain, ref string sErrMsg)
        {
            SQLHelper.ClsCN oCn = new SQLHelper.ClsCN();
            DAL.ClsKF_PonderationBillMain_Temp_Ctl tem = new DAL.ClsKF_PonderationBillMain_Temp_Ctl();
            Model.ClsKF_PonderationBillMain_Temp oMain = new Model.ClsKF_PonderationBillMain_Temp();
            Model.ClsKf_ICStockBill_WMS oBar = new Model.ClsKf_ICStockBill_WMS();

            string HMaterNumber;            //物料代码
            string sSourceBillCtl = "N";    //是否进行源单信息核对（'Y'为核对源单信息）
            string sBatchNoCtl = "N";       //是否进行批号核对（'Y'为核对批号）
            string sMultilineCtl = "N";     //是否存在多行相同物料时自动拆分换行（'Y'为自动拆分）
            string sMustQtyCtl = "不控制";  //扫码数量能否可超单据数量控制（小于等于应收、完全等于应收、不控制）
            string sMaterWHSPCtl = "N";     //是否取物料默认仓库仓位（'Y'为是）
            string sSourceWHSPCtl = "N";    //是否取源单中仓库仓位（'Y'为是）
            string sOneScanCtl = "N";       //一次扫码控制（'Y'为控制）
            string sFIFOCtl = "N";          //先进先出控制（'Y'为控制）
            string sMulSourceCtl = "N";     //是否启用多源单扫码模式（'Y'为启用）

            //根据单据类型，获取对应单据系统参数值
            if (get_SystemParameter_BarCode(HBillType, oSystemParameterMain, ref sSourceBillCtl, ref sBatchNoCtl, ref sMultilineCtl, ref sMustQtyCtl, ref sMaterWHSPCtl, ref sSourceWHSPCtl, ref sOneScanCtl, ref sFIFOCtl, ref sMulSourceCtl, ref sErrMsg))
            {

            }

            try
            {
                oCn.BeginTran();
                //将源单信息存入条码出入库临时表
                DataSet Source = oCn.RunProcReturn("exec h_p_WMS_AddSourceBarCode_MoveStock_Material " + HBillID.ToString() + ",'" + HBillNo + "','" + HBillType + "','" + omodel_View.HSourceBillNo + "','" + omodel_View.HSourceBillType + "',1,'" + HMaker + "',0," + HStockOutOrgID.ToString(), "h_p_WMS_AddSourceBarCode_MoveStock_Material");
                if (Source == null || Source.Tables[0].Rows.Count == 0)
                {
                    sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；将源单信息存入条码出入库临时表失败！";
                    oCn.RollBack();
                    return null;
                }
                else
                {
                    if (DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0][0]) == 0)
                    {
                        //先进先出控制
                        if (oSystemParameterMain.Kf_MoveStockBill_FIFOCtl == "Y")  //系统参数  直接调拨单-先进先出控制
                        {
                            DataSet FIFO = oCn.RunProcReturn("exec h_p_WMS_AddSourceFIFO_MoveStock " + HBillID.ToString() + ",'" + HBillType + "','" + omodel_View.HSourceBillNo + "','" + omodel_View.HSourceBillType + "',0," + HStockOutOrgID.ToString(), "h_p_WMS_AddSourceFIFO_MoveStock");
                            if (FIFO == null || FIFO.Tables[0].Rows.Count == 0)
                            {
                                sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；存入先进先出临时表失败！";
                                oCn.RollBack();
                                return null;
                            }
                            else
                            {
                                if (DBUtility.ClsPub.isLong(FIFO.Tables[0].Rows[0][0]) == 1)
                                {
                                    sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；" + DBUtility.ClsPub.isStrNull(FIFO.Tables[0].Rows[0]["HRemark"]);
                                    oCn.RollBack();
                                    return null;
                                }
                            }
                        }
                        //先进先出下架清单
                        else if (oSystemParameterMain.Kf_MoveStockBill_FIFOList == "Y")  //系统参数  直接调拨单-先进先出下架清单
                        {
                            DataSet FIFOList = oCn.RunProcReturn("exec h_p_WMS_AddSourceFIFOList_MoveStock " + HBillID.ToString() + ",'" + HBillType + "','" + omodel_View.HSourceBillNo + "','" + omodel_View.HSourceBillType + "',0," + HStockOutOrgID.ToString(), "h_p_WMS_AddSourceFIFOList_MoveStock");
                            if (FIFOList == null || FIFOList.Tables[0].Rows.Count == 0)
                            {
                                sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；存入先进先出下架清单失败！";
                                oCn.RollBack();
                                return null;
                            }
                            else
                            {
                                if (DBUtility.ClsPub.isLong(FIFOList.Tables[0].Rows[0][0]) == 1)
                                {
                                    sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；" + DBUtility.ClsPub.isStrNull(FIFOList.Tables[0].Rows[0]["HRemark"]);
                                    oCn.RollBack();
                                    return null;
                                }
                            }
                        }
                        oBar.HBarType = "物料条码";
                        oBar.HMulSourceFlag = 1;
                        oBar.HSourceBillType = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HSourceBillType"]);
                        oBar.HSourceBillNo = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HSourceBillNo"]);
                        oBar.HSupID = DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0]["HSupID"]);
                        oBar.HSupName = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HSupName"]);
                        oBar.HDeptID = DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0]["HDeptID"]);
                        oBar.HDeptName = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HDeptName"]);
                        oBar.HStockOutOrgID = DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0]["HStockOutOrgID"]);
                        oBar.HStockOutOrgName = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HStockOutOrgName"]);
                        oBar.HStockInOrgID = DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0]["HStockInOrgID"]);
                        oBar.HStockInOrgName = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HStockInOrgName"]);
                        oBar.HStockStyle = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HStockStyle"]);
                        oBar.HWhID = DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0]["HWhID"]);
                        oBar.HWhName = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HWhName"]);
                        oBar.HSPFlag = DBUtility.ClsPub.isBool(Source.Tables[0].Rows[0]["HSPFlag"]);
                        oBar.HSCWhID = DBUtility.ClsPub.isLong(Source.Tables[0].Rows[0]["HSCWhID"]);
                        oBar.HSCWhName = DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HSCWhName"]);
                        oBar.HSCSPFlag = DBUtility.ClsPub.isBool(Source.Tables[0].Rows[0]["HSCSPFlag"]);
                        SourceFlag = true;
                        if(oBar.HStockInOrgID!=0 && oBar.HStockInOrgID!=HStockInOrgID && HWhID!=0)
                        {
                            sErrMsg = "所选调入组织与条码对应调拨申请单调入组织不一致，请重新选择调入组织、调入仓库！";
                            oCn.RollBack();
                            return null;
                        }
                        //界面所选调入组织与源单调入组织不一致时，获取调入组织ID为源单调入组织ID
                        if (oBar.HStockInOrgID != 0 && oBar.HStockInOrgID != HStockInOrgID)
                        {
                            HStockInOrgID = oBar.HStockInOrgID;
                        }
                    }
                    else
                    {
                        sErrMsg = "单据号：" + HBillNo + "，单据ID：" + HBillID + "；" + DBUtility.ClsPub.isStrNull(Source.Tables[0].Rows[0]["HRemark"]);
                        oCn.RollBack();
                        return null;
                    }
                }

                //1、首次扫码防串单判断； 2、源单类型是否在源单列表里判断；3、唯一条码是否存在相同条码判断； 4、有源单，物料是否在源单中判断
                DataSet ds1 = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_MoveStock_XiaBao '" + omodel_View.HBarCode + "'," + HBillID.ToString() + ",'" + HBillNo + "','" + HBillType + "','" + HSourceBillType + "'," + DBUtility.ClsPub.BoolToString(SourceFlag), "h_p_WMS_AddBarCode_MoveStock_XiaBao");
                if (ds1 == null || ds1.Tables[0].Rows.Count == 0)
                {
                    sErrMsg = "判断所扫条码是否在单据中发生错误！";
                    oCn.RollBack();
                    return null;
                }
                else
                {
                    if (DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0][0]) == 0)
                    {
                        omodel_View.HMaterID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HMaterID"]);
                        omodel_View.HSourceBillNo = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HSourceBillNo"]);
                        omodel_View.HSourceEntryID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HSourceEntryID"]);
                        omodel_View.HSourceInterID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HSourceInterID"]);
                        omodel_View.HSourceQty = DBUtility.ClsPub.isDoule(ds1.Tables[0].Rows[0]["HQtyMust"]);     //源单可扫数量
                        HMaterNumber = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HMaterNumber"]);

                        oBar.HWhID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HWhID"]);
                        oBar.HSPID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HStockPlaceID"]);
                        oBar.HSCWhID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HSCWHID"]);
                        oBar.HSCSPID = DBUtility.ClsPub.isLong(ds1.Tables[0].Rows[0]["HOutStockPlaceID"]);

                        //界面调入仓库为空时，源单中有调入仓库值时，调入仓库、仓位取源单调入仓库、仓位
                        if (HWhID == 0 && oBar.HWhID!=0)
                        {
                            HWhID = oBar.HWhID;
                            HSPID = oBar.HSPID;
                        }
                    }
                    else
                    {
                        sErrMsg = DBUtility.ClsPub.isStrNull(ds1.Tables[0].Rows[0]["HRemark"]);
                        oCn.RollBack();
                        return null;
                    }
                }

                //判断调入仓库、仓位是否有效
                if (HWhID == 0)
                {
                    sErrMsg = "调入仓库没有选择！";
                    oCn.RollBack();
                    return null;
                }
                else
                {
                    //根据仓库ID，判断是否启用仓位
                    DataSet dsWh = oCn.RunProcReturn(" select HSPFlag from Gy_Warehouse with(nolock) where HItemID= " + HWhID.ToString() + " and HUSEORGID= " + HStockInOrgID.ToString(), "Gy_Warehouse");
                    if (dsWh == null || dsWh.Tables[0].Rows.Count == 0)
                    {
                        sErrMsg = "所选调入仓库不属于该调入组织！";
                        oCn.RollBack();
                        return null;
                    }
                    else if (HSPID == 0 && DBUtility.ClsPub.isBool(dsWh.Tables[0].Rows[0]["HSPFlag"]) == true)
                    {
                        sErrMsg = "调入仓位没有选择！";
                        oCn.RollBack();
                        return null;
                    }
                }

                double sRelQty = 0; 
                //获取扫码数量
                if (HQty > 0 && omodel_View.HQty > HQty)
                {
                    sRelQty = HQty;
                }
                else
                {
                    sRelQty = omodel_View.HQty;
                }

                double sERPQty = 0;     //ERP库存数量
                string sWhName = "";    //仓库名称
                string sSPName = "";    //仓位名称

                //界面调出仓库为空时，源单中有调出仓库值时，调出仓库、仓位取源单调出仓库、仓位
                if (HSCWHID == 0 && oBar.HSCWhID != 0)
                {
                    HSCWHID = oBar.HSCWhID;
                    HSCSPID = oBar.HSCSPID;
                }

                //判断调出仓库、仓位是否有效
                if (HSCWHID == 0)
                {
                    sErrMsg = "调出仓库没有选择！";
                    oCn.RollBack();
                    return null;
                }
                else
                {
                    //根据仓库ID，判断是否启用仓位
                    DataSet dsSCWH = oCn.RunProcReturn(" select HSPFlag from Gy_Warehouse with(nolock) where HItemID= " + HSCWHID.ToString() + " and HUSEORGID= " + HStockOutOrgID.ToString(), "Gy_Warehouse");
                    if (dsSCWH == null || dsSCWH.Tables[0].Rows.Count == 0)
                    {
                        sErrMsg = "所选调出仓库不属于该调出组织！";
                        oCn.RollBack();
                        return null;
                    }
                    else if (HSCSPID == 0 && DBUtility.ClsPub.isBool(dsSCWH.Tables[0].Rows[0]["HSPFlag"]) == true)
                    {
                        sErrMsg = "调出仓位没有选择！";
                        oCn.RollBack();
                        return null;
                    }
                }

                //判断ERP库存   库存控制-ERP负库存控制     私有云模式
                if (oSystemParameterMain.WMS_ERPStockCtl == "Y" && oSystemParameterMain.WMS_CloudMode == "Y" && HBillType != "1251")
                {
                    //判断ERP库存   返回ERP库存数量
                    DataSet DsERP = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_GetERPICInventory_New " + HBillID.ToString() + ",'" + HBillType + "','" + omodel_View.HBarCode + "'," + HSCWHID.ToString() + "," + HSCSPID.ToString() + "," + HStockOutOrgID.ToString(), "h_p_WMS_AddBarCode_GetERPICInventory_New");
                    if (DsERP == null || DsERP.Tables[0].Rows.Count == 0)
                    {
                        sErrMsg = "所扫描条码对应物料代码： " + HMaterNumber + " ，无金蝶库存！";
                        oCn.RollBack();
                        return null;
                    }
                    else
                    {
                        sERPQty = DBUtility.ClsPub.isDoule(DsERP.Tables[0].Rows[0]["HQty"]);
                        sWhName = DBUtility.ClsPub.isStrNull(DsERP.Tables[0].Rows[0]["HWhName"]);
                        sSPName = DBUtility.ClsPub.isStrNull(DsERP.Tables[0].Rows[0]["HSPName"]);

                        if (sERPQty <= 0)
                        {
                            sErrMsg = "所扫描条码对应物料代码：" + HMaterNumber + " ，在仓库[ " + sWhName + " ]、仓位[ " + sSPName + " ]中，无金蝶库存！";
                            oCn.RollBack();
                            return null;
                        }
                        //判断扫描数量与金蝶库存数量
                        else if (sRelQty > sERPQty)
                        {
                            sRelQty = sERPQty;
                        }
                    }
                }

                if (HWhID == HSCWHID && HSPID == HSCSPID)
                {
                    sErrMsg = "调入仓库、仓位不能与调出仓库、仓位相同！";
                    oCn.RollBack();
                    return null;
                }

                //唯一条码，是否启用一次扫码控制（'Y'为启用）
                if (omodel_View.HBarCodeType == "唯一条码" && sOneScanCtl == "Y")
                {
                    //一次扫码控制，同一条码、同一单据类型，在WMS表和TEMP表里，只允许进行一次扫码
                    DataSet dsOneScan = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_OneScan '" + omodel_View.HBarCode + "'," + HBillID.ToString() + ",'" + HBillNo + "','" + HBillType + "'," + HWhID.ToString() + "," + HSPID.ToString() + "," + HSCWHID.ToString() + "," + HSCSPID.ToString() + ",'" + HMaker + "'", "h_p_WMS_AddBarCode_OneScan");
                    if (dsOneScan == null || dsOneScan.Tables[0].Rows.Count == 0)
                    {
                    }
                    else
                    {
                        if (DBUtility.ClsPub.isLong(dsOneScan.Tables[0].Rows[0][0]) == 1)
                        {
                            sErrMsg = DBUtility.ClsPub.isStrNull(dsOneScan.Tables[0].Rows[0]["HRemark"]);
                            oCn.RollBack();
                            return null;
                        }
                    }
                }

                string HStockStyle = "";
                if (HStockOutOrgID != HStockInOrgID)
                {
                    HStockStyle = "跨组织调拨";
                }
                else
                {
                    HStockStyle = "组织内调拨";
                }
                oMain.HInterID = HBillID;
                oMain.HBillNo = HBillNo;
                oMain.HBillType = HBillType;
                oMain.HMaker = HMaker;
                oMain.HMaterID = omodel_View.HMaterID;
                oMain.HUnitID = omodel_View.HUnitID;
                oMain.HAuxPropID = omodel_View.HAuxPropID;
                oMain.HQty = sRelQty;
                oMain.HQtyMust = 0;
                oMain.HBarCode = omodel_View.HBarCode;
                oMain.HBatchNo = omodel_View.HBatchNo;
                oMain.HMTONo = omodel_View.HMTONo;
                oMain.HWhID = HWhID;
                oMain.HStockPlaceID = HSPID;
                oMain.HSCWHID = HSCWHID;
                oMain.HOutStockPlaceID = HSCSPID;
                oMain.HSourceInterID = omodel_View.HSourceInterID;
                oMain.HSourceEntryID = omodel_View.HSourceEntryID;
                oMain.HSourceBillNo = omodel_View.HSourceBillNo;
                oMain.HSourceBillType = HSourceBillType;
                if (omodel_View.HProduceDate < Convert.ToDateTime("1950-01-01"))
                {
                    oMain.HBeginDate = "";
                }
                else
                {
                    oMain.HBeginDate = omodel_View.HProduceDate.ToShortDateString();
                }
                if (omodel_View.HExpiryDate < Convert.ToDateTime("1950-01-01"))
                {
                    oMain.HEndDate = "";
                }
                else
                {
                    oMain.HEndDate = omodel_View.HExpiryDate.ToShortDateString();
                }
                oMain.HRedBlueFlag = false;
                oMain.HPieceQty = 1;
                oMain.HSTOCKORGID = HStockOutOrgID;
                oMain.HOWNERID = HStockInOrgID;
                oMain.HCusBarCode = HCustom1;
                oMain.HMulSourceBill = 1;
                oMain.HSubBillType = "1243";

                //先进先出控制
                if (HSourceBillType != "-1" && HBillType != "1251" && sFIFOCtl == "Y")
                {
                    //DataSet FIFO = oCn.RunProcReturn("exec h_p_Kf_ICInventory_FIFO_Tmp_BarCode " + HBillID.ToString() + ",'" + HBillType + "','" + oMain.HBatchNo + "','" + oMain.HBarCode + "'," + oMain.HQty.ToString(), "h_p_Kf_ICInventory_FIFO_Tmp_BarCode");
                    DataSet FIFO = oCn.RunProcReturn("exec h_p_WMS_FIFOCheck " + HBillID.ToString() + ",'" + HBillType + "','" + oMain.HBatchNo + "','" + oMain.HBarCode + "'," + oMain.HQty.ToString() + "," + oMain.HSCWHID.ToString() + "," + oMain.HOutStockPlaceID.ToString(), "h_p_WMS_FIFOCheck");
                    if (FIFO == null || FIFO.Tables[0].Rows.Count == 0)
                    {
                        sErrMsg = "判断先进先出控制发生错误！";
                        oCn.RollBack();
                        return null;
                    }
                    else
                    {
                        if (DBUtility.ClsPub.isLong(FIFO.Tables[0].Rows[0][0]) == 0)
                        {
                            sRelQty = DBUtility.ClsPub.isDoule(FIFO.Tables[0].Rows[0]["HQty"]);
                        }
                        else
                        {
                            sErrMsg = DBUtility.ClsPub.isStrNull(FIFO.Tables[0].Rows[0]["HRemark"]);
                            oCn.RollBack();
                            return null;
                        }
                    }
                }

                oCn.RunProc("Insert into KF_PonderationBillMain_Temp " +
                    "(HInterID,HBillNo,HBillType,HMaterID,HUnitID,HAuxPropID,HProcID" +
                    ",HWhID,HSCWHID,HStockPlaceID,HOutStockPlaceID,HGroupID,HAddr" +
                    ",HQtyMust,HQty,HPieceQty,HBatchNo,HBarCode,HBarCode_Pack" +
                    ",HMaker,HMakeDate,HSourceInterID,HSourceEntryID,HSourceBillType,HSourceBillNo" +
                    ",HRelationInterID,HRelationEntryID,HRelationBillNo,HRedBlueFlag,HMTONo,HPlanMode" +
                    ",HSTOCKORGID,HOtherOrgID,HOWNERID,HOWNERTYPEID,HExpressNumber,HSubBillType" +
                    ",HCusID,HDeptID,HCusBarCode,HMulSourceBill,HBeginDate,HEndDate,HStockStyle) " +
                    " Values(" + oMain.HInterID.ToString() + ",'" + oMain.HBillNo + "','" + oMain.HBillType + "'," + oMain.HMaterID.ToString() + "," + oMain.HUnitID.ToString() + "," + oMain.HAuxPropID.ToString() + "," + oMain.HProcID.ToString() +
                    "," + oMain.HWhID.ToString() + "," + oMain.HSCWHID.ToString() + "," + oMain.HStockPlaceID.ToString() + "," + oMain.HOutStockPlaceID.ToString() + "," + oMain.HGroupID.ToString() + ",'" + oMain.HAddr + "'" +
                    "," + oMain.HQtyMust.ToString() + "," + oMain.HQty.ToString() + "," + oMain.HPieceQty.ToString() + ",'" + oMain.HBatchNo + "','" + oMain.HBarCode + "',''" +
                    ",'" + oMain.HMaker + "',getdate()," + oMain.HSourceInterID.ToString() + "," + oMain.HSourceEntryID.ToString() + ",'" + oMain.HSourceBillType + "','" + oMain.HSourceBillNo + "'" +
                    "," + oMain.HRelationInterID.ToString() + "," + oMain.HRelationEntryID.ToString() + ",'" + oMain.HRelationBillNo + "'," + Convert.ToString(oMain.HRedBlueFlag ? 1 : 0) + ",'" + oMain.HMTONo + "',0" +
                    "," + oMain.HSTOCKORGID.ToString() + "," + oMain.HOWNERID.ToString() + "," + oMain.HSTOCKORGID.ToString() + ",'','','" + oMain.HSubBillType + "'" +
                    ",0,0,'" + oMain.HCusBarCode + "'," + oMain.HMulSourceBill.ToString() + "," + (oMain.HBeginDate == "" ? "NULL" : "'" + oMain.HBeginDate + "'") +
                    "," + (oMain.HEndDate == "" ? "NULL" : "'" + oMain.HEndDate + "'") + ",'" + HStockStyle + "')");
                oCn.Commit();
                return oBar;
            }
            catch (Exception e)
            {
                sErrMsg = "调拨扫描物料条码失败！" + e.Message;
                oCn.RollBack();
                return null;
            }
        }


        #endregion

        #endregion

        #region 斯莫尔条码解析