Browse Source

移箱成功后更新数据

Hcsy 8 years ago
parent
commit
519598d963
1 changed files with 4 additions and 0 deletions
  1. 4 0
      UAS-MES/FunctionCode/Packing/Packing_CartonTransfer.cs

+ 4 - 0
UAS-MES/FunctionCode/Packing/Packing_CartonTransfer.cs

@@ -277,6 +277,10 @@ namespace UAS_MES.Packing
                                         OperateResult.AppendText(">>序列号:" + sn_code.Text + ",从原箱号:" + ms_outboxcode + "转移至目标箱号:" + pa_outboxcode.Text + "\n", Color.Green);
                                         movepack.Focus();
                                         pa_outboxcode_KeyDown(sender, e);
+                                        sql.Clear();
+                                        sql.Append("select pa_id,pa_checkno,PA_CURRENTQTY pa_qty,PA_PACKTYPE,nvl(PA_DOWNSTATUS,0) PA_DOWNSTATUS,pa_prodcode  pa_macode,pa_salecode,pa_level,pa_custcode,pa_type,pa_packtype,pa_mothercode from package where pa_outboxcode='" + ms_outboxcode + "'");
+                                        dtbar = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
+                                        BaseUtil.SetFormValue(this.Controls, dtbar);
                                     }
                                 }
                             }