Make_NewBigBox.cs 2.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788
  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_BigBox : Form
  9. {
  10. DataHelper dh;
  11. DataTable Dbfind;
  12. //生成的箱类型,2表示大箱号,3表示栈板号
  13. string pa_type = "";
  14. string OutBoxCode1;
  15. public string OutBoxCode
  16. {
  17. get
  18. {
  19. return OutBoxCode1;
  20. }
  21. set
  22. {
  23. OutBoxCode1 = value;
  24. }
  25. }
  26. public Make_BigBox(string Caller, string MakeCode)
  27. {
  28. InitializeComponent();
  29. switch (Caller)
  30. {
  31. case "PACKAGE":
  32. title.Text = "新增大箱号";
  33. pa_type = "2";
  34. break;
  35. case "PALLET":
  36. title.Text = "新增栈板号";
  37. pa_type = "3";
  38. break;
  39. default:
  40. break;
  41. }
  42. pa_outboxcode.Caller = Caller;
  43. pa_outboxcode.MakeCode = MakeCode;
  44. }
  45. private void 新增栈板_Load(object sender, EventArgs e)
  46. {
  47. dh = new DataHelper();
  48. pr_code.FormName = Name;
  49. pr_code.SetValueField = new string[] { "pr_code" };
  50. pr_code.TableName = "product";
  51. pr_code.SelectField = "pr_code # 物料编号,pr_detail # 物料名称,pr_kind # 物料种类,pr_spec # 物料规格";
  52. pr_code.DbChange += Pr_code_DbChange;
  53. }
  54. private void Pr_code_DbChange(object sender, EventArgs e)
  55. {
  56. Dbfind = pr_code.ReturnData;
  57. BaseUtil.SetFormValue(this.Controls, Dbfind);
  58. }
  59. private void pr_code_UserControlTextChanged(object sender, EventArgs e)
  60. {
  61. pa_outboxcode.ProdCode = pr_code.Text;
  62. }
  63. private void Confirm_Click(object sender, EventArgs e)
  64. {
  65. if (pa_outboxcode.Text != "" && pr_code.Text != "")
  66. {
  67. string sql = "insert into package (pa_id,pa_outboxcode,pa_makecode,pa_indate,pa_type,pa_prodcode,pa_level,PA_STATUS)values";
  68. sql += "(package_seq.nextval,'" + pa_outboxcode.Text + "','" + pa_outboxcode.MakeCode + "',sysdate,'" + pa_type + "','" + pr_code.Text + "',0,'')";
  69. dh.ExecuteSql(sql, "insert");
  70. }
  71. else MessageBox.Show("请先填写完整信息");
  72. }
  73. private void pa_outboxcode_UserControlTextChanged(object sender, EventArgs e)
  74. {
  75. OutBoxCode1 = pa_outboxcode.Text;
  76. }
  77. }
  78. }