RuiTengJb/ICSSoft.AppSln/ICSSoft.Frame.APP/ProductLabel/FormICSItemBackNew.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 ICSSoft.Base.Lable.PrintTool;
using DevExpress.XtraPrinting;
using ICSSoft.Frame.Data.Entity;

namespace ICSSoft.Frame.APP
{
    public partial class FormICSItemBackNew : DevExpress.XtraEditors.XtraForm
    {
        private string sqltxt = "";
        private string sqlconn = "";
        String guid = AppConfig.GetGuid();
        private DataTable dataSource = null;
        private DataTable dataSourceAll = null;
        private string MoId = "";
        private string MoCode = "";
        private decimal Qty = 0.00m;

        #region 构造函数
        public FormICSItemBackNew()
        {
            InitializeComponent();
            this.MaximumSize = new Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height);
            this.WindowState = FormWindowState.Maximized;

        }
        public FormICSItemBackNew(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);
            ControlList.Add(btnModify);
            //ControlList.Add(btnCreate);
            ControlList.Add(simpleButton1);             
            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 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

        //加载
        private void FormICSItemBackNew_Load(object sender, EventArgs e)
        {
            init();
        }

        #region 初始化查询条件
        private void init()
        {
            #region 生产订单号
            string sql = "SELECT DISTINCT MOCODE AS [生产订单号] FROM ICSMO WHERE WorkPoint='{0}' ORDER BY MOCODE ";
            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()
        {
            DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
            try
            {
                _wait.Show();
                dataSourceAll = null;
                dataSource = null;
                if (string.IsNullOrWhiteSpace(txtMOCode.Text.Trim()))
                {
                    _wait.Close();
                    ICSBaseSimpleCode.AppshowMessageBox("请输入生产订单号！");
                    return;
                }

                string Where = txtMOCode.Text.Trim();

                #region 查询
                if (!string.IsNullOrWhiteSpace(cmbSEQ.Text.Trim()))
                {
                    Where += "'  AND e.MOSEQ='" + cmbSEQ.Text.Trim() + " ";
                }
                string sql = @" SELECT '' AS isSelect,
	                                e.MOCODE,
	                                e.MOSEQ,
	                                e.ITEMCODE,
	                                b.INVNAME,
	                                b.INVSTD AS INVTYPE,
	                                c.MOBITEMCODE,
	                                d.INVNAME AS CINVNAME,
	                                d.INVSTD AS CINVTYPE,
	                                d.INVUOM,
	                                CAST(ISNULL(c.MOBITEMQTY, 0)*e.MOPLANQTY  AS DECIMAL(18,2)) AS QTY,
	                                f.LotNO,
	                                CASE WHEN f.LotNO IS NULL THEN '0' ELSE '1' END AS HasLotNO,
	                                CASE WHEN d.INVCODE LIKE '3%' THEN '成品' WHEN d.INVCODE LIKE '2%' THEN '半成品' ELSE '原料' END  AS TYPE,
	                                CAST(ISNULL(g.QTY, 0) AS DECIMAL(18,2)) AS QTYB,
	                                g.STATUS,
	                                g.MUSERName,
	                                g.MTIME,
	                                g.ID
                                FROM
	                                ICSMO e
                                LEFT JOIN ICSINVENTORY b ON e.ITEMCODE = b.INVCODE
                                LEFT JOIN ICSMOBOM c ON e.MOCODE = c.MOCODE AND c.SEQ=e.MOSEQ  AND e.ITEMCODE = c.ITEMCODE
                                LEFT JOIN ICSINVENTORY d ON c.MOBITEMCODE = d.INVCODE
                                LEFT JOIN ICSItemBack g ON c.MOCODE=g.MOCODE AND c.SEQ=g.MOSEQ  AND c.MOBITEMCODE=g.INVCode
                                LEFT JOIN 
                                (
	                                SELECT DISTINCT
		                                h.TransNO,
		                                h.TransLine,
		                                h.ITEMCODE,
		                                i.LotNO,
		                                j.MTIME
	                                FROM
		                                ICSITEMTrans h
	                                INNER JOIN ICSITEMTransLot i ON h.ID=i.ITEMTransID AND h.WorkPoint=i.WorkPoint
	                                INNER JOIN ICSWareHouseLotInfo j ON i.LotNO=j.LotNO AND i.WorkPoint=j.WorkPoint 
	                                WHERE h.TransType='出库'  AND h.TransNO='{2}' AND h.WorkPoint='{1}'
	                                AND j.MTIME=
	                                (
		                                SELECT MIN(m.MTIME)
			                                FROM
			                                ICSITEMTrans k
		                                INNER JOIN ICSITEMTransLot l ON k.ID=l.ITEMTransID AND k.WorkPoint=l.WorkPoint
		                                INNER JOIN ICSWareHouseLotInfo m ON l.LotNO=m.LotNO AND l.WorkPoint=m.WorkPoint
		                                WHERE k.TransType='出库' AND h.TransNO=k.TransNO  AND h.ITEMCODE=k.ITEMCODE 
		                                GROUP BY k.TransNO,k.TransLine,k.ITEMCODE
	                                )
                                ) f ON c.MOCODE=f.TransNO AND c.MOBITEMCODE=f.ITEMCODE
                                WHERE   e.MOCODE='{0}' AND
	                                e.WorkPoint = '{1}'
                                ORDER BY e.MOSEQ,c.MOBOMLINE,c.MOBITEMCODE
                                ";
                sql = string.Format(sql, Where, AppConfig.WorkPointCode, txtMOCode.Text.Trim());
                DataSet ds = DBHelper.ExecuteDataset(AppConfig.AppConnectString, CommandType.Text, sql);

                if (ds != null && ds.Tables.Count == 1)
                {
                    dataSourceAll = ds.Tables[0];
                    DataView dv = dataSourceAll.Copy().DefaultView;
                    dv.RowFilter = "HasLotNO='1'";
                    dataSource = dv.ToTable().Copy();
                    if (chkAll.Checked)
                        grdDetail.DataSource = dataSourceAll;
                    else
                        grdDetail.DataSource = dataSource;
                    grvDetail.BestFitColumns();
                }

                #endregion

                _wait.Close();
            }
            catch (Exception ex)
            {
                _wait.Close();
                ICSBaseSimpleCode.AppshowMessageBox(ex.ToString());
            }
        }

        private void txtMOCode_EditValueChanged(object sender, EventArgs e)
        {
            grdDetail.DataSource = null;
            cmbSEQ.Text = "";
            cmbSEQ.Properties.Items.Clear();
            string MOCode = txtMOCode.EditValue.ToString();
            string sql = "SELECT MOSEQ FROM ICSMO WHERE WorkPoint='{0}' AND MOCODE='{1}' ORDER BY MOSEQ";
            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["MOSEQ"]).ToList());

            loadData();
        }

        private void cmbSEQ_SelectedIndexChanged(object sender, EventArgs e)
        {
            grdDetail.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
            {
                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 = "MOCODE";
                para.PrintValues = new object[] { txtMOCode.EditValue };
                parasList.Add(para);

                if (parasList.Count == 0)
                {
                    ICSBaseSimpleCode.AppshowMessageBox("请选择数据！");
                    return;
                }
                FormPrintDialog f = new FormPrintDialog("018", this.Text, parasList, false, null);
                f.ShowDialog();
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.ToString());
            }
        }
        #endregion
        
        #region 保存
        private void btnModify_Click(object sender, EventArgs e)
        {
            DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
            try
            {
                _wait.Show();
                SimpleButton btntemp = (SimpleButton)sender;
                if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
                {
                    _wait.Close();
                    ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                    return;
                }

                List<ICSItemBack> editList = new List<ICSItemBack>();
                for (int i = 0; i < grvDetail.RowCount; i++)
                {
                    if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                    {
                        if (grvDetail.GetRowCellValue(i, colSTATUS).ToString() == "已退")
                        {
                            _wait.Close();
                            ICSBaseSimpleCode.AppshowMessageBox("已退状态不能保存！");
                            return;
                        }
                        if (Convert.ToDecimal(grvDetail.GetRowCellValue(i, colQTYB).ToString()) <= 0)
                        {
                            _wait.Close();
                            ICSBaseSimpleCode.AppshowMessageBox("请填写正确的退库数量！");
                            return;
                        }
                        ICSItemBack entity = new ICSItemBack();
                        entity.ID = grvDetail.GetRowCellValue(i, colID).ToString();
                        entity.MOCODE = grvDetail.GetRowCellValue(i, colMOCODE).ToString();
                        entity.MOSEQ = grvDetail.GetRowCellValue(i, colMOSEQ).ToString();
                        entity.INVCode = grvDetail.GetRowCellValue(i, colMOBITEMCODE).ToString();
                        entity.QTY = Convert.ToDecimal(grvDetail.GetRowCellValue(i, colQTYB).ToString());
                        entity.STATUS = "初始";
                        editList.Add(entity);
                    }
                }
                if (editList.Count <= 0)
                {
                    _wait.Close();
                    ICSBaseSimpleCode.AppshowMessageBox("请选择数据!!!");
                    return;
                }

                ICSItemBackBLL.AddandEditList(editList, AppConfig.AppConnectString);
                _wait.Close();
                ICSBaseSimpleCode.AppshowMessageBox("操作成功");
                loadData();
            }
            catch (Exception ex)
            {
                _wait.Close();
                MessageBox.Show(ex.ToString());
            }
        }
        #endregion
        
        #region 生成条码
        private void btnCreate_Click(object sender, EventArgs e)
        {
            DevExpress.Utils.WaitDialogForm _wait = new DevExpress.Utils.WaitDialogForm("正在查找...请稍等...");
            try
            {
                _wait.Show();
                SimpleButton btntemp = (SimpleButton)sender;
                if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
                {
                    _wait.Close();
                    ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                    return;
                }
                List<ICSITEMLot> InfoList = new List<ICSITEMLot>();

                for (int i = 0; i < grvDetail.RowCount; i++)
                {
                    if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                    {
                        if (grvDetail.GetRowCellValue(i, colLotNO).ToString() != "")
                        {
                            _wait.Close();
                            ICSBaseSimpleCode.AppshowMessageBox("已生成条码不能再次生成！");
                            return;
                        }
                        if (Convert.ToDecimal(grvDetail.GetRowCellValue(i, colQTYB).ToString()) <= 0)
                        {
                            _wait.Close();
                            ICSBaseSimpleCode.AppshowMessageBox("请填写正确的退库数量！");
                            return;
                        }
                        ICSITEMLot Info = new ICSITEMLot();

                        DateTime time = AppConfig.GetSeverDateTime("yyyy-MM-dd HH:mm:ss");
                        Info.ID = "";
                        Info.LOTQTY = Convert.ToDecimal(grvDetail.GetRowCellValue(i, colQTYB).ToString());
                        Info.LotNO = time.ToString("yyyyMMddHHmmss") + grvDetail.GetRowCellValue(i, colMOBITEMCODE).ToString();
                        Info.ItemCode = grvDetail.GetRowCellValue(i, colMOBITEMCODE).ToString();
                        Info.TransNO = grvDetail.GetRowCellValue(i, colMOCODE).ToString();
                        //Info.TransLine =Convert.ToInt32(grvDetail.GetRowCellValue(i, colMOSEQ).ToString());
                        Info.TransLine = grvDetail.GetRowCellValue(i, colMOSEQ).ToString();
                        Info.VenderLotNO = time.ToString("yyMMdd").Substring(time.ToString("yyMMdd").Length - 6) + "0001";  //生产批号，每个工单一个
                        Info.PRODUCTDATE = time.Date;
                        Info.ACTIVE = "Y";
                        Info.Exdate = Convert.ToDateTime("2999-12-31");
                        Info.TYPE = grvDetail.GetRowCellValue(i, colTYPE).ToString();
                        InfoList.Add(Info);
                    }
                }
                if (InfoList.Count <= 0)
                {
                    _wait.Close();
                    ICSBaseSimpleCode.AppshowMessageBox("请选择数据!!!");
                    return;
                }

                ICSRdrecord2LOTBLL.Add(InfoList, AppConfig.AppConnectString);
                _wait.Close();
                ICSBaseSimpleCode.AppshowMessageBox("操作成功");
                loadData();
            }
            catch (Exception ex)
            {
                _wait.Close();
                MessageBox.Show(ex.ToString());
            }
        }
        #endregion

        #region 打印条码
        private void simpleButton1_Click(object sender, EventArgs e)
        {
            try
            {
                SimpleButton btntemp = (SimpleButton)sender;
                if (AppConfig.GetUserExcuteRight(this.Tag.ToString(), btntemp.Name) == false)
                {
                    ICSBaseSimpleCode.AppshowMessageBox("对不起您没有:" + btntemp.Text + "权限,请联系系统管理员！");
                    return;
                }
                bool identical = true;
                string type = "";
                List<PrintPara> parasList = new List<PrintPara>();
                List<ICSITEMLot> InfoList = new List<ICSITEMLot>();
                for (int i = 0; i < grvDetail.RowCount; i++)
                {
                    if (grvDetail.GetRowCellValue(i, colisSelect).ToString() == "Y")
                    {
                        if (grvDetail.GetRowCellValue(i, colLotNO).ToString() == "")
                        {
                            ICSBaseSimpleCode.AppshowMessageBox("没有此物料对应的领料信息！");
                            return;
                        }
                        if (!string.IsNullOrWhiteSpace(type) && !type.Equals(grvDetail.GetRowCellValue(i, colTYPE).ToString()))
                        {
                            identical = false;
                            break;
                        }
                        type = grvDetail.GetRowCellValue(i, colTYPE).ToString();
                        PrintPara para = new PrintPara();
                        para.PrintKey = "LOTNO";
                        para.PrintValues = new object[] { grvDetail.GetRowCellValue(i, colLotNO).ToString() };
                        parasList.Add(para);

                        ICSITEMLot Info = new ICSITEMLot();
                        Info.LotNO = grvDetail.GetRowCellValue(i, colLotNO).ToString();
                        //Info.PrintTimes = Convert.ToInt32(grvDetail.GetRowCellValue(i, colPrintTimes).ToString()) + 1;
                        Info.lastPrintUSERID = AppConfig.UserId;
                        Info.lastPrintTime = AppConfig.GetSeverDateTime("yyyy-MM-dd hh:mm:ss");
                        Info.WorkPoint = AppConfig.WorkPointCode;
                        InfoList.Add(Info);
                    }
                }
                if (!identical)
                {
                    ICSBaseSimpleCode.AppshowMessageBox("类型不同，不能打印！");
                    return;
                }
                if (parasList.Count == 0)
                {
                    ICSBaseSimpleCode.AppshowMessageBox("请选择数据！");
                    return;
                }
                if (type.Equals("半成品"))
                {
                    FormPrintDialog f = new FormPrintDialog("007", this.Text, parasList, false, null);
                    f.ShowDialog();
                }
                else if (type.Equals("成品"))
                {
                    FormPrintDialog f = new FormPrintDialog("008", this.Text, parasList, false, null);
                    f.ShowDialog();
                }
                else
                {
                    FormPrintDialog f = new FormPrintDialog("006", this.Text, parasList, false, null);
                    f.ShowDialog();
                }
                //更新打印信息
                ICSRdrecord2LOTBLL.updatePrint(InfoList, AppConfig.AppConnectString);
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.ToString());
            }
        }
        #endregion

        private void chkAll_CheckedChanged(object sender, EventArgs e)
        {

            if (chkAll.Checked)
                grdDetail.DataSource = dataSourceAll;
            else
                grdDetail.DataSource = dataSource;
            grvDetail.BestFitColumns();
        }
    }
}