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,pa_status,pa_standardqty,pa_packageqty,pa_totalqty,pa_currentqty,pa_outboxcode,pa_totalqty,pa_custcode "); 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); 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,pr_packrule,pa_id,pd_prodcode pa_prodcode,pa_mothercode,pa_salecode,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) { 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) { //箱已采集满并且未勾选自动生成 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 == "" || pa_status.Text == "1") { 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,pa_salecode)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 + "','" + pa_salecode.Text + "')"); dh.ExecuteSql(sql.GetString(), "insert"); } else { pa_id = dt.Rows[0]["pa_id"].ToString(); } string error; if (!LogicHandler.CheckPackRule(pr_packrule.Text, pa_outboxcode.Text, outboxcode.Text, pa_makecode.Text, pa_salecode.Text, pa_prodcode.Text, out error)) { OperateResult.AppendText(">>" + error + "\n", Color.Red, outboxcode); return; } 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 == "" ? "0" : pa_standardqty.Text)) { OperateResult.AppendText(">>采集箱号" + outboxcode.Text + "后超出容量\n", Color.Red, outboxcode); return; } List SQLS = new List(); 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 SQLS = new List(); //删除明细 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 SQLS = new List(); 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() { if (pa_outboxcode.Text != "") { DataTable dt = (DataTable)dh.ExecuteSql("select pa_totalqty,pa_status 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; } } } }