| | |
| | | List<PRD_Inventory> ListInventoryByStockOrgId;//物料总库存 |
| | | |
| | | private bool isSearched = false; |
| | | /// <summary> |
| | | /// 页面初始化 渲染界面 将T0-T60更改为日期显示 |
| | | /// </summary> |
| | | /// <param name="e"></param> |
| | | public override void OnInitialize(InitializeEventArgs e) |
| | | { |
| | | base.OnInitialize(e); |
| | | DateTime DateNow = DateTime.Now; |
| | | for (int m = 0; m <= 60; m++) |
| | | { |
| | | this.View.GetControl("FT" + "" + m + "").ControlAppearance.TextColor = "#FFFF00"; |
| | | this.View.GetControl("FT" + "" + m + "").Text = DateNow.AddDays(m).ToShortDateString(); |
| | | } |
| | | this.View.SendDynamicFormAction(View); |
| | | } |
| | | /// <su |
| | | public override void DataChanged(DataChangedEventArgs e) |
| | | { |
| | | if (!isSearched) return; |
| | |
| | | base.BarItemClick(e); |
| | | try |
| | | { |
| | | LogHelper.Info("生产计划平台按钮"); |
| | | LogHelper.Info("生产计划平台按钮:" + e.BarItemKey.ToUpper().ToString()); |
| | | if (e.BarItemKey.ToUpper() == "BTEXPORT") |
| | | { |
| | | ExportExcel(); |
| | |
| | | { |
| | | XnqtLook(); |
| | | } |
| | | //提料计划 |
| | | //数据重算 |
| | | if (e.BarItemKey.ToUpper() == "TBEXTRACTION") |
| | | { |
| | | return; |
| | | try |
| | | { |
| | | CompleteSetAnalysisBySQL(); |
| | | DayPlanPPBomBillBatch(); |
| | | Extraction(); |
| | | } |
| | |
| | | else |
| | | { |
| | | var type = this.View.Model.GetValue("FQTTYPE"); |
| | | if(type =="标准Bom") |
| | | if (type == "标准Bom") |
| | | formPa.CustomParams.Add("tempName", "JIT_MOMaterReadysBomBill"); |
| | | //齐套分析明细列表跳转 |
| | | formPa.FormId = "paez_CompleteAnalysisDetail"; |
| | |
| | | jsonRoot.Add("IsVerifyBaseDataField", ""); |
| | | JObject jsonModel = new JObject(); |
| | | jsonModel.Add("FID", Convert.ToString(current["FDayPlanWorkID"])); |
| | | if (Convert.ToString(current["FResourcesId_Id"]) != "0") |
| | | { |
| | | jsonModel.Add("FHSourceID", new JObject() { ["Fnumber"] = (current["FResourcesId"] as DynamicObject)?["Number"].ToString() });//生产资源 |
| | | } |
| | | jsonModel.Add("FOrderQuantity", Convert.ToString(current["FOrderQuantity"])); |
| | | jsonModel.Add("FDayPlanQuantity", Convert.ToDecimal(current["FDayPlanQuantity"]) + Convert.ToDecimal(current["FQTYLS"])); |
| | | jsonModel.Add("FNoScheduled", Convert.ToString(current["FNoScheduled"])); |
| | |
| | | if (saveIsSuc != "TRUE") |
| | | { |
| | | LogHelper.Error("生产计划平台保存失败:" + jsonRoot.ToString()); |
| | | this.View.ShowMessage("数据储存失败!请联系管理员!"); |
| | | this.View.ShowMessage(saveObj["Result"]["ResponseStatus"]["Errors"][0]["Message"].ToString()); |
| | | } |
| | | } |
| | | else |
| | | { |
| | | //验证日计划工单是否存在数据 生产订单号加明细行号 已生成过日计划的不生成 (关闭后的) |
| | | string moSql = string.Format(@"/*dialect*/ select FID from SC_WORKBILLSORTBILLMAIN |
| | | where FDOCUMENTSTATUS NOT IN ('E') AND FSCORDERNO ='{0}' and FSRCBILLENTRYSEQ = '{1}'", Convert.ToString(current["FSCOrderNo"]), Convert.ToString(current["FSRCBILLENTRYSEQ"])); |
| | | int fDayPlanFID = DBServiceHelper.ExecuteScalar<int>(Context, moSql, 0); |
| | | if (fDayPlanFID > 0) |
| | | continue; |
| | | |
| | | //根据生产订单号和物料查询是否存在明细 +生产订单明细行号 |
| | | sql = string.Format(@" |
| | | /*dialect*/ |
| | |
| | | jsonRoot.Add("SubSystemId", ""); |
| | | jsonRoot.Add("IsVerifyBaseDataField", ""); |
| | | JObject jsonModel = new JObject(); |
| | | jsonModel.Add("FPreparatDate", date.ToString());//编制日期 |
| | | jsonModel.Add("FPreparatDate", Convert.ToString(current["FBzDate"]));//编制日期(改为预计开工日期) |
| | | jsonModel.Add("FMoFBillType", FMoFBillType);// |
| | | jsonModel.Add("FSRCBILLENTRYSEQ", Convert.ToString(current["FSRCBILLENTRYSEQ"]));//生产订单明细行号 |
| | | jsonModel.Add("FSCOrderNo", Convert.ToString(current["FSCOrderNo"])); //生产订单号FSCOrderNo |
| | |
| | | jsonModel.Add("FBOMID", new JObject() { ["Fnumber"] = FBomNumber });//BOM版本 |
| | | jsonModel.Add("FHPlanBeginDate", FPlanBeginDate);//计划开始日期 |
| | | jsonModel.Add("FHPlanEndDate", FPlanEndDate);//计划完工日期 |
| | | //jsonModel.Add("FBatch", current["FBatch"].ToString());//批次 |
| | | //jsonModel.Add("FBatch", current["FBatch"].ToString());//批次 |
| | | jsonModel.Add("FBatch", FLOT);//批次 |
| | | jsonModel.Add("FHOrderNeedQty", FQTY);// 订单需求数量 |
| | | jsonModel.Add("FPrdBillNo", FBILLNO); ;//源单编号 |
| | |
| | | string saveIsSuc = saveObj["Result"]["ResponseStatus"]["IsSuccess"].ToString().ToUpper(); |
| | | if (saveIsSuc != "TRUE") |
| | | { |
| | | LogHelper.Error("生产计划平台保存失败:" + jsonRoot.ToString()); |
| | | this.View.ShowMessage("数据储存失败!请联系管理员!"); |
| | | LogHelper.Error("生产计划平台新增保存失败:" + saveObj.ToString()); |
| | | this.View.ShowMessage(saveObj["Result"]["ResponseStatus"]["Errors"][0]["Message"].ToString()); |
| | | } |
| | | if (saveIsSuc == "TRUE") |
| | | { |
| | |
| | | /// <summary> |
| | | /// 齐套分析 |
| | | /// </summary> |
| | | public void CompleteSetAnalysis() |
| | | { |
| | | try |
| | | { |
| | | Stopwatch sw = new Stopwatch(); |
| | | sw.Start();//开始计时 |
| | | LogHelper.Info("齐套分析开始准备数据:" + sw.Elapsed); |
| | | //清空齐套临时表 |
| | | DBServiceHelper.Execute(Context, "/*dialect*/ delete JIT_MOMaterReadysBill "); |
| | | //更新状态 |
| | | DBServiceHelper.Execute(Context, "/*dialect*/ update Sc_WorkBillSortBillsub set FCOMPLETE='' "); |
| | | //获取当前即时库存 按照物料+库存组织+货主+库存数量 |
| | | DataSet ds = DBServiceHelper.ExecuteDataSet(Context, @" |
| | | /*dialect*/ |
| | | select isnull(a.FBASEQTY,0)-ISNULL(b.FHUseQty,0) FBASEQTY,T1.FStockOrgId,T1.FMATERIALID,a.FOWNERID,c.FNUMBER from |
| | | ( |
| | | select a.FHPRDORGID FStockOrgId,T2.FMATERIALID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID,FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID,FID) T2 on T1.FID = t2.FID |
| | | group by a.FHPRDORGID,T2.FMATERIALID |
| | | ) T1 |
| | | LEFT JOIN T_STK_Inventory a on T1.FStockOrgId = a.FStockOrgId and T1.FMATERIALID =a.FMATERIALID |
| | | LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID and a.FOwnerId = b.FOwnerId |
| | | LEFT join T_ORG_Organizations c on a.FOWNERID = c.FORGID |
| | | join t_BD_Stock d on a.FSTOCKID =d.FSTOCKID |
| | | where d.FAvailableComplete<>0 |
| | | --where T1.FMATERIALID in (105773) |
| | | "); |
| | | ListInventory = ds.ToModelList<PRD_Inventory>(); |
| | | //总库存 物料+库存组织+库存数量 |
| | | ds = DBServiceHelper.ExecuteDataSet(Context, @" |
| | | /*dialect*/ |
| | | select sum(isnull(a.FBASEQTY,0)-ISNULL(b.FHUseQty,0))FBASEQTY,T1.FStockOrgId,T1.FMATERIALID from |
| | | ( |
| | | select a.FHPRDORGID FStockOrgId,T2.FMATERIALID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID,FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID,FID) T2 on T1.FID = t2.FID |
| | | group by a.FHPRDORGID,T2.FMATERIALID |
| | | ) T1 |
| | | LEFT JOIN T_STK_Inventory a on T1.FStockOrgId = a.FStockOrgId and T1.FMATERIALID =a.FMATERIALID |
| | | LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID |
| | | join t_BD_Stock d on a.FSTOCKID =d.FSTOCKID |
| | | where d.FAvailableComplete<>0 |
| | | --where T1.FMATERIALID in (105773) |
| | | group by T1.FStockOrgId,T1.FMATERIALID |
| | | "); |
| | | ListInventoryByStockOrgId = ds.ToModelList<PRD_Inventory>(); |
| | | //需要齐套分析的数据 |
| | | string sql = @" |
| | | /*dialect*/ |
| | | select a.FPRDMOMAINID,a.FPRDMOENTYID,a.FID,b.FEntryID,a.FHPRDORGID FStockOrgId,t5.FNUMBER as OrgFnumber,a.FHOrderLev,b.FHQTY,b.FHMASTERDATE,T1.FBillNo,T1.FMOBillNO,T1.FMOEntrySeq,T1.FMoId,T1.FMaterialID,T1.FQty, |
| | | T2.FMATERIALID FMATERIALID2, T4.FNumber,T2.FNeedQty,FNeedQty/FQty dwyl,(FHQTY-ISNULL(FProductNum,0))*(FNeedQty/FQty) PlanCount,TBase.FErpClsID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID, MAX(FENTRYID) FENTRYID, SUM(FNeedQty) FNeedQty, FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID, FID ) T2 on T1.FID = t2.FID |
| | | --LEFT JOIN T_STK_Inventory T3 on t2.FMATERIALID = t3.FMATERIALID |
| | | JOIN T_BD_MATERIAL T4 on T2.FMATERIALID = T4.FMATERIALID |
| | | JOIN t_BD_MaterialBase TBase on T2.FMATERIALID = TBase.FMATERIALID |
| | | JOIN T_ORG_Organizations t5 on a.FHPRDORGID = t5.FORGID |
| | | --条件为今天往后的日计划 + 今天之前未关闭的日计划 |
| | | where (FHEntryCloseDate is null and DATEDIFF(D,GETDATE(),FHMASTERDATE)<0)or DATEDIFF(D,GETDATE(),FHMASTERDATE)>=0 |
| | | and b.FHQTY>0 |
| | | ORDER BY b.FHMASTERDATE,a.FHOrderLev |
| | | "; |
| | | ds = DBServiceHelper.ExecuteDataSet(Context, sql); |
| | | List<PRD_PPBOM> BomList = ds.ToModelList<PRD_PPBOM>(); |
| | | //日计划+生产订单子表编码ID |
| | | var DatePlanList = BomList.GroupBy(p => new { p.FHMASTERDATE, p.FPRDMOENTYID }).Select(x => new PRD_PPBOM { FHMASTERDATE = x.Key.FHMASTERDATE, FPRDMOENTYID = x.Key.FPRDMOENTYID }).ToList(); |
| | | //CompleteAnalysisTempModel 用于存储临时需要插入数据 |
| | | List<CompleteAnalysisTempModel> completeAnalysisTempModel = new List<CompleteAnalysisTempModel>(); |
| | | int i = 1; |
| | | //创建字典 用于储存物料 + 占用数量 |
| | | Dictionary<string, decimal> occupyDic = new Dictionary<string, decimal>(); |
| | | foreach (var item in DatePlanList) |
| | | { |
| | | this.View.Session["ProcessRateValue"] = Convert.ToInt32(this.View.Session["ProcessRateValue"]) + Convert.ToInt32((decimal)(1.0 / DatePlanList.Count)); |
| | | //筛选出当日计划数据 |
| | | var _BomList = BomList.Where(x => x.FHMASTERDATE == item.FHMASTERDATE && x.FPRDMOENTYID == item.FPRDMOENTYID).ToList(); |
| | | foreach (var _item in _BomList) |
| | | { |
| | | //该日计划物料需要数 |
| | | decimal need = _item.PlanCount; |
| | | var sjkcList = ListInventoryByStockOrgId.Where(x => x.FMATERIALID == _item.FMATERIALID2 && x.FStockOrgId == _item.FStockOrgId).FirstOrDefault(); |
| | | //真正需要取计算的数量(拆分货主) |
| | | //货主匹配 |
| | | List<PRD_Inventory> _ListInventory = ListInventory.Where(c => c.FMATERIALID == _item.FMATERIALID2 && c.FStockOrgId == _item.FStockOrgId && c.FBASEQTY > 0).ToList(); |
| | | if (_ListInventory.Count > 0) |
| | | { |
| | | decimal _fLackCount = _item.PlanCount > sjkcList.FBASEQTY ? (_item.PlanCount - sjkcList.FBASEQTY) : 0;//缺料数量 |
| | | foreach (var Inventory in _ListInventory) |
| | | { |
| | | |
| | | if (need == 0) |
| | | break; |
| | | decimal fCompleteCount = need >= Inventory.FBASEQTY ? Inventory.FBASEQTY : need;//齐套数量 |
| | | decimal occupyMaterial = 0; |
| | | if (!occupyDic.ContainsKey(_item.FMATERIALID2)) |
| | | { |
| | | occupyDic.Add(_item.FMATERIALID2, fCompleteCount); |
| | | } |
| | | else |
| | | { |
| | | occupyMaterial = occupyDic[_item.FMATERIALID2]; |
| | | occupyDic[_item.FMATERIALID2] = occupyMaterial + fCompleteCount; |
| | | } |
| | | completeAnalysisTempModel.Add(new Demo.Model.Model.CompleteAnalysisTempModel |
| | | { |
| | | FHMainICMOInterIDr = _item.FPRDMOMAINID, |
| | | FHMainICMOEntryID = _item.FPRDMOENTYID, |
| | | FHICMOInterID = _item.FID.ToString(), |
| | | FHICMOEntryID = _item.FEntryID.ToString(), |
| | | FHMaterID = _item.FNumber, |
| | | FHStockOrgID = _item.OrgFnumber, |
| | | FHPRDORGID = _item.OrgFnumber, |
| | | FPRDBillNo = _item.FMOBillNO, |
| | | FOwnerTypeId = "BD_OwnerOrg", |
| | | FOwnerId = Inventory.Fnumber, |
| | | FUnitDosage = _item.dwyl.ToString(),//单位用量 |
| | | FSumPlanCount = _item.PlanCount.ToString(),//计划总数量 |
| | | FCompleteCount = fCompleteCount, //齐套数量 |
| | | FCompleteCount1 = fCompleteCount, //齐套数量 |
| | | FLackCount = _fLackCount,//缺料数量 |
| | | FHStockQty = sjkcList.FBASEQTY,//即时库存 |
| | | FHLeftQty = Inventory.FBASEQTY,//可用数量 |
| | | FOccupyCount = occupyMaterial,//占用数量 |
| | | FErpClsID = _item.FErpClsID, |
| | | /* 2021 1.26 更改为need |
| | | FComPlete = sjkcList.FBASEQTY >= _item.PlanCount ? "齐套" : "未齐套", |
| | | */ |
| | | FComPlete = sjkcList.FBASEQTY >= need ? "齐套" : "未齐套", |
| | | FPlanDate = item.FHMASTERDATE // 日计划日期 |
| | | }); ; |
| | | //扣减总库存数量 |
| | | sjkcList.FBASEQTY = sjkcList.FBASEQTY >= fCompleteCount ? sjkcList.FBASEQTY - fCompleteCount : 0; |
| | | //剩余日计划需求数量 |
| | | need = need >= Inventory.FBASEQTY ? need - Inventory.FBASEQTY : 0; |
| | | //扣减消耗库存 |
| | | Inventory.FBASEQTY = Inventory.FBASEQTY - fCompleteCount; |
| | | } |
| | | } |
| | | else |
| | | { |
| | | decimal occupyMaterial = 0; |
| | | if (occupyDic.ContainsKey(_item.FMATERIALID2)) |
| | | occupyMaterial = occupyDic[_item.FMATERIALID2]; |
| | | completeAnalysisTempModel.Add(new Demo.Model.Model.CompleteAnalysisTempModel |
| | | { |
| | | FHMainICMOInterIDr = _item.FPRDMOMAINID, |
| | | FHMainICMOEntryID = _item.FPRDMOENTYID, |
| | | FHICMOInterID = _item.FID.ToString(), |
| | | FHICMOEntryID = _item.FEntryID.ToString(), |
| | | FHMaterID = _item.FNumber, |
| | | FHStockOrgID = _item.OrgFnumber, |
| | | FHPRDORGID = _item.OrgFnumber, |
| | | FPRDBillNo = _item.FMOBillNO, |
| | | FOwnerTypeId = "BD_OwnerOrg", |
| | | FUnitDosage = _item.dwyl.ToString(),//单位用量 |
| | | FSumPlanCount = _item.PlanCount.ToString(),//计划总数量 |
| | | FCompleteCount = 0, //齐套数量 |
| | | FCompleteCount1 = 0, //齐套数量 |
| | | FLackCount = _item.PlanCount,//缺料数量 |
| | | FHStockQty = 0,//即时库存 |
| | | FHLeftQty = 0,//可用数量 |
| | | FOccupyCount = occupyMaterial,//占用数量 |
| | | FComPlete = "未齐套", |
| | | FPlanDate = item.FHMASTERDATE, // 日计划日期 |
| | | FErpClsID = _item.FErpClsID |
| | | |
| | | }); |
| | | } |
| | | } |
| | | //Thread.Sleep(100); |
| | | // this.View.Session["ProcessRateValue"] = Convert.ToInt32((Convert.ToDecimal(40) / DatePlanList.Count) * i); |
| | | i++; |
| | | |
| | | } |
| | | LogHelper.Info($"齐套分析,数据准备完成,保存到Model实体,总行数:{completeAnalysisTempModel.Count},耗时:" + sw.Elapsed); |
| | | i = 1; |
| | | |
| | | foreach (var item in completeAnalysisTempModel) |
| | | { |
| | | // this.View.Session["ProcessRateValue"] = Convert.ToInt32(this.View.Session["ProcessRateValue"]) + Convert.ToInt32(1 / completeAnalysisTempModel.Count * 90); |
| | | JObject jsonRoot = new JObject(); |
| | | jsonRoot.Add("Creator", ""); |
| | | jsonRoot.Add("NeedUpDateFields", new JArray()); |
| | | jsonRoot.Add("NeedReturnFields", new JArray()); |
| | | jsonRoot.Add("IsDeleteEntry", "true"); |
| | | jsonRoot.Add("SubSystemId", ""); |
| | | jsonRoot.Add("IsVerifyBaseDataField", ""); |
| | | JObject jsonModel = new JObject(); |
| | | jsonModel.Add("FHMainICMOInterIDr", item.FHMainICMOInterIDr); |
| | | jsonModel.Add("FHMainICMOEntryID", item.FHMainICMOEntryID); |
| | | jsonModel.Add("FHICMOInterID", item.FHICMOInterID); |
| | | jsonModel.Add("FHICMOEntryID", item.FHICMOEntryID); |
| | | jsonModel.Add("FHMaterID", new JObject() { ["FNUMBER"] = item.FHMaterID }); |
| | | jsonModel.Add("FHUseQty", item.FHUseQty); |
| | | jsonModel.Add("FHStockOrgID", new JObject() { ["FNUMBER"] = item.FHStockOrgID }); |
| | | jsonModel.Add("FHStockQty", item.FHStockQty); |
| | | jsonModel.Add("FHLeftQty", item.FHLeftQty); |
| | | jsonModel.Add("FHPRDORGID", new JObject() { ["FNUMBER"] = item.FHStockOrgID }); |
| | | jsonModel.Add("FUnitDosage", item.FUnitDosage); |
| | | jsonModel.Add("FSumPlanCount", item.FSumPlanCount); |
| | | jsonModel.Add("FCompleteCount", item.FCompleteCount); |
| | | jsonModel.Add("FCompleteCount1", item.FCompleteCount1); |
| | | jsonModel.Add("FPRDBillNo", item.FPRDBillNo); |
| | | jsonModel.Add("FOwnerTypeId", item.FOwnerTypeId); |
| | | jsonModel.Add("FComPlete", item.FComPlete); |
| | | jsonModel.Add("FLackCount", item.FLackCount); |
| | | jsonModel.Add("FOccupyCount", item.FOccupyCount); |
| | | jsonModel.Add("FPlanDate", item.FPlanDate); |
| | | jsonModel.Add("FErpClsID", item.FErpClsID); |
| | | if (item.FOwnerId != null) |
| | | jsonModel.Add("FOwnerId", new JObject() { ["FNUMBER"] = item.FOwnerId }); |
| | | jsonRoot.Add("Model", jsonModel); |
| | | CloudClient cloudClient = new CloudClient("http://localhost//k3cloud/"); |
| | | var result = cloudClient.Save("paez_CompleteAnalysisTemp", jsonRoot.ToString()); |
| | | JObject saveObj = JObject.Parse(result); |
| | | string saveIsSuc = saveObj["Result"]["ResponseStatus"]["IsSuccess"].ToString().ToUpper(); |
| | | if (saveIsSuc != "TRUE") |
| | | { |
| | | LogHelper.Error(jsonRoot.ToString()); |
| | | } |
| | | this.View.Session["ProcessRateValue"] = Convert.ToInt32((Convert.ToDecimal(100) / completeAnalysisTempModel.Count) * i); |
| | | i++; |
| | | } |
| | | //执行完成后 更新日计划工单状态 |
| | | DBServiceHelper.Execute(Context, @" |
| | | /*dialect*/update Sc_WorkBillSortBillSub set FComplete = '未齐套' where FEntryID IN (select distinct FHICMOEntryID from JIT_MOMaterReadysBill where isnull(FCOMPLETE,'未齐套') ='未齐套') |
| | | "); |
| | | DBServiceHelper.Execute(Context, @" |
| | | /*dialect*/update Sc_WorkBillSortBillSub set FComplete = '齐套' where FEntryID NOT IN (select distinct FHICMOEntryID from JIT_MOMaterReadysBill where isnull(FCOMPLETE,'未齐套') ='未齐套') |
| | | "); |
| | | sw.Stop();//结束计时 |
| | | LogHelper.Info("齐套分析运行总时长:" + sw.Elapsed); |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Error("齐套分析跳出:" + ex.Message.ToString()); |
| | | } |
| | | } |
| | | public void CompleteSetAnalysisBatch() |
| | | { |
| | | LogHelper.Info("齐套分析批量开始准备数据:"); |
| | |
| | | LogHelper.Error("齐套分析跳出:" + ex.Message.ToString()); |
| | | } |
| | | } |
| | | public void CompleteSetAnalysisBySQL() |
| | | { |
| | | LogHelper.Info("齐套分析sql模式开始准备数据:"); |
| | | string sql = ""; |
| | | try |
| | | { |
| | | Stopwatch sw = new Stopwatch(); |
| | | sw.Start();//开始计时 |
| | | //清空齐套临时表 |
| | | DBServiceHelper.Execute(Context, "/*dialect*/ delete JIT_MOMaterReadysBill "); |
| | | //更新状态 |
| | | DBServiceHelper.Execute(Context, "/*dialect*/ update Sc_WorkBillSortBillsub set FCOMPLETE='' "); |
| | | //获取当前即时库存 按照物料+库存组织+货主+库存数量 |
| | | DataSet ds = DBServiceHelper.ExecuteDataSet(Context, @" |
| | | /*dialect*/ |
| | | select isnull(a.FBASEQTY,0)-ISNULL(b.FHUseQty,0) FBASEQTY,T1.FStockOrgId,T1.FMATERIALID,a.FOWNERID,c.FNUMBER from |
| | | ( |
| | | select a.FHPRDORGID FStockOrgId,T2.FMATERIALID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID,FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID,FID) T2 on T1.FID = t2.FID |
| | | group by a.FHPRDORGID,T2.FMATERIALID |
| | | ) T1 |
| | | LEFT JOIN T_STK_Inventory a on T1.FStockOrgId = a.FStockOrgId and T1.FMATERIALID =a.FMATERIALID |
| | | LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID and a.FOwnerId = b.FOwnerId |
| | | LEFT join T_ORG_Organizations c on a.FOWNERID = c.FORGID |
| | | join t_BD_Stock d on a.FSTOCKID =d.FSTOCKID |
| | | where d.FAvailableComplete<>0 |
| | | --where T1.FMATERIALID in (105773) |
| | | "); |
| | | ListInventory = ds.ToModelList<PRD_Inventory>(); |
| | | //总库存 物料+库存组织+库存数量 |
| | | ds = DBServiceHelper.ExecuteDataSet(Context, @" |
| | | /*dialect*/ |
| | | select sum(isnull(a.FBASEQTY,0)-ISNULL(b.FHUseQty,0))FBASEQTY,T1.FStockOrgId,T1.FMATERIALID from |
| | | ( |
| | | select a.FHPRDORGID FStockOrgId,T2.FMATERIALID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID,FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID,FID) T2 on T1.FID = t2.FID |
| | | group by a.FHPRDORGID,T2.FMATERIALID |
| | | ) T1 |
| | | LEFT JOIN T_STK_Inventory a on T1.FStockOrgId = a.FStockOrgId and T1.FMATERIALID =a.FMATERIALID |
| | | LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID |
| | | join t_BD_Stock d on a.FSTOCKID =d.FSTOCKID |
| | | where d.FAvailableComplete<>0 |
| | | --where T1.FMATERIALID in (105773) |
| | | group by T1.FStockOrgId,T1.FMATERIALID |
| | | "); |
| | | ListInventoryByStockOrgId = ds.ToModelList<PRD_Inventory>(); |
| | | //需要齐套分析的数据 |
| | | sql = @" |
| | | /*dialect*/ |
| | | select a.FPRDMOMAINID,a.FPRDMOENTYID,a.FID,b.FEntryID,a.FHPRDORGID FStockOrgId,t5.FNUMBER as OrgFnumber,a.FHOrderLev,b.FHQTY,b.FHMASTERDATE,T1.FBillNo,T1.FMOBillNO,T1.FMOEntrySeq,T1.FMoId,T1.FMaterialID,T1.FQty, |
| | | T2.FMATERIALID FMATERIALID2, T4.FNumber,T2.FNeedQty,FNeedQty/FQty dwyl,(FHQTY-ISNULL(FProductNum,0))*(FNeedQty/FQty) PlanCount,TBase.FErpClsID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID, MAX(FENTRYID) FENTRYID, SUM(FNeedQty) FNeedQty, FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID, FID ) T2 on T1.FID = t2.FID |
| | | --LEFT JOIN T_STK_Inventory T3 on t2.FMATERIALID = t3.FMATERIALID |
| | | JOIN T_BD_MATERIAL T4 on T2.FMATERIALID = T4.FMATERIALID |
| | | JOIN t_BD_MaterialBase TBase on T2.FMATERIALID = TBase.FMATERIALID |
| | | JOIN T_ORG_Organizations t5 on a.FHPRDORGID = t5.FORGID |
| | | --条件为今天往后的日计划 + 今天之前未关闭的日计划 |
| | | where (FHEntryCloseDate is null and DATEDIFF(D,GETDATE(),FHMASTERDATE)<0)or DATEDIFF(D,GETDATE(),FHMASTERDATE)>=0 |
| | | and b.FHQTY>0 |
| | | ORDER BY b.FHMASTERDATE,a.FHOrderLev |
| | | "; |
| | | ds = DBServiceHelper.ExecuteDataSet(Context, sql); |
| | | List<PRD_PPBOM> BomList = ds.ToModelList<PRD_PPBOM>(); |
| | | //日计划+生产订单子表编码ID |
| | | var DatePlanList = BomList.GroupBy(p => new { p.FHMASTERDATE, p.FPRDMOENTYID }).Select(x => new PRD_PPBOM { FHMASTERDATE = x.Key.FHMASTERDATE, FPRDMOENTYID = x.Key.FPRDMOENTYID }).ToList(); |
| | | //CompleteAnalysisTempModel 用于存储临时需要插入数据 |
| | | List<CompleteAnalysisTempModel> completeAnalysisTempModel = new List<CompleteAnalysisTempModel>(); |
| | | int i = 1; |
| | | //创建字典 用于储存物料 + 占用数量 |
| | | Dictionary<string, decimal> occupyDic = new Dictionary<string, decimal>(); |
| | | LogHelper.Info("齐套分析准备数据完成:" + sw.Elapsed); |
| | | foreach (var item in DatePlanList) |
| | | { |
| | | //筛选出当日计划数据 |
| | | var _BomList = BomList.Where(x => x.FHMASTERDATE == item.FHMASTERDATE && x.FPRDMOENTYID == item.FPRDMOENTYID).ToList(); |
| | | foreach (var _item in _BomList) |
| | | { |
| | | //该日计划物料需要数 |
| | | decimal need = _item.PlanCount; |
| | | var sjkcList = ListInventoryByStockOrgId.Where(x => x.FMATERIALID == _item.FMATERIALID2 && x.FStockOrgId == _item.FStockOrgId).FirstOrDefault(); |
| | | //真正需要取计算的数量(拆分货主) |
| | | //货主匹配 |
| | | List<PRD_Inventory> _ListInventory = ListInventory.Where(c => c.FMATERIALID == _item.FMATERIALID2 && c.FStockOrgId == _item.FStockOrgId && c.FBASEQTY > 0).ToList(); |
| | | if (_ListInventory.Count > 0) |
| | | { |
| | | decimal _fLackCount = _item.PlanCount > sjkcList.FBASEQTY ? (_item.PlanCount - sjkcList.FBASEQTY) : 0;//缺料数量 |
| | | foreach (var Inventory in _ListInventory) |
| | | { |
| | | if (need == 0) |
| | | break; |
| | | decimal fCompleteCount = need >= Inventory.FBASEQTY ? Inventory.FBASEQTY : need;//齐套数量 |
| | | decimal occupyMaterial = 0; |
| | | if (!occupyDic.ContainsKey(_item.FMATERIALID2)) |
| | | { |
| | | occupyDic.Add(_item.FMATERIALID2, fCompleteCount); |
| | | } |
| | | else |
| | | { |
| | | occupyMaterial = occupyDic[_item.FMATERIALID2]; |
| | | occupyDic[_item.FMATERIALID2] = occupyMaterial + fCompleteCount; |
| | | } |
| | | completeAnalysisTempModel.Add(new Demo.Model.Model.CompleteAnalysisTempModel |
| | | { |
| | | FHMainICMOInterIDr = _item.FPRDMOMAINID, |
| | | FHMainICMOEntryID = _item.FPRDMOENTYID, |
| | | FHICMOInterID = _item.FID.ToString(), |
| | | FHICMOEntryID = _item.FEntryID.ToString(), |
| | | FHMaterID = _item.FMATERIALID2, |
| | | FHStockOrgID = _item.FStockOrgId, |
| | | FHPRDORGID = _item.FStockOrgId, |
| | | FErpClsID = _item.FErpClsID, |
| | | FPRDBillNo = _item.FMOBillNO, |
| | | FOwnerTypeId = "BD_OwnerOrg", |
| | | FOwnerId = Inventory.FOwnerId, |
| | | FUnitDosage = _item.dwyl.ToString(),//单位用量 |
| | | FSumPlanCount = _item.PlanCount.ToString(),//计划总数量 |
| | | FCompleteCount1 = fCompleteCount, //齐套数量 |
| | | FLackCount = _fLackCount,//缺料数量 |
| | | FHStockQty = sjkcList.FBASEQTY,//即时库存 |
| | | FHLeftQty = Inventory.FBASEQTY,//可用数量 |
| | | FOccupyCount = occupyMaterial,//占用数量 |
| | | /* 2021 1.26 更改为need |
| | | FComPlete = sjkcList.FBASEQTY >= _item.PlanCount ? "齐套" : "未齐套", |
| | | */ |
| | | FComPlete = sjkcList.FBASEQTY >= need ? "齐套" : "未齐套", |
| | | FPlanDate = item.FHMASTERDATE // 日计划日期 |
| | | }); |
| | | //扣减总库存数量 |
| | | sjkcList.FBASEQTY = sjkcList.FBASEQTY >= fCompleteCount ? sjkcList.FBASEQTY - fCompleteCount : 0; |
| | | //剩余日计划需求数量 |
| | | need = need >= Inventory.FBASEQTY ? need - Inventory.FBASEQTY : 0; |
| | | //扣减消耗库存 |
| | | Inventory.FBASEQTY = Inventory.FBASEQTY - fCompleteCount; |
| | | } |
| | | } |
| | | else |
| | | { |
| | | decimal occupyMaterial = 0; |
| | | if (occupyDic.ContainsKey(_item.FMATERIALID2)) |
| | | { |
| | | occupyMaterial = occupyDic[_item.FMATERIALID2]; |
| | | } |
| | | completeAnalysisTempModel.Add(new Demo.Model.Model.CompleteAnalysisTempModel |
| | | { |
| | | FHMainICMOInterIDr = _item.FPRDMOMAINID, |
| | | FHMainICMOEntryID = _item.FPRDMOENTYID, |
| | | FHICMOInterID = _item.FID.ToString(), |
| | | FHICMOEntryID = _item.FEntryID.ToString(), |
| | | FHMaterID = _item.FMATERIALID2, |
| | | FErpClsID = _item.FErpClsID, |
| | | FHStockOrgID = _item.FStockOrgId, |
| | | FHPRDORGID = _item.FStockOrgId, |
| | | FPRDBillNo = _item.FMOBillNO, |
| | | FOwnerTypeId = "BD_OwnerOrg", |
| | | FUnitDosage = _item.dwyl.ToString(),//单位用量 |
| | | FSumPlanCount = _item.PlanCount.ToString(),//计划总数量 |
| | | FCompleteCount1 = 0, //齐套数量 |
| | | FLackCount = _item.PlanCount,//缺料数量 |
| | | FHStockQty = 0,//即时库存 |
| | | FHLeftQty = 0,//可用数量 |
| | | FOccupyCount = occupyMaterial,//占用数量 |
| | | FComPlete = "未齐套", |
| | | FPlanDate = item.FHMASTERDATE // 日计划日期 |
| | | }); |
| | | } |
| | | } |
| | | //Thread.Sleep(100); |
| | | // this.View.Session["ProcessRateValue"] = Convert.ToInt32((Convert.ToDecimal(40) / DatePlanList.Count) * i); |
| | | i++; |
| | | |
| | | } |
| | | LogHelper.Info($"齐套分析,数据准备完成,保存到Model实体,总行数:{completeAnalysisTempModel.Count},耗时:" + sw.Elapsed); |
| | | List<string> sqlList = new List<string>(); |
| | | int jdtmmm = 1; |
| | | foreach (var item in completeAnalysisTempModel) |
| | | { |
| | | sql = string.Format(@" |
| | | /*dialect*/ |
| | | delete z_JIT_MOMaterReadysBill |
| | | insert into z_JIT_MOMaterReadysBill (column1) |
| | | values('') |
| | | insert into JIT_MOMaterReadysBill |
| | | (FID, FBILLNO, FDOCUMENTSTATUS, FHMAINICMOINTERIDR, FHMAINICMOENTRYID, FHICMOINTERID, FHICMOENTRYID, FHMATERID, FHSTOCKORGID, FHSTOCKQTY, FHLEFTQTY, FHPRDORGID, FUNITDOSAGE, FSUMPLANCOUNT, FPRDBILLNO, FOWNERID, FOWNERTYPEID, FIDENTIFICAT, FPLANDATE, FCOMPLETE, FLACKCOUNT, FOCCUPYCOUNT, FCOMPLETECOUNT1,FErpClsID) |
| | | select id, '', 'A', '{0}', '{1}', '{2}', '{3}', '{4}', '{5}', '{6}', '{7}', '{8}', '{9}', '{10}', '{11}', '{12}', 'BD_OwnerOrg', '','{13}','{14}','{15}','{16}','{17}',{18} from z_JIT_MOMaterReadysBill |
| | | delete z_JIT_MOMaterReadysBill |
| | | ", item.FHMainICMOInterIDr, item.FHMainICMOEntryID, item.FHICMOInterID, item.FHICMOEntryID, item.FHMaterID, item.FHStockOrgID, item.FHStockQty, item.FHLeftQty, item.FHPRDORGID, item.FUnitDosage, item.FSumPlanCount, item.FPRDBillNo, item.FOwnerId == null ? "0" : item.FOwnerId, item.FPlanDate.ToString("yyyy-MM-dd"), item.FComPlete, item.FLackCount, item.FOccupyCount, item.FCompleteCount1, item.FErpClsID); |
| | | sqlList.Add(sql); |
| | | this.View.Session["ProcessRateValue"] = Convert.ToInt32((Convert.ToDecimal(80) / completeAnalysisTempModel.Count) * jdtmmm); |
| | | jdtmmm++; |
| | | } |
| | | DBServiceHelper.ExecuteBatch(Context, sqlList); |
| | | //执行完成后 更新日计划工单状态 |
| | | DBServiceHelper.Execute(Context, @" |
| | | /*dialect*/update Sc_WorkBillSortBillSub set FComplete = '未齐套' where FEntryID IN (select distinct FHICMOEntryID from JIT_MOMaterReadysBill where isnull(FCOMPLETE,'未齐套') ='未齐套') |
| | | "); |
| | | DBServiceHelper.Execute(Context, @" |
| | | /*dialect*/update Sc_WorkBillSortBillSub set FComplete = '齐套' where FEntryID NOT IN (select distinct FHICMOEntryID from JIT_MOMaterReadysBill where isnull(FCOMPLETE,'未齐套') ='未齐套') |
| | | "); |
| | | sw.Stop();//结束计时 |
| | | LogHelper.Info("齐套分析运行总时长:" + sw.Elapsed); |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Error("齐套分析跳出:" + ex.Message.ToString()); |
| | | |
| | | } |
| | | } |
| | | //生产用料清单 齐套分析 |
| | | public string CompleteSetAnalysisByDataTable() |
| | | { |
| | |
| | | Stopwatch sw = new Stopwatch(); |
| | | sw.Start();//开始计时 |
| | | int maxFid = DBServiceHelper.ExecuteScalar<int>(Context, "select max(FID)FID FROM JIT_MOMaterReadysBill", 0); |
| | | //清空齐套临时表 |
| | | DBServiceHelper.Execute(Context, "/*dialect*/ delete JIT_MOMaterReadysBill "); |
| | | //清空齐套临时表 (关闭的订单 今天之前的数据不做删除) |
| | | DBServiceHelper.Execute(Context, @"/*dialect*/ |
| | | delete from JIT_MOMaterReadysBill |
| | | where FHICMOINTERID not in |
| | | ( |
| | | select distinct a.FID from Sc_WorkBillSortBillMain a |
| | | join Sc_WorkBillSortBillSub b on a.FID = b.FID |
| | | where DATEDIFF(D, GETDATE(), FHMASTERDATE) < 0 |
| | | or a.FDOCUMENTSTATUS in ('E') |
| | | ) "); |
| | | //更新状态 |
| | | DBServiceHelper.Execute(Context, "/*dialect*/ update Sc_WorkBillSortBillsub set FCOMPLETE='' "); |
| | | //获取当前即时库存 按照物料+库存组织+货主+库存数量 |
| | | DataSet ds = DBServiceHelper.ExecuteDataSet(Context, @" |
| | | /*dialect*/ |
| | | select isnull(a.FBASEQTY,0)-ISNULL(b.FHUseQty,0) FBASEQTY,T1.FStockOrgId,T1.FMATERIALID,a.FOWNERID,c.FNUMBER from |
| | | select isnull(a.FBASEQTY,0) FBASEQTY,T1.FStockOrgId,T1.FMATERIALID,a.FOWNERID,c.FNUMBER from |
| | | ( |
| | | select a.FHPRDORGID FStockOrgId,T2.FMATERIALID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | |
| | | group by a.FHPRDORGID,T2.FMATERIALID |
| | | ) T1 |
| | | LEFT JOIN T_STK_Inventory a on T1.FStockOrgId = a.FStockOrgId and T1.FMATERIALID =a.FMATERIALID |
| | | LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID and a.FOwnerId = b.FOwnerId |
| | | --LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID and a.FOwnerId = b.FOwnerId |
| | | LEFT join T_ORG_Organizations c on a.FOWNERID = c.FORGID |
| | | join t_BD_Stock d on a.FSTOCKID =d.FSTOCKID |
| | | where d.FAvailableComplete<>0 |
| | |
| | | //总库存 物料+库存组织+库存数量 |
| | | ds = DBServiceHelper.ExecuteDataSet(Context, @" |
| | | /*dialect*/ |
| | | select sum(isnull(a.FBASEQTY,0)-ISNULL(b.FHUseQty,0))FBASEQTY,T1.FStockOrgId,T1.FMATERIALID from |
| | | select sum(isnull(a.FBASEQTY,0))FBASEQTY,T1.FStockOrgId,T1.FMATERIALID from |
| | | ( |
| | | select a.FHPRDORGID FStockOrgId,T2.FMATERIALID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | |
| | | group by a.FHPRDORGID,T2.FMATERIALID |
| | | ) T1 |
| | | LEFT JOIN T_STK_Inventory a on T1.FStockOrgId = a.FStockOrgId and T1.FMATERIALID =a.FMATERIALID |
| | | LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID |
| | | --LEFT JOIN JIT_MOMaterReadysBill B ON T1.FStockOrgId = b.FHSTOCKORGID and T1.FMATERIALID =b.FHMATERID |
| | | join t_BD_Stock d on a.FSTOCKID =d.FSTOCKID |
| | | where d.FAvailableComplete<>0 |
| | | --where T1.FMATERIALID in (105773) |
| | |
| | | sql = @" |
| | | /*dialect*/ |
| | | select a.FPRDMOMAINID,a.FPRDMOENTYID,a.FID,b.FEntryID,a.FHPRDORGID FStockOrgId,t5.FNUMBER as OrgFnumber,a.FHOrderLev,b.FHQTY,b.FHMASTERDATE,T1.FBillNo,T1.FMOBillNO,T1.FMOEntrySeq,T1.FMoId,T1.FMaterialID,T1.FQty, |
| | | T2.FMATERIALID FMATERIALID2, T4.FNumber,T2.FNeedQty,FNeedQty/FQty dwyl,(FHQTY-ISNULL(FProductNum,0))*(FNeedQty/FQty) PlanCount,TBase.FErpClsID from SC_WORKBILLSORTBILLMAIN a |
| | | T2.FMATERIALID FMATERIALID2, T4.FNumber,T2.FNeedQty,FNeedQty/FQty dwyl,CEILING((FHQTY-ISNULL(FProductNum,0))*(FNeedQty/FQty)) PlanCount,TBase.FErpClsID from SC_WORKBILLSORTBILLMAIN a |
| | | join SC_WORKBILLSORTBILLSub b on a.FID = b.FID |
| | | join T_PRD_PPBOM T1 on a.FPRDMOMAINID = t1.FMoId and a.FPRDMOENTYID = t1.FMOENTRYID |
| | | LEFT JOIN(select FID, MAX(FENTRYID) FENTRYID, SUM(FNeedQty) FNeedQty, FMATERIALID from T_PRD_PPBOMENTRY |
| | | LEFT JOIN(select FID, MAX(FENTRYID) FENTRYID, SUM(FMUSTQTY) FNeedQty, FMATERIALID from T_PRD_PPBOMENTRY |
| | | group by FMATERIALID, FID ) T2 on T1.FID = t2.FID |
| | | --LEFT JOIN T_STK_Inventory T3 on t2.FMATERIALID = t3.FMATERIALID |
| | | JOIN T_BD_MATERIAL T4 on T2.FMATERIALID = T4.FMATERIALID |
| | | JOIN t_BD_MaterialBase TBase on T2.FMATERIALID = TBase.FMATERIALID |
| | | JOIN T_ORG_Organizations t5 on a.FHPRDORGID = t5.FORGID |
| | | --条件为今天往后的日计划 + 今天之前未关闭的日计划 |
| | | where (FHEntryCloseDate is null and DATEDIFF(D,GETDATE(),FHMASTERDATE)<0)or DATEDIFF(D,GETDATE(),FHMASTERDATE)>=0 |
| | | where |
| | | --(FHEntryCloseDate is null and DATEDIFF(D,GETDATE(),FHMASTERDATE)<0)or |
| | | DATEDIFF(D,GETDATE(),FHMASTERDATE)>=0 |
| | | and a.FDOCUMENTSTATUS not in ('E') |
| | | and b.FHQTY>0 |
| | | ORDER BY b.FHMASTERDATE,a.FHOrderLev |
| | | "; |
| | |
| | | LogHelper.Info("齐套分析准备数据完成:" + sw.Elapsed); |
| | | foreach (var item in DatePlanList) |
| | | { |
| | | //LogHelper.Info("齐套分析第一个循环 : 工单号 :" + item.FPRDMOENTYID.ToString() + item.FHMASTERDATE.ToString("yyyy-MM-dd")); |
| | | //筛选出当日计划数据 |
| | | var _BomList = BomList.Where(x => x.FHMASTERDATE == item.FHMASTERDATE && x.FPRDMOENTYID == item.FPRDMOENTYID).ToList(); |
| | | foreach (var _item in _BomList) |
| | |
| | | --条件为今天往后的日计划 + 今天之前未关闭的日计划 |
| | | where (FHEntryCloseDate is null and DATEDIFF(D,GETDATE(),FHMASTERDATE)<0)or DATEDIFF(D,GETDATE(),FHMASTERDATE)>=0 |
| | | and b.FHQTY>0 |
| | | and a.FDOCUMENTSTATUS not in ('E') |
| | | ORDER BY b.FHMASTERDATE,a.FHOrderLev |
| | | "; |
| | | ds = DBServiceHelper.ExecuteDataSet(Context, sql); |
| | | List<PRD_PPBOM> BomList = ds.ToModelList<PRD_PPBOM>(); |
| | | //日计划+生产订单子表编码ID |
| | | //日计划日期+生产订单子表编码ID |
| | | var DatePlanList = BomList.GroupBy(p => new { p.FHMASTERDATE, p.FPRDMOENTYID }).Select(x => new PRD_PPBOM { FHMASTERDATE = x.Key.FHMASTERDATE, FPRDMOENTYID = x.Key.FPRDMOENTYID }).ToList(); |
| | | //CompleteAnalysisTempModel 用于存储临时需要插入数据 |
| | | List<CompleteAnalysisTempModel> completeAnalysisTempModel = new List<CompleteAnalysisTempModel>(); |
| | |
| | | /// </summary> |
| | | public void SearchList() |
| | | { |
| | | string sqlwhere = " where 1=1"; |
| | | string sqlwhere = " and 1=1"; |
| | | if ((this.Model.GetValue("FProWorkShopId") as DynamicObject) != null) |
| | | { |
| | | string FProWorkShopId = (this.Model.GetValue("FProWorkShopId") as DynamicObject)["Id"].ToString(); |
| | |
| | | sqlwhere += $" and t3.FNumber='{FMatralId}'"; |
| | | } |
| | | //编制日期 |
| | | string FPreparatDate = Convert.ToString((this.Model.GetValue("FPreparatDate"))); |
| | | if (!string.IsNullOrEmpty(FPreparatDate)) |
| | | sqlwhere += $" and FPreparatDate='{FPreparatDate}'"; |
| | | string FBeginPreparatDate = Convert.ToString((this.Model.GetValue("FBrginPreparatDate"))); |
| | | if (!string.IsNullOrEmpty(FBeginPreparatDate)) |
| | | sqlwhere += $" and FPreparatDate>='{FBeginPreparatDate}'"; |
| | | |
| | | //编制日期 |
| | | string FEndPreparatDate = Convert.ToString((this.Model.GetValue("FEndPreparatDate"))); |
| | | if (!string.IsNullOrEmpty(FEndPreparatDate)) |
| | | sqlwhere += $" and FPreparatDate<='{FEndPreparatDate}'"; |
| | | try |
| | | { |
| | | string sql = @"/*dialect*/ select t1.*,isnull((select SUM(isnull(FNotProductNum,0)) from SC_WORKBILLSORTBILLSub t2 where t2.FID = t1.FID and DATEDIFF(D,FHMASTERDATE,GETDATE())>0),0)FNotProductNum ,isnull((select SUM(isnull(FHQTY,0)) from SC_WORKBILLSORTBILLSub t2 where t2.FID = t1.FID and DATEDIFF(D,FHMASTERDATE,GETDATE())>0),0)FQTYLS |
| | | from Sc_WorkBillSortBillMain t1 |
| | | left join T_BD_MATERIAL t3 on t1.FHMaterID=t3.FMATERIALID |
| | | where t1.FDOCUMENTSTATUS not in ('E') |
| | | " + sqlwhere; |
| | | DataTable dt = DBServiceHelper.ExecuteDataSet(Context, sql).Tables[0]; |
| | | DateTime DateNow = DateTime.Now;//获取当前日期 |
| | |
| | | this.Model.SetValue("FOrderLevel", dt.Rows[i]["FHOrderLev"].ToString(), i);//订单等级 |
| | | this.Model.SetValue("FSCOrderNo", dt.Rows[i]["FSCOrderNo"].ToString(), i);//生产订单号 |
| | | this.Model.SetValue("FSalOrderNo", dt.Rows[i]["FHSEORDERBILLNO"].ToString(), i);//销售订单号 |
| | | this.Model.SetValue("FBzDate", dt.Rows[i]["FPreparatDate"].ToString(), i);//编制日期 |
| | | this.Model.SetValue("FBzDate", dt.Rows[i]["FPreparatDate"].ToString(), i);//预计开工日期 |
| | | this.Model.SetValue("FProOrderCount", dt.Rows[i]["FHOrderNeedQty"].ToString(), i);//生产订单数量 |
| | | this.Model.SetValue("FHMainSourceInterID", dt.Rows[i]["FPRDMOMAINID"].ToString(), i);//源单主内码FHMainSourceInterID |
| | | this.Model.SetValue("FHMainSourceEntryID", dt.Rows[i]["FPRDMOENTYID"].ToString(), i);//源单子内码FHMainSourceEntryID |
| | |
| | | /// </summary> |
| | | public void SearchListEdit() |
| | | { |
| | | string sqlwhere = " where 1=1"; |
| | | string sqlwhere = " and 1=1"; |
| | | |
| | | if ((this.Model.GetValue("FProWorkShopId") as DynamicObject) != null) |
| | | { |
| | |
| | | string FScOrderMainNo = Convert.ToString((this.Model.GetValue("FScOrderMainNo"))); |
| | | if (!string.IsNullOrEmpty(FScOrderMainNo)) |
| | | sqlwhere += $" and FSCORDERNO like '%{FScOrderMainNo}%'"; |
| | | |
| | | //物料 |
| | | if ((this.Model.GetValue("FMatralId") as DynamicObject) != null) |
| | | { |
| | |
| | | if (!string.IsNullOrEmpty(FMatralId)) |
| | | sqlwhere += $" and t3.FNumber='{FMatralId}'"; |
| | | } |
| | | //编制日期 |
| | | string FPreparatDate = Convert.ToString((this.Model.GetValue("FPreparatDate"))); |
| | | if (!string.IsNullOrEmpty(FPreparatDate)) |
| | | sqlwhere += $" and FPreparatDate='{FPreparatDate}'"; |
| | | //编制日期开始 |
| | | string FBeginPreparatDate = Convert.ToString((this.Model.GetValue("FBrginPreparatDate"))); |
| | | if (!string.IsNullOrEmpty(FBeginPreparatDate)) |
| | | sqlwhere += $" and FPreparatDate>='{FBeginPreparatDate}'"; |
| | | //编制日期结束 |
| | | string FEndPreparatDate = Convert.ToString((this.Model.GetValue("FEndPreparatDate"))); |
| | | if (!string.IsNullOrEmpty(FEndPreparatDate)) |
| | | sqlwhere += $" and FPreparatDate<='{FEndPreparatDate}'"; |
| | | try |
| | | { |
| | | string sql = @"/*dialect*/ select t1.*,isnull((select SUM(isnull(FNotProductNum,0)) from SC_WORKBILLSORTBILLSub t2 where t2.FID = t1.FID and DATEDIFF(D,FHMASTERDATE,GETDATE())>0),0)FNotProductNum ,isnull((select SUM(isnull(FHQTY,0)) from SC_WORKBILLSORTBILLSub t2 where t2.FID = t1.FID and DATEDIFF(D,FHMASTERDATE,GETDATE())>0),0)FQTYLS |
| | | from Sc_WorkBillSortBillMain t1 |
| | | left join T_BD_MATERIAL t3 on t1.FHMaterID=t3.FMATERIALID |
| | | where t1.FDOCUMENTSTATUS not in ('E') |
| | | " + sqlwhere; |
| | | DataTable dt = DBServiceHelper.ExecuteDataSet(Context, sql).Tables[0]; |
| | | DateTime DateNow = DateTime.Now;//获取当前日期 |
| | |
| | | this.Model.SetValue("FOrderLevel", dt.Rows[i]["FHOrderLev"].ToString(), i);//订单等级 |
| | | this.Model.SetValue("FSCOrderNo", dt.Rows[i]["FSCOrderNo"].ToString(), i);//生产订单号 |
| | | this.Model.SetValue("FSalOrderNo", dt.Rows[i]["FHSEORDERBILLNO"].ToString(), i);//销售订单号 |
| | | this.Model.SetValue("FBzDate", dt.Rows[i]["FPreparatDate"].ToString(), i);//编制日期 |
| | | this.Model.SetValue("FBzDate", dt.Rows[i]["FPreparatDate"].ToString(), i);//预计开工日期 |
| | | this.Model.SetValue("FProOrderCount", dt.Rows[i]["FHOrderNeedQty"].ToString(), i);//生产订单数量 |
| | | this.Model.SetValue("FHMainSourceInterID", dt.Rows[i]["FPRDMOMAINID"].ToString(), i);//源单主内码FHMainSourceInterID |
| | | this.Model.SetValue("FHMainSourceEntryID", dt.Rows[i]["FPRDMOENTYID"].ToString(), i);//源单子内码FHMainSourceEntryID |
| | |
| | | //this.View.ShowMessage("操作成功"); |
| | | } |
| | | |
| | | public string DayPlanPPBomBillBatch() |
| | | { |
| | | try |
| | | { |
| | | DataTable dt = DBServiceHelper.ExecuteDataSet(Context, $"select FID from Sc_DayPlanPPBomBillMain where FDOCUMENTSTATUS <>'E'").Tables[0]; |
| | | List<string> zxSqlList = new List<string>(); |
| | | if (dt.Rows.Count > 0) |
| | | { |
| | | foreach (DataRow dr in dt.Rows) |
| | | { |
| | | zxSqlList.Add(string.Format(@"/*dialect*/ |
| | | INSERT INTO Z_SC_TLPLANZXJH (COLUMN1) VALUES ('{0}') |
| | | SELECT * FROM Z_SC_TLPLANZXJH |
| | | INSERT INTO SC_TLPLANZXJH(FID, FDAYPLANID, FCREATEDATE) SELECT *, GETDATE() FROM Z_SC_TLPLANZXJH |
| | | DELETE FROM Z_SC_TLPLANZXJH |
| | | SELECT * FROM SC_TLPLANZXJH", dr["FID"])); |
| | | } |
| | | } |
| | | DBServiceHelper.ExecuteBatch(Context, zxSqlList); |
| | | return "操作成功"; |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Error(ex.Message); |
| | | return "操作失败,请联系系统管理员"; |
| | | } |
| | | |
| | | } |
| | | /// <summary> |
| | | /// 日计划用料清单生成 |
| | | /// </summary> |
| | | public string DayPlanPPBomBillBatch() |
| | | public string DayPlanPPBomBillBatch1() |
| | | { |
| | | //LogService.WriteAsync(entrys); |
| | | //查找到的同批项次 |
| | |
| | | -- select FDayPlanFID FROM Sc_DayPlanPPBomBillMain WHERE FID IN ( select distinct FID from Sc_DayPlanPPBomBillSub WHERE FTranslateQty >0 or FPickedQty >0) |
| | | -- ) |
| | | ", |
| | | sqlWhere, day); |
| | | sqlWhere, day); |
| | | LogHelper.Info("生成日计划用料清单准备数据sql:" + sql); |
| | | DataSet ds = DBServiceHelper.ExecuteDataSet(Context, sql); |
| | | DataTable dt = ds.Tables[0]; |
| | |
| | | } |
| | | } |
| | | |
| | | //生产计划平台选单 生产订单数据 |
| | | public void SelectMenu() |
| | | { |
| | | //获取单据体信息 |
| | | Entity entity = this.View.BillBusinessInfo.GetEntity("FEntity"); |
| | | //单据体信息转换为列表集合 |
| | | DynamicObjectCollection entityDataObjoct = this.View.Model.GetEntityDataObject(entity); |
| | | int Fseq = entityDataObjoct.Count(); |
| | | |
| | | string pageId = Guid.NewGuid().ToString(); |
| | | ListShowParameter showParameter = new ListShowParameter(); |
| | | showParameter.FormId = "PRD_MO"; |
| | | showParameter.PageId = pageId; |
| | | showParameter.UseOrgId = this.Context.CurrentOrganizationInfo.ID; |
| | | showParameter.IsLookUp = true; |
| | | this.View.ShowForm(showParameter); |
| | | |
| | | this.View.ShowForm(showParameter, delegate (FormResult result) |
| | | try |
| | | { |
| | | object returnData = result.ReturnData; |
| | | if (returnData is ListSelectedRowCollection) |
| | | //获取单据体信息 |
| | | Entity entity = this.View.BillBusinessInfo.GetEntity("FEntity"); |
| | | //单据体信息转换为列表集合 |
| | | DynamicObjectCollection entityDataObjoct = this.View.Model.GetEntityDataObject(entity); |
| | | int Fseq = entityDataObjoct.Count(); |
| | | string pageId = Guid.NewGuid().ToString(); |
| | | ListShowParameter showParameter = new ListShowParameter(); |
| | | showParameter.FormId = "PRD_MO"; |
| | | showParameter.PageId = pageId; |
| | | showParameter.UseOrgId = this.Context.CurrentOrganizationInfo.ID; |
| | | showParameter.IsLookUp = true; |
| | | this.View.ShowForm(showParameter, delegate (FormResult result) |
| | | { |
| | | ListSelectedRowCollection listSelectedRowCollection = returnData as ListSelectedRowCollection; |
| | | if (listSelectedRowCollection != null) |
| | | object returnData = result.ReturnData; |
| | | if (returnData is ListSelectedRowCollection) |
| | | { |
| | | foreach (var listSelectedRow in listSelectedRowCollection) |
| | | ListSelectedRowCollection listSelectedRowCollection = returnData as ListSelectedRowCollection; |
| | | LogHelper.Info("生产计划平台选单 行数" + listSelectedRowCollection.Count().ToString()); |
| | | if (listSelectedRowCollection != null) |
| | | { |
| | | string sql = $"select DATEDIFF(d,FPlanStartDate,getdate())days from T_PRD_MOENTRY where FENTRYID = {listSelectedRow.DataRow["t1_FENTRYID"].ToString()}"; |
| | | int day = DBServiceHelper.ExecuteScalar<int>(Context, sql, 0); |
| | | this.Model.CreateNewEntryRow("FEntity"); |
| | | this.View.Model.SetItemValueByNumber("FORGID", "100", Fseq); |
| | | this.View.Model.SetValue("FSCOrderNo", listSelectedRow.DataRow["FBillNo"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FSRCBILLENTRYSEQ", listSelectedRow.DataRow["t1_FSeq"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FMatrailId", listSelectedRow.DataRow["FMaterialId_Id"].ToString(), Fseq);//2129900005 |
| | | this.View.Model.SetValue("FFUnit", listSelectedRow.DataRow["FUnitId_Id"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FOrderQuantity", listSelectedRow.DataRow["FQty"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FProductWorkShopId", listSelectedRow.DataRow["FWorkShopID_Id"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FOrderLevel", "3", Fseq); |
| | | this.View.Model.SetValue("FT" + day.ToString(), listSelectedRow.DataRow["FQty"].ToString(), Fseq); |
| | | Fseq++; |
| | | var ret = ""; |
| | | foreach (var listSelectedRow in listSelectedRowCollection) |
| | | { |
| | | if (entityDataObjoct.Where(x => x["FSRCBILLENTRYSEQ"].ToString() == listSelectedRow.DataRow["t1_FSeq"].ToString() && x["FSCOrderNo"].ToString() == listSelectedRow.DataRow["FBillNo"].ToString()).Count() > 0) |
| | | { |
| | | LogHelper.Info("生产计划平台选单:" + listSelectedRow.DataRow["FBillNo"].ToString() + ", 行号," + listSelectedRow.DataRow["t1_FSeq"].ToString() + ",已选"); |
| | | ret += "生产订单号:" + listSelectedRow.DataRow["FBillNo"].ToString() + ", 行号," + listSelectedRow.DataRow["t1_FSeq"].ToString() + ",已选" + "\n"; |
| | | continue; |
| | | } |
| | | //今天以前的数据是显示不出来的 |
| | | string sql = $"select DATEDIFF(d,getdate(),FPlanStartDate)days from T_PRD_MOENTRY where FENTRYID = {listSelectedRow.DataRow["t1_FENTRYID"].ToString()}"; |
| | | int day = DBServiceHelper.ExecuteScalar<int>(Context, sql, 0); |
| | | if (day < 0) |
| | | { |
| | | LogHelper.Info("生产计划平台选单:日期太靠后," + listSelectedRow.DataRow["FBillNo"].ToString() + ", 行号, " + listSelectedRow.DataRow["t1_FSeq"].ToString() + ", day= " + day.ToString()); |
| | | ret += "计划开工日期在今天之前,生产订单号:" + listSelectedRow.DataRow["FBillNo"].ToString() + ", 行号," + listSelectedRow.DataRow["t1_FSeq"].ToString() + "\n"; |
| | | continue; |
| | | } |
| | | this.Model.CreateNewEntryRow("FEntity"); |
| | | this.View.Model.SetItemValueByNumber("FORGID", "100", Fseq); |
| | | this.View.Model.SetValue("FSCOrderNo", listSelectedRow.DataRow["FBillNo"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FSRCBILLENTRYSEQ", listSelectedRow.DataRow["t1_FSeq"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FMatrailId", listSelectedRow.DataRow["FMaterialId_Id"].ToString(), Fseq);//2129900005 |
| | | this.View.Model.SetValue("FFUnit", listSelectedRow.DataRow["FUnitId_Id"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FOrderQuantity", listSelectedRow.DataRow["FQty"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FProductWorkShopId", listSelectedRow.DataRow["FWorkShopID_Id"].ToString(), Fseq); |
| | | this.View.Model.SetValue("FOrderLevel", "3", Fseq); |
| | | this.View.Model.SetValue("FBzDate", DateTime.Now.AddDays(day).ToShortDateString(), Fseq);//预计开工日期 |
| | | this.View.Model.SetValue("FT" + day.ToString(), listSelectedRow.DataRow["FQty"].ToString(), Fseq); |
| | | Fseq++; |
| | | } |
| | | if (ret != "") |
| | | { |
| | | this.View.ShowMessage(ret); |
| | | } |
| | | } |
| | | } |
| | | } |
| | | }); |
| | | }); |
| | | } |
| | | catch (Exception ex) |
| | | { |
| | | LogHelper.Error("选单失败:" + ex.Message); |
| | | } |
| | | } |
| | | } |
| | | } |
| | | |
| | | |
| | | //tbReleaseReserve |