فهرست منبع

站点重置添加栈板选项

callm 3 روز پیش
والد
کامیت
44cd9163d6

+ 1 - 0
UAS_MES_YDCY/FunctionCode/Special/Special_Reset.Designer.cs

@@ -358,6 +358,7 @@
             this.pallet.TabIndex = 248;
             this.pallet.Text = "栈板";
             this.pallet.UseVisualStyleBackColor = true;
+            this.pallet.Click += new System.EventHandler(this.bigboxBtn_Click);
             // 
             // Special_Reset
             // 

+ 52 - 0
UAS_MES_YDCY/FunctionCode/Special/Special_Reset.cs

@@ -132,6 +132,53 @@ namespace UAS_MES_NEW.Special
                     WeighRecord.Clear();
                     sb.Clear();
                 }
+                else if (pallet.Checked)
+                {
+                    string stname = dh.getFieldDataByCondition("step", "st_name", "st_code = '" + cd_stepcode.Text + "'").ToString();
+                    for (int i = 0; i < sb.Count; i++)
+                    {
+                        string pa_outboxcode = dh.getFieldDataByCondition("package", "pa_outboxcode", "pa_outboxcode='" + sb[i].ToString() + "' and pa_type=3").ToString();
+                        if (pa_outboxcode != "")
+                        {
+                            List<string> SQLS = new List<string>();
+                            sql.Clear();
+                            sql.Append("insert into packagebackupdetail(pbd_id,pbd_paid,pbd_outboxcode,pbd_innerboxcode,pbd_barcode,pbd_innerqty,pbd_prodcode,pbd_makecode,pbd_buildate,pbd_ymd)");
+                            sql.Append("select pd_id,pd_paid,pd_outboxcode,pd_innerboxcode,pd_barcode,pd_innerqty,pd_prodcode,pd_makecode,pd_builddate,pd_ymd from packagedetail where ");
+                            sql.Append("pd_outboxcode='" + pa_outboxcode + "'");
+                            SQLS.Add(sql.GetString());
+                            SQLS.Add("delete from packagedetail where pd_outboxcode='" + pa_outboxcode + "'");
+                            DataTable dt = dh.getFieldsDatasByCondition("packagedetail left join package on pa_id=pd_paid", new string[] { "nvl(sum(pd_innerqty),0)", "count(1)" }, "pa_outboxcode='" + pa_outboxcode + "'");
+                            string totalqty = dt.Rows[0][0].ToString();
+                            string currentqty = dt.Rows[0][1].ToString();
+                            SQLS.Add("update package set PA_TOTALQTY='" + totalqty + "',pa_packageqty='" + currentqty + "',pa_currentqty='" + currentqty + "' where pa_outboxcode='" + pa_outboxcode + "'");
+                            dh.ExecuteSQLTran(SQLS.ToArray());
+
+                            if (dh.CheckExist("package", "pa_outboxcode='" + sb[i].ToString() + "' and pa_status=1"))
+                            {
+                                DataTable dt2 = (DataTable)dh.ExecuteSql("select ms_sncode from makeserial left Join package on pa_outboxcode=ms_outboxcode where ms_outboxcode in(select pd_innerboxcode from packagedetail where pd_outboxcode='"+ pa_outboxcode + "') pa_status=1", "select");
+                                for (int k = 0; k < dt2.Rows.Count; k++)
+                                {
+                                    ReSN(dt2.Rows[k]["ms_sncode"].ToString(), cd_stepcode.Text);
+                                }
+                                dh.ExecuteSql("delete from labelprintlog where lpl_value='" + sb[i].ToString() + "'", "delete");
+                                dh.ExecuteSql("insert into PACKAGEBACKUP(PA_ID, PA_PRODCODE, PA_OUTBOXCODE, PA_PACKDATE, PA_LEVEL, PA_PACKAGEQTY, PA_TOTALQTY, PA_MAKECODE, PA_STATUS, PA_INDATE, PA_SALECODE, PA_PRINTCOUNT, PA_CUSTCODE, PA_TYPE, PA_WEIGHT, PA_CURRENTQTY, PA_PACKTYPE, PA_CHECKNO, PA_DOWNSTATUS, PA_STANDARDQTY, PA_SCCODE, PA_YMD, PA_MOTHERCODE, PA_CURRENTSTEP, PA_NEXTSTEP, PA_OUTNO, PA_IOSTATUS, PA_REMARK, PA_WHCODE, PA_B2BID, PA_INNO)" +
+                                    " select PA_ID, PA_PRODCODE, PA_OUTBOXCODE, PA_PACKDATE, PA_LEVEL, PA_PACKAGEQTY, PA_TOTALQTY, PA_MAKECODE, PA_STATUS, PA_INDATE, PA_SALECODE, PA_PRINTCOUNT, PA_CUSTCODE, PA_TYPE, PA_WEIGHT, PA_CURRENTQTY, PA_PACKTYPE, PA_CHECKNO, PA_DOWNSTATUS, PA_STANDARDQTY, PA_SCCODE, PA_YMD, PA_MOTHERCODE, PA_CURRENTSTEP, PA_NEXTSTEP, PA_OUTNO, PA_IOSTATUS, PA_REMARK, PA_WHCODE, PA_B2BID, PA_INNO from package where pa_mothercode='" + sb[i].ToString() + "'", "insert");
+                                dh.ExecuteSql("insert into PACKAGEBACKUPDETAIL select * from packagedetail where pd_outboxcode='" + sb[i].ToString() + "'", "insert");
+                                dh.ExecuteSql("delete from package where pa_mothercode = '" + sb[i].ToString() + "'", "delete");
+                                //删除箱的明细
+                                dh.ExecuteSql("delete from packagedetail where pd_outboxcode='" + sb[i].ToString() + "'", "delete");
+                                LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, ms_makecode.Text, User.UserLineCode, User.UserSourceCode, "站点重置", "站点重置至" + stname, sb[i].ToString(), "");
+                                OperatResult.AppendText("栈板:" + sb[i].ToString() + "回流至" + cd_stepcode.Text + "完成\n", Color.Green);
+                            }
+                            else
+                            {
+                                OperatResult.AppendText("栈板:" + sb[i].ToString() + "未封箱,不允许回流\n", Color.Green);
+                            }
+                        }
+                    }
+                    WeighRecord.Clear();
+                    sb.Clear();
+                }
                 sql.Clear();
                 sql.Append("MERGE INTO makecraftdetail USING (select mcd_macode,mcd_detno,mcd_stepcode,mcd_stepname,nvl(count(distinct A.ms_sncode),0) n,nvl(count(distinct B.ms_sncode),0) bn,(select nvl(count(distinct sp_sncode),0) from STEPPASSED where SP_MAKECODE = mcd_macode AND SP_STEPCODE = mcd_stepcode) inqty from MAKECRAFTdetail");
                 sql.Append(" left join makeserial A on mcd_macode = A.ms_makecode and mcd_stepcode = A.ms_nextstepcode AND A.MS_STATUS = 1 LEFT JOIN MAKESERIAL B ON mcd_macode = B.ms_makecode AND MCD_STEPCODE = B.MS_STEPCODE AND B.MS_STATUS = 3 where mcd_macode = '" + ms_makecode.Text + "'  group by mcd_macode,mcd_detno, mcd_stepcode, mcd_stepname order by mcd_detno asc) A");
@@ -173,6 +220,11 @@ namespace UAS_MES_NEW.Special
                     input.Focus();
                     OperatResult.AppendText("请输入箱号进行采集\n", Color.Black, input);
                 }
+                else if (((RadioButton)sender).Name == "pallet")
+                {
+                    input.Focus();
+                    OperatResult.AppendText("请输入栈板进行采集\n", Color.Black, input);
+                }
             }
         }