| | |
| | | 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 sLogNote = "开始扫码:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff") ; |
| | | |
| | | string HMaterNumber; //物料代码 |
| | | string sSourceBillCtl = "N"; //是否进行源单信息核对('Y'为核对源单信息) |
| | |
| | | { |
| | | |
| | | } |
| | | |
| | | sLogNote = sLogNote + ",1-获取系统参数:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | //蓝字入库、汇报模块,非无源单扫码、条码类型为 唯一条码 且为有源单生成的物料条码,扫描条码时自动带出源单信息,第一次扫码或启用多源单扫码模式 |
| | | //采购入库(1201)、生产入库(1202)、其他入库(1203)、委外入库(1210)、生产汇报(3711) |
| | | if (HSourceBillType != "-1" && omodel_View.HBarCodeType == "唯一条码" && omodel_View.HSourceBillNo != "" && (SourceFlag == false || sMulSourceCtl == "Y") |
| | |
| | | HSourceBillType = "-1"; |
| | | } |
| | | } |
| | | |
| | | sLogNote = sLogNote + ",2-扫描条码时自动带出源单信息:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | //1、首次扫码防串单判断; 2、源单类型是否在源单列表里判断; 3、唯一条码是否存在相同条码判断; 4、有源单,物料是否在源单中判断 |
| | | DataSet dsSource = oCn.RunProcReturn("exec h_p_WMS_AddBarCode_SourceInterID " + HInterID.ToString() + ",'" + HBillNo + "','" + HBillType + "','" + omodel_View.HBarCode + "','" + HSourceBillType + "'," + HStockOrgID.ToString() + "," + DBUtility.ClsPub.BoolToString(SourceFlag) + "," + sSourceBillCtl + ",'" + sBatchNoCtl + "','" + sMultilineCtl + "','" + sMaterWHSPCtl + "','" + sSourceWHSPCtl + "'", "h_p_WMS_AddBarCode_SourceInterID"); |
| | | if (dsSource == null || dsSource.Tables[0].Rows.Count == 0) |
| | |
| | | return null; |
| | | } |
| | | } |
| | | |
| | | sLogNote = sLogNote + ",3-条码判断是否在原单中:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | double sRelQty = 0; |
| | | //获取扫码数量 |
| | | if (omodel_View.HBarCodeType == "唯一条码") |
| | |
| | | } |
| | | } |
| | | |
| | | sLogNote = sLogNote + ",4-条码数量获取:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | //生产领料(1204)、销售出库(1205)、其他出库蓝字(1206)、委外出库(1211)、生产补料(1254) |
| | | //外购退料(1239)、产品退库(1245)、其他入库红字(1248)、委外退库(1246) |
| | | //出库、红字入库,判断条码库存、ERP库存 |
| | |
| | | } |
| | | } |
| | | } |
| | | |
| | | sLogNote = sLogNote + ",5-条码库存判断:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | //唯一条码,是否启用一次扫码控制('Y'为启用) |
| | | if (omodel_View.HBarCodeType == "唯一条码" && sOneScanCtl == "Y") |
| | | { |
| | |
| | | } |
| | | } |
| | | } |
| | | |
| | | sLogNote = sLogNote + ",6-一次扫码控制:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | //赋值,写入出入库临时表 |
| | | double sSumQty = 0; |
| | | double sRemQty = 0; |
| | |
| | | break; |
| | | } |
| | | } |
| | | sLogNote = sLogNote + ",7-写入临时表:" + DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss:ffff"); |
| | | LogService.Write(oMain.HInterID.ToString() + ";" + oMain.HBillNo + ";" + oMain.HBarCode + ",条码扫码" + sLogNote); //写入txt文本 |
| | | oBar.HBarType = "物料条码"; |
| | | return oBar; |
| | | } |