生产计划排程 页面加载 排程按钮功能

王 垚

2021-04-02 4476cab7907ced549b116987362ef0c895a18030

生产计划排程
页面加载 排程按钮功能

 src/BLL/Demo.BillView/Demo.BillView.csproj

@@ -214,6 +214,8 @@
    <Compile Include="PRD\LogService.cs" />
    <Compile Include="PRD\PODemandPlanListFilter.cs" />
    <Compile Include="PRD\PODemandPlanListLoad.cs" />
    <Compile Include="PRD\ProductScheduleButtonClick.cs" />
    <Compile Include="PRD\ProductScheduleShowList.cs" />
    <Compile Include="PRD\ProTardinessDetails.cs" />
    <Compile Include="PRD\ProCompleteAnalysisMateriel.cs" />
    <Compile Include="PRD\ProCompleteAnalysisDetails.cs" />

 src/BLL/Demo.BillView/PRD/ProductScheduleButtonClick.cs

New file
@@ -0,0 +1,297 @@
using Kingdee.BOS.Core.DynamicForm;
using Kingdee.BOS.Core.DynamicForm.PlugIn;
using Kingdee.BOS.Orm.DataEntity;
using Kingdee.BOS.Util;
using System;
using System.ComponentModel;
using System.Data;
using Kingdee.BOS.ServiceHelper;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.Metadata.EntityElement;
using Kingdee.BOS.Core.DynamicForm.PlugIn.ControlModel;
using ZD.Cloud.Logger;
using Demo.Model.Model;
using System.Collections.Generic;
using ZD.Share.Common;
using System.Linq;
using Newtonsoft.Json.Linq;
using ZD.Cloud.WebApi;

namespace Demo.BillView
{
    [Description("生产排程单动态表单-按钮点击事件")]
    [HotUpdate]
    public class ProductScheduleButtonClick : AbstractDynamicFormPlugIn
    {
        public List<ENG_WORKCALFULLDATA> ENG_WORKCALFULLDATA = new List<ENG_WORKCALFULLDATA>();
        /// <summary>
        /// 页面按钮点击事件
        /// </summary>
        /// <param name="e"></param>
        public override void ButtonClick(ButtonClickEventArgs e)
        {
            base.OnLoad(e);
            try
            {
                //选择
                if (e.Key.ToUpper().Equals("FCHOICEBUTTONSC"))
                {
                    ShowFDprwEntity();
                }
                //生产订单      查询
                if (e.Key.ToUpper().Equals("FSEARCHBUTTONSC"))
                {
                    this.View.ShowErrMessage("生产订单嘿嘿!");
                }
            }
            catch (Exception ex)
            {
                LogHelper.Error("生产排程单动态表单-Button按钮点击事件 抛出异常：" + ex.Message.ToString());
                this.View.ShowErrMessage(ex.Message.ToString());

            }
        }
        public override void BarItemClick(BarItemClickEventArgs e)
        {
            base.OnLoad(e);
            try
            {
                //排程
                if (e.BarItemKey.ToUpper().Equals("TBPC"))
                {
                    ProductSchedul();
                }
            }
            catch (Exception ex)
            {
                LogHelper.Error("生产排程单动态表单-BarItem按钮点击事件 抛出异常：" + ex.Message.ToString());
                this.View.ShowErrMessage(ex.Message.ToString());
            }
        }

        /// <summary>
        /// 生产订单数据推到待排任务栏
        /// </summary>
        public void ShowFDprwEntity()
        {
            Entity entity = this.View.BillBusinessInfo.GetEntity("FScddEntity");
            //单据体信息转换为列表集合
            DynamicObjectCollection entityDataObjoct = this.View.Model.GetEntityDataObject(entity);
            int FChose = 0;
            foreach (DynamicObject current in entityDataObjoct)
            {
                if (Convert.ToBoolean(current["FChose"]))
                    FChose++;
            }
            if (FChose == 0)
            {
                this.View.ShowErrMessage("请选择需要待排的生产订单数据！");
                return;
            }
            int i = this.View.Model.GetEntryRowCount("FDprwEntity");
            foreach (DynamicObject current in entityDataObjoct)
            {
                if (!Convert.ToBoolean(current["FChose"]))
                    continue;
                this.Model.CreateNewEntryRow("FDprwEntity");
                // this.Model.SetValue("FSEQ", i + 1, i);//序号
                this.Model.SetValue("FProOrderNo", Convert.ToString(current["FProOrderNoSC"]), i);//生产订单号  
                this.Model.SetValue("FSRCBILLENTRYSEQ", Convert.ToString(current["FSRCBILLENTRYSEQSC"]), i);//生产订单明细号  
                this.Model.SetValue("FMATERIALID", Convert.ToString(current["FMATERIALIDSC_ID"]), i);//物料
                this.Model.SetValue("FSCOrderCount", Convert.ToString(current["FSCOrderCountSC"]), i);//生产订单数
                this.Model.SetValue("FPlanBeginDate", Convert.ToString(current["FPlanBeginDateSC"]), i);//计划开工日期
                this.Model.SetValue("FPlanEndDate", Convert.ToString(current["FPlanEndDateSC"]), i);//计划完工日期  
                this.Model.SetValue("FSalOrderNo", Convert.ToString(current["FSalOrderNoSC"]), i);//销售订单号  
                this.Model.SetValue("FCustormer", Convert.ToString(current["FCustormerSC"]), i);//客户  
                this.Model.SetValue("FSalOrderCount", Convert.ToString(current["FSalOrderCountSC"]), i);//销售订单数量  
                this.Model.SetValue("FSalDeliveryDate", Convert.ToString(current["FSalDeliveryDateSC"]), i);//销售订单交货期  
                this.Model.SetValue("FOrderRemake", Convert.ToString(current["FOrderRemakeSC"]), i);//订单备注  
                i++;
            }
        }

        /// <summary>
        /// 产能计算
        /// </summary>
        public void Jscn()
        {
            //查询出重复生产线对应的工作日历信息
            string _sql = @"
select FCalUserId,FCalUserType,FShiftId,FIsWorkTime,FDay,FDateStyle,c.FALLHOURS,b.FENTRYID from T_ENG_WORKCAL a
left join  T_ENG_WORKCALFULLDATA b on a.FID=b.FID
left join T_ENG_SHIFT c on b.FShiftId =c.FID
where FDateStyle = 1 and FIsWorkTime = 1
and FCalUserType ='ENG_RepetitiveProductLine'
--条件为 工作日+是否生产 == 1 ";
            ENG_WORKCALFULLDATA = DBServiceHelper.ExecuteDataSet(Context, _sql).ToModelList<ENG_WORKCALFULLDATA>();

            var list = new List<object>();
            Entity entity = this.View.BillBusinessInfo.GetEntity("FDprwEntity");
            //单据体信息转换为列表集合
            DynamicObjectCollection entityDataObjoct = this.View.Model.GetEntityDataObject(entity);
            var groups = entityDataObjoct.GroupBy(x => x["FSczy_Id"]);//生产资源分组（计算优先级）
            foreach (var group in groups)
            {
                var orders = group.OrderBy(x => Convert.ToDateTime(x["FPlanEndDate"]));//计划完工日期排序
                var seq = 1;
                foreach (var order in orders)
                {
                    //计算产能
                    decimal FCapacity = Convert.ToDecimal(order["FCapacity"]);//小时产能
                    decimal FSCOrderCount = Convert.ToDecimal(order["FSCOrderCount"]);//生产订单数
                    List<ENG_WORKCALFULLDATA> finalyResult = new List<ENG_WORKCALFULLDATA>();
                    decimal dayFCapacity = 0;//日产量
                    List<ENG_WORKCALFULLDATA> _ENG_WORKCALFULLDATA = ENG_WORKCALFULLDATA.Where(x => x.FALLHOURS > 0 && x.FCalUserId == Convert.ToInt32(order["FSczy_Id"])).ToList();
                    foreach (var item in _ENG_WORKCALFULLDATA)
                    {
                        if (FSCOrderCount == 0)
                            break;
                        dayFCapacity = FCapacity * item.FALLHOURS;
                        decimal fqty = dayFCapacity > FSCOrderCount ? FSCOrderCount : dayFCapacity;
                        finalyResult.Add(new Demo.Model.Model.ENG_WORKCALFULLDATA
                        {
                            FDay = item.FDay,
                            FQTY = fqty
                        }); ;
                        //当日产量大于剩余生产订单数量时 按小时产量去计算需要时间 list<>去扣除相应的工时
                        if (dayFCapacity > FSCOrderCount)
                        {
                            //改变list中某个元素值
                            var model = ENG_WORKCALFULLDATA.Where(c => c.FENTRYID == item.FENTRYID).FirstOrDefault();
                            model.FALLHOURS -= Math.Ceiling(fqty / FCapacity);

                        }
                        else
                        {
                            var model = ENG_WORKCALFULLDATA.Where(c => c.FENTRYID == item.FENTRYID).FirstOrDefault();
                            model.FALLHOURS = 0;
                        }
                        FSCOrderCount = FSCOrderCount - fqty;
                    }

                    //continue;

                    //根据生产订单号和物料查询是否存在明细 +生产订单明细行号
                    string sql = string.Format(@"
/*dialect*/
SELECT T1.FBILLNO,T2.*,t3.FNUMBER as FUnitNumber FROM T_PRD_MO T1
 LEFT JOIN T_PRD_MOENTRY T2 ON T1.FID = T2.FID
 join T_BD_UNIT t3 on t2.FUNITID=t3.FUNITID 
 WHERE T1.FBILLNO = '{0}'  AND T2.FMATERIALID = '{1}' AND T2.FSEQ = '{2}'", Convert.ToString(order["FProOrderNo"]), Convert.ToString(order["FMATERIALID_Id"]), Convert.ToString(order["FSRCBILLENTRYSEQ"]));
                    DataTable dt = DBServiceHelper.ExecuteDataSet(Context, sql).Tables[0];
                    string FID = "";//FID 源单主内码
                    string FENTRYID = "";//FENTRYID 源单子内码
                    string FLOT = "";//FLOT  批次
                    string FQTY = "";//FQTY 生产订单数量
                    string FBILLNO = "";//FBILLNO 原单号 
                    string FHUnitID = "";//单位
                    if (dt.Rows.Count > 0)
                    {
                        FID = dt.Rows[0]["FID"].ToString();
                        FENTRYID = dt.Rows[0]["FENTRYID"].ToString();
                        FLOT = dt.Rows[0]["FLOT"].ToString();
                        FQTY = dt.Rows[0]["FQTY"].ToString();
                        FBILLNO = dt.Rows[0]["FBILLNO"].ToString();
                        FHUnitID = dt.Rows[0]["FUnitNumber"].ToString();
                    }

                    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("FPreparatDate", DateTime.Now.ToString());//编制日期
                    jsonModel.Add("FSRCBILLENTRYSEQ", Convert.ToString(order["FSRCBILLENTRYSEQ"]));//生产订单明细行号
                    jsonModel.Add("FSCOrderNo", Convert.ToString(order["FProOrderNo"])); //生产订单号FSCOrderNo
                    jsonModel.Add("FHSeOrderBillNo", Convert.ToString(order["FSalOrderNo"]));//销售订单号
                    //jsonModel.Add("FHOrderLev", order["FOrderLevel"].ToString());//订单等级
                    jsonModel.Add("FHOrderQty", Convert.ToString(order["FSalOrderCount"]));//销售订单数量
                    //jsonModel.Add("FHOrderCommitDate", Convert.ToString(order["FDeliveryDate"]));//交货期HOrderCommitDate
                    jsonModel.Add("FHOrderNeedQty", FQTY);// 订单需求数量
                    jsonModel.Add("FPrdBillNo", FBILLNO); ;//源单编号
                    jsonModel.Add("FPRDMOMAINID", FID); ;//源单主内码
                    jsonModel.Add("FPRDMOENTYID", FENTRYID); ;//源单子内码
                    jsonModel.Add("FOrderQuantity", Convert.ToString(order["FSCOrderCount"])); ;//生产订单数量
                    //jsonModel.Add("FDayPlanQuantity", Convert.ToString(order["FDayPlanQuantity"])); ;//日计划数量
                    //jsonModel.Add("FNoScheduled", Convert.ToString(order["FNoScheduled"])); ;//未排数量
                    jsonModel.Add("FHMaterID", new JObject() { ["Fnumber"] = Convert.ToString(((order["FMATERIALID"]) as DynamicObject)?["Number"].ToString()) });//物料
                    jsonModel.Add("FHSourceID", new JObject() { ["Fnumber"] = Convert.ToString(((order["FSczy"]) as DynamicObject)?["Number"].ToString()) });//生产资源
                    jsonModel.Add("FHWorkQty", Convert.ToString(order["FCapacity"])); ;//产能
                    jsonModel.Add("FHYX", Convert.ToString(order["FPriority"])); ;//优先级
                    if (Convert.ToInt32(order["FID"]) > 0)
                        jsonModel.Add("FID", Convert.ToString(order["FID"])); ;//日计划工单ID
                    JArray Entry = new JArray();
                    foreach (var finaly in finalyResult)
                    {
                        JObject jsonFPOOrderEntry = new JObject();
                        jsonFPOOrderEntry.Add("FHMasterDate", finaly.FDay); ;//主日期
                        jsonFPOOrderEntry.Add("FHQty ", finaly.FQTY); ;//日计划数量
                        Entry.Add(jsonFPOOrderEntry);
                    }
                    jsonModel.Add("FEntity", Entry);
                    jsonRoot.Add("Model", jsonModel);
                    CloudClient cloudClient = new CloudClient("http://localhost//k3cloud/");
                    var result = cloudClient.Save("Paez_Sc_WorkBillAutoSortBill", jsonRoot.ToString());
                    JObject saveObj = JObject.Parse(result);
                    string saveIsSuc = saveObj["Result"]["ResponseStatus"]["IsSuccess"].ToString().ToUpper();
                    if (saveIsSuc != "TRUE")
                    {
                        LogHelper.Error(jsonRoot.ToString());
                        this.View.ShowErrMessage(jsonRoot.ToString());
                    }
                }
            }
        }
        /// <summary>
        /// 排程 按钮点击事件
        /// 按照优先级排产 日产量=小时产量*工作时长 
        /// </summary>
        public void ProductSchedul()
        {
            try
            {
                //查询出重复生产线对应的工作日历信息
                string sql = @"
select FCalUserId,FCalUserType,FShiftId,FIsWorkTime,FDay,FDateStyle,c.FALLHOURS,b.FENTRYID from T_ENG_WORKCAL a
left join  T_ENG_WORKCALFULLDATA b on a.FID=b.FID
left join T_ENG_SHIFT c on b.FShiftId =c.FID
where FDateStyle = 1 and FIsWorkTime = 1
and FCalUserType ='ENG_RepetitiveProductLine'
--条件为 工作日+是否生产 == 1 ";
                ENG_WORKCALFULLDATA = DBServiceHelper.ExecuteDataSet(Context, sql).ToModelList<ENG_WORKCALFULLDATA>();

                Entity entity = this.View.BillBusinessInfo.GetEntity("FDprwEntity");
                //单据体信息转换为列表集合
                DynamicObjectCollection entityDataObjoct = this.View.Model.GetEntityDataObject(entity);

                string result = "";
                foreach (DynamicObject current in entityDataObjoct)
                {
                    if (Convert.ToInt32(current["FSczy_Id"]) == 0)
                        result += "行号：" + Convert.ToString(current["Seq"]) + ",生产资源为空;";
                    if (Convert.ToInt32(current["FCapacity"]) == 0)
                        result += "行号：" + Convert.ToString(current["Seq"]) + ",小时产能为空;";

                }
                if (result.Length > 0)
                {
                    this.View.ShowErrMessage("请检查数据，存在生产资源为空的单据：" + result);
                    return;
                }

                Jscn();
                this.View.ShowMessage("操作成功");
            }
            catch (Exception ex)
            {
                LogHelper.Error("生产排程单动态表单 排程按钮点击功能" + ex.Message.ToString());
            }
        }

    }
}


 src/BLL/Demo.BillView/PRD/ProductScheduleShowList.cs

New file
@@ -0,0 +1,92 @@
using Kingdee.BOS.Core.DynamicForm;
using Kingdee.BOS.Core.DynamicForm.PlugIn;
using Kingdee.BOS.Orm.DataEntity;
using Kingdee.BOS.Util;
using System;
using System.ComponentModel;
using System.Data;
using Kingdee.BOS.ServiceHelper;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.Metadata.EntityElement;
using Kingdee.BOS.Core.DynamicForm.PlugIn.ControlModel;
using ZD.Cloud.Logger;

namespace Demo.BillView
{
    [Description("生产排程单动态表单-页面展示")]
    [HotUpdate]
    public class ProductScheduleShowList : AbstractDynamicFormPlugIn
    {
        public override void OnLoad(EventArgs e)
        {
            try
            {
                base.OnLoad(e);
                //界面下方“生产订单”的页签，加载未排程已审核的生产订单 (测试未加条件 更改后去除该标记)
                string sql = @"
SELECT A.FBILLNO,B.FSEQ,B.FMATERIALID,B.FQTY,B.FPlanStartDate,b.FPlanFinishDate,b.FSaleOrderNo,c.FCustId,d.FQTY as FQTYXSDD ,d.FNOTE,d.FPLANDELIVERYDATE,e.FSCOrderNo
FROM T_PRD_MO a
LEFT JOIN T_PRD_MOENTRY b on a.FID = B.FID
left join T_SAL_ORDER c on b.FSaleOrderNo =c.FBILLNO
left join T_SAL_ORDERENTRY d on c.FID = d.FID and b.FMATERIALID = d.FMATERIALID
left join Sc_WorkBillSortBillMain e on b.FMATERIALID = e.FHMaterID and b.FSEQ = e.FSRCBILLENTRYSEQ and a.FBILLNO = e.FSCOrderNo
where ISNULL(e.FSCOrderNo,'')=''";
                DataTable dt = DBServiceHelper.ExecuteDataSet(this.Context, sql).Tables[0];
                if (dt.Rows.Count > 0)
                {
                    for (int i = 0; i < dt.Rows.Count; i++)
                    {
                        this.Model.CreateNewEntryRow("FScddEntity");
                        this.Model.SetValue("FSEQ", i + 1, i);//序号
                        this.Model.SetValue("FProOrderNoSC", dt.Rows[i]["FBILLNO"], i);//生产订单号  
                        this.Model.SetValue("FSRCBILLENTRYSEQSC", dt.Rows[i]["FSEQ"], i);//生产订单明细号  
                        this.Model.SetValue("FSCOrderCountSC", dt.Rows[i]["FQTY"], i);//生产订单数
                        this.Model.SetValue("FPlanBeginDateSC", dt.Rows[i]["FPlanStartDate"], i);//计划开工日期
                        this.Model.SetValue("FPlanEndDateSC", dt.Rows[i]["FPlanFinishDate"], i);//计划完工日期  
                        this.Model.SetValue("FSalOrderNoSC", dt.Rows[i]["FSaleOrderNo"], i);//销售订单号  
                        this.Model.SetValue("FMATERIALIDSC", dt.Rows[i]["FMATERIALID"], i);//物料  
                        this.Model.SetValue("FCustormerSC", dt.Rows[i]["FCustId"], i);//客户  
                        this.Model.SetValue("FSalOrderCountSC", dt.Rows[i]["FQTYXSDD"], i);//销售订单数量  
                        this.Model.SetValue("FSalDeliveryDateSC", dt.Rows[i]["FPLANDELIVERYDATE"], i);//销售订单交货期
                        this.Model.SetValue("FOrderRemakeSC", dt.Rows[i]["FNOTE"], i);//订单备注  
                    }
                }

                //待排任务 初始化加载
                sql = @"select * from Sc_WorkBillSortBillMain where FNoScheduled > 0";
                dt = DBServiceHelper.ExecuteDataSet(this.Context, sql).Tables[0];
                if (dt.Rows.Count > 0)
                {
                    for (int i = 0; i < dt.Rows.Count; i++)
                    {
                        this.Model.CreateNewEntryRow("FDprwEntity");
                        this.Model.SetValue("FSczy", dt.Rows[i]["FHSourceID"], i);//生产资源  
                        this.Model.SetValue("FProOrderNo", dt.Rows[i]["FSCOrderNo"], i);//生产订单号  
                        this.Model.SetValue("FSRCBILLENTRYSEQ", dt.Rows[i]["FSRCBILLENTRYSEQ"], i);//生产订单明细行号  
                        this.Model.SetValue("FMATERIALID", dt.Rows[i]["FHMaterID"], i);//物料代码  
                        this.Model.SetValue("FSCOrderCount", dt.Rows[i]["FOrderQuantity"], i);//生产订单数  
                        //this.Model.SetValue("FFinishConut", dt.Rows[i]["FNOTE"], i);//完工数 （没有对应字段）
                        this.Model.SetValue("FStoredCount", dt.Rows[i]["FHInstockQty"], i);//已入库数  
                        this.Model.SetValue("FPriority", dt.Rows[i]["FHYX"], i);//优先级  
                        this.Model.SetValue("FCapacity", dt.Rows[i]["FHWorkQty"], i);//产能  
                        this.Model.SetValue("FPlanBeginDate", dt.Rows[i]["FHPlanBeginDate"], i);//计划开始日期  
                        this.Model.SetValue("FPlanEndDate", dt.Rows[i]["FHPlanEndDate"], i);//计划完工日期  
                        this.Model.SetValue("FSalOrderCount", dt.Rows[i]["FHOrderQty"], i);//销售订单数量  
                        //this.Model.SetValue("FCustormer", dt.Rows[i]["FNOTE"], i);//客户 （没有对应字段） 
                        this.Model.SetValue("FSalOrderNo", dt.Rows[i]["FHSeOrderBillNo"], i);//销售订单号  
                        //this.Model.SetValue("FSalDeliveryDate", dt.Rows[i]["FNOTE"], i);//销售订单交货期  （没有对应字段）
                        //this.Model.SetValue("FOrderRemake", dt.Rows[i]["FNOTE"], i);//订单备注  （没有对应字段）
                        this.Model.SetValue("FID", dt.Rows[i]["FID"], i);//日计划工单ID  
                    }
                }
            }
            catch (Exception ex)
            {
                LogHelper.Error("生产排程单动态表单-页面展示 抛出异常：" + ex.Message.ToString());
            }

        }

    }
}


 src/Model/Demo.Model/Demo.Model.csproj

@@ -48,6 +48,7 @@
    <Compile Include="Model\CompleteAnalysisTempModel.cs" />
    <Compile Include="Model\DayPlanMaterial.cs" />
    <Compile Include="Model\DayPlanModel.cs" />
    <Compile Include="Model\ENG_WORKCALFULLDATA.cs" />
    <Compile Include="Model\PODemandPlan\DayPlanPpbom.cs" />
    <Compile Include="Model\PODemandPlan\PODemandPlanTemp.cs" />
    <Compile Include="Model\PODemandPlan\PurchaseInventory.cs" />

 src/Model/Demo.Model/Model/ENG_WORKCALFULLDATA.cs

New file
@@ -0,0 +1,60 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace Demo.Model.Model
{
    /// <summary>
    /// 班制model
    /// </summary>
    public class ENG_WORKCALFULLDATA
    {


        /// <summary>
        /// 重复生产线id
        /// </summary>
        public long FCalUserId { get; set; }

        /// <summary>
        /// 班制ID
        /// </summary>
        public long FShiftId { get; set; }

        /// <summary>
        /// 是否生产
        /// </summary>
        public long FIsWorkTime { get; set; }

        /// <summary>
        /// 日期
        /// </summary>
        public DateTime FDay { get; set; }

        /// <summary>
        /// 是否工作日
        /// </summary>
        public long FDateStyle { get; set; }

        /// <summary>
        /// 工作时长
        /// </summary>
        public decimal FALLHOURS { get; set; }

        /// <summary>
        /// 日产量
        /// </summary>
        public decimal FQTY { get; set; }

        /// <summary>
        /// 工作日历明细表标识
        /// </summary>
        public long FENTRYID { get; set; }

        


    }
}