|
|
using System;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Data.Linq;using System.Linq;using System.Drawing;using System.Text;using System.Windows.Forms;using DevExpress.XtraEditors;using DevExpress.XtraGrid.Views.BandedGrid;using DevExpress.XtraGrid.Columns;using DevExpress.XtraGrid;using System.IO;using System.Threading;using ICSSoft.Base.Language.Tool;using ICSSoft.Base.Config.AppConfig;using ICSSoft.Base.UserControl.MessageControl;using ICSSoft.Base.Config.DBHelper;using ICSSoft.Base.Report.Filter;using ICSSoft.Base.UserControl.FormControl;using ICSSoft.Base.Report.GridReport;using ICSSoft.Base.ReferForm.AppReferForm;using ICSSoft.Frame.Data.BLL;using ICSSoft.Base.Lable.PrintTool;using DevExpress.XtraPrinting;using ICSSoft.Frame.Common;
namespace ICSSoft.Frame.APP{ public partial class FormICSDispatchListsGauge : DevExpress.XtraEditors.XtraForm { private string sqltxt = ""; private string sqlconn = ""; String guid = AppConfig.GetGuid(); private DataTable dataSource = null;
private string MoId = ""; private string MoCode = ""; private decimal Qty = 0.00m; DataTable Serialdata = null;
#region 构造函数
public FormICSDispatchListsGauge() { InitializeComponent(); this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height); this.WindowState = FormWindowState.Maximized;
} public FormICSDispatchListsGauge(string moID, string moCode, decimal qty) { InitializeComponent(); this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height); this.WindowState = FormWindowState.Maximized; MoId = moID; MoCode = moCode; Qty = qty;
} #endregion
#region 操作权限
public DataTable RightOfExute() { DataTable rData = new DataTable(); rData.Columns.Add("BtnName"); rData.Columns.Add("ActionName"); //查看权限（必须有）
DataRow seeRow = rData.NewRow(); seeRow["BtnName"] = "see"; seeRow["ActionName"] = "查看"; rData.Rows.Add(seeRow);
List<Control> ControlList = new List<Control>(); ControlList.Add(btnPrint); ControlList.Add(btnOutPut); foreach (Control ctr in ControlList) {
if (ctr.GetType() == typeof(SimpleButton)) { DataRow dr = rData.NewRow(); dr["BtnName"] = ctr.Name; dr["ActionName"] = ctr.Text; rData.Rows.Add(dr); } }
rData.AcceptChanges(); return rData; } public DataTable RightOfData()// 数据权限
{ DataTable rData = new DataTable(); rData.Columns.Add("BodyName"); rData.Columns.Add("ControlName"); rData.Columns.Add("ControlCaption");
rData.AcceptChanges(); return rData; } #endregion
#region 退出
private void btnClose_Click(object sender, EventArgs e) { AppConfig.CloseFormShow(this.Text); this.Close(); }
private void btnExit_Click(object sender, EventArgs e) { AppConfig.CloseFormShow(this.Text); this.Close(); }
#endregion
#region 移动窗体
private const int WM_NCHITTEST = 0x84; private const int HTCLIENT = 0x1; private const int HTCAPTION = 0x2; //首先必须了解Windows的消息传递机制，当有鼠标活动消息时，
//系统发送WM_NCHITTEST 消息给窗体作为判断消息发生地的根据。 nchittest
//假如你点击的是标题栏，窗体收到的消息值就是 HTCAPTION ，
//同样地，若接受到的消息是 HTCLIENT，说明用户点击的是客户区，也就是鼠标消息发生在客户区。
//重写窗体，使窗体可以不通过自带标题栏实现移动
protected override void WndProc(ref Message m) {
//当重载窗体的 WndProc 方法时，可以截获 WM_NCHITTEST 消息并改些该消息，
//当判断鼠标事件发生在客户区时，改写改消息，发送 HTCAPTION 给窗体，
//这样，窗体收到的消息就时 HTCAPTION ，在客户区通过鼠标来拖动窗体就如同通过标题栏来拖动一样。
//注意：当你重载 WndProc 并改写鼠标事件后，整个窗体的鼠标事件也就随之改变了。
switch (m.Msg) { case WM_NCHITTEST: base.WndProc(ref m); if ((int)m.Result == HTCLIENT) m.Result = (IntPtr)HTCAPTION; return; } //拦截双击标题栏、移动窗体的系统消息
if (m.Msg != 0xA3) { base.WndProc(ref m); }
} #endregion
#region 列表
private void grvDetail_CustomDrawRowIndicator(object sender, DevExpress.XtraGrid.Views.Grid.RowIndicatorCustomDrawEventArgs e) { if (e.Info.IsRowIndicator && e.RowHandle >= 0) e.Info.DisplayText = (e.RowHandle + 1).ToString(); } #endregion
private void btnFilter_Click(object sender, EventArgs e) { }
//加载
private void FormICSDispatchListsGauge_Load(object sender, EventArgs e) { init(); }
#region 初始化查询条件
private void init() { #region 单号
string sql = "SELECT DISTINCT DispatchCode AS [单据号], MTIME FROM ICSSODispatch WHERE 1=1 AND ISNULL(Quantity,0) > ISNULL(HasQuantity,0) AND WorkPoint = '{0}' ORDER BY MTIME DESC "; sql = string.Format(sql, AppConfig.WorkPointCode); DataTable dt = DBHelper.ExecuteDataset(AppConfig.AppConnectString.ToString(), CommandType.Text, sql).Tables[0]; txtMOCode.Properties.ValueMember = "单据号"; txtMOCode.Properties.DisplayMember = "单据号"; txtMOCode.Properties.DataSource = dt; txtMOCode.Properties.NullText = "";//空时的值
txtMOCode.Properties.ImmediatePopup = true;//输入值是否马上弹出窗体
txtMOCode.Properties.ValidateOnEnterKey = true;//回车确认
txtMOCode.Properties.TextEditStyle = DevExpress.XtraEditors.Controls.TextEditStyles.Standard;//要使用户可以输入，这里须设为Standard
txtMOCode.Properties.AllowNullInput = DevExpress.Utils.DefaultBoolean.True; //可用Ctrl + Delete清空选择內容
//自适应宽度
txtMOCode.Properties.BestFitMode = DevExpress.XtraEditors.Controls.BestFitMode.BestFitResizePopup; #endregion
} #endregion
private void loadData() { try { if (string.IsNullOrWhiteSpace(txtMOCode.Text.Trim())) { ICSBaseSimpleCode.AppshowMessageBox("请输入正确的单据号！"); return; } string sql = @" SELECT
a.DispatchCode cDLCode, a.DispatchRow irowno, a.InvCode cInvCode, b.INVNAME cInvName, --b.INVSTD cInvAddCode, b.INVSTD cInvStd, a.Quantity iQuantity, a.WHCode cWhCode, b.INVUOM, a.cBatch as cBatch FROM ICSSODispatch a LEFT JOIN ICSINVENTORY b ON a.InvCode = b.INVCODE AND a.WorkPoint=b.WorkPoint WHERE a.DispatchCode='{0}' AND a.WorkPoint = '{1}' ORDER BY a.DispatchRow,a.InvCode ";
sql += @"
SELECT c.cDLCode, c.cInvCode, c.cInvName, --c.cInvAddCode, c.cInvStd, c.INVUOM, CAST(ISNULL(c.iQuantity, 0) AS DECIMAL(18,2)) AS iQuantity, d.WHCode, d.BinCode, d.LotNO, ISNULL(d.LotQty, 0) AS QTY, ISNULL(e.QTYTotal, 0) AS QTYTotal, d.MTIME, c.cBatch FROM ( SELECT a.DispatchCode cDLCode, a.InvCode cInvCode, b.INVNAME cInvName, --b.INVSTD cInvAddCode, b.INVSTD cInvStd, SUM(ISNULL(a.Quantity, 0)) AS iQuantity, a.WHCode cWhCode, b.INVUOM, a.cBatch cBatch FROM ICSSODispatch a LEFT JOIN ICSINVENTORY b ON a.InvCode = b.INVCODE AND a.WorkPoint=b.WorkPoint WHERE a.DispatchCode='{0}' AND a.WorkPoint = '{1}' GROUP BY DispatchCode,a.InvCode, b.INVNAME, INVSTD,a.WHCode,INVUOM,a.cBatch ) c LEFT JOIN (SELECT z.InvCode,z.WHCode,z.WorkPoint,z.LotQty,zz.VenderLotNO,z.BinCode,z.LotNO,z.MTIME FROM ICSWareHouseLotInfo z LEFT JOIN ICSITEMLot zz ON zz.LotNO=z.LotNO) d ON c.cInvCode=d.INVCode AND d.VenderLotNO=c.cBatch AND c.cWhCode=d.WHCode AND d.WorkPoint= '{1}' AND d.LotQty>0 LEFT JOIN (SELECT INVCode,SUM(LotQty) AS QTYTotal FROM ICSWareHouseLotInfo WHERE WorkPoint= '{1}' GROUP BY INVCode) e ON c.cInvCode=e.INVCode ORDER BY c.cInvCode,c.cBatch,d.MTIME,d.LotNO ";
string Where = txtMOCode.Text.Trim();
#region 查询
if (!string.IsNullOrWhiteSpace(cmbSEQ.Text.Trim())) { Where += "' AND a.DispatchRow='" + cmbSEQ.Text.Trim() + " "; } sql = string.Format(sql, Where, AppConfig.WorkPointCode); DataSet ds = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, sql);
if (ds != null && ds.Tables.Count == 2) { grdDetail.DataSource = ds.Tables[0]; grvDetail.BestFitColumns();
#region 拣料表
DataTable dt = ds.Tables[1];
//dt = TranOutClass.TranOutX(txtMOCode.Text.Trim());
string ItemCode = ""; //string VenderLotNo = "";
decimal QTY = 0;
bool CanDelete = false; int count = dt.Rows.Count; for (int i = 0; i < count; i++) { DataRow dr = dt.Rows[i]; if (!ItemCode.Equals(dr["cInvCode"].ToString() + dr["cBatch"].ToString())) { ItemCode = dr["cInvCode"].ToString() + dr["cBatch"].ToString(); QTY = 0; CanDelete = false; } if (CanDelete) { dr.Delete(); continue; }
QTY += Convert.ToDecimal(dr["QTY"]); if (QTY >= Convert.ToDecimal(dr["iQuantity"])) { CanDelete = true; } } dt.AcceptChanges(); gridControlGauge.DataSource = dt; gridViewGauge.BestFitColumns(); #endregion
}
#endregion
} catch (Exception ex) { MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error); } }
private void txtMOCode_EditValueChanged(object sender, EventArgs e) { grdDetail.DataSource = null; gridControlGauge.DataSource = null; cmbSEQ.Text = ""; cmbSEQ.Properties.Items.Clear(); string MOCode = txtMOCode.EditValue.ToString(); string sql = "SELECT DispatchRow FROM ICSSODispatch WHERE WorkPoint='{0}' AND DispatchCode='{1}' ORDER BY DispatchRow"; sql = string.Format(sql, AppConfig.WorkPointCode, MOCode); DataTable dt = DBHelper.ExecuteDataset(AppConfig.AppConnectString.ToString(), CommandType.Text, sql).Tables[0]; cmbSEQ.Properties.Items.Add(""); cmbSEQ.Properties.Items.AddRange(dt.AsEnumerable().Select(a => a["DispatchRow"]).ToList());
loadData(); }
private void cmbSEQ_SelectedIndexChanged(object sender, EventArgs e) { grdDetail.DataSource = null; gridControlGauge.DataSource = null;
loadData(); }
#region 导出
private void btnOutPut_Click(object sender, EventArgs e) { SimpleButton btntemp = (SimpleButton)sender; if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false) { ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！"); return; } FormOutExcel foe = new FormOutExcel(this.Tag.ToString(), grdDetail); foe.ShowDialog(); } #endregion
#region 打印
private void btnPrint_Click(object sender, EventArgs e) { try { #region
//this.gridViewGauge.OptionsView.RowAutoHeight = true;
//PrintingSystem print = new DevExpress.XtraPrinting.PrintingSystem();
//PrintableComponentLink link = new PrintableComponentLink(print);
//DevExpress.XtraPrintingLinks.CompositeLink compositeLink = new DevExpress.XtraPrintingLinks.CompositeLink();
//print.Links.Add(link);
//link.Component = gridControlGauge;//这里可以是可打印的部件
//link.Margins.Top = 50;
//link.Margins.Bottom = 0;
//link.Margins.Left = 0;
//link.Margins.Right = 0;
//string _PrintHeader = MOTitle.Text;
//PageHeaderFooter phf = link.PageHeaderFooter as PageHeaderFooter;
//phf.Header.Content.Clear();
//phf.Header.Content.AddRange(new string[] { "", _PrintHeader, "" });
//phf.Header.Font = new System.Drawing.Font("宋体", 14, System.Drawing.FontStyle.Bold);
//phf.Header.LineAlignment = BrickAlignment.Center;
//link.CreateDocument(); //建立文档
//print.PreviewFormEx.Show();//进行预览
#endregion
SimpleButton btntemp = (SimpleButton)sender; if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false) { ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！"); return; } if (string.IsNullOrWhiteSpace(txtMOCode.EditValue.ToString())) { ICSBaseSimpleCode.AppshowMessageBox("请选择生产订单号！"); return; }
List<PrintPara> parasList = new List<PrintPara>(); PrintPara para = new PrintPara(); para.PrintKey = "CODE"; para.PrintValues = new object[] { txtMOCode.Text }; parasList.Add(para);
if (parasList.Count == 0) { ICSBaseSimpleCode.AppshowMessageBox("请选择数据！"); return; } FormPrintDialog f = new FormPrintDialog("022", this.Text, parasList, false, null); f.ShowDialog(); } catch (Exception ex) { MessageBox.Show(ex.ToString()); } } #endregion
}}
|
