OutpatientRegistration.cs 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326
  1. using Newtonsoft.Json;
  2. using Newtonsoft.Json.Linq;
  3. using System;
  4. using System.Collections.Generic;
  5. using System.ComponentModel;
  6. using System.Data;
  7. using System.Drawing;
  8. using System.Linq;
  9. using System.Text;
  10. using System.Threading.Tasks;
  11. using System.Windows.Forms;
  12. using PTMedicalInsurance.Common;
  13. using PTMedicalInsurance.Helper;
  14. using PTMedicalInsurance.Variables;
  15. namespace PTMedicalInsurance.Forms
  16. {
  17. public partial class OutpatientRegistration : Form
  18. {
  19. public OutpatientRegistration()
  20. {
  21. InitializeComponent();
  22. this.StartPosition = FormStartPosition.CenterParent;
  23. /*
  24. string sqlCondition = " and Interface_ID = '" + Global.inf.InterfaceID + "'";
  25. string sqlStr = "select sNO AS Code,Name FROM CloudMedicalInsurancePlatform_Tables.Dictionary where Type = 'insutype'" + sqlCondition;
  26. //SetDBLKCombox(ref dblkcbxInsuranceType, sqlStr);
  27. string sqlStr2 = "select Code,Name FROM CloudMedicalInsurancePlatform_Tables.Dictionary where Type='insutype' and Interface_Dr = '7'and Hosp_Dr ='63'";
  28. SetDBLKCombox(ref dblkcbxInsuranceType, sqlStr2);
  29. sqlStr = "select Code,SectionName AS Name FROM CloudMedicalInsurancePlatform_Tables.Diagnose where Type='Diagnose'" + sqlCondition;
  30. SetDBLKCombox(ref dblkcbxDisease, sqlStr2);
  31. sqlStr = "select sNO AS Code,Name FROM CloudMedicalInsurancePlatform_Tables.Dictionary where Type = 'psn_setlway'" + sqlCondition;
  32. SetDBLKCombox(ref dblkcbxSettelmentWay, sqlStr);
  33. sqlStr = "select sNO AS Code,Name FROM CloudMedicalInsurancePlatform_Tables.Dictionary where Type = 'MED_TYPE'" + sqlCondition;
  34. SetDBLKCombox(ref dblkcbxMedicalType, sqlStr);
  35. sqlStr = "select Code,Name FROM CloudMedicalInsurancePlatform_Tables.Diagnose where Type='Operation'" + sqlCondition;
  36. SetDBLKCombox(ref dblkcbxOperation, sqlStr);
  37. */
  38. if (Global.pat.RYorCY == "2")
  39. {
  40. string sqlCondition = " and A.Interface_Dr = '" + Global.inf.interfaceDr.ToString() + "'";
  41. string sqlStr = " SELECT B.Code,B.Descripts AS Name FROM HB_Dictionary A JOIN HB_DictionaryDataDetail B ON A.ID = B.HBDictionary_Dr "
  42. + " WHERE B.Code='" + Global.pat.insuType + "' and A.InsuCode = 'insutype'" + sqlCondition;
  43. SetDBLKCombox(ref dblkcbxInsuranceType, sqlStr);
  44. sqlStr = "select A.Code, A.Name FROM HB_MedInsuDirectory A where A.Code='" + Global.pat.DiseasecCode + "' and A.UseFlag='1' And A.HisType=7" + sqlCondition;
  45. SetDBLKCombox(ref dblkcbxDisease, sqlStr);
  46. sqlStr = " SELECT B.Code,B.Descripts AS Name FROM HB_Dictionary A JOIN HB_DictionaryDataDetail B ON A.ID = B.HBDictionary_Dr"
  47. + " WHERE B.Code='" + Global.pat.medType + "' and A.InsuCode = 'med_type'" + sqlCondition;
  48. SetDBLKCombox(ref dblkcbxMedicalType, sqlStr);
  49. sqlStr = "SELECT B.Code,B.Descripts AS Name FROM HB_Dictionary A JOIN HB_DictionaryDataDetail B ON A.ID = B.HBDictionary_Dr WHERE A.InsuCode = 'psn_setlway'" + sqlCondition;
  50. SetDBLKCombox(ref dblkcbxSettelmentWay, sqlStr);
  51. }
  52. else
  53. {
  54. string sqlCondition = " and A.Interface_Dr = '" + Global.inf.interfaceDr.ToString() + "'";
  55. string sqlStr = "SELECT B.Code,B.Descripts AS Name FROM HB_Dictionary A JOIN HB_DictionaryDataDetail B ON A.ID = B.HBDictionary_Dr WHERE A.InsuCode = 'insutype'" + sqlCondition;
  56. SetDBLKCombox(ref dblkcbxInsuranceType, sqlStr);
  57. sqlStr = "select A.Code, A.Name FROM HB_MedInsuDirectory A where A.UseFlag='1' And A.HisType=7" + sqlCondition;
  58. SetDBLKCombox(ref dblkcbxDisease, sqlStr);
  59. sqlStr = "SELECT B.Code,B.Descripts AS Name FROM HB_Dictionary A JOIN HB_DictionaryDataDetail B ON A.ID = B.HBDictionary_Dr WHERE A.InsuCode = 'psn_setlway'" + sqlCondition;
  60. SetDBLKCombox(ref dblkcbxSettelmentWay, sqlStr);
  61. sqlStr = "SELECT B.Code,B.Descripts AS Name FROM HB_Dictionary A JOIN HB_DictionaryDataDetail B ON A.ID = B.HBDictionary_Dr WHERE A.InsuCode = 'med_type'" + sqlCondition;
  62. SetDBLKCombox(ref dblkcbxMedicalType, sqlStr);
  63. }
  64. //sqlStr = "select Code,Name FROM CloudMedicalInsurancePlatform_Tables.Directory where HisType=5" + sqlCondition;
  65. //SetDBLKCombox(ref dblkcbxOperation, sqlStr);
  66. //dgvDiagnose.DataSource = DtDiagnose;
  67. ////DtDiagnose.AcceptChanges();
  68. //dgvDiagnose.ReadOnly = true;
  69. //MessageBox.Show(DtDiagnose.Rows.Count.ToString());
  70. //MessageBox.Show(DtDiagnose.Rows[0]["diag_name"].ToString());
  71. //DataGridViewColumn column = new PTControl.DataGridViewDBLKBColumn();
  72. //(column as PTControl.DataGridViewDBLKBColumn).SDisplayField = "Code,Name,SearchCode";
  73. //(column as PTControl.DataGridViewDBLKBColumn).SDisplayMember = "Name";
  74. //(column as PTControl.DataGridViewDBLKBColumn).SKeyWords = "SearchCode";
  75. //column.DataGridView.Width = 400;
  76. //column.DataGridView.Columns[0].Name = "编码";
  77. //column.DataGridView.Columns[1].Name = "名称";
  78. //column.DataGridView.Columns[2].Name = "查找码";
  79. //column.DataGridView.Columns[0].Width = 100;
  80. //column.DataGridView.Columns[1].Width = 200;
  81. //sqlStr = "select sNO AS Code,Name FROM CloudMedicalInsurancePlatform_Tables.Dictionary where Type = 'psn_setlway'" + sqlCondition;
  82. //(column as PTControl.DataGridViewDBLKBColumn).DataSource = GetDBLKComboxTable(sqlStr);
  83. //dgvDiagnose.Columns.Add(column);
  84. //dgvDiagnose.Columns[10].Name = "测试";
  85. //dgvDiagnose.Columns[10].DisplayIndex = 0;
  86. //string diseaseTypeParam = string.Empty;
  87. //string diseaseTypeRtn = iris.Invoke(diseaseTypeParam);
  88. //dynamic diseaseTypeRtnRtnJson = JsonConvert.DeserializeObject(diseaseTypeRtn);
  89. //dtDiseaseType = (DataTable)diseaseTypeRtnRtnJson.ToObject(typeof(DataTable));
  90. //string insuranceTypeParam = string.Empty;
  91. //string insuranceTypeRtn = iris.Invoke(insuranceTypeParam);
  92. //dynamic insuranceTypeRtnRtnJson = JsonConvert.DeserializeObject(insuranceTypeRtn);
  93. //dtInsuranceType = (DataTable)insuranceTypeRtnRtnJson.ToObject(typeof(DataTable));
  94. cbxAccountPay.Checked = true;
  95. personAccountUsedFlag = "1";
  96. }
  97. public Boolean b2001 = false;
  98. private DataTable dtDisease;
  99. private DataTable dtDiseaseType;
  100. private DataTable dtInsuranceType;
  101. private DataTable dtMedicalType;
  102. private DataTable dtOperation;
  103. private DataTable dtSettelmentType;
  104. //险种
  105. public string insuType { get; set; }
  106. public string insuTypeName { get; set; }
  107. //医疗类别
  108. public string med_type { get; set; }
  109. public string med_type_name { get; set; }
  110. //诊断
  111. public string diseCodg { get; set; }
  112. public string diseName{ get; set; }
  113. //手术
  114. public string oprn_oprt_code { get; set; }
  115. public string oprn_oprt_name{ get; set; }
  116. //病种
  117. public string dise_type_code { get; set; }
  118. public string dise_type_name { get; set; }
  119. //结算方式
  120. public string psn_setlway { get; set; }
  121. public string psn_setlway_name { get; set; }
  122. public DataTable DtDiagnose { get; set; }
  123. public string personAccountUsedFlag = "0";
  124. private DataTable GetDBLKComboxTable(string sqlStr)
  125. {
  126. InvokeHelper invoker = new InvokeHelper();
  127. dynamic joInparm = new JObject();
  128. dynamic joTmp = new JObject();
  129. joTmp.sqlStr = sqlStr;
  130. JArray jaParams = new JArray();
  131. jaParams.Add(joTmp);
  132. joInparm.Add("params", JArray.FromObject(jaParams));
  133. joInparm.code = "09010014";
  134. string inParam = joInparm.ToString();
  135. JObject joRtn = invoker.invokeInsuService(inParam,"获取下拉框消息");
  136. //dynamic jsonRtn = JsonConvert.DeserializeObject(strRtn);
  137. DataTable dt = (DataTable)joRtn["result"].ToObject(typeof(DataTable));
  138. //dt.Columns[0].ColumnName = "编码";
  139. //dt.Columns[1].ColumnName = "名称";
  140. //dt.Columns[2].ColumnName = "拼音查找码";
  141. return dt;
  142. }
  143. private void SetDBLKCombox(ref PTControl.DBLookupCombox dblcbx, string sqlStr)
  144. {
  145. dblcbx.sDisplayField = "Code,Name,SearchCode";
  146. dblcbx.sDisplayMember = "名称";
  147. dblcbx.sKeyWords = "Code,SearchCode";
  148. dblcbx.DataSource = GetDBLKComboxTable(sqlStr);
  149. dblcbx.RowFilterVisible = true;
  150. dblcbx.TextBox.Width = 400;
  151. dblcbx.DataGridView.Width = 400;
  152. dblcbx.DataGridView.Columns[0].Name = "编码";
  153. dblcbx.DataGridView.Columns[1].Name = "名称";
  154. dblcbx.DataGridView.Columns[2].Name = "查找码";
  155. dblcbx.DataGridView.Columns[0].Width = 100;
  156. dblcbx.DataGridView.Columns[1].Width = 200;
  157. }
  158. private void OutpatientRegistration_Load(object sender, EventArgs e)
  159. {
  160. dgvDiagnose.AutoGenerateColumns = false;
  161. dgvDiagnose.DataSource = DtDiagnose;
  162. //DtDiagnose.AcceptChanges();
  163. dgvDiagnose.ReadOnly = true;
  164. }
  165. private void button1_Click(object sender, EventArgs e)
  166. {
  167. //DealFor2001("");
  168. this.DialogResult = DialogResult.OK;
  169. }
  170. private void dblkcbxInsuranceType_AfterSelector(object sender, PTControl.AfterSelectorEventArgs e)
  171. {
  172. DataGridViewRow row = e.Value as DataGridViewRow;
  173. DataRowView dataRow = row.DataBoundItem as DataRowView;
  174. insuType = dataRow["Code"].ToString().Trim();
  175. insuTypeName = dataRow["Name"].ToString().Trim();
  176. }
  177. private void dblkcbxMedicalType_AfterSelector(object sender, PTControl.AfterSelectorEventArgs e)
  178. {
  179. DataGridViewRow row = e.Value as DataGridViewRow;
  180. DataRowView dataRow = row.DataBoundItem as DataRowView;
  181. med_type = dataRow["Code"].ToString().Trim();
  182. med_type_name = dataRow["Name"].ToString().Trim();
  183. }
  184. private void dblkcbxDisease_AfterSelector(object sender, PTControl.AfterSelectorEventArgs e)
  185. {
  186. DataGridViewRow row = e.Value as DataGridViewRow;
  187. DataRowView dataRow = row.DataBoundItem as DataRowView;
  188. diseCodg = dataRow["Code"].ToString().Trim();
  189. diseName = dataRow["Name"].ToString().Trim();
  190. }
  191. private void dblkcbxOperation_AfterSelector(object sender, PTControl.AfterSelectorEventArgs e)
  192. {
  193. DataGridViewRow row = e.Value as DataGridViewRow;
  194. DataRowView dataRow = row.DataBoundItem as DataRowView;
  195. oprn_oprt_code = dataRow["Code"].ToString().Trim();
  196. oprn_oprt_name = dataRow["Name"].ToString().Trim();
  197. }
  198. private void dblkcbxSettelmentWay_AfterSelector(object sender, PTControl.AfterSelectorEventArgs e)
  199. {
  200. DataGridViewRow row = e.Value as DataGridViewRow;
  201. DataRowView dataRow = row.DataBoundItem as DataRowView;
  202. psn_setlway = dataRow["Code"].ToString().Trim();
  203. psn_setlway_name = dataRow["Name"].ToString().Trim();
  204. }
  205. private void dblkcbxDiseaseType_AfterSelector(object sender, PTControl.AfterSelectorEventArgs e)
  206. {
  207. DataGridViewRow row = e.Value as DataGridViewRow;
  208. DataRowView dataRow = row.DataBoundItem as DataRowView;
  209. dise_type_code = dataRow["Code"].ToString().Trim();
  210. dise_type_name = dataRow["Name"].ToString().Trim();
  211. }
  212. private void button2_Click(object sender, EventArgs e)
  213. {
  214. this.DialogResult = DialogResult.Cancel;
  215. }
  216. private void cbxAccountPay_ValueChanged(object sender, bool value)
  217. {
  218. if (cbxAccountPay.Checked)
  219. {
  220. personAccountUsedFlag = "1";
  221. }
  222. else
  223. {
  224. personAccountUsedFlag = "0";
  225. }
  226. }
  227. public int DealFor2001(string funNO, out string OutMsg)
  228. {
  229. //人员待遇享受检查
  230. string errMsg = "";
  231. JObject joData2001 = new JObject();
  232. joData2001.Add("psn_no", Global.pat.psn_no);
  233. joData2001.Add("insutype", insuType);
  234. joData2001.Add("fixmedins_code", Global.inf.hospitalNO);
  235. joData2001.Add("med_type", med_type);
  236. joData2001.Add("begntime", DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss"));
  237. joData2001.Add("endtime", "");
  238. joData2001.Add("dise_codg", diseCodg);
  239. joData2001.Add("dise_name", diseName);
  240. joData2001.Add("oprn_oprt_code", "");
  241. joData2001.Add("oprn_oprt_name", "");
  242. joData2001.Add("matn_type", "");
  243. joData2001.Add("birctrl_type", "");
  244. JObject joInput = new JObject();
  245. joInput.Add("data", joData2001);
  246. InvokeHelper invoker = new InvokeHelper();
  247. JObject joRtn2001 = invoker.invokeCenterService("2001", JsonHelper.setCenterInpar("2001", joInput));
  248. if (JsonHelper.parseCenterRtnValue(joRtn2001, out errMsg) != 0)
  249. {
  250. OutMsg = "人员待遇享受检查调用失败,中心返回错误信息:" + errMsg;
  251. return -1;
  252. }
  253. else
  254. {
  255. OutMsg = "人员待遇享受检查调用成功:" + joRtn2001.ToString();
  256. return 0;
  257. }
  258. }
  259. private void uiButton1_Click(object sender, EventArgs e)
  260. {
  261. string OutMsg = "";
  262. DealFor2001("", out OutMsg);
  263. MessageBox.Show(OutMsg);
  264. }
  265. private void dgvDiagnose_CellContentClick(object sender, DataGridViewCellEventArgs e)
  266. {
  267. }
  268. private void cbxAccountPay_CheckedChanged(object sender, EventArgs e)
  269. {
  270. }
  271. }
  272. }