using System; using System.Collections.Generic; using System.Data; using System.Threading.Tasks; using System.Windows.Forms; using Newtonsoft.Json; using Newtonsoft.Json.Linq; namespace MesMessage { public partial class MesMessageList : Form { private DBHelper oCN = new DBHelper(); // 钉钉配置(可根据需要改为从配置文件读取) private string appKey = "dingkdddbhdcssk7jduw"; // 斯莫尔 private string appSecret = "iv07c-GLfJPnzfJaNAAOfJDl3Z-eODvDAhlInMZCZhGorkle5Evbaxx3ImylvdjQ"; //private string appKey = "dingrsrzhdyn3mlaof95"; // 本地 //private string appSecret = "RAqH6YtZnPLCpDbuqfaYQkKkVtVdS0wqfC8I26X6qiS-8eoCJCNrzx3fubGND4Sq"; //private string appKey = "ding8hkfpspnpoteenk3"; // 九菱 //private string appSecret = "-AwplMi-44dA39rNXUiBvDAQl_oAhhrBRQmMtDvSkN44biLh8C1Gb2MCtyzxJ6uF"; // 防止同一定时器重入的标志(分别控制两个任务) private bool isFeedbackExecuting = false; private bool isParamAlertExecuting = false; public MesMessageList() { InitializeComponent(); // 绑定定时器事件并启动(Interval 请在设计器中设置:timer1=60000,timer2=300000) timer1.Tick += Timer1_Tick; timer2.Tick += Timer2_Tick; timer1.Start(); timer2.Start(); } /// /// 异常反馈单处理任务 /// private async Task ExecuteFeedbackTaskAsync() { try { // 获取系统参数(决定使用APP还是钉钉) string rule = GetSystemRule(); if (string.IsNullOrEmpty(rule)) { DBHelper.CustomWriteLog("未获取到系统参数 OA_AndengFlowRule_XT", DateTime.Now.ToString("yyyy-MM-dd")); return; } //查询异常反馈单要发送信息的人 string sql = @"select distinct a.HInterID, b.HBillType, a.HReceiveMan 接收人, c.HDingDingUserID 钉钉id, b.HDescription 内容 from OA_ErrMsgBackBillSub2 a inner join OA_ErrMsgBackBillMain b on a.HInterID = b.HInterID left join Gy_Czygl c on a.HReceiveMan = c.Czymc where HSendFlag = '0' order by a.HInterID"; DataSet dsFeedback = oCN.RunProcReturn(sql, "OA_ErrMsgBackBillSub2"); if (dsFeedback == null || dsFeedback.Tables.Count == 0 || dsFeedback.Tables[0].Rows.Count == 0) return; // 添加系统参数判断是钉钉/APP if (rule == "APP") { for (int i = 0; i < dsFeedback.Tables[0].Rows.Count; i++) { string HName = dsFeedback.Tables[0].Rows[i]["接收人"].ToString(); // 原控制台程序中此处使用 dt.Tables[0].Rows[0]["HInterID"],可能存在逻辑问题,但按原样保留 string HInterID = dsFeedback.Tables[0].Rows[0]["HInterID"].ToString(); DBHelper.CustomWriteLog($"exec h_p_CreateOAWorkLinkBill_Andon {HInterID},'{HName}'", DateTime.Now.ToString("yyyy-MM-dd")); var ds = oCN.RunProcReturn($"exec h_p_CreateOAWorkLinkBill_Andon {HInterID},'{HName}'", "h_p_CreateOAWorkLinkBill_Andon"); if (ds != null && ds.Tables[0].Rows.Count > 0) { // 第一步:先获取字符串并判断是否为"0",是则直接跳过 int newHInterID = int.Parse(ds.Tables[0].Rows[0]["HInterID"].ToString()); if (newHInterID != 0) { DBHelper.CustomWriteLog($"执行消息推送...{newHInterID}", DateTime.Now.ToString("yyyy-MM-dd")); GeTuiService.PubishSingle(newHInterID); // 同步方法,若耗时较长可考虑异步优化 } } } } else if (rule == "钉钉") { MSG msg = new MSG(); // 获取企业的access_token的值 string tokenResponse = msg.GetAccessToken(appKey, appSecret); JObject tokenJson = JObject.Parse(tokenResponse); // 获取access_token的值 string accessToken = tokenJson["accessToken"].ToString(); // 调用方法发送消息 // string agentId = "3118119317";//钉钉后台建立的小程序id // 斯莫尔 string agentId = "3151454458";//钉钉后台建立的小程序id // 九菱 //string agentId = "3910708781";//钉钉后台建立的小程序id for (int i = 0; i < dsFeedback.Tables[0].Rows.Count; i++) { string HContext = dsFeedback.Tables[0].Rows[i]["内容"].ToString(); string HName = dsFeedback.Tables[0].Rows[i]["钉钉id"].ToString(); string Stares = dsFeedback.Tables[0].Rows[i]["接收人"].ToString(); // 调用方法发送消息 string response = await msg.SendTextMessage(accessToken, agentId, HName, "0", "false", HContext); ResponseData responseData = JsonConvert.DeserializeObject(response); if (responseData.errcode == 0) { // 更新状态 string sql1 = $"update OA_ErrMsgBackBillSub2 set HSendFlag='1' where HReceiveMan in ('{Stares}')"; oCN.RunProc(sql1); DBHelper.CustomWriteLog($"钉钉返回信息:{response} 更新子表语句:{sql1}", DateTime.Now.ToString("yyyy-MM-dd")); } else { DBHelper.CustomWriteLog($"钉钉返回错误码:{responseData.errcode}", DateTime.Now.ToString("yyyy-MM-dd")); DBHelper.CustomWriteLog($"钉钉返回信息:{response}", DateTime.Now.ToString("yyyy-MM-dd")); } } } } catch (Exception ex) { DBHelper.CustomWriteLog($"ExecuteFeedbackTaskAsync 异常:{ex}", DateTime.Now.ToString("yyyy-MM-dd")); } } /// /// 异常工艺参数预警处理任务 /// private async Task ExecuteParamAlertTaskAsync() { try { // 获取系统参数 string rule = GetSystemRule(); if (string.IsNullOrEmpty(rule)) { DBHelper.CustomWriteLog("未获取到系统参数 OA_AndengFlowRule_XT", DateTime.Now.ToString("yyyy-MM-dd")); return; } #region 异常工艺参数预警(每 1 分钟执行一次,但定时器为1分钟,所以内部判断时间差) DBHelper.CustomWriteLog("开始进入执行循环 :", DateTime.Now.ToString("yyyy-MM-dd")); #endregion #region 异常工艺参数预警处理(每分钟执行) // 查询出要更新的异常参数(最近1分钟内的未发送数据) string Sql = "select HItemID from Sb_EquipMentCollectionTechParam_ERR where HCreateTime>=DATEADD(minute, - 1, GETDATE()) AND HSendFlag = 0"; DBHelper.CustomWriteLog("查询出异常的参数:" + Sql, DateTime.Now.ToString("yyyy-MM-dd")); DataSet dsErr = oCN.RunProcReturn(Sql, "Sb_EquipMentCollectionTechParam_ERR"); if (dsErr != null && dsErr.Tables[0].Rows.Count > 0) { List itemIds = new List(); foreach (DataRow row in dsErr.Tables[0].Rows) { itemIds.Add(row["HItemID"].ToString()); } DBHelper.CustomWriteLog("返回的异常参数集合:" + string.Join(", ", itemIds), DateTime.Now.ToString("yyyy-MM-dd")); DBHelper.CustomWriteLog("要进入更新的语句", DateTime.Now.ToString("yyyy-MM-dd")); // 更新这些记录的发送标志 for (int i = 0; i < dsErr.Tables[0].Rows.Count; i++) { string ycSql = "update Sb_EquipMentCollectionTechParam_ERR set HSendFlag = 1 where HItemID = " + dsErr.Tables[0].Rows[i]["HItemID"].ToString(); DBHelper.CustomWriteLog("钉钉异常预警更新语句:" + ycSql, DateTime.Now.ToString("yyyy-MM-dd")); oCN.RunProc(ycSql); } // 添加系统参数判断是钉钉/APP if (rule == "钉钉") { // 查询出要发信息的异常参数 string newSql = @"SELECT 工序名称, STUFF(( SELECT DISTINCT '; ' + 设备编码 + ' - ' + 工艺参数名称 + ' - 数采值: ' + CAST(数采值 AS VARCHAR(10)) + ' - 上限值: ' + CAST(上限值 AS VARCHAR(10)) + ' - 下限值: ' + CAST(下限值 AS VARCHAR(10)) FROM h_v_Sb_EquipMentCollectionTechParam_ERRList AS InnerTable WHERE InnerTable.工序名称 = OuterTable.工序名称 AND 发现异常时间 >= DATEADD(minute, -1, GETDATE()) FOR XML PATH('')), 1, 2, '') AS 内容 FROM h_v_Sb_EquipMentCollectionTechParam_ERRList AS OuterTable GROUP BY 工序名称"; DBHelper.CustomWriteLog("查询出要发信息的异常参数" + newSql, DateTime.Now.ToString("yyyy-MM-dd")); DataSet dsContent = oCN.RunProcReturn(newSql, "h_v_Sb_EquipMentCollectionTechParam_ERRList"); for (int j = 0; j < dsContent.Tables[0].Rows.Count; j++) { DBHelper.CustomWriteLog("异常内容数量 " + dsContent.Tables[0].Rows.Count, DateTime.Now.ToString("yyyy-MM-dd")); string HContext = dsContent.Tables[0].Rows[j]["内容"].ToString(); string HDeptName = dsContent.Tables[0].Rows[j]["工序名称"].ToString(); DBHelper.CustomWriteLog("异常内容值 " + HContext, DateTime.Now.ToString("yyyy-MM-dd")); DBHelper.CustomWriteLog("异常车间值 " + HDeptName, DateTime.Now.ToString("yyyy-MM-dd")); if (!string.IsNullOrEmpty(HContext) && HContext.ToLower() != "null") { DBHelper.CustomWriteLog("查询出要发信息的内容" + HContext, DateTime.Now.ToString("yyyy-MM-dd")); // 查询出要发送的人 string newSql1 = $@"select a.HDingDingUserID 钉钉id, a.Czymc 接收人 from Gy_Czygl a left join System_UserGroupInfo b on a.Czybm = b.UserId left join System_UserGroup c on b.GroupId = c.GroupID where c.GroupName = '{HDeptName}工艺异常预警接收人'"; DBHelper.CustomWriteLog("查询出要发送的人:" + newSql1, DateTime.Now.ToString("yyyy-MM-dd")); DataSet dsUsers = oCN.RunProcReturn(newSql1, "Gy_Czygl"); DBHelper.CustomWriteLog("开始进入发信息", DateTime.Now.ToString("yyyy-MM-dd")); if (dsUsers.Tables[0].Rows.Count > 0) { DBHelper.CustomWriteLog("进入发信息", DateTime.Now.ToString("yyyy-MM-dd")); MSG msg = new MSG(); // 获取企业的access_token的值 string tokenResponse = msg.GetAccessToken(appKey, appSecret); JObject tokenJson = JObject.Parse(tokenResponse); string accessToken = tokenJson["accessToken"].ToString(); string agentId = "3151454458"; // 斯莫尔 for (int i = 0; i < dsUsers.Tables[0].Rows.Count; i++) { string HName = dsUsers.Tables[0].Rows[i]["钉钉id"].ToString(); string Stares = dsUsers.Tables[0].Rows[i]["接收人"].ToString(); // 调用方法发送消息 string response = await msg.SendTextMessage(accessToken, agentId, HName, "0", "false", HContext); ResponseData responseData = JsonConvert.DeserializeObject(response); if (responseData.errcode == 0) { DBHelper.CustomWriteLog("钉钉异常预警发送成功", DateTime.Now.ToString("yyyy-MM-dd")); } else { DBHelper.CustomWriteLog($"钉钉返回错误码:{responseData.errcode}", DateTime.Now.ToString("yyyy-MM-dd")); DBHelper.CustomWriteLog($"钉钉返回信息:{response}", DateTime.Now.ToString("yyyy-MM-dd")); } } } } } } else if (rule == "APP") { // 查询出要发信息的异常参数 string newSql = @"SELECT 工序名称, STUFF(( SELECT DISTINCT '; ' + 设备编码 + ' - ' + 工艺参数名称 + ' - 数采值: ' + CAST(数采值 AS VARCHAR(10)) + ' - 上限值: ' + CAST(上限值 AS VARCHAR(10)) + ' - 下限值: ' + CAST(下限值 AS VARCHAR(10)) FROM h_v_Sb_EquipMentCollectionTechParam_ERRList AS InnerTable WHERE InnerTable.工序名称 = OuterTable.工序名称 AND 发现异常时间 >= DATEADD(minute, -1, GETDATE()) FOR XML PATH('')), 1, 2, '') AS 内容 FROM h_v_Sb_EquipMentCollectionTechParam_ERRList AS OuterTable GROUP BY 工序名称"; DataSet dsContent = oCN.RunProcReturn(newSql, "h_v_Sb_EquipMentCollectionTechParam_ERRList"); for (int j = 0; j < dsContent.Tables[0].Rows.Count; j++) { DBHelper.CustomWriteLog("异常内容数量 " + dsContent.Tables[0].Rows.Count, DateTime.Now.ToString("yyyy-MM-dd")); string HContext = dsContent.Tables[0].Rows[j]["内容"].ToString(); string HDeptName = dsContent.Tables[0].Rows[j]["工序名称"].ToString(); if (!string.IsNullOrEmpty(HContext) && HContext.ToLower() != "null") { // 查询出要发送的人 string newSql1 = $@"select a.HDingDingUserID 钉钉id, a.Czymc 接收人 from Gy_Czygl a left join System_UserGroupInfo b on a.Czybm = b.UserId left join System_UserGroup c on b.GroupId = c.GroupID where c.GroupName = '{HDeptName}工艺异常预警接收人'"; DataSet dsUsers = oCN.RunProcReturn(newSql1, "Gy_Czygl"); if (dsUsers.Tables[0].Rows.Count > 0) { for (int i = 0; i < dsUsers.Tables[0].Rows.Count; i++) { string HName = dsUsers.Tables[0].Rows[i]["钉钉id"].ToString(); var ds = oCN.RunProcReturn($"exec h_p_OA_WorkLinkBill_TechParam_ERR_Create '{HContext}','{HName}'", "h_p_OA_WorkLinkBill_TechParam_ERR_Create"); if (ds != null && ds.Tables[0].Rows.Count > 0) { // 第一步:先获取字符串并判断是否为"0",是则直接跳过 int newHInterID = int.Parse(ds.Tables[0].Rows[0]["HInterID"].ToString()); if (newHInterID != 0) { DBHelper.CustomWriteLog($"执行消息推送...{newHInterID}", DateTime.Now.ToString("yyyy-MM-dd")); GeTuiService.PubishSingle(newHInterID); // 同步方法,若耗时较长可考虑异步优化 } } } } } } } } #endregion } catch (Exception ex) { DBHelper.CustomWriteLog($"ExecuteParamAlertTaskAsync 异常:{ex}", DateTime.Now.ToString("yyyy-MM-dd")); } } /// /// 获取系统参数 OA_AndengFlowRule_XT 的值 /// private string GetSystemRule() { string sql = "select HValue from xt_SystemParameter where HKey='OA_AndengFlowRule_XT'"; DataSet ds = oCN.RunProcReturn(sql, "xt_SystemParameter"); if (ds != null && ds.Tables.Count > 0 && ds.Tables[0].Rows.Count > 0) return ds.Tables[0].Rows[0]["HValue"].ToString(); return null; } // 定时器1 Tick 事件(异常反馈单) private async void Timer1_Tick(object sender, EventArgs e) { if (isFeedbackExecuting) return; isFeedbackExecuting = true; try { await ExecuteFeedbackTaskAsync(); } finally { isFeedbackExecuting = false; } } // 定时器2 Tick 事件(异常工艺参数预警) private async void Timer2_Tick(object sender, EventArgs e) { if (isParamAlertExecuting) return; isParamAlertExecuting = true; try { await ExecuteParamAlertTaskAsync(); } finally { isParamAlertExecuting = false; } } } // 原 Program.cs 中的 ResponseData 类 public class ResponseData { public int errcode { get; set; } public string errmsg { get; set; } public long task_id { get; set; } public string request_id { get; set; } } }