using System;
using System.Collections.Generic;
using System.Linq;
using System.Threading;
using System.Web;
using System.Web.Optimization;
using System.Web.Routing;
using System.Web.Security;
using System.Web.SessionState;
using BLL;
using DAL;
using DingTalk.Api.Response;
using Model;
using Newtonsoft.Json.Linq;
using DingTalk.Api;
using DingTalk.Api.Request;
//using MyWeb.Common;
using static DingTalk.Api.Response.OapiDepartmentListResponse;
using System.Text;
using System.Data;
using System.Data.SqlClient;
using static DingTalk.Api.Response.OapiAttendanceListscheduleResponse;
using Newtonsoft.Json;
using static DingTalk.Api.Response.OapiProcessinstanceGetResponse;
using System.Configuration;
using System.Net;
using System.IO;
namespace MyProject
{
public class Global : HttpApplication
{
void Application_Start(object sender, EventArgs e)
{
// 在應用程式啟動時運行的代碼，更新完，打開http://m.91zn.cn:81/AmebaScore/Test01.aspx激活一下應用程式池
Thread t1 = new Thread(new ThreadStart(time001));
t1.Start();
Thread t2 = new Thread(new ThreadStart(time002));
t2.Start();
Thread t3 = new Thread(new ThreadStart(time003));
t3.Start();
}
#region 定時器---獲取釘釘全部通訊錄人員
private void time001()
{
System.Timers.Timer MyTimerGetdingdingUser = new System.Timers.Timer();
//MyTimerGetdingdingUser.Elapsed += GetMyUser;
MyTimerGetdingdingUser.Interval = 1000 * 60 * 60;//每天觸發一次1000是一秒
//MyTimerGetdingdingUser.Interval = 1000 * 120;//每天觸發一次1000是一秒
MyTimerGetdingdingUser.Enabled = true;
MyTimerGetdingdingUser.AutoReset = true;
MyTimerGetdingdingUser.Start();
MyTimerGetdingdingUser.Elapsed += new System.Timers.ElapsedEventHandler(GetMyUser);
}
#endregion
#region 定時器---同步HIS上開檢驗單資料到LIS瑞美
private void time002()
{
System.Timers.Timer MyTimerTongBuHisLis = new System.Timers.Timer();
MyTimerTongBuHisLis.Elapsed += TongBuHisLis;
//MyTimerTongBuHisLis.Interval = 1000 * 60 * 60 * 24;//每天觸發一次1000是一秒
MyTimerTongBuHisLis.Interval = 1000 * 10;//每天觸發一次1000是一秒
MyTimerTongBuHisLis.Enabled = true;//false
MyTimerTongBuHisLis.AutoReset = true;
}
#endregion
#region 定時器---同步釘釘排班
private void time003()
{
System.Timers.Timer MyTimerTongBuPaiBan = new System.Timers.Timer();
MyTimerTongBuPaiBan.Elapsed += TongBuDDPaiBan;
MyTimerTongBuPaiBan.Interval = 1000 * 60 * 30;//每小時觸發一次1000是一秒
//MyTimerTongBuPaiBan.Interval = 1000 * 200;//每天觸發一次1000是一秒
MyTimerTongBuPaiBan.Enabled = true;//false
MyTimerTongBuPaiBan.AutoReset = true;
}
#endregion
#region 定時器---獲取釘釘全部通訊錄人員
void GetMyUser(object sender, System.Timers.ElapsedEventArgs e)
{
TimerTask.GetMyUser();
}
#endregion
#region 同步HIS上開檢驗單資料到LIS瑞美
void TongBuHisLis(object sender, System.Timers.ElapsedEventArgs e)
{
// AND DATEDIFF(dd,t1.sqsj,GETDATE()) = 0
StringBuilder sbhcsqh = new StringBuilder();
string sql = @"
SELECT t2.sqh,t2.brly,0 AS ifjz ,t2.brdh,t2.brxm,CASE brxb WHEN '男' THEN '1' ELSE '2' END AS patsex,brsr,ch,sqys,ksdh,zd,'' AS testname,t3.item,0 AS mode
FROM Lis_SQH t1
INNER JOIN SQLHIS.dbo.v_HIS_Lis_pat t2 ON t1.sqh=t2.sqh
INNER JOIN
(
SELECT sqh
,item = stuff((
SELECT xmdh + ',' + XMMC + ',' + convert(varchar(50),dj) + ',' + convert(varchar(50),sl) + '|'
FROM SQLHIS.dbo.v_HIS_Lis_pat_mx
WHERE sqh = a.sqh
FOR XML path('')
), 1, 0, '')
FROM SQLHIS.dbo.v_HIS_Lis_pat_mx a --需要同步的申請單的專案的明細的視圖@item ='501404,孕酮P,50,1|501396,雌二醇,50,1|'
GROUP BY sqh
) t3 ON t2.sqh=t3.sqh
WHERE t1.state=0
UNION ALL
SELECT t2.sqh,t2.brly,0 AS ifjz,t2.brdh,t2.brxm,CASE brxb WHEN '男' THEN '1' ELSE '2' END AS patsex,brsr,ch,sqys,ksdh,zd,'' AS testname,t3.item,0 AS mode
FROM Lis_SQH t1
INNER JOIN SQLHIS_mq.dbo.v_HIS_Lis_pat t2 ON t1.sqh=t2.sqh
INNER JOIN
(
SELECT sqh
,item = stuff((
SELECT xmdh + ',' + XMMC + ',' + convert(varchar(50),dj) + ',' + convert(varchar(50),sl) + '|'
FROM SQLHIS_mq.dbo.v_HIS_Lis_pat_mx
WHERE sqh = a.sqh
FOR XML path('')
), 1, 0, '')
FROM SQLHIS_mq.dbo.v_HIS_Lis_pat_mx a --需要同步的申請單的專案的明細的視圖@item ='501404,孕酮P,50,1|501396,雌二醇,50,1|'
GROUP BY sqh
) t3 ON t2.sqh=t3.sqh
WHERE t1.state=0
";
DataTable table = SqlHelperSQLHIS.ExecuteReader(sql, CommandType.Text);
if (table == null || table.Rows.Count == 0)
{
}
else
{
//v_HIS_Lis_patModel v_HIS_Lis_patModel = null;
int ire = 0;
for (int i = 0; i < table.Rows.Count; i++)
{
sbhcsqh.Append("'" + table.Rows[i]["sqh"] + "',");//把此次同步的申請單號存起來，作為回改state=1用
//v_HIS_Lis_patModel.DingdingUserid = table.Rows[i]["dingdingUserid"] == DBNull.Value ? "" : (string)table.Rows[i]["dingdingUserid"];
//v_HIS_Lis_patModel = new v_HIS_Lis_patModel();
SqlParameter[] parameters = new SqlParameter[]
{
new SqlParameter("@applyno", SqlDbType.VarChar, 500),
new SqlParameter("@pattype", SqlDbType.VarChar, 500),
new SqlParameter("@ifjz", SqlDbType.Int, 50),
new SqlParameter("@patno", SqlDbType.VarChar, 500),
new SqlParameter("@patname", SqlDbType.VarChar, 500),
new SqlParameter("@patsex", SqlDbType.VarChar, 500),
new SqlParameter("@patbrith", SqlDbType.DateTime, 500),
new SqlParameter("@bedno", SqlDbType.VarChar, 500),
new SqlParameter("@docna", SqlDbType.VarChar, 500),
new SqlParameter("@depno", SqlDbType.VarChar, 500),
new SqlParameter("@dianose", SqlDbType.VarChar, 500),
new SqlParameter("@testname", SqlDbType.VarChar, 500),
new SqlParameter("@item", SqlDbType.NText, 4000),
new SqlParameter("@mode", SqlDbType.Int, 20)
};
parameters[0].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["sqh"];
parameters[1].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["brly"];
parameters[2].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/Convert.ToInt32(table.Rows[i]["ifjz"]);
parameters[3].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["brdh"];
parameters[4].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["brxm"];
parameters[5].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["patsex"];
parameters[6].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/Convert.ToString(table.Rows[i]["brsr"]);
parameters[7].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/Convert.ToString(table.Rows[i]["ch"]);
parameters[8].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["sqys"];
parameters[9].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["ksdh"];
parameters[10].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["zd"];
parameters[11].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/Convert.ToString(table.Rows[i]["testname"]);
parameters[12].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/table.Rows[i]["item"];
parameters[13].Value = https://www.cnblogs.com/wybshyy/archive/2020/10/13/Convert.ToInt32(table.Rows[i]["mode"]);
ire = SqlHelperLis2002ywq.ExecuteNonQuery("sp_lisapp", CommandType.StoredProcedure, parameters);
}
if (ire > 0)
{
//回改sbhcsqh里的state=1
string strhgsql = "UPDATE lis_sqh SET state=1 WHERE sqh IN(" + sbhcsqh.ToString().Substring(0, sbhcsqh.ToString().Length - 1) + ")";
SqlHelperSQLHIS.ExecuteNonQuery(strhgsql, CommandType.Text);
}
}
}
#endregion
#region 同步釘釘排班
void TongBuDDPaiBan(object sender, System.Timers.ElapsedEventArgs e)
{
TimerTask.TongBuDDPaiBan();
}
#endregion
#region 臨時類
/// <summary>
/// 回傳給ajax請求的結果類
/// </summary>
private class ResultInfo
{
/// <summary>
/// 是否成功， true:成功 false:失敗
/// </summary>
public bool State { get; set; }
/// <summary>
/// 回傳的資料集
/// </summary>
public object Data { get; set; }
/// <summary>
/// 成功資訊
/// </summary>
public string Message { get; set; }
/// <summary>
/// 錯誤資訊
/// </summary>
public string ErrorMsg { get; set; }
/// <summary>
/// 當前第幾頁
/// </summary>
public int PageIndex { get; set; }
/// <summary>
/// 記錄總數
/// </summary>
public int RecordCount { get; set; }
}
private class userid02
{
/// <summary>
/// 員工工號
/// </summary>
public string Jobnumber { get; set; }
/// <summary>
/// 釘ID
/// </summary>
public string Userid { get; set; }
}
#endregion
protected void Application_End(object sender, EventArgs e)
{
SqlHelperSQLHIS.ExecuteNonQuery(" INSERT INTO a_test (cont) VALUES ('程式回收了') ", CommandType.Text);
//下面的代碼是關鍵，可解決IIS應用程式池自動回收的問題
Thread.Sleep(1000);
//這里設定你的web地址，可以隨便指向本專案你的任意一個aspx頁面甚至不存在的頁面，目的是要激發Application_Start
string url = "http://XXXXX/Test01.aspx";
HttpWebRequest myHttpWebRequest = (HttpWebRequest)WebRequest.Create(url);
HttpWebResponse myHttpWebResponse = (HttpWebResponse)myHttpWebRequest.GetResponse();
Stream receiveStream = myHttpWebResponse.GetResponseStream();//得到回寫的位元組流
SqlHelperSQLHIS.ExecuteNonQuery(" INSERT INTO a_test (cont) VALUES ('程式自動重新啟動了') ", CommandType.Text);
}
}
}
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/173448.html
標籤：.NET技术
上一篇：C#實體(經典):四路光電開關&激光雷達資料采集和波形圖繪制
下一篇：WPF MVVM 彈框之等待框