Make_NewPallet.cs 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. using System;
  2. using System.Data;
  3. using System.Windows.Forms;
  4. using UAS_MES.DataOperate;
  5. using UAS_MES.PublicMethod;
  6. namespace UAS_MES.Make
  7. {
  8. public partial class Make_NewPallet : Form
  9. {
  10. DataHelper dh;
  11. DataTable Dbfind;
  12. //生成的箱类型,2表示大箱号,3表示栈板号
  13. string pa_type = "";
  14. public Make_NewPallet(string Caller)
  15. {
  16. InitializeComponent();
  17. switch (Caller)
  18. {
  19. case "Make!BigBoxWeigh":
  20. title.Text = "新增大箱号";
  21. pa_type = "2";
  22. break;
  23. case "Make!PalletWeigh":
  24. title.Text = "新增栈板号";
  25. pa_type = "3";
  26. break;
  27. default:
  28. break;
  29. }
  30. }
  31. private void 新增栈板_Load(object sender, EventArgs e)
  32. {
  33. dh = new DataHelper();
  34. pr_code.FormName = Name;
  35. pr_code.SetValueField = new string[] { "pr_code" };
  36. pr_code.TableName = "product";
  37. pr_code.SelectField = "pr_code # 物料编号,pr_detail # 物料名称,pr_kind # 物料种类,pr_spec # 物料规格";
  38. pr_code.DbChange += Pr_code_DbChange;
  39. }
  40. private void Pr_code_DbChange(object sender, EventArgs e)
  41. {
  42. Dbfind = pr_code.ReturnData;
  43. BaseUtil.SetFormValue(this.Controls, Dbfind);
  44. }
  45. private void pr_code_UserControlTextChanged(object sender, EventArgs e)
  46. {
  47. pa_outboxcode.Pr_id = dh.getFieldDataByCondition("product", "pr_id", "pr_code='" + pr_code.Text + "'").ToString();
  48. }
  49. private void pa_outboxcode_IconClick(object sender, EventArgs e)
  50. {
  51. pa_outboxcode.Text = dh.GetSerialNumberByCaller(Tag.ToString());
  52. }
  53. private void Confirm_Click(object sender, EventArgs e)
  54. {
  55. if (pa_outboxcode.Text != "" && pa_packageqty.Text != "" && pr_code.Text != "")
  56. {
  57. string sql = "insert into package (pa_id,pa_outboxcode,pa_indate,pa_packageqty,pa_type,pa_prodcode,pa_level,PA_STATUS)values";
  58. sql += "(package_seq.nextval,'" + pa_outboxcode.Text + "',sysdate,'" + pa_packageqty.Text + "','" + pa_type + "','" + pr_code.Text + "',0,'')";
  59. dh.ExecuteSql(sql, "insert");
  60. MessageBox.Show("生成箱号成功!");
  61. pa_outboxcode.Text = "";
  62. pa_packageqty.Text = "";
  63. pr_code.Text = "";
  64. }
  65. else
  66. {
  67. MessageBox.Show("请先填写完整信息");
  68. }
  69. }
  70. }
  71. }