mes-client/UAS_MES_YDCY/FunctionCode/Query/Query_LoadMan.cs

using System;
using System.Data;
using System.Drawing;
using System.Windows.Forms;
using UAS_MES_NEW.DataOperate;
using UAS_MES_NEW.Entity;
using UAS_MES_NEW.PublicForm;
using UAS_MES_NEW.PublicMethod;

namespace UAS_MES_NEW.Query
{
    public partial class Query_LoadMan : Form
    {
        AutoSizeFormClass asc = new AutoSizeFormClass();

        DataHelper dh = SystemInf.dh;

        DataTable Dbfind;

        public Query_LoadMan()
        {
            InitializeComponent();
        }

        private void Query_LoadMan_Load(object sender, EventArgs e)
        {
            asc.controllInitializeSize(this);
            //线别放大镜
            li_code.TableName = "line";
            li_code.SelectField = "li_code # 线别编号,li_name # 线别名称";
            li_code.FormName = Name;
            li_code.SetValueField = new string[] { "li_code" };
            //ctcode 为 ALL 时不限线别,放大镜列出全部已审核线别;否则只列出登录人长线下的线别
            li_code.Condition = User.UserCtCode == "ALL" ? "li_statuscode='AUDITED'"
                : "li_statuscode='AUDITED' and instr('" + User.UserCtCode + "',li_longline)>0";
            li_code.DbChange += Li_code_DbChange;
            //初始提示
            OperateResult.AppendText(">>请选择线别,输入人员工号后回车执行" + (UpLoadMan.Checked ? "上线" : "下线") + ";下线也可勾选列表后点\"确认下线\"批量处理\n", Color.Black);
            em_code.Focus();
        }

        private void Query_LoadMan_SizeChanged(object sender, EventArgs e)
        {
            asc.controlAutoSize(this);
        }

        private void Li_code_DbChange(object sender, EventArgs e)
        {
            Dbfind = li_code.ReturnData;
            BaseUtil.SetFormValue(this.Controls, Dbfind);
            //切换线别后刷新当前线别的在线人员
            LoadGridData();
            em_code.Focus();
        }

        /// <summary>
        /// 人员工号输入框,回车后按选中的模式执行上线/下线
        /// 只接受工号,不解析姓名;上线时若工号存在于 SOPEMPLOYEEDETAIL 则顺带记录人员名称,不存在则只记工号,不做存在性卡控
        /// </summary>
        private void em_code_KeyDown(object sender, KeyEventArgs e)
        {
            if (e.KeyCode != Keys.Enter)
                return;
            //阻止回车继续冒泡到 SnCollectionBox / EnterTextBox 的回车逻辑
            //(SnCollectionBox 的 KeyDown 里有一句 this.SelectAll(),会受消息顺序影响;
            // 另配 Em_code_KeyPress 拦掉字符级回车,双保险,不让内置逻辑有机会执行)
            e.SuppressKeyPress = true;
            e.Handled = true;
            HandleEmCode();
        }

        /// <summary>
        /// 字符级拦截:SnCollectionBox/EnterTextBox 内部的回车处理挂在 KeyDown 上,不监听 KeyPress,
        /// 而扫描枪以 Tab 结尾或手工回车都会先产生字符级 \r。
        /// 这里直接把 \r 吞掉并调用统一处理,SnCollectionBox 的回车逻辑(含 SelectAll)就完全不会触发,
        /// 从而不必改动该公共控件。
        /// </summary>
        private void Em_code_KeyPress(object sender, KeyPressEventArgs e)
        {
            if (e.KeyChar == '\r' || e.KeyChar == '\n')
            {
                e.Handled = true;
                HandleEmCode();
            }
        }

        /// <summary>
        /// 上线/下线的统一处理入口(由回车、字符级 \r 两处触发,故用 _emBusy 防止同一次回车重复执行)
        /// </summary>
        private bool _emBusy = false;

        private void HandleEmCode()
        {
            if (_emBusy)
                return;
            _emBusy = true;
            try
            {
                DoEmCode();
            }
            finally
            {
                _emBusy = false;
            }
        }

        private void DoEmCode()
        {
            string linecode = li_code.Text.Trim();
            //只取工号:扫描枪或手工输入均只记工号,不做姓名解析
            string emcode = em_code.Text.Trim();
            if (emcode == "")
            {
                OperateResult.AppendText("<<人员工号不能为空\n", Color.Red, em_code);
                return;
            }
            //线别卡控(上/下线均适用):必须先选线别,且线别必须在登录人长线范围内
            if (linecode == "")
            {
                OperateResult.AppendText("<<请先选择线别\n", Color.Red, li_code);
                return;
            }
            //登录人资料未维护长线(em_ctcode为空)则不允许扫码
            if (User.UserCtCode == "")
            {
                OperateResult.AppendText("<<人员资料未维护线别,仅拉长可以扫码\n", Color.Red, em_code);
                return;
            }
            //所选线别必须属于登录人长线(line.li_longline)下的线别,否则上/下线都不允许
            //ctcode 为 ALL 时不限线别,任何线别都可操作
            if (User.UserCtCode != "ALL" && dh.getFieldDataByCondition("line", "count(1)",
                "instr('" + User.UserCtCode + "',li_longline)>0 and li_code='" + linecode + "' and li_statuscode='AUDITED'").ToString() == "0")
            {
                OperateResult.AppendText("<<线别" + linecode + "不在" + User.UserCtCode + "范围内,不允许扫码\n", Color.Red, li_code);
                return;
            }
            if (UpLoadMan.Checked)
            {
                //一个人只能同时一条线上线:若已在别的线体上线,先把原线体自动下线,再在新线体上线
                DataTable dtOn = (DataTable)dh.ExecuteSql("select lm_linecode from loadman where lm_emcode='" + emcode + "' and lm_downtime is null", "select");
                if (dtOn.Rows.Count > 0)
                {
                    string oldLineCode = dtOn.Rows[0]["lm_linecode"].ToString();
                    //当前所在线体与新线体相同,提示已上线,不再重复插入
                    if (oldLineCode == linecode)
                    {
                        OperateResult.AppendText("<<" + emcode + "已在" + linecode + "上线,不允许重复上线\n", Color.Red, em_code);
                        em_code.Clear();
                        em_code.Focus();
                        return;
                    }
                    //自动下线原线体
                    dh.ExecuteSql("update loadman set lm_downtime=sysdate where lm_emcode='" + emcode + "' and lm_downtime is null", "update");
                    OperateResult.AppendText(">>" + emcode + "已从" + oldLineCode + "自动下线\n", Color.Black);
                }
                //人员名称:存在于 SOPEMPLOYEEDETAIL 则带上,不存在只记工号,不做存在性卡控
                string emname = dh.getFieldDataByCondition("SOPEMPLOYEEDETAIL", "max(sed_emname)", "sed_emcode='" + emcode + "'").ToString().Trim();
                if (emname == "")
                {
                    dh.ExecuteSql("insert into loadman(lm_id,lm_linecode,lm_emcode,lm_uptime,lm_inman)" +
                        "values(loadman_seq.nextval,'" + linecode + "','" + emcode + "',sysdate,'" + User.UserName + "')", "insert");
                }
                else
                {
                    dh.ExecuteSql("insert into loadman(lm_id,lm_linecode,lm_emcode,lm_emname,lm_uptime,lm_inman)" +
                        "values(loadman_seq.nextval,'" + linecode + "','" + emcode + "','" + emname + "',sysdate,'" + User.UserName + "')", "insert");
                }
                OperateResult.AppendText("<<" + emcode + (emname == "" ? "" : " " + emname) + " 在" + linecode + "上线成功\n", Color.Green, em_code);
            }
            else
            {
                //下线:一个人同一时间只有一条在线记录,直接按人员下线
                DataTable dtOn = (DataTable)dh.ExecuteSql("select lm_linecode from loadman where lm_emcode='" + emcode + "' and lm_downtime is null", "select");
                if (dtOn.Rows.Count == 0)
                {
                    OperateResult.AppendText("<<" + emcode + "当前不在任何线上,无法下线\n", Color.Red, em_code);
                    em_code.Clear();
                    em_code.Focus();
                    return;
                }
                //人员当前在线线体也必须在登录人长线范围内,否则不允许下线;ctcode 为 ALL 时不限
                string onLineCode = dtOn.Rows[0]["lm_linecode"].ToString();
                if (User.UserCtCode != "ALL" && dh.getFieldDataByCondition("line", "count(1)",
                    "instr('" + User.UserCtCode + "',li_longline)>0 and li_code='" + onLineCode + "' and li_statuscode='AUDITED'").ToString() == "0")
                {
                    OperateResult.AppendText("<<" + emcode + "当前在" + onLineCode + "上线,该线别不在" + User.UserCtCode + "范围内,不允许下线\n", Color.Red, em_code);
                    em_code.Clear();
                    em_code.Focus();
                    return;
                }
                dh.ExecuteSql("update loadman set lm_downtime=sysdate where lm_emcode='" + emcode + "' and lm_downtime is null", "update");
                OperateResult.AppendText("<<" + emcode + " 已从"
                    + onLineCode + "下线\n", Color.Green, em_code);
            }
            //数据变更后刷新
            LoadGridData();
            em_code.Clear();
            em_code.Focus();
        }

        /// <summary>
        /// 全选/取消全选(切换式):点击时若已全部勾选则全部取消,否则全部勾选
        /// 只操作复选框单元格的值,不触发数据刷新
        /// </summary>
        private void SelectAll_Click(object sender, EventArgs e)
        {
            if (DGV.Rows.Count == 0)
            {
                OperateResult.AppendText("<<当前没有可勾选的人员\n", Color.Red, em_code);
                return;
            }
            //判断当前是否已全部勾选,以此决定本次是全勾还是全不勾
            bool allChecked = true;
            for (int i = 0; i < DGV.Rows.Count; i++)
            {
                if (DGV.Rows[i].Cells["choose"].FormattedValue == null || DGV.Rows[i].Cells["choose"].FormattedValue.ToString() != "True")
                {
                    allChecked = false;
                    break;
                }
            }
            bool setValue = !allChecked;
            for (int i = 0; i < DGV.Rows.Count; i++)
            {
                DGV.Rows[i].Cells["choose"].Value = setValue;
            }
            //刷新一下显示,让复选框立即反映最新状态
            DGV.RefreshEdit();
            SelectAll.Text = setValue ? "取消全选" : "全选";
            OperateResult.AppendText(setValue ? ">>已全选当前列表人员\n" : ">>已取消全选\n", Color.Black);
        }

        /// <summary>
        /// 判断DGV中是否有勾选的行
        /// </summary>
        private bool IfCheckRow()
        {
            for (int i = 0; i < DGV.Rows.Count; i++)
            {
                if (DGV.Rows[i].Cells["choose"].Value != null && DGV.Rows[i].Cells["choose"].FormattedValue.ToString() == "True")
                {
                    return true;
                }
            }
            return false;
        }

        /// <summary>
        /// 批量下线:把DGV中勾选的行按 lm_id 逐条置 lm_downtime=sysdate
        /// (DGV只加载未下线记录,勾选行必然在线,直接按主键更新即可)
        /// </summary>
        private void ConfirmDown_Click(object sender, EventArgs e)
        {
            if (!IfCheckRow())
            {
                OperateResult.AppendText("<<请先勾选需要下线的人员\n", Color.Red, em_code);
                return;
            }
            DataGridViewRow row;
            string lmId;
            string emcode;
            string linecode;
            int sucCount = 0;
            int failCount = 0;
            for (int i = 0; i < DGV.Rows.Count; i++)
            {
                row = DGV.Rows[i];
                //只处理勾选且有主键的行
                if (row.Cells["choose"].FormattedValue == null || row.Cells["choose"].FormattedValue.ToString() != "True")
                    continue;
                if (row.Cells["lm_id"].Value == null || row.Cells["lm_id"].Value.ToString() == "")
                    continue;
                lmId = row.Cells["lm_id"].Value.ToString();
                emcode = row.Cells["lm_emcode"].Value == null ? "" : row.Cells["lm_emcode"].Value.ToString();
                linecode = row.Cells["lm_linecode"].Value == null ? "" : row.Cells["lm_linecode"].Value.ToString();
                try
                {
                    dh.ExecuteSql("update loadman set lm_downtime=sysdate where lm_id='" + lmId + "' and lm_downtime is null", "update");
                    sucCount++;
                    OperateResult.AppendText("<<" + emcode + " 已从" + linecode + "下线\n", Color.Green);
                }
                catch (Exception ex)
                {
                    failCount++;
                    OperateResult.AppendText("<<" + emcode + " 下线失败:" + ex.Message + "\n", Color.Red);
                }
            }
            OperateResult.AppendText(">>本次下线成功 " + sucCount + " 人" + (failCount > 0 ? ",失败 " + failCount + " 人" : "") + "\n", Color.Black);
            //刷新后勾选状态会因重新绑定被清空,属预期
            LoadGridData();
            em_code.Focus();
        }

        private void UpLoadMan_CheckedChanged(object sender, EventArgs e)
        {
            if (UpLoadMan.Checked)
            {
                OperateResult.AppendText(">>已切换到上线模式,输入人员工号回车上线\n", Color.Black);
                em_code.Focus();
            }
        }

        private void DownLoadMan_CheckedChanged(object sender, EventArgs e)
        {
            if (DownLoadMan.Checked)
            {
                OperateResult.AppendText(">>已切换到下线模式,输入人员工号回车下线,或勾选列表后点\"确认下线\"批量下线\n", Color.Black);
                em_code.Focus();
            }
        }

        /// <summary>
        /// 刷新DGV:只取未下线的人员,已选线别时只显示当前线别
        /// 人员名称取 loadman.lm_emname(上线时查 SOPEMPLOYEEDETAIL 带出,查不到的记录为空)
        /// (上线时间 to_char 到秒)
        /// </summary>
        private void LoadGridData()
        {
            string sql = "select lm.lm_id,lm.lm_linecode,lm.lm_emcode,lm.lm_emname,"
                + "to_char(lm.lm_uptime,'yyyy-mm-dd hh24:mi:ss') lm_uptime,lm.lm_inman from loadman lm"
                + " where lm.lm_downtime is null";
            if (li_code.Text != "")
                sql += " and lm.lm_linecode='" + li_code.Text + "'";
            sql += " order by lm.lm_uptime desc";
            DataTable dt = (DataTable)dh.ExecuteSql(sql, "select");
            BaseUtil.FillDgvWithDataTable(DGV, dt);
            //序号列:绑定数据源后按当前行序手工赋号
            for (int i = 0; i < DGV.Rows.Count; i++)
            {
                DGV.Rows[i].Cells["serial"].Value = i + 1;
            }
            //重新绑定后复选框一律清空,全选按钮文案复位
            SelectAll.Text = "全选";
            //当前DGV行数总计
            rowcount_label.Text = "当前在线人数: " + DGV.Rows.Count;
        }
    }
}