Packing_CartonTransfer.cs 30 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473
  1. using System;
  2. using System.Collections.Generic;
  3. using System.ComponentModel;
  4. using System.Data;
  5. using System.Drawing;
  6. using System.Linq;
  7. using System.Text;
  8. using System.Windows.Forms;
  9. using UAS_MES.DataOperate;
  10. using UAS_MES.Entity;
  11. using UAS_MES.PublicMethod;
  12. namespace UAS_MES.Packing
  13. {
  14. public partial class Packing_CartonTransfer : Form
  15. {
  16. AutoSizeFormClass asc = new AutoSizeFormClass();
  17. DataTable dt;
  18. DataTable dt1;
  19. DataTable dtbar;
  20. DataTable dtst;
  21. LogStringBuilder sql = new LogStringBuilder();
  22. DataHelper dh;
  23. //目标箱号相关变量
  24. string new_pa_downstatus;
  25. string new_pa_currentqty;
  26. string new_pa_standardqty;
  27. string new_pa_packtype;
  28. string new_pa_prodcode;
  29. string new_pa_salecode;
  30. string new_pa_checkno;
  31. string new_ob_result;
  32. string new_pa_mothercode;
  33. public Packing_CartonTransfer()
  34. {
  35. InitializeComponent();
  36. }
  37. private void 卡通箱转移_Load(object sender, EventArgs e)
  38. {
  39. asc.controllInitializeSize(this);
  40. dh = new DataHelper();
  41. movepack.Focus();
  42. OperateResult.AppendText(">>请输入目标箱号\n", Color.Black);
  43. }
  44. private void 卡通箱转移_SizeChanged(object sender, EventArgs e)
  45. {
  46. asc.controlAutoSize(this);
  47. }
  48. private void movepack_Click(object sender, EventArgs e)
  49. {
  50. if (((RadioButton)sender).Checked == true)
  51. {
  52. if (((RadioButton)sender).Name == "movepack")
  53. {
  54. pa_outboxcode.Text = "";
  55. pa_currentqty.Text = "";
  56. pa_standardqty.Text = "";
  57. pa_standardqty.Enabled = false;
  58. ALLMOVE.Enabled = false;
  59. pa_outboxcode.Focus();
  60. }
  61. else if (((RadioButton)sender).Name == "newpack")
  62. {
  63. pa_outboxcode.Text = "";
  64. pa_currentqty.Text = "";
  65. pa_standardqty.Text = "";
  66. pa_standardqty.Enabled = true;
  67. ALLMOVE.Enabled = true;
  68. pa_outboxcode.Focus();
  69. }
  70. }
  71. }
  72. private void pa_outboxcode_KeyDown(object sender, KeyEventArgs e)
  73. {
  74. if (e.KeyCode == Keys.Enter)
  75. {
  76. if (newpack.Checked)
  77. {
  78. if (dh.CheckExist("package", "pa_outboxcode = '" + pa_outboxcode.Text + "'"))
  79. {
  80. OperateResult.AppendText(">>该箱号" + pa_outboxcode.Text + "已经存在,如需转移至已经存在的箱号,请选择移箱\n", Color.Red, pa_outboxcode);
  81. pa_outboxcode.Focus();
  82. return;
  83. }
  84. }
  85. else if (movepack.Checked)
  86. {
  87. CheckBoxCode();
  88. }
  89. }
  90. }
  91. private void sn_code_KeyDown(object sender, KeyEventArgs e)
  92. {
  93. if (e.KeyCode == Keys.Enter)
  94. {
  95. string ms_id = dh.getFieldDataByCondition("makeserial", "max(ms_id) ms_id", "ms_sncode = '" + sn_code.Text + "'").ToString();
  96. if (ms_id != "")
  97. {
  98. OperateResult.AppendText(">>序列号:" + sn_code.Text + "\n", Color.Black);
  99. sql.Clear();
  100. sql.Append("select ms_id,ms_prodcode,ms_outboxcode,ms_makecode ms_msmakecode, ms_sccode,");
  101. sql.Append("nvl(ms_currentstepcode,ms_stepcode ) laststepcode, ms_sccode lastsccode,");
  102. sql.Append("ms_checkno from makeserial where ms_id='" + ms_id + "'");
  103. dt1 = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  104. string ms_outboxcode = dt1.Rows[0]["ms_outboxcode"].ToString();
  105. string msprodcode = dt1.Rows[0]["ms_prodcode"].ToString();
  106. string ms_makecode = dt1.Rows[0]["ms_msmakecode"].ToString();
  107. if (ms_outboxcode != "")
  108. {
  109. sql.Clear();
  110. 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 + "'");
  111. dtbar = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  112. if (dtbar.Rows.Count > 0)
  113. {
  114. string pa_mothercode = dtbar.Rows[0]["pa_mothercode"].ToString();
  115. string PA_PACKTYPE = dtbar.Rows[0]["PA_PACKTYPE"].ToString();
  116. string pa_checkno = dtbar.Rows[0]["pa_checkno"].ToString();
  117. string PA_DOWNSTATUS = dtbar.Rows[0]["PA_DOWNSTATUS"].ToString();
  118. string old_pa_id = dtbar.Rows[0]["pa_id"].ToString();
  119. string ob_result = dh.getFieldDataByCondition("oqcbatch", "ob_result", "ob_checkno = '" + pa_checkno + "'").ToString();
  120. if (pa_mothercode != "")
  121. {
  122. OperateResult.AppendText(">>原箱" + ms_outboxcode + "已装入大箱,不允许转移\n", Color.Red, sn_code);
  123. return;
  124. }
  125. if (PA_DOWNSTATUS == "0")
  126. {
  127. BaseUtil.SetFormValue(this.Controls, dtbar);
  128. BaseUtil.SetFormValue(this.Controls, dt1);
  129. if (PA_PACKTYPE == "MIX")
  130. {
  131. ms_prodcode.Text = "混包";
  132. }
  133. else if (PA_PACKTYPE == "SALE")
  134. {
  135. ms_msmakecode.Text = pa_salecode.Text;
  136. }
  137. if (newpack.Checked)
  138. {
  139. if (ob_result == "")
  140. {
  141. if (pa_standardqty.Text != "")
  142. {
  143. if (pa_outboxcode.Text != "")
  144. {
  145. if (dh.CheckExist("package", "pa_outboxcode = '" + pa_outboxcode.Text + "'"))
  146. {
  147. OperateResult.AppendText(">>该箱号" + pa_outboxcode.Text + "已经存在,如需转移至已经存在的箱号,请选择移箱\n", Color.Red, pa_outboxcode);
  148. pa_outboxcode.Focus();
  149. return;
  150. }
  151. else
  152. {
  153. string pa_id = dh.GetSEQ("package_seq");
  154. //新增箱
  155. sql.Clear();
  156. sql.Append("insert into package (PA_ID, PA_OUTBOXCODE,PA_PRODCODE, PA_PACKDATE,");
  157. sql.Append("PA_LEVEL,PA_PACKAGEQTY,PA_TOTALQTY,PA_MAKECODE,PA_STATUS,PA_INDATE,");
  158. sql.Append("PA_SALECODE,PA_CUSTCODE,PA_TYPE,PA_CURRENTQTY,PA_PACKTYPE,PA_STANDARDQTY)");
  159. sql.Append("values ('" + pa_id + "','" + pa_outboxcode.Text + "','" + msprodcode + "',sysdate,'" + pa_level.Text + "','0','0'");
  160. sql.Append(",'" + ms_makecode + "','0',sysdate,'" + pa_salecode.Text + "','" + pa_custcode.Text + "','" + pa_type.Text + "','0','" + pa_packtype.Text + "','" + pa_standardqty.Text + "')");
  161. dh.ExecuteSql(sql.GetString(), "insert");
  162. //删除原明细
  163. dh.ExecuteSql("delete from packagedetail where pd_paid='" + old_pa_id + "' and pd_barcode = '" + sn_code.Text + "'", "delete");
  164. sql.Clear();
  165. sql.Append("insert into packagedetail (PD_ID,PD_PAID,PD_OUTBOXCODE,PD_BARCODE,PD_INNERQTY,PD_PRODCODE,PD_MAKECODE,PD_BUILDDATE,PD_YMD)");
  166. sql.Append("values (packagedetail_seq.nextval,'" + pa_id + "','" + pa_outboxcode.Text + "','" + sn_code.Text + "','1','" + msprodcode + "','" + ms_makecode + "',sysdate,to_char(sysdate,'yyyymmdd'))");
  167. dh.ExecuteSql(sql.GetString(), "insert");
  168. //更新原箱数量
  169. dh.UpdateByCondition("package", "pa_currentqty=pa_currentqty-1", "pa_outboxcode = '" + ms_outboxcode + "'");
  170. //更新目标箱数量
  171. dh.UpdateByCondition("package", "pa_currentqty=1, pa_totalqty=1,pa_packageqty=1", "pa_outboxcode = '" + pa_outboxcode.Text + "'");
  172. dh.UpdateByCondition("makeserial", "ms_outboxcode = '" + pa_outboxcode.Text + "'", "ms_id = '" + ms_id + "'");
  173. LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, ms_makecode, User.UserLineCode, User.UserSourceCode, "卡通箱转移", "卡通箱转移,生成目标箱号" + pa_outboxcode.Text + "", sn_code.Text, "");
  174. LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, ms_makecode, User.UserLineCode, User.UserSourceCode, "卡通箱转移", "序列号:" + sn_code.Text + ",从原箱号:" + ms_outboxcode + "转移至目标箱号:" + pa_outboxcode.Text + "", sn_code.Text, "");
  175. OperateResult.AppendText(">>序列号:" + sn_code.Text + ",从原箱号:" + ms_outboxcode + "转移至目标箱号:" + pa_outboxcode.Text + "\n", Color.Green);
  176. pa_outboxcode_KeyDown(sender, e);
  177. }
  178. }
  179. else
  180. {
  181. OperateResult.AppendText(">>必须填写新增目标箱号\n", Color.Red);
  182. return;
  183. }
  184. }
  185. else
  186. {
  187. OperateResult.AppendText(">>新增目标箱号必须填写标准容量\n", Color.Red);
  188. return;
  189. }
  190. }
  191. else
  192. {
  193. OperateResult.AppendText(">>原箱" + ms_outboxcode + "处于送检状态,不允许转移\n", Color.Red, sn_code);
  194. return;
  195. }
  196. }
  197. else if (movepack.Checked)
  198. {
  199. if (CheckBoxCode())
  200. {
  201. if (pa_outboxcode.Text == ms_outboxcode)
  202. {
  203. OperateResult.AppendText(">>原箱" + ms_outboxcode + "和目标箱号" + pa_outboxcode.Text + "相同,不允许转移\n", Color.Red, sn_code);
  204. return;
  205. }
  206. if (PA_PACKTYPE != new_pa_packtype)
  207. {
  208. OperateResult.AppendText(">>原箱" + ms_outboxcode + "和目标箱号" + pa_outboxcode.Text + "的包装方式不一致,不允许转移\n", Color.Red, sn_code);
  209. return;
  210. }
  211. if (PA_PACKTYPE != "MIX")
  212. {
  213. if (ms_prodcode.Text != new_pa_prodcode)
  214. {
  215. OperateResult.AppendText(">>原箱号和目标箱号(目标箱产品编号" + new_pa_prodcode + ")的产品编号不一致,不允许转移\n", Color.Red, sn_code);
  216. return;
  217. }
  218. if (PA_PACKTYPE != "SALE")
  219. {
  220. if (pa_salecode.Text != new_pa_salecode)
  221. {
  222. OperateResult.AppendText(">>原箱号和目标箱号的合同号不一致,不允许转移\n", Color.Red, sn_code);
  223. return;
  224. }
  225. }
  226. }
  227. if (pa_checkno != new_pa_checkno)
  228. {
  229. if ((pa_checkno == "" && new_pa_checkno != "") || (pa_checkno != "" && new_pa_checkno == ""))
  230. {
  231. if (pa_checkno != "" && ob_result == "")
  232. {
  233. OperateResult.AppendText(">>原箱号处于送检状态,不允许转移\n", Color.Red, sn_code);
  234. return;
  235. }
  236. if (new_pa_checkno != "" && new_pa_checkno == "")
  237. {
  238. OperateResult.AppendText(">>目标箱号处于送检状态,不允许转移\n", Color.Red, sn_code);
  239. return;
  240. }
  241. }
  242. if (pa_checkno != "" && new_pa_checkno != "")
  243. {
  244. string a_ob_result = dh.getFieldDataByCondition("oqcbatch", "ob_status", "ob_checkno = '" + pa_checkno + "'").ToString();
  245. string b_ob_result = dh.getFieldDataByCondition("oqcbatch", "ob_status", "ob_checkno = '" + new_pa_checkno + "'").ToString();
  246. if (!((a_ob_result == b_ob_result) && (b_ob_result == "OK" || b_ob_result == "NG")))
  247. {
  248. OperateResult.AppendText(">>原箱号和目标箱号必须抽检完成,并且结果一致才可以转移\n", Color.Red, sn_code);
  249. return;
  250. }
  251. }
  252. }
  253. string new_laststepcode = dh.getFieldDataByCondition("packagedetail inner join makeserial on ms_outboxcode=pd_outboxcode and ms_sncode=pd_barcode and ms_prodcode = pd_prodcode", "max(nvl(ms_currentstepcode,ms_stepcode))", "pd_outboxcode='" + pa_outboxcode.Text + "'").ToString();
  254. if (new_laststepcode != laststepcode.Text)
  255. {
  256. OperateResult.AppendText(">>目标箱号中的序列号最后所在工序与所录入序列号最后所在工序不一致\n", Color.Red, sn_code);
  257. return;
  258. }
  259. //删除原明细
  260. dh.ExecuteSql("delete from packagedetail where pd_paid='" + old_pa_id + "' and pd_barcode = '" + sn_code.Text + "'", "delete");
  261. //更新操作
  262. sql.Clear();
  263. sql.Append("insert into packagedetail (PD_ID,PD_PAID,PD_OUTBOXCODE,PD_BARCODE,PD_INNERQTY,PD_PRODCODE,PD_MAKECODE,PD_BUILDDATE,PD_YMD)");
  264. sql.Append("values (packagedetail_seq.nextval,'" + dh.getFieldDataByCondition("package", "pa_id", "PA_OUTBOXCODE = '" + pa_outboxcode.Text + "'").ToString() + "','" + pa_outboxcode.Text + "','" + sn_code.Text + "','1','" + msprodcode + "','" + ms_makecode + "',sysdate,to_char(sysdate,'yyyymmdd'))");
  265. dh.ExecuteSql(sql.GetString(), "insert");
  266. //更新原箱数量
  267. dh.UpdateByCondition("package", "pa_currentqty=pa_currentqty-1", "pa_outboxcode = '" + ms_outboxcode + "'");
  268. //更新目标箱数量
  269. dh.UpdateByCondition("package", "pa_currentqty=nvl(pa_currentqty,0)+ 1,pa_totalqty=nvl(pa_totalqty,0)+1,pa_packageqty=nvl(pa_packageqty ,0)+1", "pa_outboxcode = '" + pa_outboxcode.Text + "'");
  270. dh.UpdateByCondition("makeserial", "ms_outboxcode = '" + pa_outboxcode.Text + "'", "ms_id = '" + ms_id + "'");
  271. LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, ms_makecode, User.UserLineCode, User.UserSourceCode, "卡通箱转移", "序列号:" + sn_code.Text + ",从原箱号:" + ms_outboxcode + "转移至目标箱号:" + pa_outboxcode.Text + "", sn_code.Text, "");
  272. OperateResult.AppendText(">>序列号:" + sn_code.Text + ",从原箱号:" + ms_outboxcode + "转移至目标箱号:" + pa_outboxcode.Text + "\n", Color.Green);
  273. pa_outboxcode_KeyDown(sender, e);
  274. sql.Clear();
  275. 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 + "'");
  276. dtbar = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  277. BaseUtil.SetFormValue(this.Controls, dtbar);
  278. }
  279. }
  280. }
  281. else OperateResult.AppendText(">>原箱" + ms_outboxcode + "已经下地\n", Color.Red, sn_code);
  282. }
  283. else OperateResult.AppendText(">>序列号" + sn_code.Text + "未装箱\n", Color.Red, sn_code);
  284. }
  285. else OperateResult.AppendText(">>序列号" + sn_code.Text + "未装箱\n", Color.Red, sn_code);
  286. }
  287. else OperateResult.AppendText(">>序列号" + sn_code.Text + "不存在\n", Color.Red, sn_code);
  288. }
  289. }
  290. private Boolean CheckBoxCode()
  291. {
  292. sql.Clear();
  293. sql.Append("select pa_id,pa_outboxcode,pa_checkno,pa_standardqty,nvl(pa_currentqty,0) pa_currentqty,pa_packtype,pa_prodcode,nvl(pa_downstatus,0) pa_downstatus,pa_salecode,pa_mothercode from package where pa_outboxcode='" + pa_outboxcode.Text + "'");
  294. dt = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  295. if (dt.Rows.Count > 0)
  296. {
  297. new_pa_downstatus = dt.Rows[0]["pa_downstatus"].ToString();
  298. new_pa_currentqty = dt.Rows[0]["pa_currentqty"].ToString();
  299. new_pa_standardqty = dt.Rows[0]["pa_standardqty"].ToString();
  300. new_pa_packtype = dt.Rows[0]["pa_packtype"].ToString();
  301. new_pa_prodcode = dt.Rows[0]["pa_prodcode"].ToString();
  302. new_pa_salecode = dt.Rows[0]["pa_salecode"].ToString();
  303. new_pa_checkno = dt.Rows[0]["pa_checkno"].ToString();
  304. new_pa_mothercode = dt.Rows[0]["pa_mothercode"].ToString();
  305. new_ob_result = dh.getFieldDataByCondition("oqcbatch", "ob_result", "ob_checkno = '" + new_pa_checkno + "'").ToString();
  306. if (new_pa_downstatus != "0")
  307. {
  308. OperateResult.AppendText(">>该目标箱号" + pa_outboxcode.Text + "处于下地状态,不允许操作\n", Color.Red, pa_outboxcode);
  309. OperateResult.AppendText(">>请输入目标箱号\n", Color.Black);
  310. pa_outboxcode.Focus();
  311. return false;
  312. }
  313. else if (new_pa_currentqty == new_pa_standardqty)
  314. {
  315. OperateResult.AppendText(">>目标箱号" + pa_outboxcode.Text + "已装满\n", Color.Red, pa_outboxcode);
  316. OperateResult.AppendText(">>请输入目标箱号\n", Color.Black);
  317. pa_outboxcode.Focus();
  318. return false;
  319. }
  320. else if (new_pa_mothercode != "")
  321. {
  322. OperateResult.AppendText(">>目标箱号" + pa_outboxcode.Text + "装入大箱\n", Color.Red, pa_outboxcode);
  323. OperateResult.AppendText(">>请输入目标箱号\n", Color.Black);
  324. pa_outboxcode.Focus();
  325. return false;
  326. }
  327. BaseUtil.SetFormValue(this.Controls, dt);
  328. return true;
  329. }
  330. else
  331. {
  332. OperateResult.AppendText(">>该目标箱号" + pa_outboxcode.Text + "不存在\n", Color.Red, pa_outboxcode);
  333. OperateResult.AppendText(">>请输入目标箱号\n", Color.Black);
  334. pa_outboxcode.Focus();
  335. return false;
  336. }
  337. }
  338. private void button1_Click(object sender, EventArgs e)
  339. {
  340. BaseUtil.CleanControls(this.Controls);
  341. }
  342. private void ms_outboxcode_KeyDown(object sender, KeyEventArgs e)
  343. {
  344. if (e.KeyCode == Keys.Enter)
  345. {
  346. sql.Clear();
  347. sql.Append("select pa_id,pa_checkno,PA_MAKECODE,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.Text + "'");
  348. DataTable dtbar = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  349. if (dtbar.Rows.Count > 0)
  350. {
  351. BaseUtil.SetFormValue(this.Controls, dtbar);
  352. }
  353. else OperateResult.AppendText(">>箱号" + ms_outboxcode.Text + "不存在\n", Color.Red, ms_outboxcode);
  354. }
  355. }
  356. private void ALLMOVE_Click(object sender, EventArgs e)
  357. {
  358. sql.Clear();
  359. sql.Append("select pa_id,pa_checkno,PA_MAKECODE,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.Text + "'");
  360. dtbar = (DataTable)dh.ExecuteSql(sql.GetString(), "select");
  361. if (dtbar.Rows.Count > 0)
  362. {
  363. BaseUtil.SetFormValue(this.Controls, dtbar);
  364. }
  365. else
  366. {
  367. OperateResult.AppendText(">>箱号" + ms_outboxcode.Text + "不存在\n", Color.Red, ms_outboxcode);
  368. return;
  369. }
  370. string pa_mothercode = dtbar.Rows[0]["pa_mothercode"].ToString();
  371. string PA_PACKTYPE = dtbar.Rows[0]["PA_PACKTYPE"].ToString();
  372. string pa_checkno = dtbar.Rows[0]["pa_checkno"].ToString();
  373. string PA_DOWNSTATUS = dtbar.Rows[0]["PA_DOWNSTATUS"].ToString();
  374. string old_pa_id = dtbar.Rows[0]["pa_id"].ToString();
  375. string pa_makecode = dtbar.Rows[0]["pa_makecode"].ToString();
  376. string pa_macode = dtbar.Rows[0]["pa_macode"].ToString();
  377. string ob_result = dh.getFieldDataByCondition("oqcbatch", "ob_result", "ob_checkno = '" + pa_checkno + "'").ToString();
  378. if (pa_mothercode != "")
  379. {
  380. OperateResult.AppendText(">>原箱" + ms_outboxcode.Text + "已装入大箱,不允许转移\n", Color.Red, sn_code);
  381. return;
  382. }
  383. if (ob_result == "")
  384. {
  385. if (pa_standardqty.Text != "")
  386. {
  387. if (int.Parse(pa_standardqty.Text) < int.Parse(pa_qty.Text))
  388. {
  389. OperateResult.AppendText(">>填写的标准容量" + pa_standardqty.Text + "小于待转移箱的容量\n", Color.Red);
  390. return;
  391. }
  392. if (pa_outboxcode.Text != "")
  393. {
  394. if (dh.CheckExist("package", "pa_outboxcode = '" + pa_outboxcode.Text + "'"))
  395. {
  396. OperateResult.AppendText(">>该箱号" + pa_outboxcode.Text + "已经存在,如需转移至已经存在的箱号,请选择移箱\n", Color.Red, pa_outboxcode);
  397. pa_outboxcode.Focus();
  398. return;
  399. }
  400. else
  401. {
  402. string pa_id = dh.GetSEQ("package_seq");
  403. //新增箱
  404. sql.Clear();
  405. sql.Append("insert into package (PA_ID, PA_OUTBOXCODE,PA_PRODCODE, PA_PACKDATE,");
  406. sql.Append("PA_LEVEL,PA_PACKAGEQTY,PA_TOTALQTY,PA_MAKECODE,PA_STATUS,PA_INDATE,");
  407. sql.Append("PA_SALECODE,PA_CUSTCODE,PA_TYPE,PA_CURRENTQTY,PA_PACKTYPE,PA_STANDARDQTY)");
  408. sql.Append("values ('" + pa_id + "','" + pa_outboxcode.Text + "','" + pa_macode + "',sysdate,'" + pa_level.Text + "','0','0'");
  409. sql.Append(",'" + pa_makecode + "','0',sysdate,'" + pa_salecode.Text + "','" + pa_custcode.Text + "','" + pa_type.Text + "','0','" + pa_packtype.Text + "','" + pa_standardqty.Text + "')");
  410. dh.ExecuteSql(sql.GetString(), "insert");
  411. ////删除原明细
  412. //dh.ExecuteSql("delete from packagedetail where pd_paid='" + old_pa_id + "'", "delete");
  413. //sql.Clear();
  414. //sql.Append("insert into packagedetail (PD_ID,PD_PAID,PD_OUTBOXCODE,PD_BARCODE,PD_INNERQTY,PD_PRODCODE,PD_MAKECODE,PD_BUILDDATE,PD_YMD)");
  415. //sql.Append("values (packagedetail_seq.nextval,'" + pa_id + "','" + pa_outboxcode.Text + "','" + sn_code.Text + "','1','" + pa_macode + "','" + pa_makecode + "',sysdate,to_char(sysdate,'yyyymmdd'))");
  416. //dh.ExecuteSql(sql.GetString(), "insert");
  417. dh.UpdateByCondition("packagedetail", "PD_OUTBOXCODE = '" + pa_outboxcode.Text + "',PD_PAID = '" + pa_id + "'", "pd_paid='" + old_pa_id + "'");
  418. //更新原箱数量
  419. dh.UpdateByCondition("package", "pa_currentqty=0", "pa_outboxcode = '" + ms_outboxcode.Text + "'");
  420. //更新目标箱数量
  421. dh.UpdateByCondition("package", "pa_currentqty=" + int.Parse(pa_qty.Text) + ", pa_totalqty=" + int.Parse(pa_qty.Text) + ",pa_packageqty=" + int.Parse(pa_qty.Text) + "", "pa_outboxcode = '" + pa_outboxcode.Text + "'");
  422. dh.UpdateByCondition("makeserial", "ms_outboxcode = '" + pa_outboxcode.Text + "'", "ms_outboxcode = '" + ms_outboxcode.Text + "'");
  423. LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, pa_makecode, User.UserLineCode, User.UserSourceCode, "卡通箱转移", "卡通箱转移,生成目标箱号" + pa_outboxcode.Text + "", "", "");
  424. LogicHandler.DoCommandLog(Tag.ToString(), User.UserCode, pa_makecode, User.UserLineCode, User.UserSourceCode, "卡通箱转移", "原箱号:" + ms_outboxcode.Text + "全部转移至目标箱号:" + pa_outboxcode.Text + "", "", "");
  425. OperateResult.AppendText("原箱号:" + ms_outboxcode.Text + "全部转移至目标箱号:" + pa_outboxcode.Text + "\n", Color.Green);
  426. }
  427. }
  428. else
  429. {
  430. OperateResult.AppendText(">>必须填写新增目标箱号\n", Color.Red);
  431. return;
  432. }
  433. }
  434. else
  435. {
  436. OperateResult.AppendText(">>新增目标箱号必须填写标准容量\n", Color.Red);
  437. return;
  438. }
  439. }
  440. else
  441. {
  442. OperateResult.AppendText(">>原箱" + ms_outboxcode + "处于送检状态,不允许转移\n", Color.Red, sn_code);
  443. return;
  444. }
  445. }
  446. }
  447. }