锐腾搅拌上料功能
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.

569 lines
22 KiB

5 months ago
  1. using System;
  2. using System.Collections.Generic;
  3. using System.ComponentModel;
  4. using System.Data;
  5. using System.Data.Linq;
  6. using System.Linq;
  7. using System.Drawing;
  8. using System.Text;
  9. using System.Windows.Forms;
  10. using DevExpress.XtraEditors;
  11. using DevExpress.XtraGrid.Views.BandedGrid;
  12. using DevExpress.XtraGrid.Columns;
  13. using DevExpress.XtraGrid;
  14. using System.IO;
  15. using System.Threading;
  16. using ICSSoft.Base.Language.Tool;
  17. using ICSSoft.Base.Config.AppConfig;
  18. using ICSSoft.Base.UserControl.MessageControl;
  19. using ICSSoft.Base.Report.Filter;
  20. using ICSSoft.Base.Config.DBHelper;
  21. using ICSSoft.Base.UserControl.FormControl;
  22. using ICSSoft.Base.Report.GridReport;
  23. using ICSSoft.Base.ReferForm.AppReferForm;
  24. using ICSSoft.Base.Lable.PrintTool;
  25. using ICSSoft.Frame.APP;
  26. using ICSSoft.Frame.Data.BLL;
  27. namespace ICSSoft.Frame.APP
  28. {
  29. public partial class FormICSPOArrive : DevExpress.XtraEditors.XtraForm
  30. {
  31. private string sqltxt = "";
  32. private string sqlconn = "";
  33. String guid = AppConfig.GetGuid();
  34. private DataTable dataSource = null;
  35. #region 构造函数
  36. public FormICSPOArrive()
  37. {
  38. InitializeComponent();
  39. this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
  40. this.WindowState = FormWindowState.Maximized;
  41. }
  42. #endregion
  43. #region SystemOptition
  44. /// <summary>
  45. /// 操作权限
  46. /// </summary>
  47. /// <returns></returns>
  48. public DataTable RightOfExute()
  49. {
  50. DataTable rData = new DataTable();
  51. rData.Columns.Add("BtnName");
  52. rData.Columns.Add("ActionName");
  53. //查看权限(必须有)
  54. DataRow seeRow = rData.NewRow();
  55. seeRow["BtnName"] = "see";
  56. seeRow["ActionName"] = "查看";
  57. rData.Rows.Add(seeRow);
  58. List<Control> ControlList = new List<Control>();
  59. //ControlList.Add(btnSelectAll);
  60. //ControlList.Add(btnCancelAll);
  61. ControlList.Add(btnSynchro);
  62. ControlList.Add(btnOutPut);
  63. ControlList.Add(btnDel);
  64. foreach (Control ctr in ControlList)
  65. {
  66. if (ctr.GetType() == typeof(SimpleButton))
  67. {
  68. DataRow dr = rData.NewRow();
  69. dr["BtnName"] = ctr.Name;
  70. dr["ActionName"] = ctr.Text;
  71. rData.Rows.Add(dr);
  72. }
  73. }
  74. rData.AcceptChanges();
  75. return rData;
  76. }
  77. /// <summary>
  78. /// 数据权限
  79. /// </summary>
  80. /// <returns></returns>
  81. public DataTable RightOfData()
  82. {
  83. DataTable rData = new DataTable();
  84. rData.Columns.Add("BodyName");
  85. rData.Columns.Add("ControlName");
  86. rData.Columns.Add("ControlCaption");
  87. rData.AcceptChanges();
  88. return rData;
  89. }
  90. #endregion
  91. #region 退出
  92. private void btnClose_Click(object sender, EventArgs e)
  93. {
  94. AppConfig.CloseFormShow(this.Text);
  95. this.Close();
  96. }
  97. private void btnExit_Click(object sender, EventArgs e)
  98. {
  99. AppConfig.CloseFormShow(this.Text);
  100. this.Close();
  101. }
  102. #endregion
  103. #region 移动窗体
  104. private const int WM_NCHITTEST = 0x84;
  105. private const int HTCLIENT = 0x1;
  106. private const int HTCAPTION = 0x2;
  107. //首先必须了解Windows的消息传递机制,当有鼠标活动消息时,
  108. //系统发送WM_NCHITTEST 消息给窗体作为判断消息发生地的根据。 nchittest
  109. //假如你点击的是标题栏,窗体收到的消息值就是 HTCAPTION ,
  110. //同样地,若接受到的消息是 HTCLIENT,说明用户点击的是客户区,也就是鼠标消息发生在客户区。
  111. //重写窗体,使窗体可以不通过自带标题栏实现移动
  112. protected override void WndProc(ref Message m)
  113. {
  114. //当重载窗体的 WndProc 方法时,可以截获 WM_NCHITTEST 消息并改些该消息,
  115. //当判断鼠标事件发生在客户区时,改写改消息,发送 HTCAPTION 给窗体,
  116. //这样,窗体收到的消息就时 HTCAPTION ,在客户区通过鼠标来拖动窗体就如同通过标题栏来拖动一样。
  117. //注意:当你重载 WndProc 并改写鼠标事件后,整个窗体的鼠标事件也就随之改变了。
  118. switch (m.Msg)
  119. {
  120. case WM_NCHITTEST:
  121. base.WndProc(ref m);
  122. if ((int)m.Result == HTCLIENT)
  123. m.Result = (IntPtr)HTCAPTION;
  124. return;
  125. }
  126. //拦截双击标题栏、移动窗体的系统消息
  127. if (m.Msg != 0xA3)
  128. {
  129. base.WndProc(ref m);
  130. }
  131. }
  132. #endregion
  133. #region 列表
  134. private void grvDetail_CustomDrawRowIndicator(object sender, DevExpress.XtraGrid.Views.Grid.RowIndicatorCustomDrawEventArgs e)
  135. {
  136. if (e.Info.IsRowIndicator && e.RowHandle >= 0)
  137. e.Info.DisplayText = (e.RowHandle + 1).ToString();
  138. }
  139. #endregion
  140. #region 过滤
  141. private string tempTableName = "";
  142. private void btnFilter_Click(object sender, EventArgs e)
  143. {
  144. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name));
  145. filter.OldTempTableName = tempTableName;
  146. if (filter.ShowDialog() == DialogResult.OK)
  147. {
  148. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  149. try
  150. {
  151. _wait.Show();
  152. tempTableName = filter.NewTempTableName;
  153. sqltxt = filter.SqlText;
  154. sqlconn = filter.FilterConnectString;
  155. dataSource = filter.FilterData.Tables[0];
  156. grdDetail.DataSource = dataSource;
  157. grvDetail.BestFitColumns();
  158. rptPage.RecordNum = dataSource.Rows.Count;
  159. rptPage.PageSize = 499;
  160. rptPage.PageIndex = 1;
  161. rptPage.ReLoad();
  162. rptPage.PageSize = 500;
  163. rptPage.PageIndex = 1;
  164. rptPage.ReLoad();
  165. _wait.Close();
  166. }
  167. catch (Exception ex)
  168. {
  169. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  170. _wait.Close();
  171. }
  172. }
  173. }
  174. #endregion
  175. #region 绑定数据源
  176. private void btnConfig_Click(object sender, EventArgs e)
  177. {
  178. if (AppConfig.UserCode.ToLower() != "demo")
  179. {
  180. ICSBaseSimpleCode.AppshowMessageBox("您没有权限设置数据源,请联系软件提供商!");
  181. return;
  182. }
  183. FormDataSource fdata = new FormDataSource(AppConfig.GetMenuId(this.Tag.ToString()), btnConfig.Name);
  184. fdata.ShowDialog();
  185. }
  186. #endregion
  187. #region 分页
  188. private void rptPage_PageIndexChanged(object Sender, EventArgs e)
  189. {
  190. DataTable data = AppConfig.GetPageData(dataSource, rptPage.PageIndex, rptPage.PageSize).Copy();
  191. //DataTable data = AppConfig.GetPageDataByDb(tempTableName, "pagerowindex", rptPage.PageSize, rptPage.PageIndex, dataSource.Rows.Count);
  192. grdDetail.DataSource = data;
  193. }
  194. #endregion
  195. #region 双击
  196. private void grvDetail_DoubleClick(object sender, EventArgs e)
  197. {
  198. if (grvDetail.FocusedRowHandle < 0)
  199. {
  200. return;
  201. }
  202. if (grvDetail.FocusedColumn == colisSelect)
  203. {
  204. if (grvDetail.GetRowCellValue(grvDetail.FocusedRowHandle, colisSelect).ToString() == "")
  205. {
  206. grvDetail.SetRowCellValue(grvDetail.FocusedRowHandle, colisSelect, "Y");
  207. }
  208. else
  209. {
  210. grvDetail.SetRowCellValue(grvDetail.FocusedRowHandle, colisSelect, "");
  211. }
  212. }
  213. }
  214. #endregion
  215. #region 全选
  216. private void btnSelectAll_Click(object sender, EventArgs e)
  217. {
  218. grvDetail.PostEditor();
  219. this.Validate();
  220. for (int i = 0; i < grvDetail.RowCount; i++)
  221. {
  222. grvDetail.SetRowCellValue(i, colisSelect, "Y");
  223. }
  224. }
  225. #endregion
  226. #region 全消
  227. private void btnCancelAll_Click(object sender, EventArgs e)
  228. {
  229. grvDetail.PostEditor();
  230. this.Validate();
  231. for (int i = 0; i < grvDetail.RowCount; i++)
  232. {
  233. grvDetail.SetRowCellValue(i, colisSelect, "");
  234. }
  235. }
  236. #endregion
  237. #region 过滤方法
  238. private void FormContainerManager_FormClosing(object sender, FormClosingEventArgs e)
  239. {
  240. AppConfig.DropTemTable(tempTableName);
  241. }
  242. #endregion
  243. #region 导出
  244. private void btnOutPut_Click(object sender, EventArgs e)
  245. {
  246. FormOutExcel foe = new FormOutExcel(this.Tag.ToString(), grdDetail);
  247. foe.ShowDialog();
  248. }
  249. #endregion
  250. #region 刷新
  251. private void btnRefresh_Click(object sender, EventArgs e)
  252. {
  253. if (sqlconn == null || sqlconn == "")
  254. {
  255. return;
  256. }
  257. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  258. try
  259. {
  260. _wait.Show();
  261. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name), false);
  262. dataSource = DBHelper.ExecuteDataset(sqlconn, CommandType.Text, sqltxt).Tables[0];
  263. grdDetail.DataSource = dataSource;
  264. grvDetail.BestFitColumns();
  265. rptPage.RecordNum = dataSource.Rows.Count;
  266. rptPage.PageIndex = 1;
  267. _wait.Close();
  268. }
  269. catch (Exception ex)
  270. {
  271. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  272. _wait.Close();
  273. }
  274. rptPage_PageIndexChanged(null, null);
  275. }
  276. #endregion
  277. #region 新增
  278. private void btnCreate_Click(object sender, EventArgs e)
  279. {
  280. SimpleButton btntemp = (SimpleButton)sender;
  281. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  282. {
  283. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  284. return;
  285. }
  286. string sql = @"SELECT rd01.dDate AS 到货日期,rd01.cVenCode AS 供应商编码,ven.cVenName AS 供应商名称,
  287. rd01s.cInvCode AS ,inv.cInvName AS ,inv.cInvStd AS ,rd01s.AutoID,cBatch as ,
  288. CASE WHEN ISNULL(rd01s.iNum,0)=0 THEN rd01s.iQuantity ELSE rd01s.iNum END AS ,
  289. unit.cComUnitName AS , rd01s.cUnitID AS ,
  290. units.cComUnitName AS
  291. FROM {0}.dbo.PU_ArrivalVouch rd01
  292. INNER JOIN {0}.dbo.PU_ArrivalVouchs rd01s ON rd01s.ID = rd01.ID
  293. LEFT JOIN {0}.dbo.Inventory inv ON rd01s.cInvCode =inv.cInvCode
  294. LEFT JOIN {0}.dbo.Vendor ven ON rd01.cVenCode=ven.cVenCode
  295. LEFT JOIN {0}.dbo.ComputationUnit unit ON inv.cComUnitCode=unit.cComunitCode
  296. LEFT JOIN {0}.dbo.ComputationUnit units ON rd01s.cUnitID=units.cComunitCode
  297. left join dbo.ICSPurchasingStorage pu on rd01s.AutoID=pu.Rd01AutoID
  298. WHERE (rd01.cverifier<>'' OR rd01.cverifier IS NOT NULL) and pu.Rd01AutoID is NULL";
  299. sql = string.Format(sql, ICSBaseSimpleCode.GetWorkPointErpData());
  300. DataTable data = DBHelper.ExecuteDataset(AppConfig.AppConnectString,CommandType.Text,sql).Tables[0];
  301. FormDataRefer reForm = new FormDataRefer();
  302. reForm.FormTitle = "库房列表";
  303. reForm.HideCols.Add("AutoID");
  304. reForm.HideCols.Add("辅计量单位编码");
  305. DataTable menuData = data;
  306. reForm.DataSource = menuData;
  307. reForm.MSelectFlag = false;
  308. reForm.RowIndexWidth = 35;
  309. reForm.Width = 850;
  310. reForm.Height = 550;
  311. if (reForm.ShowDialog() == DialogResult.OK)
  312. {
  313. string batch = "";
  314. DataTable retData = reForm.ReturnData;
  315. //FormPurchasingAdd add = new FormPurchasingAdd(retData);
  316. //if (add.ShowDialog() == DialogResult.OK)
  317. //{
  318. // batch = add.batch;
  319. //}
  320. //else {
  321. // return;
  322. //}
  323. try
  324. {
  325. //FormPurchasingStorageBLL.save(retData, batch);
  326. }catch(Exception ex){
  327. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  328. return;
  329. }
  330. }
  331. btnRefresh_Click(null, null);
  332. }
  333. #endregion
  334. //#region 删除
  335. //private void btnDel_Click(object sender, EventArgs e)
  336. //{
  337. // SimpleButton btntemp = (SimpleButton)sender;
  338. // if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  339. // {
  340. // ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  341. // return;
  342. // }
  343. // List<string> RIDList = new List<string>();
  344. // List<string> LOTList = new List<string>();
  345. // for (int i = 0; i < grvDetail.RowCount; i++)
  346. // {
  347. // if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
  348. // {
  349. // RIDList.Add(grvDetail.GetRowCellValue(i, colID).ToString());
  350. // LOTList.Add(grvDetail.GetRowCellValue(i, ReceiptID).ToString());
  351. // }
  352. // }
  353. // if (RIDList.Count == 0 || RIDList == null)
  354. // {
  355. // ICSBaseSimpleCode.AppshowMessageBox("请选择数据");
  356. // return;
  357. // }
  358. // if (ICSBaseSimpleCode.AppshowMessageBoxRepose("确定删除该到货单吗?到货单删除后无法恢复,确定吗?") != DialogResult.OK)
  359. // {
  360. // btnCancelAll_Click(sender, e);
  361. // return;
  362. // }
  363. // try
  364. // {
  365. // if (ICSPOArriveBLL.IsIncludingDetail(LOTList, AppConfig.AppConnectString))
  366. // {
  367. // ICSBaseSimpleCode.AppshowMessageBox("存在入库条码,请删除入库记录");
  368. // return;
  369. // }
  370. // else
  371. // {
  372. // ICSPOArriveBLL.deleteInfo(RIDList, AppConfig.AppConnectString);
  373. // ICSPOArriveBLL.deleteLotInfo(LOTList, AppConfig.AppConnectString);
  374. // ICSBaseSimpleCode.AppshowMessageBox("删除成功");
  375. // }
  376. // }
  377. // catch (Exception ex)
  378. // {
  379. // ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  380. // }
  381. // btnRefresh_Click(null, null);
  382. //}
  383. //#endregion
  384. #region 删除
  385. private void btnDel_Click(object sender, EventArgs e)
  386. {
  387. SimpleButton btntemp = (SimpleButton)sender;
  388. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  389. {
  390. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  391. return;
  392. }
  393. List<string> LOTList = new List<string>();
  394. for (int i = 0; i < grvDetail.RowCount; i++)
  395. {
  396. if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
  397. {
  398. LOTList.Add(grvDetail.GetRowCellValue(i, ReceiptID).ToString());
  399. }
  400. }
  401. if (LOTList.Count == 0 || LOTList == null)
  402. {
  403. ICSBaseSimpleCode.AppshowMessageBox("请选择数据");
  404. return;
  405. }
  406. for (int i = 0; i < grvDetail.RowCount; i++)
  407. {
  408. if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
  409. {
  410. DataTable dt = ICSPOArriveBLL.IsIncludingDetail(grvDetail.GetRowCellValue(i, colID).ToString(), AppConfig.AppConnectString);
  411. if (dt.Rows.Count >0)
  412. {
  413. ICSBaseSimpleCode.AppshowMessageBox("到货单'" + grvDetail.GetRowCellValue(i, colReceiptNO).ToString() + "'第'" + grvDetail.GetRowCellValue(i, colReceiptLine).ToString() + "'行存在入库条码,请删除入库记录!");
  414. return;
  415. }
  416. }
  417. }
  418. if (ICSBaseSimpleCode.AppshowMessageBoxRepose("确定删除该到货单吗?到货单删除后无法恢复,确定吗?") != DialogResult.OK)
  419. {
  420. btnCancelAll_Click(sender, e);
  421. return;
  422. }
  423. try
  424. {
  425. List<string> RIDList = new List<string>();
  426. for (int i = 0; i < grvDetail.RowCount; i++)
  427. {
  428. if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
  429. {
  430. DataTable dt = ICSPOArriveBLL.ArriveDetail(grvDetail.GetRowCellValue(i, ReceiptID).ToString(), AppConfig.AppConnectString);
  431. if (dt.Rows.Count != 1)
  432. {
  433. ICSPOArriveBLL.deleteSonInfo(grvDetail.GetRowCellValue(i, colID).ToString(), AppConfig.AppConnectString);
  434. ICSPOArriveBLL.UpItemLotInfo(grvDetail.GetRowCellValue(i, colReceiptNO).ToString(), grvDetail.GetRowCellValue(i, colReceiptLine).ToString(), AppConfig.AppConnectString);
  435. ICSPOArriveBLL.deleteLotInfo(grvDetail.GetRowCellValue(i, colReceiptNO).ToString(), grvDetail.GetRowCellValue(i, colReceiptLine).ToString(), AppConfig.AppConnectString);
  436. }
  437. else
  438. {
  439. ICSPOArriveBLL.deleteSonInfo(grvDetail.GetRowCellValue(i, colID).ToString(), AppConfig.AppConnectString);
  440. ICSPOArriveBLL.deleteHeadInfo(grvDetail.GetRowCellValue(i, ReceiptID).ToString(), AppConfig.AppConnectString);
  441. ICSPOArriveBLL.UpItemLotInfo(grvDetail.GetRowCellValue(i, colReceiptNO).ToString(), grvDetail.GetRowCellValue(i, colReceiptLine).ToString(), AppConfig.AppConnectString);
  442. ICSPOArriveBLL.deleteLotInfo(grvDetail.GetRowCellValue(i, colReceiptNO).ToString(), grvDetail.GetRowCellValue(i, colReceiptLine).ToString(), AppConfig.AppConnectString);
  443. }
  444. }
  445. }
  446. ICSBaseSimpleCode.AppshowMessageBox("删除成功");
  447. }
  448. catch (Exception ex)
  449. {
  450. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  451. }
  452. btnRefresh_Click(null, null);
  453. }
  454. #endregion
  455. private void FormICSItemLot_Load(object sender, EventArgs e)
  456. {
  457. try
  458. {
  459. btnFilter_Click(sender, e);
  460. }
  461. catch (Exception ex)
  462. {
  463. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  464. }
  465. }
  466. private void btnbeginAdd_Click(object sender, EventArgs e)
  467. {
  468. SimpleButton btntemp = (SimpleButton)sender;
  469. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  470. {
  471. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  472. return;
  473. }
  474. try
  475. {
  476. }
  477. catch (Exception ex)
  478. {
  479. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  480. }
  481. }
  482. private DataSet get_Page(string sqlstr, int pageIndex, int pageCount)
  483. {
  484. string sql = @"exec dbo.[SqlPager]
  485. '{0}', -- sql
  486. {1}, --
  487. {2} -- , 0
  488. ";
  489. sql = string.Format(sql, sqlstr, pageIndex, pageCount);
  490. DataSet data = DBHelper.ExecuteDataset(AppConfig.GetDataBaseConnectStringByKey("[DB.SYS]"), CommandType.Text, sql);
  491. return data;
  492. }
  493. private void grvDetail_RowStyle(object sender, DevExpress.XtraGrid.Views.Grid.RowStyleEventArgs e)
  494. {
  495. int hand = e.RowHandle;
  496. if (hand < 0) return;
  497. DataRow dr = this.grvDetail.GetDataRow(hand);
  498. if (dr== null) return;
  499. if (dr["橡胶件"].ToString()=="True")
  500. {
  501. //e.Appearance.ForeColor = Color.Red;// 改变行字体颜色
  502. e.Appearance.BackColor = Color.Red;// 改变行背景颜色
  503. //根据需求
  504. }
  505. }
  506. }
  507. }