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_type;
        //物料编号
        string pr_code;
        //箱内件数
        int pa_totqty;
        //Package表的主键
        string pa_id;

        ApplicationClass lbl;

        Thread thread;

        private System.DateTime[] indate;

        public Make_PalletCollection()
        {
            InitializeComponent();
        }

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

        private void 栈板称重_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)
            {
                if (palletcode.Text == "")
                {
                    OperateResult.AppendText(">>栈板号不能为空\n", Color.Red);
                    return;
                }
                sql.Clear();
                sql.Append("select pa_makecode,pa_status,pa_packageqty,pa_currentqty,pa_prodcode,pa_outboxcode,pa_totalqty,pa_custcode,pa_salecode ");
                sql.Append("from package where pa_outboxcode='" + palletcode.Text + "'  and pa_type =3");
                dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
                BaseUtil.SetFormValue(Controls, dt);
                if (dt.Rows.Count > 0)
                {
                    LoadGridData();
                    dt = dh.getFieldsDataByCondition("Package", new string[] { "pa_totalqty", "pa_id" }, "pa_outboxcode='" + palletcode.Text + "'");
                    pa_totqty = int.Parse(dt.Rows[0]["pa_totalqty"].ToString());
                    pa_id = dt.Rows[0]["pa_id"].ToString();
                    FillPrintLabel();
                    outboxcode.Focus();
                }
                else OperateResult.AppendText(">>栈板号不存在\n", Color.Red);
            }
        }

        //箱号Enter事件
        private void outboxcode_KeyDown(object sender, KeyEventArgs e)
        {
            if (e.KeyCode == Keys.Enter)
            {
                if (outboxcode.Text == "")
                {
                    OperateResult.AppendText(">>箱号不能为空\n", Color.Red);
                    return;
                }
                if (!dh.CheckExist("package", "pa_outboxcode='" + palletcode.Text + "' and pa_type=3"))
                {
                    OperateResult.AppendText(">>栈板号不存在\n", Color.Red);
                    return;
                }
                if (pa_standardqty.Text == pa_currentqty.Text)
                {
                    Packing_Click(new object(), new EventArgs());
                }
                sql.Clear();
                sql.Append("select count(0) cn from packagedetail left join package on pa_id=pd_paid  where ");
                sql.Append("pa_outboxcode='" + palletcode.Text + "'");
                int packageqty = int.Parse((dh.ExecuteSql(sql.GetString(), "select") as DataTable).Rows[0][0].ToString());
                //如果未装满的话
                if (dh.CheckExist("Package", "pa_outboxcode='" + outboxcode.Text + "' and pa_type=2"))
                {
                    //判断是否已经装箱
                    if (!dh.CheckExist("PackageDetail", "pd_innerboxcode='" + outboxcode.Text + "'"))
                    {
                        sql.Clear();
                        sql.Append("insert into packagedetail(pd_id, pd_paid, pd_outboxcode, pd_innerboxcode, pd_innerqty)");
                        sql.Append("select packagedetail_seq.nextval,'" + pa_id + "','" + palletcode.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 + "') from package where pa_outboxcode='" + outboxcode.Text + "'");
                        dh.ExecuteSql(sql.GetString(), "insert");
                        dh.UpdateByCondition("package", "PA_CURRENTQTY=PA_CURRENTQTY+1,PA_PACKAGEQTY=PA_PACKAGEQTY+1,PA_TOTALQTY=(select sum(pd_innerqty) from packagedetail left join package on pa_id=pd_paid where pa_outboxcode='" + palletcode.Text + "')", "pa_outboxcode='" + palletcode.Text + "' and pa_type=3");
                        if (dh.getFieldDataByCondition("package", "pa_makecode", "pa_outboxcode='" + palletcode.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='" + palletcode.Text + "'", "update");
                        }
                        OperateResult.AppendText(">>箱号" + outboxcode.Text + "采集成功！\n", Color.Green, outboxcode);
                    }
                    else OperateResult.AppendText(">>箱号" + outboxcode.Text + "已采集\n", Color.Red, outboxcode);
                }
                else OperateResult.AppendText(">>箱号" + outboxcode.Text + "不存在\n", Color.Red, outboxcode);
            }
        }

        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 ='" + palletcode.Text + "' and pa_type=3");
            dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
            BaseUtil.FillDgvWithDataTable(PackageInf, dt);
        }

        private void FillPrintLabel()
        {
            DataTable _dt = (DataTable)dh.ExecuteSql("select pl_labelcode ||':'||pl_labelname pl_name,pl_labelname,pl_labelcode,pl_labelurl,pl_indate from productlabel where pl_prodcode='" + pa_prodcode.Text + "' and PL_LABELTYPE='栈板标' order by PL_ISDEFAULT DESC", "select");
            PrintLabel.DataSource = _dt;
            PrintLabel.DisplayMember = "pl_name";
            PrintLabel.ValueMember = "pl_labelcode";
            ftpOperater ftp = new ftpOperater();
            indate = new System.DateTime[_dt.Rows.Count];
            for (int i = 0; i < _dt.Rows.Count; i++)
            {
                BaseUtil.GetPrintLabel(_dt.Rows[i]["pl_labelname"].ToString(), _dt.Rows[i]["pl_labelurl"].ToString(), _dt.Rows[i]["pl_indate"].ToString());
                indate[i] = Convert.ToDateTime(_dt.Rows[i]["pl_indate"].ToString());
            }
        }

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

        private void 栈板称重_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)
        {
            palletcode.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)
            {
                OperateResult.AppendText(">>打印箱号" + palletcode.Text + "\n", Color.Black);
                Print.CodeSoft(Tag.ToString(), lbl, PrintLabel.Text.Split(':')[1], PrintLabel.SelectedValue.ToString(), PrinterList.Text, pa_outboxcode.Text, int.Parse(PrintNum.Text), indate[PrintLabel.SelectedIndex]);
            }
            else
                OperateResult.AppendText(">>产品" + pa_prodcode.Text + "未维护打印标签\n", Color.Red);
        }

        private void ReleasePallet_Click(object sender, EventArgs e)
        {
            dh.ExecuteSql("delete from packagedetail where pd_paid=(select pa_id from package where pa_outboxcode='" + palletcode.Text + "' and pa_type=3)", "delete");
            dh.ExecuteSql("update package set pa_totalqty=0,pa_packageqty=0 where pa_outboxcode='" + palletcode.Text + "' and pa_type=3", "update");
            OperateResult.AppendText(">>栈板号" + outboxcode.Text + "解除成功\n", Color.Green);
            palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
        }

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

        private void Packing_Click(object sender, EventArgs e)
        {
            if (pa_prodcode.Text != "" && palletcode.Text != "")
            {
                OperateResult.AppendText(">>" + palletcode.Text + "装栈板成功\n", Color.Black);
                palletcode.Text = LogicHandler.GetOutBoxCode("PALLET", "", pa_prodcode.Text, User.UserCode);
                sql.Clear();
                sql.Append("insert into package (pa_id,pa_outboxcode,pa_makecode,pa_indate,pa_packageqty,pa_type,pa_prodcode，pa_level，PA_STATUS,pa_standardqty)values");
                sql.Append("(package_seq.nextval,'" + palletcode.Text + "','" + pa_makecode.Text + "',sysdate,'0',3,'" + pa_prodcode.Text + "',0,'1','" + pa_standardqty.Text + "')");
                dh.ExecuteSql(sql.GetString(), "insert");
                palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
            }
            else OperateResult.AppendText(">>栈板号不能为空\n", Color.Red);
        }
    }
}