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

502 lines
19 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. namespace ICSSoft.Frame.APP
  27. {
  28. public partial class FormICSDispatchLists : DevExpress.XtraEditors.XtraForm
  29. {
  30. private string sqltxt = "";
  31. private string sqlconn = "";
  32. String guid = AppConfig.GetGuid();
  33. private DataTable dataSource = null;
  34. #region 构造函数
  35. public FormICSDispatchLists()
  36. {
  37. InitializeComponent();
  38. this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
  39. this.WindowState = FormWindowState.Maximized;
  40. }
  41. #endregion
  42. #region SystemOptition
  43. /// <summary>
  44. /// 操作权限
  45. /// </summary>
  46. /// <returns></returns>
  47. public DataTable RightOfExute()
  48. {
  49. DataTable rData = new DataTable();
  50. rData.Columns.Add("BtnName");
  51. rData.Columns.Add("ActionName");
  52. //查看权限(必须有)
  53. DataRow seeRow = rData.NewRow();
  54. seeRow["BtnName"] = "see";
  55. seeRow["ActionName"] = "查看";
  56. rData.Rows.Add(seeRow);
  57. List<Control> ControlList = new List<Control>();
  58. ControlList.Add(btnOutPut);
  59. ControlList.Add(btnSynchro);
  60. //
  61. foreach (Control ctr in ControlList)
  62. {
  63. if (ctr.GetType() == typeof(SimpleButton))
  64. {
  65. DataRow dr = rData.NewRow();
  66. dr["BtnName"] = ctr.Name;
  67. dr["ActionName"] = ctr.Text;
  68. rData.Rows.Add(dr);
  69. }
  70. }
  71. rData.AcceptChanges();
  72. return rData;
  73. }
  74. /// <summary>
  75. /// 数据权限
  76. /// </summary>
  77. /// <returns></returns>
  78. public DataTable RightOfData()
  79. {
  80. DataTable rData = new DataTable();
  81. rData.Columns.Add("BodyName");
  82. rData.Columns.Add("ControlName");
  83. rData.Columns.Add("ControlCaption");
  84. rData.AcceptChanges();
  85. return rData;
  86. }
  87. #endregion
  88. #region 退出
  89. private void btnClose_Click(object sender, EventArgs e)
  90. {
  91. AppConfig.CloseFormShow(this.Text);
  92. this.Close();
  93. }
  94. private void btnExit_Click(object sender, EventArgs e)
  95. {
  96. AppConfig.CloseFormShow(this.Text);
  97. this.Close();
  98. }
  99. #endregion
  100. #region 移动窗体
  101. private const int WM_NCHITTEST = 0x84;
  102. private const int HTCLIENT = 0x1;
  103. private const int HTCAPTION = 0x2;
  104. //首先必须了解Windows的消息传递机制,当有鼠标活动消息时,
  105. //系统发送WM_NCHITTEST 消息给窗体作为判断消息发生地的根据。 nchittest
  106. //假如你点击的是标题栏,窗体收到的消息值就是 HTCAPTION ,
  107. //同样地,若接受到的消息是 HTCLIENT,说明用户点击的是客户区,也就是鼠标消息发生在客户区。
  108. //重写窗体,使窗体可以不通过自带标题栏实现移动
  109. protected override void WndProc(ref Message m)
  110. {
  111. //当重载窗体的 WndProc 方法时,可以截获 WM_NCHITTEST 消息并改些该消息,
  112. //当判断鼠标事件发生在客户区时,改写改消息,发送 HTCAPTION 给窗体,
  113. //这样,窗体收到的消息就时 HTCAPTION ,在客户区通过鼠标来拖动窗体就如同通过标题栏来拖动一样。
  114. //注意:当你重载 WndProc 并改写鼠标事件后,整个窗体的鼠标事件也就随之改变了。
  115. switch (m.Msg)
  116. {
  117. case WM_NCHITTEST:
  118. base.WndProc(ref m);
  119. if ((int)m.Result == HTCLIENT)
  120. m.Result = (IntPtr)HTCAPTION;
  121. return;
  122. }
  123. //拦截双击标题栏、移动窗体的系统消息
  124. if (m.Msg != 0xA3)
  125. {
  126. base.WndProc(ref m);
  127. }
  128. }
  129. #endregion
  130. #region 列表
  131. private void grvDetail_CustomDrawRowIndicator(object sender, DevExpress.XtraGrid.Views.Grid.RowIndicatorCustomDrawEventArgs e)
  132. {
  133. if (e.Info.IsRowIndicator && e.RowHandle >= 0)
  134. e.Info.DisplayText = (e.RowHandle + 1).ToString();
  135. }
  136. #endregion
  137. #region 过滤
  138. private string tempTableName = "";
  139. private void btnFilter_Click(object sender, EventArgs e)
  140. {
  141. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name));
  142. filter.OldTempTableName = tempTableName;
  143. if (filter.ShowDialog() == DialogResult.OK)
  144. {
  145. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  146. try
  147. {
  148. _wait.Show();
  149. tempTableName = filter.NewTempTableName;
  150. sqltxt = filter.SqlText;
  151. sqlconn = filter.FilterConnectString;
  152. dataSource = filter.FilterData.Tables[0];
  153. grdDetail.DataSource = dataSource;
  154. grvDetail.BestFitColumns();
  155. rptPage.RecordNum = dataSource.Rows.Count;
  156. rptPage.PageSize = 499;
  157. rptPage.PageIndex = 1;
  158. rptPage.ReLoad();
  159. rptPage.PageSize = 500;
  160. rptPage.PageIndex = 1;
  161. rptPage.ReLoad();
  162. _wait.Close();
  163. }
  164. catch (Exception ex)
  165. {
  166. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  167. _wait.Close();
  168. }
  169. }
  170. }
  171. #endregion
  172. #region 绑定数据源
  173. private void btnConfig_Click(object sender, EventArgs e)
  174. {
  175. if (AppConfig.UserCode.ToLower() != "demo")
  176. {
  177. ICSBaseSimpleCode.AppshowMessageBox("您没有权限设置数据源,请联系软件提供商!");
  178. return;
  179. }
  180. FormDataSource fdata = new FormDataSource(AppConfig.GetMenuId(this.Tag.ToString()), btnConfig.Name);
  181. fdata.ShowDialog();
  182. }
  183. #endregion
  184. #region 分页
  185. private void rptPage_PageIndexChanged(object Sender, EventArgs e)
  186. {
  187. //DataTable data = AppConfig.GetPageData(dataSource, rptPage.PageIndex, rptPage.PageSize).Copy();
  188. DataTable data = AppConfig.GetPageDataByDb(tempTableName, "pagerowindex", rptPage.PageSize, rptPage.PageIndex, dataSource.Rows.Count);
  189. grdDetail.DataSource = data;
  190. }
  191. #endregion
  192. #region 过滤方法
  193. private void FormContainerManager_FormClosing(object sender, FormClosingEventArgs e)
  194. {
  195. AppConfig.DropTemTable(tempTableName);
  196. }
  197. #endregion
  198. #region 导出
  199. private void btnOutPut_Click(object sender, EventArgs e)
  200. {
  201. SimpleButton btntemp = (SimpleButton)sender;
  202. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  203. {
  204. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  205. return;
  206. }
  207. FormOutExcel foe = new FormOutExcel(this.Tag.ToString(), grdDetail);
  208. foe.ShowDialog();
  209. }
  210. #endregion
  211. #region 刷新
  212. private void btnRefresh_Click(object sender, EventArgs e)
  213. {
  214. if (sqlconn == null || sqlconn == "")
  215. {
  216. return;
  217. }
  218. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  219. try
  220. {
  221. _wait.Show();
  222. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name), false);
  223. dataSource = DBHelper.ExecuteDataset(sqlconn, CommandType.Text, sqltxt).Tables[0];
  224. grdDetail.DataSource = dataSource;
  225. grvDetail.BestFitColumns();
  226. rptPage.RecordNum = dataSource.Rows.Count;
  227. rptPage.PageIndex = 1;
  228. _wait.Close();
  229. }
  230. catch (Exception ex)
  231. {
  232. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  233. _wait.Close();
  234. }
  235. }
  236. #endregion
  237. #region 新增
  238. private void btnCreate_Click(object sender, EventArgs e)
  239. {
  240. SimpleButton btntemp = (SimpleButton)sender;
  241. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  242. {
  243. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  244. return;
  245. }
  246. string sql = @"SELECT rd01.dDate AS 到货日期,rd01.cVenCode AS 供应商编码,ven.cVenName AS 供应商名称,
  247. rd01s.cInvCode AS ,inv.cInvName AS ,inv.cInvStd AS ,rd01s.AutoID,cBatch as ,
  248. CASE WHEN ISNULL(rd01s.iNum,0)=0 THEN rd01s.iQuantity ELSE rd01s.iNum END AS ,
  249. unit.cComUnitName AS , rd01s.cUnitID AS ,
  250. units.cComUnitName AS
  251. FROM {0}.dbo.PU_ArrivalVouch rd01
  252. INNER JOIN {0}.dbo.PU_ArrivalVouchs rd01s ON rd01s.ID = rd01.ID
  253. LEFT JOIN {0}.dbo.Inventory inv ON rd01s.cInvCode =inv.cInvCode
  254. LEFT JOIN {0}.dbo.Vendor ven ON rd01.cVenCode=ven.cVenCode
  255. LEFT JOIN {0}.dbo.ComputationUnit unit ON inv.cComUnitCode=unit.cComunitCode
  256. LEFT JOIN {0}.dbo.ComputationUnit units ON rd01s.cUnitID=units.cComunitCode
  257. left join dbo.ICSPurchasingStorage pu on rd01s.AutoID=pu.Rd01AutoID
  258. WHERE (rd01.cverifier<>'' OR rd01.cverifier IS NOT NULL) and pu.Rd01AutoID is NULL";
  259. sql = string.Format(sql, ICSBaseSimpleCode.GetWorkPointErpData());
  260. DataTable data = DBHelper.ExecuteDataset(AppConfig.AppConnectString,CommandType.Text,sql).Tables[0];
  261. FormDataRefer reForm = new FormDataRefer();
  262. reForm.FormTitle = "库房列表";
  263. reForm.HideCols.Add("AutoID");
  264. reForm.HideCols.Add("辅计量单位编码");
  265. DataTable menuData = data;
  266. reForm.DataSource = menuData;
  267. reForm.MSelectFlag = false;
  268. reForm.RowIndexWidth = 35;
  269. reForm.Width = 850;
  270. reForm.Height = 550;
  271. if (reForm.ShowDialog() == DialogResult.OK)
  272. {
  273. string batch = "";
  274. DataTable retData = reForm.ReturnData;
  275. //FormPurchasingAdd add = new FormPurchasingAdd(retData);
  276. //if (add.ShowDialog() == DialogResult.OK)
  277. //{
  278. // batch = add.batch;
  279. //}
  280. //else {
  281. // return;
  282. //}
  283. try
  284. {
  285. //FormPurchasingStorageBLL.save(retData, batch);
  286. }catch(Exception ex){
  287. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  288. return;
  289. }
  290. }
  291. btnRefresh_Click(null, null);
  292. }
  293. #endregion
  294. private void FormICSItemLot_Load(object sender, EventArgs e)
  295. {
  296. FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name));
  297. filter.OldTempTableName = tempTableName;
  298. if (filter.ShowDialog() == DialogResult.OK)
  299. {
  300. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
  301. try
  302. {
  303. _wait.Show();
  304. tempTableName = filter.NewTempTableName;
  305. sqltxt = filter.SqlText;
  306. sqlconn = filter.FilterConnectString;
  307. dataSource = filter.FilterData.Tables[0];
  308. grdDetail.DataSource = dataSource;
  309. grvDetail.BestFitColumns();
  310. rptPage.RecordNum = dataSource.Rows.Count;
  311. rptPage.PageSize = 499;
  312. rptPage.PageIndex = 1;
  313. rptPage.ReLoad();
  314. rptPage.PageSize = 500;
  315. rptPage.PageIndex = 1;
  316. rptPage.ReLoad();
  317. _wait.Close();
  318. }
  319. catch (Exception ex)
  320. {
  321. MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
  322. _wait.Close();
  323. }
  324. }
  325. }
  326. //private void btnImportData_Click(object sender, EventArgs e)
  327. //{
  328. // SimpleButton btntemp = (SimpleButton)sender;
  329. // if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  330. // {
  331. // ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  332. // return;
  333. // }
  334. // DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm();
  335. // _wait.Hide();
  336. // try
  337. // {
  338. // FormReadExcel fre = new FormReadExcel();
  339. // if (fre.ShowDialog() != DialogResult.OK)
  340. // {
  341. // return;
  342. // }
  343. // DataTable dataSource = fre._excelData;
  344. // if (dataSource == null)
  345. // {
  346. // throw new Exception("excel数据取得失败");
  347. // }
  348. // _wait.Show();
  349. // _wait.Caption = "判断模版是否正确......";
  350. // #region 判断模版是否正确
  351. // List<string> colNameList = new List<string>();
  352. // colNameList.Add("存货编码");
  353. // colNameList.Add("批号");
  354. // colNameList.Add("数量");
  355. // colNameList.Add("供应商编码");
  356. // colNameList.Add("仓库编码");
  357. // for (int i = 0; i < colNameList.Count;i++ )
  358. // {
  359. // if (!dataSource.Columns.Contains(colNameList[i]))
  360. // {
  361. // throw new Exception("模版不正确,缺少列" + colNameList[i]);
  362. // }
  363. // }
  364. // #endregion
  365. // _wait.Caption = "数据整理中......";
  366. // List<InitialInvtory> initList = new List<InitialInvtory>();
  367. // foreach (DataRow dr in dataSource.Rows)
  368. // {
  369. // ///判断必输项目是否为空
  370. // foreach (string colName in colNameList)
  371. // {
  372. // if (string.IsNullOrWhiteSpace(dr[colName].ToString()) == true && colName != "批号")
  373. // {
  374. // throw new Exception("列" + colName + "没有输入值");
  375. // }
  376. // }
  377. // InitialInvtory InitInvInfo = new InitialInvtory();
  378. // InitInvInfo.ItemCode = dr["存货编码"].ToString();
  379. // InitInvInfo.BatchCode = dr["批号"].ToString();
  380. // InitInvInfo.Qty = dr["数量"].ToString();
  381. // InitInvInfo.VenCode = dr["供应商编码"].ToString();
  382. // InitInvInfo.WhCode = dr["仓库编码"].ToString();
  383. // initList.Add(InitInvInfo);
  384. // }
  385. // _wait.Caption = "导入期初数据......";
  386. // string erpName = ICSSoft.AoMy.BLL.ICSBaseSimpleCode.GetWorkPointErpData();
  387. // StockBarCodeBLL.ImportData(initList, erpName);
  388. // _wait.Close();
  389. // btnRefresh_Click(null, null);
  390. // }
  391. // catch (Exception ex)
  392. // {
  393. // _wait.Close();
  394. // MessageBox.Show("期初数据导入失败。" + ex.Message);
  395. // }
  396. //}
  397. private void btnbeginAdd_Click(object sender, EventArgs e)
  398. {
  399. SimpleButton btntemp = (SimpleButton)sender;
  400. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  401. {
  402. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  403. return;
  404. }
  405. try
  406. {
  407. //FormPurchasingBeginningAdd edit = new FormPurchasingBeginningAdd();
  408. //edit.ShowDialog();
  409. //btnRefresh_Click(null, null);
  410. }
  411. catch (Exception ex)
  412. {
  413. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  414. }
  415. }
  416. private void btnQcCheck_Click(object sender, EventArgs e)
  417. {
  418. SimpleButton btntemp = (SimpleButton)sender;
  419. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  420. {
  421. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  422. return;
  423. }
  424. }
  425. private void btnSynchro_Click(object sender, EventArgs e)
  426. {
  427. SimpleButton btntemp = (SimpleButton)sender;
  428. if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
  429. {
  430. ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员!");
  431. return;
  432. }
  433. DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在同步请稍等...");
  434. try {
  435. _wait.Show();
  436. SAP.ASPWebSoapClient srv = new SAP.ASPWebSoapClient();
  437. srv.initSODispatch();
  438. _wait.Close();
  439. ICSBaseSimpleCode.AppshowMessageBox("同步成功");
  440. }
  441. catch (Exception ex)
  442. {
  443. _wait.Close();
  444. ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
  445. }
  446. }
  447. }
  448. }