锐腾搅拌上料功能
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

588 lines
21 KiB

5 months ago
  1. using System;
  2. using System.Collections.Generic;
  3. using System.ComponentModel;
  4. using System.Data;
  5. using System.Drawing;
  6. using System.Text;
  7. using System.Windows.Forms;
  8. using DevExpress.XtraEditors;
  9. using ICSSoft.Frame.User.BLL;
  10. using ICSSoft.Base.Language.Tool;
  11. using ICSSoft.Base.UserControl.MessageControl;
  12. using System.Data.SqlClient;
  13. using ICSSoft.Base.Config.AppConfig;
  14. using ICSSoft.Base.Report.Filter;
  15. using ICSSoft.Base.Config.DBHelper;
  16. using ICSSoft.Base.UserControl.FormControl;
  17. using ICSSoft.Base.ReferForm.AppReferForm;
  18. using ICSSoft.Base.Lable.PrintTool;
  19. using ICSSoft.Frame.Data.BLL;
  20. using ICSSoft.Frame.Data.Entity;
  21. namespace ICSSoft.Frame.APP
  22. {
  23. public partial class FormICSRewarehouseCreate : DevExpress.XtraEditors.XtraForm
  24. {
  25. private FormICSRdrecord2LOTUIModel RecInfo;
  26. private string CODE;
  27. private string RowNo;
  28. private string invStd;
  29. private string type;
  30. #region 构造函数
  31. public FormICSRewarehouseCreate(string code, string rowNO, string InvStd, string Type)
  32. {
  33. InitializeComponent();
  34. chkBtnAll.Checked = false;
  35. chkBtnNo.Checked = true;
  36. CODE = code;
  37. RowNo = rowNO;
  38. invStd = InvStd;
  39. GetRecInfo();
  40. if (RecInfo == null)
  41. {
  42. throw new Exception("入库单信息取得失败");
  43. }
  44. //if (RecInfo.item.ItemCtrType == null || RecInfo.item.ItemCtrType.ItemCtrTypeCode == "")
  45. //{
  46. // throw new Exception("入库单对应料品的控管类型为空,无法生成条码");
  47. //}
  48. }
  49. #endregion
  50. #region 移动窗体
  51. private const int WM_NCHITTEST = 0x84;
  52. private const int HTCLIENT = 0x1;
  53. private const int HTCAPTION = 0x2;
  54. //首先必须了解Windows的消息传递机制,当有鼠标活动消息时,
  55. //系统发送WM_NCHITTEST 消息给窗体作为判断消息发生地的根据。 nchittest
  56. //假如你点击的是标题栏,窗体收到的消息值就是 HTCAPTION ,
  57. //同样地,若接受到的消息是 HTCLIENT,说明用户点击的是客户区,也就是鼠标消息发生在客户区。
  58. //重写窗体,使窗体可以不通过自带标题栏实现移动
  59. protected override void WndProc(ref Message m)
  60. {
  61. //当重载窗体的 WndProc 方法时,可以截获 WM_NCHITTEST 消息并改些该消息,
  62. //当判断鼠标事件发生在客户区时,改写改消息,发送 HTCAPTION 给窗体,
  63. //这样,窗体收到的消息就时 HTCAPTION ,在客户区通过鼠标来拖动窗体就如同通过标题栏来拖动一样。
  64. //注意:当你重载 WndProc 并改写鼠标事件后,整个窗体的鼠标事件也就随之改变了。
  65. switch (m.Msg)
  66. {
  67. case WM_NCHITTEST:
  68. base.WndProc(ref m);
  69. if ((int)m.Result == HTCLIENT)
  70. m.Result = (IntPtr)HTCAPTION;
  71. return;
  72. }
  73. //拦截双击标题栏、移动窗体的系统消息
  74. if (m.Msg != 0xA3)
  75. {
  76. base.WndProc(ref m);
  77. }
  78. }
  79. #endregion
  80. #region 退出
  81. private void btnClose_Click(object sender, EventArgs e)
  82. {
  83. AppConfig.CloseFormShow(this.Text);
  84. this.Close();
  85. }
  86. private void btnExit_Click(object sender, EventArgs e)
  87. {
  88. AppConfig.CloseFormShow(this.Text);
  89. this.Close();
  90. }
  91. #endregion
  92. private void GetRecInfo()
  93. {
  94. RecInfo = FormICSRewarehouseBLL.SearchInfo(CODE, RowNo, AppConfig.AppConnectString);
  95. init();
  96. }
  97. private void init()
  98. {
  99. txtSumNo.Text = "";
  100. txtNowNo.Text = "";
  101. txtNowQty.Text = "";
  102. txtSumQty.Text = "";
  103. txtAllQty.Text = "";
  104. btnLabelCreate.Enabled = true;
  105. if (RecInfo == null)
  106. {
  107. return;
  108. }
  109. //if (RecInfo.item != null)
  110. //{
  111. // if (RecInfo.item.ItemCtrType == null)
  112. // {
  113. // btnLabelCreate.Enabled = false;
  114. // }
  115. //if (RecInfo.item.ItemCtrType.ItemCtrTypeCode == ATVControlParam.ItemCtrlEnum.PieceCtrl.Code)
  116. //{
  117. // txtNowPackQty.Text = "1";
  118. // txtNowPackQty.Properties.ReadOnly = true;
  119. // chkBtnPack.Checked = false;
  120. // chkBtnPack.Checked = true;
  121. // chkBtnAll.Enabled = false;
  122. // chkBtnNo.Enabled = false;
  123. // chkBtnPack.Enabled = false;
  124. //}
  125. //else
  126. //{
  127. //txtNowPackQty.Text = "1";
  128. txtNowPackQty.Properties.ReadOnly = false;
  129. //chkBtnPack.Checked = false;
  130. //chkBtnPack.Checked = true;
  131. chkBtnAll.Enabled = true;
  132. chkBtnNo.Enabled = true;
  133. chkBtnPack.Enabled = true;
  134. //}
  135. //}
  136. txtSumQty.Text = RecInfo.SumQty.ToString();
  137. txtSumNo.Text = RecInfo.SumNo.ToString();
  138. txtNowQty.Text = (RecInfo.reware.Quantity - RecInfo.SumQty > 0 ? RecInfo.reware.Quantity - RecInfo.SumQty : 0).ToString();
  139. //txtNowNo.Text = Math.Ceiling(decimal.Parse(txtNowQty.Text)).ToString();
  140. if (string.IsNullOrWhiteSpace(RecInfo.inventory.INVCARTONQTY.ToString()))
  141. {
  142. txtNowPackQty.Text = "1";
  143. txtNowNo.Text = Math.Ceiling(decimal.Parse(txtNowQty.Text)).ToString();
  144. }
  145. else
  146. {
  147. if (RecInfo.inventory.INVCARTONQTY == 0)
  148. {
  149. txtNowPackQty.Text = "1";
  150. txtNowNo.Text = txtNowQty.Text;
  151. }
  152. else
  153. {
  154. txtNowPackQty.Text = RecInfo.inventory.INVCARTONQTY.ToString();
  155. txtNowNo.Text = Math.Ceiling(decimal.Parse(txtNowQty.Text) / decimal.Parse(RecInfo.inventory.INVCARTONQTY.ToString())).ToString();
  156. }
  157. }
  158. txtAllQty.Text = (decimal.Parse(txtSumQty.Text) + decimal.Parse(txtNowQty.Text)).ToString();
  159. txtAllNo.Text = (decimal.Parse(txtSumNo.Text) + decimal.Parse(txtNowNo.Text)).ToString();
  160. }
  161. private void btnLabelCreate_Click(object sender, EventArgs e)
  162. {
  163. if (RecInfo == null)
  164. {
  165. ICSBaseSimpleCode.AppshowMessageBox("入库单信息取得失败");
  166. return;
  167. }
  168. if (string.IsNullOrWhiteSpace(RecInfo.reware.VouchCode) || string.IsNullOrWhiteSpace(RecInfo.reware.VouchRow.ToString()))
  169. {
  170. ICSBaseSimpleCode.AppshowMessageBox("生产订单号或生产订单号行号不能为空!");
  171. return;
  172. }
  173. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在生成条码……");
  174. try
  175. {
  176. _wait.Show();
  177. Decimal totalQty = decimal.Parse(txtNowQty.Text);
  178. decimal pieceQty = decimal.Parse(txtNowPackQty.Text);
  179. int Num = int.Parse(txtNowNo.Text);
  180. if (pieceQty * Num < totalQty || pieceQty * (Num - 1) >= totalQty)
  181. {
  182. throw new Exception("条码数量计算出错,请重新计算");
  183. }
  184. decimal Qty = decimal.Parse(txtNowPackQty.Text);
  185. if (Num <= 0)
  186. {
  187. throw new Exception("条码张数不能为0");
  188. }
  189. if (Qty <= 0)
  190. {
  191. throw new Exception("条码数量不能为0");
  192. }
  193. List<ICSITEMLot> InfoList = new List<ICSITEMLot>();
  194. int count = Convert.ToInt32(RecInfo.MaxNo);
  195. DateTime time = AppConfig.GetSeverDateTime("yyyy-MM-dd");
  196. string timeStr = time.ToString("yyMMdd");
  197. for (int i = 0; i < Num; i++)
  198. {
  199. _wait.Caption = "正在生成条码……" + " " + i.ToString() + "/" + Num.ToString();
  200. _wait.Refresh();
  201. ICSITEMLot Info = new ICSITEMLot();
  202. Info.ID = "";
  203. if (Qty < totalQty - Qty * i)
  204. {
  205. Info.LOTQTY = Qty;
  206. }
  207. else
  208. {
  209. Info.LOTQTY = totalQty - Qty * i;
  210. }
  211. Info.LotNO = RecInfo.reware.VouchCode + RecInfo.reware.VouchRow + (count + i + 1).ToString().PadLeft(5, '0');
  212. Info.ItemCode = RecInfo.reware.SubInvCode;
  213. Info.TransNO = RecInfo.reware.VouchCode;
  214. Info.TransLine = RecInfo.reware.VouchRow;
  215. //if (!string.IsNullOrWhiteSpace(RecInfo.VenderLotNO))
  216. // Info.VenderLotNO = RecInfo.VenderLotNO;
  217. //b.SupplyQuantity/b.Quantity
  218. //如果ICSMaterialPick表中SupplyQuantity字段不为空,比列取SupplyQuantity/Quantity,否则取ICSINVENTORY表中INVGROUP
  219. if (RecInfo.reware.SupplyQuantity > 0)
  220. {
  221. Info.EATTRIBUTE3 = RecInfo.reware.SupplyQuantity / RecInfo.reware.Quantity;
  222. }
  223. else
  224. {
  225. string _sql = @"SELECT INVGROUP FROM ICSINVENTORY WHERE INVCODE = '" + RecInfo.reware.SubInvCode + "'";
  226. _sql = string.Format(_sql, AppConfig.WorkPointCode);
  227. DataTable dt = DBHelper.ExecuteDataset(AppConfig.AppConnectString.ToString(), CommandType.Text, _sql).Tables[0];
  228. if (dt != null && dt.Rows.Count > 0)
  229. {
  230. if (!string.IsNullOrWhiteSpace(dt.Rows[0][0].ToString()))
  231. {
  232. Info.EATTRIBUTE3 = Decimal.Parse(dt.Rows[0][0].ToString());
  233. }
  234. else
  235. {
  236. Info.EATTRIBUTE3 = 0;
  237. }
  238. }
  239. }
  240. if (!string.IsNullOrWhiteSpace(RecInfo.reware.VoucherNO))
  241. Info.VenderLotNO = RecInfo.reware.VoucherNO;
  242. else
  243. //Info.VenderLotNO = timeStr.Substring(timeStr.Length - 6) + (RecInfo.TodayMOCount + 1).ToString().PadLeft(3, '0'); //生产批号,每个工单一个
  244. Info.VenderLotNO = ""; //生产批号,每个工单一个
  245. Info.PRODUCTDATE = time;
  246. Info.ACTIVE = "Y";
  247. Info.Exdate = Convert.ToDateTime("2999-12-31");
  248. //Info.TYPE = RecInfo.reware.TYPE;
  249. //Info.EATTRIBUTE3 = decimal.Parse(grvDetail.GetRowCellValue(i, colEATTRIBUTE3).ToString());
  250. InfoList.Add(Info);
  251. }
  252. _wait.Caption = "条码生成成功,正在上传数据";
  253. _wait.Refresh();
  254. FormICSRewarehouseBLL.Add(InfoList, AppConfig.AppConnectString);
  255. //_wait.Caption = "数据上传完成,正在打开条码打印";
  256. //_wait.Refresh();
  257. //GetRecInfo();
  258. _wait.Close();
  259. this.Close();
  260. }
  261. catch (Exception ex)
  262. {
  263. _wait.Close();
  264. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  265. }
  266. }
  267. private void chkBtnAll_CheckedChanged(object sender, EventArgs e)
  268. {
  269. if (chkBtnAll.Checked == true)
  270. {
  271. chkBtnAll.Checked = true;
  272. chkBtnNo.Checked = false;
  273. chkBtnPack.Checked = false;
  274. chkBtnCheckedCharge();
  275. }
  276. }
  277. private void chkBtnNo_CheckedChanged(object sender, EventArgs e)
  278. {
  279. if (chkBtnNo.Checked == true)
  280. {
  281. chkBtnAll.Checked = false;
  282. chkBtnNo.Checked = true;
  283. chkBtnPack.Checked = false;
  284. chkBtnCheckedCharge();
  285. }
  286. }
  287. private void chkBtnPack_CheckedChanged(object sender, EventArgs e)
  288. {
  289. if (chkBtnPack.Checked == true)
  290. {
  291. chkBtnAll.Checked = false;
  292. chkBtnNo.Checked = false;
  293. chkBtnPack.Checked = true;
  294. chkBtnCheckedCharge();
  295. }
  296. }
  297. private void chkBtnCheckedCharge()
  298. {
  299. if (chkBtnAll.Checked == true)
  300. {
  301. chkBtnAll.Checked = true;
  302. chkBtnNo.Checked = false;
  303. chkBtnPack.Checked = false;
  304. this.chkBtnAll.Image = global::ICSSoft.Frame.APP.Properties.Resources.header_complete;
  305. this.chkBtnNo.Image = global::ICSSoft.Frame.APP.Properties.Resources.edit;
  306. this.chkBtnPack.Image = global::ICSSoft.Frame.APP.Properties.Resources.edit;
  307. txtNowQty.Properties.ReadOnly = true;
  308. txtNowNo.Properties.ReadOnly = false;
  309. txtNowPackQty.Properties.ReadOnly = false;
  310. }
  311. else if (chkBtnNo.Checked == true)
  312. {
  313. chkBtnAll.Checked = false;
  314. chkBtnNo.Checked = true;
  315. chkBtnPack.Checked = false;
  316. this.chkBtnAll.Image = global::ICSSoft.Frame.APP.Properties.Resources.edit;
  317. this.chkBtnNo.Image = global::ICSSoft.Frame.APP.Properties.Resources.header_complete;
  318. this.chkBtnPack.Image = global::ICSSoft.Frame.APP.Properties.Resources.edit;
  319. txtNowQty.Properties.ReadOnly = false;
  320. txtNowNo.Properties.ReadOnly = true;
  321. txtNowPackQty.Properties.ReadOnly = false;
  322. }
  323. else if (chkBtnPack.Checked == true)
  324. {
  325. chkBtnAll.Checked = false;
  326. chkBtnNo.Checked = false;
  327. chkBtnPack.Checked = true;
  328. this.chkBtnAll.Image = global::ICSSoft.Frame.APP.Properties.Resources.edit;
  329. this.chkBtnNo.Image = global::ICSSoft.Frame.APP.Properties.Resources.edit;
  330. this.chkBtnPack.Image = global::ICSSoft.Frame.APP.Properties.Resources.header_complete;
  331. txtNowQty.Properties.ReadOnly = false;
  332. txtNowNo.Properties.ReadOnly = false;
  333. txtNowPackQty.Properties.ReadOnly = true;
  334. }
  335. }
  336. private void txtNowPackQty_TextChanged(object sender, EventArgs e)
  337. {
  338. }
  339. private void txtDocOrg_EditValueChanged(object sender, EventArgs e)
  340. {
  341. }
  342. private void txtNowPackQty_EditValueChanged(object sender, EventArgs e)
  343. {
  344. }
  345. private void txtNowNo_EditValueChanged(object sender, EventArgs e)
  346. {
  347. bool isOK = false;
  348. if (this.ActiveControl != null && this.ActiveControl.GetType() == typeof(DevExpress.XtraEditors.TextBoxMaskBox))
  349. {
  350. DevExpress.XtraEditors.TextBoxMaskBox temp = this.ActiveControl as DevExpress.XtraEditors.TextBoxMaskBox;
  351. if (temp.OwnerEdit.Name == ((DevExpress.XtraEditors.TextEdit)sender).Name)
  352. {
  353. isOK = true;
  354. }
  355. }
  356. if (!isOK)
  357. {
  358. return;
  359. }
  360. decimal No;
  361. decimal Qty;
  362. decimal Pack;
  363. decimal Sqty = 0;
  364. decimal.TryParse(txtNowNo.Text, out No);
  365. decimal.TryParse(txtNowQty.Text, out Qty);
  366. decimal.TryParse(txtNowPackQty.Text, out Pack);
  367. if (txtNowPackQty.Properties.ReadOnly == true)
  368. {
  369. Sqty = Math.Ceiling(Qty / Pack);
  370. txtNowNo.Text = Sqty.ToString();
  371. txtNowQty.Text = Qty.ToString();
  372. txtNowPackQty.Text = Pack.ToString();
  373. }
  374. if (txtNowQty.Properties.ReadOnly == true)
  375. {
  376. if (No != 0)
  377. {
  378. Sqty = Math.Ceiling(Qty / Pack);
  379. txtNowNo.Text = Sqty.ToString();
  380. txtNowQty.Text = Qty.ToString();
  381. txtNowPackQty.Text = Pack.ToString();
  382. }
  383. else
  384. {
  385. Pack = 0;
  386. }
  387. }
  388. }
  389. private void txtNowQty_EditValueChanged(object sender, EventArgs e)
  390. {
  391. bool isOK = false;
  392. if (this.ActiveControl != null && this.ActiveControl.GetType() == typeof(DevExpress.XtraEditors.TextBoxMaskBox))
  393. {
  394. DevExpress.XtraEditors.TextBoxMaskBox temp = this.ActiveControl as DevExpress.XtraEditors.TextBoxMaskBox;
  395. if (temp.OwnerEdit.Name == ((DevExpress.XtraEditors.TextEdit)sender).Name)
  396. {
  397. isOK = true;
  398. }
  399. }
  400. if (!isOK)
  401. {
  402. return;
  403. }
  404. decimal No = 0;
  405. decimal Qty = 0;
  406. decimal Pack = 0;
  407. decimal Sqty = 0;
  408. decimal.TryParse(txtNowNo.Text, out No);
  409. decimal.TryParse(txtNowQty.Text, out Qty);
  410. decimal.TryParse(txtNowPackQty.Text, out Pack);
  411. if (txtNowPackQty.Properties.ReadOnly == true)
  412. {
  413. if (Pack != 0)
  414. {
  415. if (Pack == 0)
  416. {
  417. ICSBaseSimpleCode.AppshowMessageBox("包装量不能为0");
  418. return;
  419. }
  420. Sqty = Math.Ceiling(Qty / Pack);
  421. txtNowNo.Text = Sqty.ToString();
  422. txtNowQty.Text = Qty.ToString();
  423. txtNowPackQty.Text = Pack.ToString();
  424. }
  425. }
  426. if (txtNowNo.Properties.ReadOnly == true)
  427. {
  428. if (Pack == 0)
  429. {
  430. ICSBaseSimpleCode.AppshowMessageBox("包装量不能为0");
  431. return;
  432. }
  433. Sqty = Math.Ceiling(Qty / Pack);
  434. txtNowNo.Text = Sqty.ToString();
  435. txtNowQty.Text = Qty.ToString();
  436. txtNowPackQty.Text = Pack.ToString();
  437. }
  438. }
  439. private void txtNowPackQty_KeyDown(object sender, KeyEventArgs e)
  440. {
  441. try
  442. {
  443. if (e.KeyCode == Keys.Enter)
  444. {
  445. bool isOK = false;
  446. if (this.ActiveControl != null && this.ActiveControl.GetType() == typeof(DevExpress.XtraEditors.TextBoxMaskBox))
  447. {
  448. DevExpress.XtraEditors.TextBoxMaskBox temp = this.ActiveControl as DevExpress.XtraEditors.TextBoxMaskBox;
  449. if (temp.OwnerEdit.Name == ((DevExpress.XtraEditors.TextEdit)sender).Name)
  450. {
  451. isOK = true;
  452. }
  453. }
  454. if (!isOK)
  455. {
  456. return;
  457. }
  458. decimal No;
  459. decimal Qty;
  460. decimal Pack;
  461. decimal Sqty = 0;
  462. decimal.TryParse(txtNowNo.Text, out No);
  463. decimal.TryParse(txtNowQty.Text, out Qty);
  464. decimal.TryParse(txtNowPackQty.Text, out Pack);
  465. if (txtNowNo.Properties.ReadOnly == true)
  466. {
  467. Sqty = Math.Ceiling(Qty / Pack);
  468. txtNowNo.Text = Sqty.ToString();
  469. txtNowQty.Text = Qty.ToString();
  470. txtNowPackQty.Text = Pack.ToString();
  471. }
  472. if (txtNowQty.Properties.ReadOnly == true)
  473. {
  474. if (Pack != 0)
  475. {
  476. Sqty = Math.Ceiling(Qty / Pack);
  477. txtNowNo.Text = Sqty.ToString();
  478. txtNowQty.Text = Qty.ToString();
  479. txtNowPackQty.Text = Pack.ToString();
  480. }
  481. else
  482. {
  483. No = 0;
  484. }
  485. }
  486. }
  487. }
  488. catch (Exception ex)
  489. {
  490. throw ex;
  491. }
  492. }
  493. }
  494. }