mes-client/UAS-MES/FunctionCode/Make/Make_PalletCollection.cs

using LabelManager2;
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading;
using System.Windows.Forms;
using UAS_MES.DataOperate;
using UAS_MES.Entity;
using UAS_MES.PublicForm;
using UAS_MES.PublicMethod;

namespace UAS_MES.Make
{
    public partial class Make_PalletCollection : Form
    {
        AutoSizeFormClass asc = new AutoSizeFormClass();

        DataHelper dh;

        DataTable dt;

        LogStringBuilder sql = new LogStringBuilder();

        Make_NewPallet NewPallet;

        string pa_nextstep = "";
        //箱类型
        string pa_type;
        //物料编号
        string pr_code;
        //Package表的主键
        string pa_id;

        ApplicationClass lbl;

        string stantdqty = "";

        Document doc;

        Thread thread;

        string ErrorMessage = "";

        public Make_PalletCollection()
        {
            InitializeComponent();
        }

        //创建打印进程
        private void NewPrint()
        {
            try
            {
                lbl = new ApplicationClass();
                BaseUtil.WriteLbl(lbl);
            }
            catch
            {
                OperateResult.AppendText("未正确安装CodeSoft软件\n", Color.Red);
            }
        }

        private void Make_PalletCollection_Load(object sender, EventArgs e)
        {
            asc.controllInitializeSize(this);
            thread = new Thread(NewPrint);
            SetLoadingWindow stw = new SetLoadingWindow(thread, "初始化打印程序");
            BaseUtil.SetFormCenter(stw);
            stw.ShowDialog();
            dh = new DataHelper();
        }

        private void Clean_Click(object sender, EventArgs e)
        {
            OperateResult.Clear();
        }

        private void palletcode_KeyDown(object sender, KeyEventArgs e)
        {
            if (e.KeyCode == Keys.Enter)
            {
                sql.Clear();
                sql.Append("select pa_makecode,pa_id,nvl(pa_standardqty,PR_PALLETQTY)pa_standardqty,pa_status,pa_packageqty,pa_totalqty,pa_currentqty,pa_prodcode,pa_outboxcode,pa_totalqty,pa_custcode,pa_salecode ");
                sql.Append("from package left join packagedetail on pa_id =pd_paid left join product on pr_code=pd_prodcode where pa_outboxcode='" + pa_outboxcode.Text + "' and pa_type =3");
                DataTable dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
                if (dt.Rows.Count > 0)
                {
                    BaseUtil.SetFormValue(Controls, dt);
                    stantdqty = dt.Rows[0]["pa_standardqty"].ToString();
                    LoadGridData();
                    pa_id = dt.Rows[0]["pa_id"].ToString();
                    outboxcode.Focus();
                }
                else outboxcode.Focus();
            }
        }

        //箱号Enter事件
        private void outboxcode_KeyDown(object sender, KeyEventArgs e)
        {
            if (e.KeyCode == Keys.Enter)
            {
                if (LogicHandler.CheckStepAttribute(Tag.ToString(), User.UserSourceCode, out ErrorMessage))
                {
                    if (outboxcode.Text == "")
                    {
                        OperateResult.AppendText(">>箱号不能为空\n", Color.Red);
                        return;
                    }
                    sql.Clear();
                    sql.Append("select pd_makecode pa_makecode,nvl(pa_downstatus,0)pa_downstatus,nvl(pa_standardqty,PR_PALLETQTY)pa_standardqty,pa_id,pd_prodcode pa_prodcode,pa_mothercode,pa_status,pa_nextstep from packagedetail ");
                    sql.Append("left join package on pd_paid=pa_id left join product on pr_code=pd_prodcode where pd_outboxcode='" + outboxcode.Text + "'");
                    dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
                    if (dt.Rows.Count > 0)
                    {
                        if (pa_standardqty.Text != "")
                        {
                            dt.Columns.Remove("pa_standardqty");
                        }
                        BaseUtil.SetFormValue(this.Controls, dt);
                        if (dt.Rows[0]["pa_downstatus"].ToString() != "0")
                        {
                            OperateResult.AppendText(">>箱号" + outboxcode.Text + "下地状态不允许采集\n", Color.Red, outboxcode);
                            return;
                        }
                        if (dt.Rows[0]["pa_mothercode"].ToString() != "")
                        {
                            if (pa_outboxcode.Text == "")
                            {
                                pa_outboxcode.Text = dt.Rows[0]["pa_mothercode"].ToString();
                                palletcode_KeyDown(sender, e);
                            }
                        }
                        pa_nextstep = dt.Rows[0]["pa_nextstep"].ToString();
                        if (pa_nextstep != User.CurrentStepCode && pa_nextstep != "")
                        {
                            OperateResult.AppendText(">>箱号" + outboxcode.Text + "的下一工序不是当前岗位资源对应工序\n", Color.Red, outboxcode);
                            return;
                        }
                        //未空表示线外
                        if (pa_nextstep == "")
                        {
                            //判断线外，必须已完工并且未入库
                            dt = (DataTable)dh.ExecuteSql("select wm_concat(ms_sncode) from mes_package_view  left join makeserial on v_barcode=ms_sncode where  v_outboxcode='" + outboxcode.Text + "' and ms_status<>2", "select");
                            if (dt.Rows[0][0].ToString() == "")
                            {
                                //判断箱未入库
                                dt = (DataTable)dh.ExecuteSql("select count(1) from package where pa_outboxcode='" + outboxcode.Text + "' and nvl(pa_iostatus,0)<>0", "select");
                                if (dt.Rows[0][0].ToString() != "0")
                                {
                                    OperateResult.AppendText(">>序列号" + dt.Rows[0][0].ToString() + "已入库，不允许装箱\n", Color.Red);
                                    return;
                                }
                            }
                            else
                            {
                                OperateResult.AppendText(">>序列号" + dt.Rows[0][0].ToString() + "尚未完工\n", Color.Red);
                                return;
                            }
                        }
                    }
                    else
                    {
                        OperateResult.AppendText(">>箱号" + outboxcode.Text + "未采集内容或不存在，不允许装栈板\n", Color.Red, outboxcode);
                        return;
                    }
                    if (!Cancel.Checked)
                    {
                        pa_status.Text = dh.getFieldDataByCondition("package", "nvl(pa_status,0)pa_status", "pa_outboxcode='" + pa_outboxcode.Text + "'").ToString();
                        if (pa_outboxcode.Text == "" && AutoOutBoxCode.Checked || pa_status.Text == "1")
                        {
                            //箱已采集满并且未勾选自动生成
                            if (pa_standardqty.Text == pa_totalqty.Text && !AutoOutBoxCode.Checked)
                            {
                                OperateResult.AppendText(">>栈板" + pa_outboxcode.Text + "已采集满\n", Color.Red, outboxcode);
                                return;
                            }
                            else
                            {
                                pa_outboxcode.Text = LogicHandler.GetOutBoxCode("PALLET", "", pa_prodcode.Text, User.UserCode);
                            }
                        }
                        else if (pa_outboxcode.Text == "")
                        {
                            OperateResult.AppendText(">>栈板号不能为空\n", Color.Red);
                            return;
                        }
                        dt = (DataTable)dh.ExecuteSql("select pa_id from  package where pa_outboxcode='" + pa_outboxcode.Text + "'", "select");
                        if (dt.Rows.Count == 0)
                        {
                            pa_id = dh.GetSEQ("package_seq");
                            sql.Clear();
                            sql.Append("insert into package (pa_id,pa_outboxcode,PA_STANDARDQTY,pa_makecode,pa_indate,pa_packageqty,pa_type,pa_prodcode，pa_level，PA_STATUS,pa_sccode,pa_currentstep)values");
                            sql.Append("(" + pa_id + ",'" + pa_outboxcode.Text + "','" + pa_standardqty.Text + "','" + pa_makecode.Text + "',sysdate,'0',3,'" + pa_prodcode.Text + "',0,0,'" + User.UserSourceCode + "','" + User.CurrentStepCode + "')");
                            dh.ExecuteSql(sql.GetString(), "insert");
                        }
                        else
                        {
                            pa_id = dt.Rows[0]["pa_id"].ToString();
                        }
                        dt = (DataTable)dh.ExecuteSql("select pa_totalqty,pa_mothercode,nvl(pa_status,0) pa_status from package where pa_outboxcode='" + outboxcode.Text + "'", "select");
                        if (dt.Rows.Count > 0)
                        {
                            //判断是否已经装箱
                            int sonboxtotalqty = int.Parse(dt.Rows[0]["pa_totalqty"].ToString());
                            if (dt.Rows[0]["pa_mothercode"].ToString() == "")
                            {
                                if (dt.Rows[0]["pa_status"].ToString() == "1")
                                {
                                    pa_totalqty.Text = dh.getFieldDataByCondition("package", "pa_totalqty", "pa_outboxcode='" + pa_outboxcode.Text + "'").ToString();
                                    if (int.Parse(pa_totalqty.Text == "" ? "0" : pa_totalqty.Text) + sonboxtotalqty > int.Parse(pa_standardqty.Text))
                                    {
                                        OperateResult.AppendText(">>采集箱号" + outboxcode.Text + "后超出容量\n", Color.Red, outboxcode);
                                        return;
                                    }
                                    List<string> SQLS = new List<string>();
                                    sql.Clear();
                                    sql.Append("insert into packagedetail(pd_id, pd_paid, pd_outboxcode,pd_makecode,pd_prodcode,pd_innerboxcode, pd_innerqty,pd_builddate)");
                                    sql.Append("select packagedetail_seq.nextval,'" + pa_id + "','" + pa_outboxcode.Text + "','" + pa_makecode.Text + "','" + pa_prodcode.Text + "','" + outboxcode.Text + "' ");
                                    sql.Append(",(select nvl(sum(pd_innerqty),0) from packagedetail left join package on pa_id=pd_paid where pa_outboxcode=");
                                    sql.Append("'" + outboxcode.Text + "'),sysdate from package where pa_outboxcode='" + outboxcode.Text + "'");
                                    SQLS.Add(sql.GetString());
                                    //如果采集完这个超出了容量提示
                                    SQLS.Add("update package set PA_CURRENTQTY=nvl(PA_CURRENTQTY,0)+1,PA_PACKAGEQTY=nvl(PA_PACKAGEQTY,0)+1,PA_TOTALQTY=(select sum(pd_innerqty) from packagedetail left join package on pa_id=pd_paid where pa_outboxcode='" + pa_outboxcode.Text + "') where pa_outboxcode='" + pa_outboxcode.Text + "' and pa_type=3");
                                    SQLS.Add("update package set pa_mothercode='" + pa_outboxcode.Text + "' where pa_outboxcode='" + outboxcode.Text + "'");
                                    dh.ExecuteSQLTran(SQLS.ToArray());
                                    //更新大箱的栈板号
                                    if (dh.getFieldDataByCondition("package", "pa_makecode", "pa_outboxcode='" + pa_outboxcode.Text + "'").ToString() == "")
                                    {
                                        string carton_macode = dh.getFieldDataByCondition("package", "pa_makecode", "pa_outboxcode='" + outboxcode.Text + "'").ToString();
                                        pa_makecode.Text = carton_macode;
                                        dh.ExecuteSql("update package set pa_makecode='" + carton_macode + "' where pa_outboxcode='" + pa_outboxcode.Text + "'", "update");
                                    }
                                    LogicHandler.OutBoxStepPass(outboxcode.Text, pa_makecode.Text, User.UserSourceCode, User.UserCode, "栈板采集成功，栈板号:" + pa_outboxcode.Text, "栈板采集");
                                    if (pa_totalqty.Text == "1")
                                    {
                                        string nextstepcode = dh.getFieldDataByCondition("mes_package_view left join makeserial on ms_sncode=v_barcode", "ms_nextstepcode", "v_outboxcode='" + outboxcode.Text + "'").ToString();
                                        dh.UpdateByCondition("package", "pa_nextstep='" + nextstepcode + "'", "pa_outboxcode='" + pa_outboxcode.Text + "'");
                                    }
                                    LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, "", User.UserLineCode, User.UserSourceCode, "栈板采集", "栈板" + pa_outboxcode.Text + "采集箱" + outboxcode.Text + "成功", pa_outboxcode.Text, "");
                                    OperateResult.AppendText(">>箱号" + outboxcode.Text + "采集成功！\n", Color.Green, outboxcode);
                                    LoadCollectNum();
                                    LoadGridData();
                                    if (pa_standardqty.Text == pa_totalqty.Text)
                                    {
                                        dh.ExecuteSql("update package set pa_status=1 where pa_outboxcode='" + pa_outboxcode.Text + "'", "update");
                                        if (AutoPrint.Checked)
                                        {
                                            OperateResult.AppendText(">>栈板已装满，自动打印!\n", Color.Green);
                                            Printlab.PerformClick();
                                        }
                                    }
                                }
                                else OperateResult.AppendText(">>箱号" + outboxcode.Text + "尚未封箱\n", Color.Red, outboxcode);
                            }
                            else
                            {
                                if (dt.Rows[0]["pa_mothercode"].ToString() == pa_outboxcode.Text)
                                    OperateResult.AppendText(">>箱号" + outboxcode.Text + "已在本栈板内\n", Color.Red, outboxcode);
                                else
                                    OperateResult.AppendText(">>箱号" + outboxcode.Text + "已采集至栈板" + dt.Rows[0]["pa_mothercode"].ToString() + "\n", Color.Red, outboxcode);
                            }
                        }
                        else OperateResult.AppendText(">>箱号" + outboxcode.Text + "不存在\n", Color.Red, outboxcode);
                    }
                    //进行拆箱操作
                    else
                    {
                        List<string> SQLS = new List<string>();
                        //删除明细
                        SQLS.Add("delete from packagedetail where pd_outboxcode='" + pa_outboxcode.Text + "' and pd_innerboxcode='" + outboxcode.Text + "'");
                        //减少箱内容量
                        SQLS.Add("update package set pa_packageqty=pa_packageqty-1,pa_totalqty=pa_totalqty-(select pa_totalqty from package where pa_outboxcode='" + outboxcode.Text + "'),pa_currentqty=0,pa_status=0 where pa_outboxcode='" + pa_outboxcode.Text + "'");
                        SQLS.Add("update package set pa_mothercode='' where pa_outboxcode='" + outboxcode.Text + "'");
                        dh.ExecuteSQLTran(SQLS.ToArray());
                        LoadCollectNum();
                        LoadGridData();
                        outboxcode.Clear();
                    }
                }
            }
        }

        private void LoadGridData()
        {
            sql.Clear();
            sql.Append("select pa_prodcode,nvl(pd_barcode,PD_INNERBOXCODE) code ,pd_innerqty,pa_salecode");
            sql.Append(",pa_makecode,pa_custcode,pa_packageqty from packagedetail left join package on pd_paid=pa_id left ");
            sql.Append("join product on pr_code=pa_prodcode where pa_outboxcode ='" + pa_outboxcode.Text + "' and pa_type=3");
            DataTable dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
            BaseUtil.FillDgvWithDataTable(PackageInf, dt);
        }

        private void FillPrintLabel()
        {
            DataTable _dt = (DataTable)dh.ExecuteSql("select la_id,substr(la_url,instr(la_url,'\\',-1)+1)la_name,la_url,la_isdefault from label where la_prodcode='" + pa_prodcode.Text + "' and la_templatetype='栈板标' and la_statuscode='AUDITED' order by la_isdefault", "select");
            PrintLabel.DataSource = _dt;
            PrintLabel.DisplayMember = "la_name";
            PrintLabel.ValueMember = "la_id";
            ftpOperater ftp = new ftpOperater();
            for (int i = 0; i < _dt.Rows.Count; i++)
            {
                BaseUtil.GetPrintLabel(_dt.Rows[i]["la_name"].ToString(), _dt.Rows[i]["la_url"].ToString());
            }
        }

        private void LoadCollectNum()
        {
            pa_totalqty.Text = dh.getFieldDataByCondition("package", "pa_totalqty", "pa_outboxcode='" + pa_outboxcode.Text + "' and pa_type=3").ToString();
        }

        private void Make_PalletCollection_SizeChanged(object sender, EventArgs e)
        {
            asc.controlAutoSize(this);
        }

        private void NewPallet_Click(object sender, EventArgs e)
        {
            NewPallet = new Make_NewPallet("PALLET", pa_makecode.Text);
            NewPallet.Controls["Confirm"].Click += Make_PalletCollection_Click;
            BaseUtil.SetFormCenter(NewPallet);
            NewPallet.ShowDialog();
        }

        private void Make_PalletCollection_Click(object sender, EventArgs e)
        {
            pa_outboxcode.Text = NewPallet.OutBoxCode;
            palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
            NewPallet.Close();
        }

        private void Print_Click(object sender, EventArgs e)
        {
            if (PrintLabel.Items.Count != 0)
            {
                if (dh.getFieldDataByCondition("package", "pa_status", "pa_outboxcode='" + pa_outboxcode.Text + "'").ToString() == "1")
                {
                    OperateResult.AppendText(">>打印箱号" + pa_outboxcode.Text + "\n", Color.Black);
                    doc = lbl.Documents.Open(ftpOperater.DownLoadTo + PrintLabel.Text);
                    Print.CodeSoft(Tag.ToString(), doc, PrintLabel.Text, PrintLabel.SelectedValue.ToString(), PrinterList.Text, pa_outboxcode.Text, int.Parse(PrintNum.Text));
                    if (!AutoOutBoxCode.Checked)
                    {
                        pa_outboxcode.Focus();
                        pa_outboxcode.SelectAll();
                    }
                }
                else OperateResult.AppendText(">>必须封栈板才能进行打印\n", Color.Red);
            }
            else OperateResult.AppendText(">>产品" + pa_prodcode.Text + "未维护打印标签\n", Color.Red);
        }

        private void ReleasePallet_Click(object sender, EventArgs e)
        {
            if (dh.getRowCount("packagedetail", "pd_outboxcode='" + pa_outboxcode.Text + "'") > 0)
            {
                string Delete = MessageBox.Show(this.ParentForm, "是否确认拆栈板？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question).ToString();
                if (Delete == "Yes")
                {
                    //如果含有下一执行步骤的撤销过站，否则直接删除
                    if (dh.getFieldDataByCondition("package", "pa_nextstep", "pa_mothercode='" + pa_outboxcode.Text + "'").ToString() != "")
                        LogicHandler.OutBoxDrawStepPass(pa_outboxcode.Text, pa_makecode.Text, User.UserSourceCode);
                    else
                    {
                        List<string> SQLS = new List<string>();
                        SQLS.Add("delete from packagedetail where pd_outboxcode='" + pa_outboxcode.Text + "'");
                        SQLS.Add("update package set pa_packageqty=0,pa_totalqty=0,pa_currentqty=0,pa_status=0 where pa_outboxcode='" + pa_outboxcode.Text + "'");
                        SQLS.Add("update package set pa_mothercode='' where pa_mothercode='" + pa_outboxcode.Text + "'");
                        dh.ExecuteSQLTran(SQLS.ToArray());
                    }
                    LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, pa_makecode.Text, User.UserLineCode, User.UserSourceCode, "栈板采集", "解除栈板" + pa_outboxcode.Text + "成功", pa_outboxcode.Text, "");
                    OperateResult.AppendText(">>栈板号" + pa_outboxcode.Text + "解除成功\n", Color.Green);
                    palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
                }
            }
            else OperateResult.AppendText(">>栈板号" + pa_outboxcode.Text + "未采集箱\n", Color.Red);
        }

        private void Make_PalletCollection_FormClosing(object sender, FormClosingEventArgs e)
        {
            BaseUtil.ClosePrint(lbl);
        }

        private void Packing_Click(object sender, EventArgs e)
        {
            if (pa_outboxcode.Text != "")
            {
                sql.Clear();
                sql.Append("select nvl(pa_status,0) pa_status from packagedetail left join package ");
                sql.Append("on pa_id=pd_paid where pd_outboxcode='" + pa_outboxcode.Text + "'");
                DataTable dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
                if (dt.Rows.Count > 0)
                {
                    if (dt.Rows[0]["pa_status"].ToString() == "0")
                    {
                        string Seal = MessageBox.Show(this.ParentForm, "是否确认封栈板？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question).ToString();
                        if (Seal == "Yes")
                        {
                            OperateResult.AppendText(">>栈板号" + pa_outboxcode.Text + "装栈板成功\n", Color.Green);
                            LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, pa_makecode.Text, User.UserLineCode, User.UserSourceCode, "栈板采集", "封栈板" + pa_outboxcode.Text + "成功", outboxcode.Text, "");
                            dh.ExecuteSql("update package set pa_status=1 where pa_outboxcode='" + pa_outboxcode.Text + "'", "update");
                            pa_status.Text = "1";
                        }
                    }
                    else OperateResult.AppendText(">>栈板号" + pa_outboxcode.Text + "已封栈板\n", Color.Red);
                }
                else OperateResult.AppendText(">>栈板号" + pa_outboxcode.Text + "未采集内容\n", Color.Red);
            }
            else OperateResult.AppendText(">>栈板号不能为空\n", Color.Red);
        }

        private void PrintLabel_SelectedValueChanged(object sender, EventArgs e)
        {
            if (PrintLabel.SelectedValue != null && PrintLabel.SelectedValue.ToString() != "System.Data.DataRowView")
            {
                string PrintNums = dh.getFieldDataByCondition("label", "la_printnos", "la_id='" + PrintLabel.SelectedValue.ToString() + "'").ToString();
                PrintNum.Text = (PrintNums == "" ? "1" : PrintNums);
            }
        }

        private void pa_prodcode_TextChanged(object sender, EventArgs e)
        {
            FillPrintLabel();
        }

        private void pa_standardqty_KeyDown(object sender, KeyEventArgs e)
        {
            if (e.KeyCode == Keys.Enter)
            {
                ResetPackageQTY();
            }
        }

        private void pa_standardqty_Leave(object sender, EventArgs e)
        {
            ResetPackageQTY();
        }

        private void ResetPackageQTY()
        {
            DataTable dt = (DataTable)dh.ExecuteSql("select pa_totalqty from package where pa_outboxcode='" + pa_outboxcode.Text + "'", "select");
            if (dt.Rows.Count > 0)
            {
                string total = dt.Rows[0]["pa_totalqty"].ToString();
                if (int.Parse(pa_standardqty.Text) >= int.Parse(total))
                {
                    dh.UpdateByCondition("package", "pa_standardqty='" + pa_standardqty.Text + "'", "pa_outboxcode='" + pa_outboxcode.Text + "'");
                    OperateResult.AppendText(">>修改容量成功,已修改为" + pa_standardqty.Text + "\n", Color.Green);
                    return;
                }
                else OperateResult.AppendText(">>容量不能小于已装数量\n", Color.Red);
            }
            else OperateResult.AppendText(">>栈板号不存在\n", Color.Red);
            pa_standardqty.Text = stantdqty;
        }
    }
}