Make_PalletCollection.cs 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255
  1. using LabelManager2;
  2. using System;
  3. using System.Collections.Generic;
  4. using System.ComponentModel;
  5. using System.Data;
  6. using System.Drawing;
  7. using System.Linq;
  8. using System.Text;
  9. using System.Threading;
  10. using System.Windows.Forms;
  11. using UAS_MES.DataOperate;
  12. using UAS_MES.Entity;
  13. using UAS_MES.PublicForm;
  14. using UAS_MES.PublicMethod;
  15. namespace UAS_MES.Make
  16. {
  17. public partial class Make_PalletCollection : Form
  18. {
  19. AutoSizeFormClass asc = new AutoSizeFormClass();
  20. DataHelper dh;
  21. DataTable dt;
  22. LogStringBuilder sql = new LogStringBuilder();
  23. Make_NewPallet NewPallet;
  24. //箱类型
  25. string pa_type;
  26. //物料编号
  27. string pr_code;
  28. //箱内件数
  29. int pa_totqty;
  30. //Package表的主键
  31. string pa_id;
  32. ApplicationClass lbl;
  33. Document doc;
  34. Thread thread;
  35. private System.DateTime[] indate;
  36. string ErrorMessage = "";
  37. public Make_PalletCollection()
  38. {
  39. InitializeComponent();
  40. }
  41. //创建打印进程
  42. private void NewPrint()
  43. {
  44. try
  45. {
  46. lbl = new ApplicationClass();
  47. BaseUtil.WriteLbl(lbl);
  48. }
  49. catch
  50. {
  51. OperateResult.AppendText("未正确安装CodeSoft软件\n", Color.Red);
  52. }
  53. }
  54. private void 栈板称重_Load(object sender, EventArgs e)
  55. {
  56. asc.controllInitializeSize(this);
  57. thread = new Thread(NewPrint);
  58. SetLoadingWindow stw = new SetLoadingWindow(thread, "初始化打印程序");
  59. BaseUtil.SetFormCenter(stw);
  60. stw.ShowDialog();
  61. dh = new DataHelper();
  62. }
  63. private void Clean_Click(object sender, EventArgs e)
  64. {
  65. OperateResult.Clear();
  66. }
  67. private void palletcode_KeyDown(object sender, KeyEventArgs e)
  68. {
  69. if (e.KeyCode == Keys.Enter)
  70. {
  71. if (palletcode.Text == "")
  72. {
  73. OperateResult.AppendText(">>栈板号不能为空\n", Color.Red);
  74. return;
  75. }
  76. sql.Clear();
  77. sql.Append("select pa_makecode,pa_status,pa_packageqty,pa_currentqty,pa_prodcode,pa_outboxcode,pa_totalqty,pa_custcode,pa_salecode ");
  78. sql.Append("from package where pa_outboxcode='" + palletcode.Text + "' and pa_type =3");
  79. dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  80. BaseUtil.SetFormValue(Controls, dt);
  81. if (dt.Rows.Count > 0)
  82. {
  83. LoadGridData();
  84. dt = dh.getFieldsDataByCondition("Package", new string[] { "pa_totalqty", "pa_id" }, "pa_outboxcode='" + palletcode.Text + "'");
  85. pa_totqty = int.Parse(dt.Rows[0]["pa_totalqty"].ToString());
  86. pa_id = dt.Rows[0]["pa_id"].ToString();
  87. FillPrintLabel();
  88. outboxcode.Focus();
  89. }
  90. else OperateResult.AppendText(">>栈板号不存在\n", Color.Red);
  91. }
  92. }
  93. //箱号Enter事件
  94. private void outboxcode_KeyDown(object sender, KeyEventArgs e)
  95. {
  96. if (e.KeyCode == Keys.Enter)
  97. {
  98. if (LogicHandler.CheckStepAttribute(Tag.ToString(), User.UserSourceCode, out ErrorMessage))
  99. {
  100. if (outboxcode.Text == "")
  101. {
  102. OperateResult.AppendText(">>箱号不能为空\n", Color.Red);
  103. return;
  104. }
  105. if (pa_standardqty.Text == pa_currentqty.Text)
  106. {
  107. Packing_Click(new object(), new EventArgs());
  108. }
  109. //如果未装满的话
  110. dt = (DataTable)dh.ExecuteSql("select pa_mothercode,nvl(pa_status,0) pa_status from package where pa_outboxcode='" + outboxcode.Text + "' and pa_type=2", "select");
  111. if (dt.Rows.Count > 0)
  112. {
  113. //判断是否已经装箱
  114. if (dt.Rows[0]["pa_mothercode"].ToString() == "")
  115. {
  116. if (dt.Rows[0]["pa_status"].ToString() == "1")
  117. {
  118. sql.Clear();
  119. sql.Append("insert into packagedetail(pd_id, pd_paid, pd_outboxcode, pd_innerboxcode, pd_innerqty)");
  120. sql.Append("select packagedetail_seq.nextval,'" + pa_id + "','" + palletcode.Text + "','" + outboxcode.Text + "' ");
  121. sql.Append(",(select nvl(sum(pd_innerqty),0) from packagedetail left join package on pa_id=pd_paid where pa_outboxcode=");
  122. sql.Append("'" + outboxcode.Text + "') from package where pa_outboxcode='" + outboxcode.Text + "'");
  123. dh.ExecuteSql(sql.GetString(), "insert");
  124. dh.UpdateByCondition("package", "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='" + palletcode.Text + "')", "pa_outboxcode='" + palletcode.Text + "' and pa_type=3");
  125. //更新大箱的栈板号
  126. dh.UpdateByCondition("package", "pa_mothercode='" + palletcode.Text + "'", "pa_outboxcode='" + outboxcode.Text + "'");
  127. LoadCollectNum();
  128. if (dh.getFieldDataByCondition("package", "pa_makecode", "pa_outboxcode='" + palletcode.Text + "'").ToString() == "")
  129. {
  130. string carton_macode = dh.getFieldDataByCondition("package", "pa_makecode", "pa_outboxcode='" + outboxcode.Text + "'").ToString();
  131. pa_makecode.Text = carton_macode;
  132. dh.ExecuteSql("update package set pa_makecode='" + carton_macode + "' where pa_outboxcode='" + palletcode.Text + "'", "update");
  133. }
  134. OperateResult.AppendText(">>箱号" + outboxcode.Text + "采集成功!\n", Color.Green, outboxcode);
  135. LoadGridData();
  136. }
  137. else OperateResult.AppendText(">>箱号" + outboxcode.Text + "已采集\n", Color.Red, outboxcode);
  138. }
  139. else OperateResult.AppendText(">>箱号" + outboxcode.Text + "尚未封箱\n", Color.Red, outboxcode);
  140. }
  141. else OperateResult.AppendText(">>箱号" + outboxcode.Text + "不存在\n", Color.Red, outboxcode);
  142. }
  143. }
  144. }
  145. private void LoadGridData()
  146. {
  147. sql.Clear();
  148. sql.Append("select pa_prodcode,nvl(pd_barcode,PD_INNERBOXCODE) code ,pd_innerqty,pa_salecode");
  149. sql.Append(",pa_makecode,pa_custcode,pa_packageqty from packagedetail left join package on pd_paid=pa_id left ");
  150. sql.Append("join product on pr_code=pa_prodcode where pa_outboxcode ='" + palletcode.Text + "' and pa_type=3");
  151. dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  152. BaseUtil.FillDgvWithDataTable(PackageInf, dt);
  153. }
  154. private void FillPrintLabel()
  155. {
  156. DataTable _dt = (DataTable)dh.ExecuteSql("select pl_labelcode ||':'||pl_labelname pl_name,pl_labelname,pl_labelcode,pl_labelurl,pl_indate from productlabel where pl_prodcode='" + pa_prodcode.Text + "' and PL_LABELTYPE='栈板标' order by PL_ISDEFAULT DESC", "select");
  157. PrintLabel.DataSource = _dt;
  158. PrintLabel.DisplayMember = "pl_name";
  159. PrintLabel.ValueMember = "pl_labelcode";
  160. ftpOperater ftp = new ftpOperater();
  161. indate = new System.DateTime[_dt.Rows.Count];
  162. for (int i = 0; i < _dt.Rows.Count; i++)
  163. {
  164. BaseUtil.GetPrintLabel(_dt.Rows[i]["pl_labelname"].ToString(), _dt.Rows[i]["pl_labelurl"].ToString(), _dt.Rows[i]["pl_indate"].ToString());
  165. indate[i] = Convert.ToDateTime(_dt.Rows[i]["pl_indate"].ToString());
  166. }
  167. }
  168. private void LoadCollectNum()
  169. {
  170. pa_currentqty.Text = dh.getFieldDataByCondition("package", "pa_currentqty", "pa_outboxcode='" + palletcode.Text + "' and pa_type=3").ToString();
  171. }
  172. private void 栈板称重_SizeChanged(object sender, EventArgs e)
  173. {
  174. asc.controlAutoSize(this);
  175. }
  176. private void NewPallet_Click(object sender, EventArgs e)
  177. {
  178. NewPallet = new Make_NewPallet("PALLET", pa_makecode.Text);
  179. NewPallet.Controls["Confirm"].Click += Make_PalletCollection_Click;
  180. BaseUtil.SetFormCenter(NewPallet);
  181. NewPallet.ShowDialog();
  182. }
  183. private void Make_PalletCollection_Click(object sender, EventArgs e)
  184. {
  185. palletcode.Text = NewPallet.OutBoxCode;
  186. palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
  187. NewPallet.Close();
  188. }
  189. private void Print_Click(object sender, EventArgs e)
  190. {
  191. if (PrintLabel.Items.Count != 0)
  192. {
  193. OperateResult.AppendText(">>打印箱号" + palletcode.Text + "\n", Color.Black);
  194. doc = lbl.Documents.Open(ftpOperater.DownLoadTo + PrintLabel.Text.Split(':')[1]);
  195. Print.CodeSoft(Tag.ToString(), doc, PrintLabel.Text.Split(':')[1], PrintLabel.SelectedValue.ToString(), PrinterList.Text, pa_outboxcode.Text, int.Parse(PrintNum.Text), indate[PrintLabel.SelectedIndex]);
  196. }
  197. else
  198. OperateResult.AppendText(">>产品" + pa_prodcode.Text + "未维护打印标签\n", Color.Red);
  199. }
  200. private void ReleasePallet_Click(object sender, EventArgs e)
  201. {
  202. //将子箱的母箱编号置成空
  203. dh.ExecuteSql("update package set pa_mothercode='' where pa_outboxcode in(select PD_INNERBOXCODE from package left join packagedetail on pa_id=pd_paid where pa_outboxcode='" + palletcode.Text + "')", "update");
  204. dh.ExecuteSql("delete from packagedetail where pd_paid=(select pa_id from package where pa_outboxcode='" + palletcode.Text + "' and pa_type=3)", "delete");
  205. dh.ExecuteSql("update package set pa_totalqty=0,pa_currentqty=0,pa_packageqty=0 where pa_outboxcode='" + palletcode.Text + "' and pa_type=3", "update");
  206. OperateResult.AppendText(">>栈板号" + outboxcode.Text + "解除成功\n", Color.Green);
  207. palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
  208. }
  209. private void Make_PalletCollection_FormClosing(object sender, FormClosingEventArgs e)
  210. {
  211. BaseUtil.ClosePrint(lbl);
  212. }
  213. private void Packing_Click(object sender, EventArgs e)
  214. {
  215. if (pa_prodcode.Text != "" && palletcode.Text != "")
  216. {
  217. OperateResult.AppendText(">>" + palletcode.Text + "装栈板成功\n", Color.Black);
  218. palletcode.Text = LogicHandler.GetOutBoxCode("PALLET", "", pa_prodcode.Text, User.UserCode);
  219. sql.Clear();
  220. sql.Append("insert into package (pa_id,pa_outboxcode,pa_makecode,pa_indate,pa_packageqty,pa_type,pa_prodcode,pa_level,PA_STATUS,pa_standardqty,pa_sccode,pa_currentstep)values");
  221. sql.Append("(package_seq.nextval,'" + palletcode.Text + "','" + pa_makecode.Text + "',sysdate,'0',3,'" + pa_prodcode.Text + "',0,'1','" + pa_standardqty.Text + "','" + User.UserSourceCode + "','" + User.CurrentStepCode + "')");
  222. dh.ExecuteSql(sql.GetString(), "insert");
  223. palletcode_KeyDown(new object(), new KeyEventArgs(Keys.Enter));
  224. }
  225. else OperateResult.AppendText(">>栈板号不能为空\n", Color.Red);
  226. }
  227. }
  228. }