using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using DevExpress.XtraEditors; using ICSSoft.Base.Config.AppConfig; using System.Data.Linq; using System.Linq; using ICSSoft.Base.Language.Tool; using System.Reflection; using ICSSoft.Base.Config.DBHelper; using ICSSoft.Base.ReferForm; using ICSSoft.Base.Report; using ICSSoft.Base.ReferForm.AppReferForm; using ICSSoft.Frame.Data.Entity; using ICSSoft.Frame.Data.BLL; namespace ICSSoft.Frame.APP { public partial class FormICSInvTransferAdd : DevExpress.XtraEditors.XtraForm { string guid = ""; int flag; FormICSInvTransferUIModel model; #region 构造函数 public FormICSInvTransferAdd() { InitializeComponent(); flag = 0; chargeFormState("Add"); } public FormICSInvTransferAdd(String id) { InitializeComponent(); flag = 1; chargeFormState("Edit"); SearchInfo(id); } #endregion private void chargeFormState(string state) { switch (state) { case "Add": txtTransferSTATUS.Text="新建"; txtTransferSTATUS.Properties.ReadOnly = true; txtTransferNO.Properties.ReadOnly = false; txtMUSERName.Text = AppConfig.UserName; txtMTIME.Text = AppConfig.GetSeverDateTime("yyyy-MM-dd hh:mm:ss").ToString(); txtCreateUSER.Text = AppConfig.UserName; txtEffectedUSER.Text = AppConfig.UserName; txtMUSERName.Properties.ReadOnly = true; txtMTIME.Properties.ReadOnly = true; txtCreateUSER.Properties.ReadOnly = true; txtEffectedUSER.Properties.ReadOnly = true; break; case "Edit": txtTransferNO.Properties.ReadOnly = true; txtTransferSTATUS.Properties.ReadOnly = true; txtFRMStorageCode.Properties.ReadOnly = true; txtTOStorageCode.Properties.ReadOnly = true; txtTransferNO.Properties.ReadOnly = true; txtMUSERName.Properties.ReadOnly = true; txtMTIME.Properties.ReadOnly = true; txtCreateUSER.Properties.ReadOnly = true; txtEffectedUSER.Properties.ReadOnly = true; break; } } private void SearchInfo(string id) { model= ICSInvTransferBLL.SearchInfoByID(id, AppConfig.AppConnectString); guid = model.ID; txtTransferNO.Text = model.TransferNO; txtFRMStorageCode.Text = model.storage1.StorageCode; txtTOStorageCode.Text = model.storage2.StorageCode; txtTransferSTATUS.Text = model.TransferSTATUS; txtRECTYPE.Text = model.RECTYPE; txtTIMETYPE.Text = model.TIMETYPE; txtCreateUSER.Text = model.CreateUSER; txtCreateTIME.Text = model.CreateTIME; txtEffectedUSER.Text = model.EffectedUSER; txtEffectedTIME.Text = model.EffectedTIME; txtMEMO.Text = model.MEMO; txtMUSERName.Text = model.MUSERName; txtMTIME.Text = model.MTIME.ToString(); txtTransferNO.Properties.ReadOnly = true; } #region 关闭 退出 private void btnClose_Click(object sender, EventArgs e) { 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 save_Click(object sender, EventArgs e) { try { if (txtTransferNO.Text.Trim() == "") { ICSBaseSimpleCode.AppshowMessageBox("移转单号不能为空"); return; } if (txtTransferSTATUS.Text.Trim() == "") { ICSBaseSimpleCode.AppshowMessageBox("转移单状态不能为空"); return; } if (txtRECTYPE.Text.Trim() == "") { ICSBaseSimpleCode.AppshowMessageBox("入库单类型不能为空"); return; } if (txtFRMStorageCode.Text.Trim() == "") { ICSBaseSimpleCode.AppshowMessageBox("源库别代码不能为空"); return; } if (txtTOStorageCode.Text.Trim() == "") { ICSBaseSimpleCode.AppshowMessageBox("目标库别代码不能为空"); return; } if (txtFRMStorageCode.Text.Trim() == txtTOStorageCode.Text.Trim()) { ICSBaseSimpleCode.AppshowMessageBox("源库别代码与目标库别代码相同请重新选择!"); return; } FormICSInvTransferUIModel invtransfer = new FormICSInvTransferUIModel(); invtransfer.ID = guid; DataTable dt = ICSSoft.Frame.Data.BLL.ICSInvTransferBLL.SelectFRMStorageId(txtFRMStorageCode.Text, AppConfig.WorkPointCode); if (dt != null && dt.Rows.Count > 0) { invtransfer.FRMStorageID = dt.Rows[0][0].ToString(); } DataTable dt1 = ICSSoft.Frame.Data.BLL.ICSInvTransferBLL.TOStorageId(txtTOStorageCode.Text, AppConfig.WorkPointCode); if (dt1 != null && dt1.Rows.Count > 0) { invtransfer.TOStorageID = dt1.Rows[0][0].ToString(); } invtransfer.TransferNO = txtTransferNO.Text; invtransfer.FRMStorageCode = txtFRMStorageCode.Text; invtransfer.TOStorageCode = txtTOStorageCode.Text; invtransfer.TransferSTATUS = txtTransferSTATUS.Text; invtransfer.RECTYPE = txtRECTYPE.Text; invtransfer.TIMETYPE = txtTIMETYPE.Text; invtransfer.MEMO = txtMEMO.Text; invtransfer.CreateTIME = txtCreateTIME.Text; invtransfer.CreateUSER = txtCreateUSER.Text; invtransfer.EffectedTIME = txtEffectedTIME.Text; invtransfer.EffectedUSER = txtEffectedUSER.Text; invtransfer.MUSER = AppConfig.UserId; invtransfer.MUSERName = AppConfig.UserName; invtransfer.MTIME = System.DateTime.Parse(txtMTIME.Text); invtransfer.WorkPoint = AppConfig.WorkPointCode; invtransfer.EATTRIBUTE1 = null; ICSInvTransferBLL.AddandEdit(invtransfer, AppConfig.AppConnectString); if (flag == 0) { ICSBaseSimpleCode.AppshowMessageBox("新增成功"); } else if (flag == 1) { ICSBaseSimpleCode.AppshowMessageBox("修改成功"); } } catch (Exception ex) { MessageBox.Show(ex.Message); } this.Close(); this.DialogResult = DialogResult.Yes; } #endregion #region 取消 private void can_Click(object sender, EventArgs e) { this.Close(); } #endregion #region 转移源库别代码按钮 private void txtFRMStorageID_ButtonClick(object sender, DevExpress.XtraEditors.Controls.ButtonPressedEventArgs e) { ButtonEdit btn = (ButtonEdit)sender; string sql = "select distinct StorageCode as [转移源库别代码], StorageName as [转移源库别名称] from ICSStorage with(nolock) WHERE 1=1"; //object obj = AppConfig.InvokeWebservice(AppConfig.BaseServiceUri, "WebBaseService", "BaseService", "GetHuaRongErpConnectString", new object[] { }); //if (obj == null) //{ // ICSBaseSimpleCode.AppshowMessageBox(1, "ERP数据库连接取得失败!"); //} DataTable data = DBHelper.ExecuteDataset(AppConfig.AppConnectString.ToString(), CommandType.Text, sql).Tables[0]; FormDataRefer reForm = new FormDataRefer(); reForm.FormTitle = "库别信息"; DataTable menuData = data; reForm.DataSource = menuData; reForm.MSelectFlag = false; reForm.RowIndexWidth = 35; reForm.HideCols.Add("ID"); reForm.FormWidth = 500; reForm.FormHeight = 500; //reForm.FilterKey = btn.Text; //grvDetail.GetRowCellValue(grvDetail.FocusedRowHandle, grvDetail.FocusedColumn).ToString().Trim(); if (reForm.ShowDialog() == DialogResult.OK) { DataTable retData = reForm.ReturnData; foreach (DataRow dr in retData.Rows) { txtFRMStorageCode.Text = dr["转移源库别代码"].ToString(); } } } #endregion #region 转移目标库别代码按钮 private void txtTOStorageID_ButtonClick(object sender, DevExpress.XtraEditors.Controls.ButtonPressedEventArgs e) { ButtonEdit btn = (ButtonEdit)sender; string sql = "select distinct StorageCode as [转移目标库别代码], StorageName as [转移目标库别名称] from ICSStorage with(nolock) WHERE 1=1"; //object obj = AppConfig.InvokeWebservice(AppConfig.BaseServiceUri, "WebBaseService", "BaseService", "GetHuaRongErpConnectString", new object[] { }); //if (obj == null) //{ // ICSBaseSimpleCode.AppshowMessageBox(1, "ERP数据库连接取得失败!"); //} DataTable data = DBHelper.ExecuteDataset(AppConfig.AppConnectString.ToString(), CommandType.Text, sql).Tables[0]; FormDataRefer reForm = new FormDataRefer(); reForm.FormTitle = "库别信息"; DataTable menuData = data; reForm.DataSource = menuData; reForm.MSelectFlag = false; reForm.RowIndexWidth = 35; reForm.HideCols.Add("ID"); reForm.FormWidth = 500; reForm.FormHeight = 500; //reForm.FilterKey = btn.Text; //grvDetail.GetRowCellValue(grvDetail.FocusedRowHandle, grvDetail.FocusedColumn).ToString().Trim(); if (reForm.ShowDialog() == DialogResult.OK) { DataTable retData = reForm.ReturnData; foreach (DataRow dr in retData.Rows) { txtTOStorageCode.Text = dr["转移目标库别代码"].ToString(); } } } #endregion #region 入库单类型按钮 private void txtRECTYPE_ButtonClick(object sender, DevExpress.XtraEditors.Controls.ButtonPressedEventArgs e) { ButtonEdit btn = (ButtonEdit)sender; string sql = "select distinct BusinessCode as [业务类型代码], BusinessDesc as [业务类型描述] from ICSINVBusiness with(nolock) WHERE BusinessType='入库'"; //object obj = AppConfig.InvokeWebservice(AppConfig.BaseServiceUri, "WebBaseService", "BaseService", "GetHuaRongErpConnectString", new object[] { }); //if (obj == null) //{ // ICSBaseSimpleCode.AppshowMessageBox(1, "ERP数据库连接取得失败!"); //} DataTable data = DBHelper.ExecuteDataset(AppConfig.AppConnectString.ToString(), CommandType.Text, sql).Tables[0]; FormDataRefer reForm = new FormDataRefer(); reForm.FormTitle = "物料出入库类型"; DataTable menuData = data; reForm.DataSource = menuData; reForm.MSelectFlag = false; reForm.RowIndexWidth = 35; reForm.HideCols.Add("ID"); reForm.FormWidth = 500; reForm.FormHeight = 500; //reForm.FilterKey = btn.Text; //grvDetail.GetRowCellValue(grvDetail.FocusedRowHandle, grvDetail.FocusedColumn).ToString().Trim(); if (reForm.ShowDialog() == DialogResult.OK) { DataTable retData = reForm.ReturnData; foreach (DataRow dr in retData.Rows) { txtRECTYPE.Text = dr["业务类型描述"].ToString(); } } } #endregion } }