RuiTengJb/ICSSoft.AppSln/ICSSoft.Frame.APP/Warehouse/FormICSTuiKu_IN.cs

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 DevExpress.XtraPrinting;
using ICSSoft.Frame.Data.Entity;
using ICSSoft.Base.Lable.PrintTool;
using System.Data.SqlClient;
namespace ICSSoft.Frame.APP
{
    public partial class FormICSTuiKu_IN : DevExpress.XtraEditors.XtraForm
    {
        private string sqltxt = "";
        private string sqlconn = "";
        public string MinTime = "";
        public int status = 0;
        String guid = AppConfig.GetGuid();
        private DataTable dataSource = null;

        #region 构造函数
        public FormICSTuiKu_IN()
        {
            InitializeComponent();
            this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
            this.WindowState = FormWindowState.Maximized;
        }
        #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(btnAdd);
            ControlList.Add(btnModify);
            ControlList.Add(btnDel);
            ControlList.Add(simpleButton1);
            ControlList.Add(btnRefresh);
            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

        #region 过滤
        private string tempTableName = "";
        private void btnFilter_Click(object sender, EventArgs e)
        {
            FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name));
            filter.OldTempTableName = tempTableName;
            if (filter.ShowDialog() == DialogResult.OK)
            {
                DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
                try
                {
                    _wait.Show();
                    tempTableName = filter.NewTempTableName;
                    sqltxt = filter.SqlText;
                    sqlconn = filter.FilterConnectString;
                    dataSource = filter.FilterData.Tables[0];
                    grdDetail.DataSource = dataSource;
                    grvDetail.BestFitColumns();
                    rptPage.RecordNum = dataSource.Rows.Count;
                    rptPage.PageSize = 499;
                    rptPage.PageIndex = 1;
                    rptPage.ReLoad();
                    rptPage.PageSize = 500;
                    rptPage.PageIndex = 1;
                    rptPage.ReLoad();
                    _wait.Close();
                }
                catch (Exception ex)
                {
                    MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
                    _wait.Close();
                }
            }
        }
        #endregion

        #region 绑定数据源
        private void btnConfig_Click(object sender, EventArgs e)
        {
            if (AppConfig.UserCode.ToLower() != "demo")
            {
                ICSBaseSimpleCode.AppshowMessageBox("您没有权限设置数据源，请联系软件提供商！");
                return;
            }
            FormDataSource fdata = new FormDataSource(AppConfig.GetMenuId(this.Tag.ToString()), btnConfig.Name);
            fdata.ShowDialog();
        }
        #endregion

        #region 分页
        private void rptPage_PageIndexChanged(object Sender, EventArgs e)
        {

            DataTable data = AppConfig.GetPageData(dataSource, rptPage.PageIndex, rptPage.PageSize).Copy();
            grdDetail.DataSource = data;
        }
        #endregion

        #region 过滤方法
        private void FormContainerManager_FormClosing(object sender, FormClosingEventArgs e)
        {
            AppConfig.DropTemTable(tempTableName);
        }
        #endregion

        #region 全选
        private void btnSelectAll_Click(object sender, EventArgs e)
        {
            grvDetail.PostEditor();
            this.Validate();
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                grvDetail.SetRowCellValue(i, colisSelect, "Y");
            }
        }
        #endregion

        #region 全消
        private void btnCancelAll_Click(object sender, EventArgs e)
        {
            grvDetail.PostEditor();
            this.Validate();
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                grvDetail.SetRowCellValue(i, colisSelect, "");
            }
        }
        #endregion

        #region 双击
        private void grvDetail_DoubleClick(object sender, EventArgs e)
        {
            if (grvDetail.FocusedRowHandle < 0)
            {
                return;
            }
            if (grvDetail.FocusedColumn == colisSelect)
            {
                if (grvDetail.GetRowCellValue(grvDetail.FocusedRowHandle, colisSelect).ToString() == "")
                {
                    grvDetail.SetRowCellValue(grvDetail.FocusedRowHandle, colisSelect, "Y");
                }
                else
                {
                    grvDetail.SetRowCellValue(grvDetail.FocusedRowHandle, colisSelect, "");
                }
            }
        }
        #endregion

        #region 刷新
        private void btnRefresh_Click(object sender, EventArgs e)
        {
            DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
            try
            {
                _wait.Show();
                FormFilter filter = new FormFilter(AppConfig.GetSourceId(this.Tag.ToString(), btnConfig.Name), false);
                filter.OldTempTableName = tempTableName;
                dataSource = DBHelper.ExecuteDataset(sqlconn, CommandType.Text, sqltxt).Tables[0];
                grdDetail.DataSource = dataSource;
                grvDetail.BestFitColumns();
                rptPage.RecordNum = dataSource.Rows.Count;
                rptPage.PageIndex = 1;
                rptPage.ReLoad();
                _wait.Close();
            }
            catch (Exception ex)
            {
                MessageBox.Show("异常:" + ex.Message, "异常", MessageBoxButtons.OK, MessageBoxIcon.Error);
                _wait.Close();
            }
        }

        #endregion

        #region 新增
        private void btnAdd_Click(object sender, EventArgs e)
        {
            SimpleButton btntemp = (SimpleButton)sender;
            if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
            {
                ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                return;
            }
            FormICSTuiKuAdd add = new FormICSTuiKuAdd();
            add.ShowDialog();
            btnRefresh_Click(null, null);
        }
        #endregion
        
        private void ICSItemLot_FormClosing(object sender, FormClosingEventArgs e)
        {
            AppConfig.DropTemTable(tempTableName);
        }

        private void FormICSChuKu_IN_Load(object sender, EventArgs e)
        {
            btnFilter_Click(sender, e);
        }

        private void grvDetail_CustomDrawCell(object sender, DevExpress.XtraGrid.Views.Base.RowCellCustomDrawEventArgs e)
        {
            if (e.RowHandle >= 0 && e.Column.FieldName == "DCTCODE")
            {
                e.CellValue = "cccc";
            }
        }

        #region 编辑
        private void btnModify_Click(object sender, EventArgs e)
        {
            SimpleButton btntemp = (SimpleButton)sender;
            if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
            {
                ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                return;
            }
            int count = 0;
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                {
                    count++;
                }
            }
            if (count != 1)
            {
                ICSBaseSimpleCode.AppshowMessageBox("请选择数据,且只能选择一条进行编辑!!!");
                return;
            }
            try
            {
                string moid;
                for (int i = 0; i < grvDetail.RowCount; i++)
                {
                    if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                    {
                        FormICSTuiKuAdd add = new FormICSTuiKuAdd(grvDetail.GetRowCellValue(i, colVouchCode).ToString(), grvDetail.GetRowCellValue(i, colVouchRow).ToString(), grvDetail.GetRowCellValue(i, colSubInvCode).ToString(), grvDetail.GetRowCellValue(i, colWHCode).ToString(), grvDetail.GetRowCellValue(i, colQuantity).ToString(), grvDetail.GetRowCellValue(i, colMUSER).ToString());
                        add.ShowDialog();
                    }
                }
                btnRefresh_Click(null, null);
            }
            catch (Exception ex)
            {
                ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
            }
        }
        #endregion

        #region 保存
        private void save_Click(object sender, EventArgs e)
        {
            int Count = 0;
            SimpleButton btntemp = (SimpleButton)sender;
            if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
            {
                ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                return;
            }
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                {
                    Count++;
                }
            }
            if (Count == 0)
            {
                ICSBaseSimpleCode.AppshowMessageBox("请选择数据！");
                return;
            }
            if (ICSBaseSimpleCode.AppshowMessageBoxRepose("确定保存该单据吗？单据保存后需要审核，确定吗？") != DialogResult.OK)
            {
                return;
            }
            else
            {
                try
                {
                    for (int i = 0; i < grvDetail.RowCount; i++)
                    {
                        if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                        {
                            FormICSTuiKuAdd add = new FormICSTuiKuAdd(grvDetail.GetRowCellValue(i, colVouchCode).ToString(), grvDetail.GetRowCellValue(i, colVouchRow).ToString(), grvDetail.GetRowCellValue(i, colSubInvCode).ToString(), grvDetail.GetRowCellValue(i, colWHCode).ToString(), grvDetail.GetRowCellValue(i, colQuantity).ToString(), grvDetail.GetRowCellValue(i, colMUSER).ToString());
                        }
                    }
                    ICSBaseSimpleCode.AppshowMessageBox(0, "保存成功");
                    btnRefresh_Click(null, null);
                }
                catch (Exception ex)
                {
                    ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
                    return;
                }
            }
        }
        #endregion

        #region 删除
        private void btnDel_Click(object sender, EventArgs e)
        {
            int Count = 0;
            grvDetail.PostEditor();
            this.Validate();
            if (grvDetail.RowCount == 0)
                return;
            SimpleButton btntemp = (SimpleButton)sender;
            if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
            {
                ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                return;
            }
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                {
                    Count++;
                }
            }
            if (Count == 0)
            {
                ICSBaseSimpleCode.AppshowMessageBox("请选择数据！");
                return;
            }
            if (ICSBaseSimpleCode.AppshowMessageBoxRepose("确定删除该单据吗？单据删除后无法恢复，确定吗？") != DialogResult.OK)
            {
                return;
            }
            else
            {
                try
                {
                    for (int i = 0; i < grvDetail.RowCount; i++)
                    {
                        if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                        {
                            FormICSTuiKuAdd add = new FormICSTuiKuAdd(grvDetail.GetRowCellValue(i, colVouchCode).ToString(), grvDetail.GetRowCellValue(i, colSubInvCode).ToString(), grvDetail.GetRowCellValue(i, colVouchRow).ToString(), grvDetail.GetRowCellValue(i, colWHCode).ToString(), grvDetail.GetRowCellValue(i, colQuantity).ToString());
                          
                        }
                    }
                    ICSBaseSimpleCode.AppshowMessageBox(0, "删除成功");
                    btnRefresh_Click(null, null);
                }
                catch (Exception ex)
                {
                    ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
                    return;
                }
            }
        }
         #endregion

        #region 
        private void btnPrint_Click(object sender, EventArgs e)
        {
            string LotNO = "";
            int Count = 0, Sum = 0;
            SimpleButton btntemp = (SimpleButton)sender;
            if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
            {
                ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                return;
            }
            List<ICSITEMLot> InfoList = new List<ICSITEMLot>();
            List<PrintPara> parasList = new List<PrintPara>();
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                {
                    if (grvDetail.GetRowCellValue(i, colVouchRow).ToString() == "")
                    {
                        Count++;
                    }
                    else
                    {
                        Sum++;
                    }
                }
            }
            if (Sum > 0)
            {
                if (Count == 0)
                {
                    for (int i = 0; i < grvDetail.RowCount; i++)
                    {
                        if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                        {
                            if (!(grvDetail.GetRowCellValue(i, colVouchRow).ToString() == ""))
                            {
                                ICSITEMLot Info = new ICSITEMLot();
                                Info.LotNO = grvDetail.GetRowCellValue(i, colVouchRow).ToString();
                                InfoList.Add(Info);
                                PrintPara para = new PrintPara();
                                para.PrintKey = "LotNO";
                                para.PrintValues = new object[] { grvDetail.GetRowCellValue(i, colVouchRow).ToString() };
                                parasList.Add(para);
                                ICSRdrecord2LOTBLL.updatePrint(InfoList, AppConfig.AppConnectString);
                            }
                        }
                    }
                    FormPrintDialog f = new FormPrintDialog("007", this.Text, parasList, false, null);
                    f.ShowDialog();
                    btnRefresh_Click(null, null);
                    return;
                }
                else
                {
                    ICSBaseSimpleCode.AppshowMessageBox("不能同时选择已经生成条码和未生成条码的退料单");
                    return;
                }
            }
            if (Count == 0)
            {
                ICSBaseSimpleCode.AppshowMessageBox("请选择数据！");
                return;
            }
            for (int i = 0; i < grvDetail.RowCount; i++)
            {
                if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                {
                    SqlConnection conn = new System.Data.SqlClient.SqlConnection(AppConfig.AppConnectString);
                    conn.Open();
                    SqlTransaction sqlTran = conn.BeginTransaction();
                    SqlCommand cmd = new SqlCommand();
                    cmd.Transaction = sqlTran;
                    cmd.Connection = conn;
                    try
                    {
                        DateTime time = DateTime.Now;
                        string timeStr = "T" + time.ToString("yyMMdd");
                        int m = 0;
                        string sql = @"SELECT MAX(A.LotNO) AS LOTNO FROM ICSITEMLot A WHERE A.LotNO LIKE '{0}%' AND LEN(a.LotNO) = 10";
                        sql = string.Format(sql, timeStr);
                        DataTable dt = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, sql).Tables[0];
                        if (dt != null && dt.Rows.Count > 0 && !string.IsNullOrEmpty(dt.Rows[0]["LotNO"].ToString()))
                        {
                            LotNO = dt.Rows[0]["LOTNO"].ToString();
                            m = int.Parse(LotNO.Substring(7, 3));
                        }
                        ICSITEMLot Info = new ICSITEMLot();
                        Info.ID = "";
                        Info.LOTQTY = Decimal.Parse(grvDetail.GetRowCellValue(i, colQuantity).ToString());
                        string add = "";
                        if (m + i + 1 < 9)
                        {
                            add = "00" + (m + i + 1).ToString();
                        }
                        else if (m + i + 1 < 99)
                        {
                            add = "0" + (m + i + 1).ToString();
                        }
                        else
                        {
                            add = (m + i + 1).ToString();
                        }
                        Info.LotNO = timeStr + add;
                        Info.LOTQTY = Convert.ToDecimal(grvDetail.GetRowCellValue(i, colQuantity).ToString());
                        Info.TransNO = grvDetail.GetRowCellValue(i, colVouchCode).ToString();
                        Info.TransLine = grvDetail.GetRowCellValue(i, colVouchRow).ToString();
                        Info.ItemCode = grvDetail.GetRowCellValue(i, colSubInvCode).ToString();
                        Info.VenderLotNO = Info.LotNO + (m + 1).ToString().PadLeft(4, '0');
                        Info.PRODUCTDATE = time;
                        Info.ACTIVE = "Y";
                        Info.Exdate = Convert.ToDateTime("2999-12-31");
                        Info.TYPE = "退料";

                        string sqlText = @"UPDATE ICSMaterialPick SET SubInvCode = '{0}' WHERE VouchCode = '" + Info.TransNO + "' AND VouchRow = '" + Info.TransLine + "'";
                        sqlText = string.Format(sqlText, Info.LotNO);
                        cmd.CommandText = sqlText;
                        cmd.ExecuteNonQuery();
                        cmd.Transaction.Commit();

                        #region
                        Info.lastPrintUSERID = AppConfig.UserId;
                        Info.lastPrintTime = AppConfig.GetSeverDateTime("yyyy-MM-dd hh:mm:ss");
                        Info.WorkPoint = AppConfig.WorkPointCode;
                        InfoList.Add(Info);
                        PrintPara para = new PrintPara();
                        para.PrintKey = "LotNO";
                        para.PrintValues = new object[] { Info.LotNO };
                        parasList.Add(para);
                        #endregion
                    }
                    catch
                    {
                        cmd.Transaction.Rollback();
                    }
                }
            }
            ICSRdrecord2LOTBLL.Add(InfoList, AppConfig.AppConnectString);
            FormPrintDialog x = new FormPrintDialog("007", this.Text, parasList, false, null);
            x.ShowDialog();
            ICSRdrecord2LOTBLL.updatePrint(InfoList, AppConfig.AppConnectString);
            btnRefresh_Click(null, null);
        }
        #endregion

        #region 打印
        private void btnPrintM_Click(object sender, EventArgs e)
        {
            SimpleButton btntemp = (SimpleButton)sender;
            if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
            {
                ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                return;
            }

            if (grvDetail.FocusedRowHandle < 0)
            {
                return;
            }

            try
            {
                List<PrintPara> barCodeList = new List<PrintPara>();
                for (int i = 0; i < grvDetail.RowCount; i++)
                {
                    if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                    {

                        string barCode = grvDetail.GetRowCellValue(i, colVouchCode).ToString();
                        PrintPara printInfo = new PrintPara();
                        printInfo.PrintKey = "VouchCode";
                        printInfo.PrintValues = new object[] { barCode };
                        barCodeList.Add(printInfo);
                    }
                }

                if (barCodeList.Count == 0)
                {
                    ICSBaseSimpleCode.AppshowMessageBox("没有选择数据");
                    return;
                }

                FormPrintDialog printDialog = new FormPrintDialog("015", "ICSProduct", barCodeList, false, null);
                printDialog.ShowDialog();
            }
            catch (Exception ex)
            {
                ICSBaseSimpleCode.AppshowMessageBox(ex.Message);
            }
        }
        #endregion
    }
}