SMABO02200_이식후추후관리.xfdl 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMABO02200" position="absolute 0 0 881 445" titletext="이식 후 추후관리" oninit="SMABO02200_oninit" onload="SMABO02200_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="이식 후 추후관리" class="tit_1" position="absolute 0 0 164 23"/>
  8. <Button id="btn_save" taborder="1" text="저장" class="btn4" position="absolute 818 16 874 38" anchor="top right" onclick="btn_save_onclick"/>
  9. <Button id="btn_excsave" taborder="2" text="엑셀저장" class="btn7" position="absolute 795 112 875 131" anchor="top right" onclick="btn_excsave_onclick"/>
  10. <Static id="caption1" text="이식후상태" class="tit_2" position="absolute 0 115 130 136"/>
  11. <Shape id="line1" class="line_10" position="absolute 0 131 875 137" anchor="left top right"/>
  12. <Div id="grp_sea" taborder="3" class="div_SA" position="absolute 0 39 875 100" anchor="left top right">
  13. <Layouts>
  14. <Layout>
  15. <Static id="caption3" text="사망일 :" class="search_name" position="absolute 15 34 88 51"/>
  16. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 794 10 800 51" anchor="top right"/>
  17. <Static id="caption33" text="사인 :" class="search_name" position="absolute 219 34 279 51"/>
  18. <Button id="btn_sea" taborder="1" text="조회" class="btn1" position="absolute 811 21 867 43" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
  19. <Static id="caption4" text="등록번호 :" class="search_name" position="absolute 15 9 101 26"/>
  20. <Edit id="output1" taborder="2" readonly="true" position="absolute 219 9 309 28" class="output"/>
  21. <Combo id="combo1" taborder="3" innerdataset="@ds_init_cmbinfo_sex_P0313" codecolumn="cdid" datacolumn="cdnm" class="combo_default" enable="false" position="absolute 312 9 372 28"/>
  22. <Edit id="output2" taborder="4" readonly="true" position="absolute 375 9 417 28" class="output"/>
  23. <Calendar id="ipt_dethdd" taborder="5" class="input_s_essential" enable="false" position="absolute 104 34 204 53" dateformat="yyyy-MM-dd" value="null"/>
  24. <Edit id="ipt_pid" taborder="6" class="input_search" position="absolute 104 9 204 28" autoselect="true"/>
  25. <Static id="caption2" text="CIBMTR 등록정보 :" class="search_name" position="absolute 432 9 580 26"/>
  26. <Edit id="output3" taborder="7" readonly="true" position="absolute 578 8 668 27" class="output"/>
  27. <Edit id="output4" taborder="8" readonly="true" position="absolute 671 8 691 27" class="output"/>
  28. <MaskEdit id="output5" taborder="9" readonly="true" position="absolute 694 8 774 27" mask="####-##-##" maskchar=" " displaynulltext=" " type="string" trimtype="both"/>
  29. <Combo id="cmb_dethresn" taborder="10" innerdataset="@ds_init_cmbinfo_dethresn_A0186" class="combo_search" enable="false" position="absolute 282 34 417 53" datacolumn="hsctmdlnm" codecolumn="hsctmdlcd"/>
  30. <Static id="caption5" text="사망여부" position="absolute 467 34 535 51"/>
  31. <CheckBox id="bool_dethyn" taborder="11" position="absolute 435 32 460 52" onclick="grp_sea_bool_dethyn_onclick" truevalue="Y" falsevalue="N"/>
  32. <Button id="btn_pid" taborder="12" onclick="btn_pid_onclick" position="absolute 187 11 202 26"/>
  33. </Layout>
  34. </Layouts>
  35. </Div>
  36. <Button id="btn_grddel" taborder="4" text="행삭제" class="btn2" position="absolute 739 112 792 131" anchor="top right" onclick="btn_grddel_onclick"/>
  37. <Button id="btn_grdadd" taborder="5" text="행추가" class="btn2" position="absolute 683 112 736 131" anchor="top right" onclick="btn_grdadd_onclick"/>
  38. <Grid id="grd_trnptaftstat" taborder="6" binddataset="ds_main_trnptaft_trnptaftstat" useinputpanel="false" position="absolute 0 136 875 436" autofittype="col" cellsizingtype="col" autoenter="select">
  39. <Formats>
  40. <Format id="default">
  41. <Columns>
  42. <Column size="25"/>
  43. <Column size="74"/>
  44. <Column size="81"/>
  45. <Column size="86"/>
  46. <Column size="60"/>
  47. <Column size="60"/>
  48. <Column size="127"/>
  49. <Column size="348"/>
  50. <Column size="0"/>
  51. <Column size="0"/>
  52. <Column size="0"/>
  53. </Columns>
  54. <Rows>
  55. <Row size="24" band="head"/>
  56. <Row size="24" band="head"/>
  57. <Row size="24"/>
  58. </Rows>
  59. <Band id="head">
  60. <Cell rowspan="2" taborder="undefined"/>
  61. <Cell col="1" rowspan="2" text="내 용" taborder="undefined"/>
  62. <Cell col="2" rowspan="2" text="날짜" taborder="undefined"/>
  63. <Cell col="3" rowspan="2" text="확인일자" taborder="undefined"/>
  64. <Cell col="4" colspan="3" text="환자상태" taborder="undefined"/>
  65. <Cell col="7" rowspan="2" text="Remark" taborder="undefined"/>
  66. <Cell col="8" text="caption1"/>
  67. <Cell col="9" text="caption4"/>
  68. <Cell col="10" text="caption2"/>
  69. <Cell row="1" col="4" text="aGVHD"/>
  70. <Cell row="1" col="5" text="cGVHD"/>
  71. <Cell row="1" col="6" text="Karnofsky or Lansky"/>
  72. <Cell row="1" col="8" text="caption1"/>
  73. <Cell row="1" col="9" text="caption4"/>
  74. <Cell row="1" col="10" text="caption2"/>
  75. </Band>
  76. <Band id="body">
  77. <Cell celltype="head"/>
  78. <Cell col="1" displaytype="text" edittype="text" style="align:center middle;" text="bind:cntsnm" editautoselect="true"/>
  79. <Cell col="2" displaytype="date" edittype="none" text="bind:statdd" calendardisplaynulltype="none" enable="false"/>
  80. <Cell col="3" displaytype="date" edittype="none" text="bind:cnfmdd" calendardisplaynulltype="nulltext" enable="false"/>
  81. <Cell col="4" displaytype="text" edittype="text" text="bind:patstat1" editautoselect="true"/>
  82. <Cell col="5" displaytype="text" edittype="text" text="bind:patstat2" editautoselect="true"/>
  83. <Cell col="6" displaytype="text" edittype="text" text="bind:pntflag" editautoselect="true"/>
  84. <Cell col="7" displaytype="text" edittype="textarea" style="align:left top;padding:4 2 1 2;" text="bind:trnptaftrem" wordwrap="word" editautoselect="true"/>
  85. <Cell col="8" text="bind:pid"/>
  86. <Cell col="9" text="bind:trnptdg"/>
  87. <Cell col="10" text="bind:seqno"/>
  88. </Band>
  89. </Format>
  90. </Formats>
  91. </Grid>
  92. <Combo id="cmb_trnptdg" taborder="7" innerdataset="@ds_temp_trnptdg_item" codecolumn="cd" datacolumn="nm" class="combo_default" position="absolute 97 112 184 131" onitemchanged="cmb_trnptdg_onitemchanged"/>
  93. </Layout>
  94. </Layouts>
  95. <Objects>
  96. <Dataset id="ds_main_hsctinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  97. <ColumnInfo>
  98. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  99. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  100. <Column id="sex" type="STRING" size="256" sumtext="성별"/>
  101. <Column id="age" type="STRING" size="256" sumtext="나이"/>
  102. <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호상위"/>
  103. <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호하위"/>
  104. <Column id="srchreqdg" type="STRING" size="256" sumtext="검색차수"/>
  105. <Column id="cibmtrid" type="STRING" size="256" sumtext="cibmtrid"/>
  106. <Column id="resrchyn" type="STRING" size="256" sumtext="research여부"/>
  107. <Column id="lostfudd" type="STRING" size="256" sumtext="lost F/U 일자"/>
  108. <Column id="dethdd" type="STRING" size="256" sumtext="사망일"/>
  109. <Column id="dethresn" type="STRING" size="256" sumtext="사인"/>
  110. <Column id="dethyn" type="STRING" size="256" sumtext="사망여부"/>
  111. <Column id="dethrgstyn" type="STRING" size="256" sumtext="사망정보기등록여부"/>
  112. </ColumnInfo>
  113. <Rows>
  114. <Row>
  115. <Col id="pid"/>
  116. <Col id="hngnm"/>
  117. <Col id="sex"/>
  118. <Col id="age"/>
  119. <Col id="dethdd"/>
  120. <Col id="dethresn"/>
  121. <Col id="dethyn"/>
  122. <Col id="dethrgstyn"/>
  123. <Col id="cibmtrid"/>
  124. <Col id="resrchyn"/>
  125. <Col id="lostfudd"/>
  126. </Row>
  127. </Rows>
  128. </Dataset>
  129. <Dataset id="ds_init_cmbinfo_sex_P0313" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  130. <Dataset id="ds_init_cmbinfo_dethresn_A0186" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  131. <ColumnInfo>
  132. <Column id="hsctmdlnm" type="STRING" size="256"/>
  133. <Column id="hsctmdlcd" type="STRING" size="256"/>
  134. </ColumnInfo>
  135. </Dataset>
  136. <Dataset id="ds_temp_trnptdg_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  137. <ColumnInfo>
  138. <Column id="cd" type="STRING" size="256"/>
  139. <Column id="nm" type="STRING" size="256"/>
  140. </ColumnInfo>
  141. <Rows>
  142. <Row>
  143. <Col id="cd">1</Col>
  144. <Col id="nm">1차</Col>
  145. </Row>
  146. </Rows>
  147. </Dataset>
  148. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  149. <ColumnInfo>
  150. <Column id="trnptdg" type="STRING" size="256"/>
  151. </ColumnInfo>
  152. <Rows>
  153. <Row/>
  154. </Rows>
  155. </Dataset>
  156. <Dataset id="ds_main_trnptaft_trnptaftstat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  157. <Dataset id="ds_temp_bmtpatientinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  158. <ColumnInfo>
  159. <Column id="trnptdg" type="STRING" size="256"/>
  160. </ColumnInfo>
  161. <Rows>
  162. <Row/>
  163. </Rows>
  164. </Dataset>
  165. <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  166. <ColumnInfo>
  167. <Column id="pid" type="STRING" size="256"/>
  168. <Column id="trnptdg" type="STRING" size="256"/>
  169. </ColumnInfo>
  170. <Rows>
  171. <Row/>
  172. </Rows>
  173. </Dataset>
  174. <Dataset id="ds_temp_patdethinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  175. <ColumnInfo>
  176. <Column id="dethdd" type="STRING" size="256"/>
  177. <Column id="dethresn" type="STRING" size="256"/>
  178. <Column id="dethyn" type="STRING" size="256"/>
  179. </ColumnInfo>
  180. <Rows>
  181. <Row/>
  182. </Rows>
  183. </Dataset>
  184. <Dataset id="ds_temp_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  185. <Dataset id="ds_send_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  186. <Dataset id="ds_temp_trnptaftstat_cntsnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  187. <ColumnInfo>
  188. <Column id="nm" type="STRING" size="256"/>
  189. </ColumnInfo>
  190. <Rows>
  191. <Row>
  192. <Col id="nm">PRE-TED</Col>
  193. </Row>
  194. <Row>
  195. <Col id="nm">100 days</Col>
  196. </Row>
  197. </Rows>
  198. </Dataset>
  199. <Dataset id="ds_hidden_hsctinfo_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  200. </Objects>
  201. <Bind>
  202. <BindItem id="item0" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="pid"/>
  203. <BindItem id="item1" compid="grp_sea.output1" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="hngnm"/>
  204. <BindItem id="item2" compid="grp_sea.combo1" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="sex"/>
  205. <BindItem id="item3" compid="grp_sea.output2" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="age"/>
  206. <BindItem id="item4" compid="grp_sea.output3" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="cibmtrid"/>
  207. <BindItem id="item5" compid="grp_sea.output4" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="resrchyn"/>
  208. <BindItem id="item6" compid="grp_sea.output5" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="lostfudd"/>
  209. <BindItem id="item7" compid="grp_sea.ipt_dethdd" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="dethdd"/>
  210. <BindItem id="item8" compid="grp_sea.cmb_dethresn" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="dethresn"/>
  211. <BindItem id="item9" compid="grp_sea.bool_dethyn" propid="value" datasetid="ds_main_hsctinfo_patinfolist" columnid="dethyn"/>
  212. <BindItem id="item10" compid="cmb_trnptdg" propid="value" datasetid="ds_main" columnid="trnptdg"/>
  213. </Bind>
  214. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  215. * System Name :
  216. * Job Name :
  217. * Creator :
  218. * Make Date : 2015-11-13
  219. * Description :
  220. *---------------------------------------------------------------------------------------
  221. * Modify Date Modifier Modify Description
  222. *---------------------------------------------------------------------------------------
  223. * 2015-11-13 Live Converter TF->XP
  224. *
  225. *---------------------------------------------------------------------------------------
  226. ****************************************************************************************/
  227. include "com_commonxp::comm_main.xjs";
  228. include "ast_hsctxp::bmtcommon.xjs";
  229. function SMABO02200_oninit(obj:Form, e:InitEventInfo)
  230. {
  231. frmf_initForm(obj);
  232. }
  233. function SMABO02200_onload(obj:Form, e:LoadEventInfo)
  234. {
  235. grdf_initGrid(grd_trnptaftstat);
  236. grdf_setRowTypeIcon(grd_trnptaftstat, 0);
  237. var arrParam = [{dsNm: "ds_init_cmbinfo_sex_P0313", cdGrpId: "P0313"}]
  238. appf_getCodeList(arrParam);
  239. var arrParam2 = [{dsNm: "ds_init_cmbinfo_dethresn_A0186", cdGrpId: "A0186"}];
  240. aboGetCodeList(arrParam2);
  241. if (frmf_checkOpener())
  242. {
  243. var param = opener.frmf_getParameter("opener_parameter_id"); //opener parameter value를 get
  244. if (!utlf_isNull(param))
  245. {
  246. condarray = param.split("▦");
  247. ds_main_hsctinfo_patinfolist.setColumn(0, "pid", condarray[0]);
  248. ds_temp_bmtpatientinfo.setColumn(0, "trnptdg", condarray[1]);
  249. fGetPatientInfo();
  250. return;
  251. }
  252. }
  253. var paminfo = sysf_getGlobalVariable("paminfo");
  254. if (!utlf_isNull(paminfo))
  255. {
  256. ds_temp_paminfo.clearData();
  257. dsf_setCSVToDs("ds_temp_paminfo", paminfo);
  258. var pid = ds_temp_paminfo.getColumn(0, "pid");
  259. ds_main_hsctinfo_patinfolist.setColumn(0, "pid", pid);
  260. fGetPatientInfo();
  261. }
  262. else
  263. {
  264. var gv_pid = sysf_getGlobalVariable("gv_pid", "A");
  265. if(!utlf_isNull(gv_pid))
  266. {
  267. ds_main_hsctinfo_patinfolist.setColumn(0, "pid", gv_pid);
  268. fGetPatientInfo();
  269. }
  270. }
  271. btn_save.enable = frmf_checkAuth("X");
  272. }
  273. function fGetPatientInfo()
  274. {
  275. if (utlf_isNull(ds_main_hsctinfo_patinfolist.getColumn(0, "pid")))
  276. {
  277. return;
  278. }
  279. ds_send_req.setColumn(0, "pid", ds_main_hsctinfo_patinfolist.getColumn(0, "pid"));
  280. var oParam = {};
  281. oParam.id = "TRABO00001";
  282. oParam.service = "hsctcoordinatorapp.HsctPatient";
  283. oParam.method = "reqGetPatientBaseInfo";
  284. oParam.inds = "req=ds_send_req";
  285. oParam.outds = "ds_main_hsctinfo_patinfolist=patinfolist";
  286. oParam.async = false;
  287. oParam.callback = "cf_TRABO00001";
  288. tranf_submit(oParam);
  289. }
  290. function cf_TRABO00001(sSvcId, nErrorCode, sErrorMsg)
  291. {
  292. if(nErrorCode < 0)
  293. {
  294. return;
  295. }
  296. else
  297. {
  298. // if( ds_main_hsctinfo_patinfolist.rowcount > 0 && ds_main_hsctinfo_patinfolist.getColumn(0, "dethdd") == "00000000" ){
  299. // ds_main_hsctinfo_patinfolist.setColumn(0, "dethdd", utlf_getCurrentDate());
  300. // }
  301. var oParam = {};
  302. oParam.id = "TRABO00102";
  303. oParam.service = "hsctcoordinatorapp.HsctPatient";
  304. oParam.method = "reqGetTrnptDg";
  305. oParam.inds = "req=ds_send_req";
  306. oParam.outds = "ds_temp_trnptdg_item=item";
  307. oParam.async = false;
  308. //oParam.callback = "cf_TRABO00102";
  309. tranf_submit(oParam);
  310. if(ds_temp_trnptdg_item.rowcount > 0)
  311. {
  312. if(utlf_isNull(ds_temp_bmtpatientinfo.getColumn(0, "trnptdg")))
  313. {
  314. cmb_trnptdg.index = ds_temp_trnptdg_item.rowcount -1;
  315. }
  316. else
  317. {
  318. cmb_trnptdg.index = abofGetTrnptDgComboIndex(ds_temp_bmtpatientinfo.getColumn(0, "trnptdg"));
  319. //ds_temp_bmtpatientinfo.clearData();
  320. }
  321. fSetDisplay();
  322. }
  323. }
  324. }
  325. function fSetDisplay()
  326. {
  327. ds_send_req.setColumn(0, "trnptdg", ds_main.getColumn(0, "trnptdg"));
  328. var oParam = {};
  329. oParam.id = "TRABO02201";
  330. oParam.service = "hsctcoordinatorapp.HsctPatient";
  331. oParam.method = "reqGetTrnptAftStat";
  332. oParam.inds = "req=ds_send_req";
  333. oParam.outds = "ds_main_trnptaft_trnptaftstat=trnptaftstat ds_=message";
  334. oParam.async = false;
  335. //oParam.callback = "cf_TRABO02201";
  336. tranf_submit(oParam);
  337. var sdethrgstyn = ds_main_hsctinfo_patinfolist.getColumn(0, "dethrgstyn");
  338. var sdethdd = ds_main_hsctinfo_patinfolist.getColumn(0, "dethdd");
  339. if (sdethrgstyn == "N" && sdethdd != "00000000")
  340. {
  341. ds_main_hsctinfo_patinfolist.setColumn(0, "dethyn", "Y");
  342. grp_sea.ipt_dethdd.style.border = "1 solid red";
  343. }
  344. else
  345. {
  346. if ( sdethrgstyn == "Y" )
  347. {
  348. ds_main_hsctinfo_patinfolist.setColumn(0, "dethyn", "Y");
  349. }
  350. else
  351. {
  352. ds_main_hsctinfo_patinfolist.setColumn(0, "dethyn", "N");
  353. }
  354. grp_sea.ipt_dethdd.style.border = "1 solid #c0c0c0";
  355. }
  356. if(ds_main_hsctinfo_patinfolist.getColumn(0, "dethyn") == "Y")
  357. {
  358. grp_sea.ipt_dethdd.enable = true;
  359. grp_sea.cmb_dethresn.enable = true;
  360. }
  361. else
  362. {
  363. grp_sea.ipt_dethdd.enable = false;
  364. grp_sea.cmb_dethresn.enable = false;
  365. }
  366. ds_temp_patdethinfo.setColumn(0, "dethdd", ds_main_hsctinfo_patinfolist.getColumn(0, "dethdd"));
  367. ds_temp_patdethinfo.setColumn(0, "dethresn", ds_main_hsctinfo_patinfolist.getColumn(0, "dethresn"));
  368. ds_temp_patdethinfo.setColumn(0, "dethyn", ds_main_hsctinfo_patinfolist.getColumn(0, "dethyn"));
  369. }
  370. function btn_pid_onclick(obj:Button, e:ClickEventInfo)
  371. {
  372. if(abofGetBmtPatientSearch("ds_hidden_hsctinfo_patinfolist", "ds_temp_bmtpatientinfo"))
  373. {
  374. ds_main_hsctinfo_patinfolist.setColumn(0, "pid", ds_hidden_hsctinfo_patinfolist.getColumn(0, "pid"))
  375. ds_main_hsctinfo_patinfolist.setColumn(0, "hngnm", ds_hidden_hsctinfo_patinfolist.getColumn(0, "hngnm"))
  376. ds_main_hsctinfo_patinfolist.setColumn(0, "rrgstno1", ds_hidden_hsctinfo_patinfolist.getColumn(0, "rrgstno1"))
  377. ds_main_hsctinfo_patinfolist.setColumn(0, "rrgstno2", ds_hidden_hsctinfo_patinfolist.getColumn(0, "rrgstno2"))
  378. ds_main_hsctinfo_patinfolist.setColumn(0, "sex", ds_hidden_hsctinfo_patinfolist.getColumn(0, "sex"))
  379. ds_main_hsctinfo_patinfolist.setColumn(0, "age", ds_hidden_hsctinfo_patinfolist.getColumn(0, "age"))
  380. ds_main_hsctinfo_patinfolist.setColumn(0, "cibmtrid", ds_hidden_hsctinfo_patinfolist.getColumn(0, "cibmtrid"))
  381. fGetPatientInfo();
  382. }
  383. }
  384. function grp_sea_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  385. {
  386. if(utlf_isNull(ds_main_hsctinfo_patinfolist.getColumn(0, "pid")))
  387. {
  388. return;
  389. }
  390. if (!utlf_isNull(ds_main.getColumn(0, "trnptdg")))
  391. {
  392. fSetDisplay();
  393. }
  394. else
  395. {
  396. fGetPatientInfo();
  397. }
  398. }
  399. function grp_sea_bool_dethyn_onclick(obj:CheckBox, e:ClickEventInfo)
  400. {
  401. if(obj.value == "Y")
  402. {
  403. grp_sea.ipt_dethdd.enable = true;
  404. grp_sea.cmb_dethresn.enable = true;
  405. if(ds_main_hsctinfo_patinfolist.getColumn(0, "dethdd") == "00000000"){
  406. ds_main_hsctinfo_patinfolist.setColumn(0, "dethdd", utlf_getCurrentDate());
  407. }
  408. }
  409. else
  410. {
  411. grp_sea.ipt_dethdd.enable = false;
  412. grp_sea.cmb_dethresn.enable = false;
  413. ds_main_hsctinfo_patinfolist.setColumn(0, "dethdd", "00000000");
  414. ds_main_hsctinfo_patinfolist.setColumn(0, "dethresn", "-");
  415. }
  416. }
  417. function btn_excsave_onclick(obj:Button, e:ClickEventInfo)
  418. {
  419. grdf_exportExcel(grd_trnptaftstat, "이식후상태", "이식후상태", false, "", "", false);
  420. }
  421. function btn_grdadd_onclick(obj:Button, e:ClickEventInfo)
  422. {
  423. var irow = ds_main_trnptaft_trnptaftstat.addRow();
  424. if (irow <= 1)
  425. {
  426. ds_main_trnptaft_trnptaftstat.setColumn(irow, "cntsnm", ds_temp_trnptaftstat_cntsnm.getColumn(irow, "nm"))
  427. }
  428. ds_main_trnptaft_trnptaftstat.setColumn(irow, "pid", ds_main_hsctinfo_patinfolist.getColumn(0, "pid"))
  429. ds_main_trnptaft_trnptaftstat.setColumn(irow, "trnptdg", ds_main.getColumn(0, "trnptdg"));
  430. }
  431. function btn_grddel_onclick(obj:Button, e:ClickEventInfo)
  432. {
  433. if(utlf_isNull(ds_main_trnptaft_trnptaftstat.getColumn(ds_main_trnptaft_trnptaftstat.rowposition, "cntsnm")))
  434. {
  435. ds_main_trnptaft_trnptaftstat.deleteRow(ds_main_trnptaft_trnptaftstat.rowposition);
  436. }
  437. else
  438. {
  439. ds_main_trnptaft_trnptaftstat.updatecontrol = false;
  440. ds_main_trnptaft_trnptaftstat.setRowType(ds_main_trnptaft_trnptaftstat.rowposition, "d");
  441. ds_main_trnptaft_trnptaftstat.updatecontrol = true;
  442. }
  443. }
  444. function cmb_trnptdg_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  445. {
  446. fSetDisplay();
  447. }
  448. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  449. {
  450. fSaveData();
  451. }
  452. function fSaveData(paramFlag)
  453. {
  454. if (( ds_main_hsctinfo_patinfolist.getColumn(0, "dethrgstyn") == "N" && ds_main_hsctinfo_patinfolist.getColumn(0, "dethdd") != "00000000")
  455. || ds_main_hsctinfo_patinfolist.getColumn(0, "dethdd") != ds_temp_patdethinfo.getColumn(0, "dethdd")
  456. || ds_main_hsctinfo_patinfolist.getColumn(0, "dethresn") != ds_temp_patdethinfo.getColumn(0, "dethresn")
  457. || ds_main_hsctinfo_patinfolist.getColumn(0, "dethyn") != ds_temp_patdethinfo.getColumn(0, "dethyn"))
  458. {
  459. var oParam = {};
  460. oParam.id = "TXABO02200";
  461. oParam.service = "hsctcoordinatorapp.HsctPatient";
  462. oParam.method = "reqSetPatDethInfo";
  463. oParam.inds = "patinfolist=ds_main_hsctinfo_patinfolist";
  464. oParam.outds = "ds_=item ds_=message";
  465. oParam.async = false;
  466. //oParam.callback = "cf_TXABO02200";
  467. tranf_submit(oParam);
  468. }
  469. var oParam = {};
  470. oParam.id = "TXABO02201";
  471. oParam.service = "hsctcoordinatorapp.HsctPatient";
  472. oParam.method = "reqExeTrnptAftMngt";
  473. oParam.inds = "trnptaftstat=ds_main_trnptaft_trnptaftstat:U";
  474. oParam.outds = "ds_=item ds_=message";
  475. oParam.typeStr = "m";
  476. oParam.async = false;
  477. oParam.callback = "cf_TXABO02201";
  478. tranf_submit(oParam);
  479. }
  480. function cf_TXABO02201(sSvcId, nErrorCode, sErrorMsg)
  481. {
  482. if(nErrorCode < 0)
  483. {
  484. return;
  485. }
  486. else
  487. {
  488. ds_temp_bmtpatientinfo.setColumn(0, "trnptdg", ds_main.getColumn(0, "trnptdg"));
  489. fGetPatientInfo();
  490. }
  491. }
  492. ]]></Script>
  493. </Form>
  494. </FDL>