mes-client/UAS_MES_YTDZ/FunctionCode/Make/Make_ToolingManager.cs

using Newtonsoft.Json;
using Newtonsoft.Json.Linq;
using NPOI.SS.Formula.Functions;
using System;
using System.Collections.Generic;
using System.Data;
using System.Drawing;
using System.Net.Http;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using UAS_MES_NEW.CustomControl.ButtonUtil;
using UAS_MES_NEW.CustomControl.RichText;
using UAS_MES_NEW.DataOperate;
using UAS_MES_NEW.Entity;
using UAS_MES_NEW.PublicMethod;

namespace UAS_MES_NEW.Make
{
    public partial class Make_ToolingManager : Form
    {
        public Make_ToolingManager()
        {
            InitializeComponent();
        }
        DataHelper dh;
        DataTable Dbfind;

        DataTable dt;

        private void Make_ToolingManager_Load(object sender, EventArgs e)
        {
            dh = SystemInf.dh;

            li_code.Text = User.UserLineCode;

            ma_code.TableName = "make left join product on ma_prodcode=pr_code";
            ma_code.SelectField = "ma_code # 工单号,ma_prodcode # 产品编号,ma_qty # 工单数量,pr_detail # 产品名称,ma_softversion # 软件版本,ma_salecode # 销售单号,pr_sendchecktype # 产品送检方式";
            ma_code.FormName = Name;
            ma_code.SetValueField = new string[] { "ma_code" };
            ma_code.DbChange += Ma_code_DbChange;

            li_code.TableName = "Line";
            li_code.SelectField = "li_code # 线别编号,li_name # 线别名称";
            li_code.Condition = "li_wccode='SMT'";
            li_code.FormName = Name;
            li_code.SetValueField = new string[] { "li_code", "li_name" };
            li_code.DbChange += Li_code_DbChange;

            toolingVal.SelectAll();
            toolingVal.Focus();
        }

        private void Li_code_DbChange(object sender, EventArgs e)
        {
            Dbfind = li_code.ReturnData;
            BaseUtil.SetFormValue(this.Controls, Dbfind);
        }

        private void Ma_code_DbChange(object sender, EventArgs e)
        {
            Dbfind = ma_code.ReturnData;
            BaseUtil.SetFormValue(this.Controls, Dbfind);
            //Confirm.PerformClick();
        }

        private void toolingVal_Leave(object sender, EventArgs e)
        {
            KeyPressEventArgs newEvent = new KeyPressEventArgs((char)Keys.Enter);
            toolingVal_KeyPress(toolingVal, newEvent);
        }

        private void toolingVal_KeyPress(object sender, KeyPressEventArgs e)
        {
            if (e.KeyChar != (char)Keys.Enter) return;

            if (string.IsNullOrEmpty(toolingVal.Text.Trim()))
            {
                ShowMsg(MsgBox, 0, "NG,请输入治具编号");
                toolingVal.SelectAll();
                toolingVal.Focus();
                return;
            }

            dt = (DataTable)dh.ExecuteSql($"select st_kind,st_usestatus from stencil where st_code = '{toolingVal.Text.Trim()}' group by st_kind,st_usestatus", "select");
            if (dt.Rows.Count == 0)
            {
                ShowMsg(MsgBox, 0, "NG,未识别到治具类型,请先维护治具信息");
                toolingVal.SelectAll();
                toolingVal.Focus();
                return;
            }
            typeVal.Items.Clear();
            for (int i = 0; i < dt.Rows.Count; i++)
            {
                typeVal.Items.Add(dt.Rows[i][0].ToString());
            }
            typeVal.SelectedIndex = 0;
            currStatusVal.Text = dt.Rows[0]["st_usestatus"].ToString();

            if (typeVal.Text == "钢网")
            {
                stA.Enabled = true;
                stB.Enabled = true;
                stC.Enabled = true;
                stD.Enabled = true;
                stE.Enabled = true;

                gapVal1.Visible = false;
                gapLab1.Visible = false;
                gapVal2.Visible = false;
                gapLab2.Visible = false;
                gapVal3.Visible = false;
                gapLab3.Visible = false;
            }
            else
            {
                stA.Enabled = false;
                stB.Enabled = false;
                stC.Enabled = false;
                stD.Enabled = false;
                stE.Enabled = false;

                gapVal1.Visible = true;
                gapLab1.Visible = true;
                gapVal2.Visible = true;
                gapLab2.Visible = true;
                gapVal3.Visible = true;
                gapLab3.Visible = true;
            }

            dt = (DataTable)dh.ExecuteSql($"select su_status,su_usedate from (select su_status,su_usedate from stenciluse where su_stcode = '{toolingVal.Text.Trim()}' order by su_usedate desc) where rownum=1", "select");
            if (dt.Rows.Count == 0)
            {
                ShowMsg(MsgBox, 2, "NG,未识别到治具上次操作");
            }
            else
            {
                prevTypeVal.Text = dt.Rows[0]["su_status"].ToString();
                prevTimeVal.Text = dt.Rows[0]["su_usedate"].ToString();
            }

            if(currStatusVal.Text == "出库")
            {
                Return.Enabled = true;
                Scrap.Enabled = true;
                Receive.Enabled = false;
            }
            else if (currStatusVal.Text == "在库")
            {
                Return.Enabled = false;
                Scrap.Enabled = false;
                Receive.Enabled = true;
            }
            else
            {
                Return.Enabled = false;
                Scrap.Enabled = false;
                Receive.Enabled = true;
            }

            toolingVal.Enabled = false;
        }

        private void ShowMsg(RichTextAutoBottom msgBox, int type, string msg)
        {
            msg = msg.Replace("\r", "").Replace("\n", "");
            string msgTime = DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss");
            string showMsg = $"{msgTime}: {msg}\n";

            if (type == 0)
            {
                msgBox.AppendText(showMsg, Color.Red);
                msgBox.SelectionStart = msgBox.Text.Length;
                msgBox.ScrollToCaret();
            }
            else if (type == 1)
            {
                msgBox.AppendText(showMsg, Color.Green);
                msgBox.SelectionStart = msgBox.Text.Length;
                msgBox.ScrollToCaret();
            }
            else if (type == 2)
            {
                msgBox.AppendText(showMsg, Color.YellowGreen);
                msgBox.SelectionStart = msgBox.Text.Length;
                msgBox.ScrollToCaret();
            }
        }

        private void cancel_Click(object sender, EventArgs e)
        {
            toolingVal.Enabled = true;
            toolingVal.Focus();
            toolingVal.SelectAll();
        }

        private void Receive_Click(object sender, EventArgs e)
        {
            if (string.IsNullOrEmpty(ma_code.Text))
            {
                ShowMsg(MsgBox, 0, "NG,请选择使用工单");
                ma_code.Focus();
                return;
            }
            if (string.IsNullOrEmpty(li_code.Text))
            {
                ShowMsg(MsgBox, 0, "NG,请输入使用线体");
                li_code.Focus();
                return;
            }
            if (string.IsNullOrEmpty(sideVal.Text))
            {
                ShowMsg(MsgBox, 0, "NG,请选择使用面别");
                sideVal.Focus();
                return;
            }
            if (string.IsNullOrEmpty(empVal.Text))
            {
                ShowMsg(MsgBox, 0, "NG,请填写领用人员");
                empVal.Focus();
                empVal.SelectAll();
                return;
            }

            if (li_code.Text.Contains("A") || li_code.Text.Contains("B"))
            {
                ShowMsg(MsgBox, 0, "NG,A和B新线体不允许手动领用，须通过测试仪领用");
                li_code.Focus();
                return;
            }


            int st_maxusecount = (int)dh.getFieldDataByCondition("stencil", "nvl(st_maxusecount, 0)", $"st_code = '{toolingVal.Text.Trim()}'");
            int st_usecount = (int)dh.getFieldDataByCondition("stencil", "nvl(st_usecount, 0)", $"st_code = '{toolingVal.Text.Trim()}'");
            if (st_maxusecount - st_usecount <= 0)
            {
                ShowMsg(MsgBox, 0, $"NG,可使用次数不足,使用次数上限为:{st_maxusecount},当前使用次数为:{st_usecount}");
                return;
            }

            if (IsCheckProd.Checked)
            {
                dt = (DataTable)dh.ExecuteSql($"SELECT sp_detno FROM stenilcanusepro,make WHERE sp_stcode = '{toolingVal.Text.Trim()}' AND ma_code = '{ma_code.Text}' AND ma_code = sp_prodcode", "select");
                if(dt.Rows.Count == 0)
                {
                    ShowMsg(MsgBox, 0, $"NG,治具编号:{toolingVal.Text}使用产品未维护，无法在工单{ma_code.Text}中使用");
                    return;
                }
            }

            dt = (DataTable)dh.ExecuteSql($@"SELECT st_usestatus,st_version,nvl(st_maxusecount, 0) st_maxusecount,nvl(st_usecount, 0)    st_usecount
                FROM stencil WHERE st_code = '{toolingVal.Text.Trim()}'", "select");
            string status = dt.Rows[0]["st_usestatus"].ToString();
            if (status == "出库" || status == "报废")
            {
                ShowMsg(MsgBox, 0, $"NG,无法领用,{typeVal.Text}:{toolingVal.Text}为{status}状态");
                return;
            }

            int maxCount = Convert.ToInt32(dt.Rows[0]["st_maxusecount"].ToString());
            int useCount = Convert.ToInt32(dt.Rows[0]["st_usecount"].ToString());
            int warnCount = Convert.ToInt32(dh.GetConfig("WaringCount", "Stencil"));
            if (maxCount - useCount < warnCount)
            {
                //ShowMsg(MsgBox, 2, "Warning,钢网:" + toolingVal.Text + "使用次数接近上限");
                DialogResult result = MessageBox.Show(this.ParentForm, $"Warning,{typeVal.Text}:{toolingVal.Text}使用次数接近上限,已使用{useCount}，距离上限还有{(maxCount - useCount)}次", "Warning", MessageBoxButtons.YesNo, MessageBoxIcon.Question);
                if (result == DialogResult.No || result == DialogResult.Cancel) return;
            }

            dt = (DataTable)dh.ExecuteSql($"select ma_prodcode from make where ma_code='{ma_code.Text}'", "select");
            string ma_prodcode = dt.Rows[0]["ma_prodcode"].ToString();

            dt = (DataTable)dh.ExecuteSql($"select st_code from stencil where st_line='{li_code.Text}' and st_kind = '{typeVal.Text}'", "select");
            if(typeVal.Text == "钢网")
            {
                if (dt.Rows.Count > 0)
                {
                    ShowMsg(MsgBox, 0, $"NG,线体已有在线{typeVal.Text},编号为:{dt.Rows[0]["st_code"].ToString()}");
                    return;
                }

                dt = (DataTable)dh.ExecuteSql($@"SELECT su_ensiona, su_ensionb, su_ensionc, su_ensiond, su_ensione FROM 
                    (SELECT * FROM stenciluse WHERE su_stcode = '{toolingVal.Text.Trim()}' AND su_status = '归还' ORDER BY su_usedate DESC) WHERE ROWNUM = 1", "select");
                if (dt.Rows.Count > 0)
                {
                    dh.ExecuteSql($@"INSERT INTO stenciluse (su_id,su_stcode,su_stid,
                        su_usemacode,su_useprodcode,su_linecode,su_table,su_useman,su_usedate,su_status,
                        su_ensiona,su_ensionb,su_ensionc,su_ensiond,su_ensione)
                        SELECT stenciluse_seq.NEXTVAL,'{toolingVal.Text.Trim()}',st_id,
                        '{ma_code.Text}','{ma_prodcode}','{li_code.Text}','{sideVal.Text}','{empVal.Text}',sysdate, '领用',
                        '{dt.Rows[0]["su_ensiona"].ToString()}','{dt.Rows[0]["su_ensionb"].ToString()}','{dt.Rows[0]["su_ensionc"].ToString()}',
                        '{dt.Rows[0]["su_ensiond"].ToString()}','{dt.Rows[0]["su_ensione"].ToString()}'
                        FROM stencil WHERE st_code = '{toolingVal.Text.Trim()}'", "insert");
                }
                else
                {
                    dh.ExecuteSql($@"INSERT INTO stenciluse (su_id,su_stcode,su_stid,
                        su_usemacode,su_useprodcode,su_linecode,su_table,su_useman,su_usedate,su_status)
                        SELECT stenciluse_seq.NEXTVAL,'{toolingVal.Text.Trim()}',st_id,
                        '{ma_code.Text}','{ma_prodcode}','{li_code.Text}','{sideVal.Text}','{empVal.Text}',sysdate, '领用'
                        FROM stencil WHERE st_code = '{toolingVal.Text.Trim()}'", "insert");
                }

            }
            else if (typeVal.Text == "刮刀")
            {
                if (dt.Rows.Count > 1)
                {
                    ShowMsg(MsgBox, 0, $"NG,线体已有在线{typeVal.Text},编号为:{dt.Rows[0]["st_code"].ToString()}");
                    return;
                }
                string seq = (string)dh.getFieldDataByCondition("dual", "stenciluse_seq.NEXTVAL seq", "1=1");

                dh.ExecuteSql($@"INSERT INTO stenciluse (su_id,su_stcode,su_stid,
                    su_usemacode,su_useprodcode,su_linecode,su_table,su_useman,su_usedate,su_status)
                    SELECT '{seq}','{toolingVal.Text.Trim()}',st_id,
                    '{ma_code.Text}','{ma_prodcode}','{li_code.Text}','{sideVal.Text}','{empVal.Text}',sysdate, '领用'
                    FROM stencil WHERE st_code = '{toolingVal.Text.Trim()}'", "insert");

                if (!string.IsNullOrEmpty(gapVal1.Text) && !string.IsNullOrEmpty(gapVal2.Text) && !string.IsNullOrEmpty(gapVal3.Text))
                {
                    dh.ExecuteSql($@"INSERT INTO steptestdetail( std_id, std_subclass1, std_subclass2, std_value9, std_value10, std_value11) 
                            VALUES ( steptestdetail_seq.NEXTVAL, '{seq}', '刮刀', '{gapVal1.Text}', '{gapVal2.Text}', '{gapVal3.Text}' )", "insert");
                }
            }
            dh.ExecuteSql($@"update stencil set st_usestatus= '出库',st_line = '{li_code.Text}',st_macode = '{ma_code.Text}',
                st_useofproduct = '{ma_prodcode}' where st_code='" + toolingVal.Text + "'", "update");


            ma_code.Text = "";
            sideVal.SelectedIndex = -1;
            empVal.Text = "";

            ShowMsg(MsgBox, 1, $"OK,{typeVal.Text}编号:{toolingVal.Text},已领用成功");

            CleanDetail("Receive");

            KeyPressEventArgs newEvent = new KeyPressEventArgs((char)Keys.Enter);
            toolingVal_KeyPress(toolingVal, newEvent);
        }

        private void CleanDetail(string type)
        {
            // Stencil Scraper
            if (type == "Receive")
            {
                ma_code.Text = "";
                sideVal.SelectedIndex = -1;
                empVal.Text = "";
            }
            else if (type == "Return")
            {
                stA.Text = "";
                stB.Text = "";
                stC.Text = "";
                stD.Text = "";
                stE.Text = "";
                empVal1.Text = "";
                useCountVal.Text = "";
                IsClean.Checked = false;
            }
        }

        private void Return_Click(object sender, EventArgs e)
        {
            if (string.IsNullOrEmpty(empVal1.Text))
            {
                ShowMsg(MsgBox, 0, "NG,请填写归还人员");
                empVal1.Focus();
                empVal1.SelectAll();
                return;
            }
            if (string.IsNullOrEmpty(useCountVal.Text))
            {
                useCountVal.Text = "0";
            }

            string stLine = (string)dh.getFieldDataByCondition("stencil", "st_line", $"st_code = '{toolingVal.Text.Trim()}'");
            if (stLine.Contains("A") || stLine.Contains("B"))
            {
                ShowMsg(MsgBox, 0, "NG,A和B新线体不允许手动归还，须通过测试仪归还");
                return;
            }

            dt = (DataTable)dh.ExecuteSql($@"SELECT st_usestatus,st_usecount
                FROM stencil WHERE st_code = '{toolingVal.Text.Trim()}'", "select");
            string status = dt.Rows[0]["st_usestatus"].ToString();
            if (status == "在库" || status == "报废")
            {
                ShowMsg(MsgBox, 0, $"NG,无需归还,{typeVal.Text}:{toolingVal.Text}为{status}状态");
                return;
            }


            int cleanCount = Convert.ToInt32(useCountVal.Text.Trim());
            if (typeVal.Text == "钢网")
            {
                dh.ExecuteSql($@"UPDATE stencil SET st_ensiona = '{stA.Text.Trim()}',st_ensionb = '{stB.Text.Trim()}',
                        st_ensionc = '{stC.Text.Trim()}',st_ensiond = '{stD.Text.Trim()}',st_ensione = '{stE.Text.Trim()}',
                        st_usecount = nvl(st_usecount,0) + {cleanCount},st_usestatus = '在库',
                        st_line = '',st_macode = '',st_useofproduct = ''
                        WHERE st_code = '{toolingVal.Text.Trim()}'", "update");

                if (IsClean.Checked) {
                    dh.ExecuteSql($@"UPDATE stencil SET st_cleannums = nvl(st_cleannums, 0) + 1 
                        WHERE st_code = '{toolingVal.Text.Trim()}'", "update");
                }

                dh.ExecuteSql($@"INSERT INTO stenciluse (su_id,su_stcode,su_stid,
                    su_usemacode,su_useprodcode,su_linecode,su_table,
                    su_useman,su_usedate,su_status,
                    su_ensiona,su_ensionb,su_ensionc,su_ensiond,su_ensione)
                    SELECT stenciluse_seq.NEXTVAL,'{toolingVal.Text.Trim()}',st_id,
                    su_usemacode,su_useprodcode,su_linecode,su_table,
                    '{empVal1.Text}',sysdate,'归还',
                    st_ensiona,st_ensionb,st_ensionc,st_ensiond,st_ensione
                    FROM stencil,stenciluse WHERE st_code = '{toolingVal.Text.Trim()}'
                    AND st_line = su_linecode", "insert");
            }
            else if(typeVal.Text == "刮刀")
            {
                dh.ExecuteSql($@"UPDATE stencil SET st_usecount = nvl(st_usecount,0) + {cleanCount},
                        st_usestatus = '在库',st_line = '',st_macode = '',st_useofproduct = ''WHERE st_code = '{toolingVal.Text.Trim()}'", "update");

                if (IsClean.Checked)
                {
                    dh.ExecuteSql($@"UPDATE stencil SET st_cleannums = nvl(st_cleannums, 0) + 1 WHERE st_code = '{toolingVal.Text.Trim()}'", "update");
                }

                dh.ExecuteSql($@"INSERT INTO stenciluse (su_id,su_stcode,su_stid,
                    su_usemacode,su_useprodcode,su_linecode,su_table,
                    su_useman,su_usedate,su_status,)
                    SELECT stenciluse_seq.NEXTVAL,'{toolingVal.Text.Trim()}',st_id,
                    su_usemacode,su_useprodcode,su_linecode,su_table,
                    '{empVal1.Text}',sysdate,'归还',
                    FROM stencil,stenciluse WHERE st_code = '{toolingVal.Text.Trim()}'
                    AND st_line = su_linecode", "insert");
            }

            stA.Text = "";
            stB.Text = "";
            stC.Text = "";
            stD.Text = "";
            stE.Text = "";
            empVal1.Text = "";
            IsClean.Checked = false;
            ShowMsg(MsgBox, 1, $"OK,{typeVal.Text}编号:{toolingVal.Text},已归还成功");

            CleanDetail("Receive");

            KeyPressEventArgs newEvent = new KeyPressEventArgs((char)Keys.Enter);
            toolingVal_KeyPress(toolingVal, newEvent);
        }

        private void Scrap_Click(object sender, EventArgs e)
        {

        }

    }
}