SPLPR00300_자문결과등록.xfdl 47 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPLPR00300" position="absolute 0 0 631 728" titletext="자문결과등록" oninit="SPLPR00300_oninit" onload="SPLPR00300_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="Div00" taborder="30" position="absolute 2 2 629 39" class="div_SA2">
  8. <Layouts>
  9. <Layout>
  10. <Combo id="cmb_cnstdg" taborder="0" innerdataset="@ds_cnstrsltlist" codecolumn="cnstdg" datacolumn="cnstdg" onitemchanged="cmb_cnstdg_onitemchanged" class="combo_search" position="absolute 101 9 199 28" anchor="default"/>
  11. <Static id="caption18" text="자문번호 :" class="search_name" position="absolute 16 11 88 28" anchor="default"/>
  12. </Layout>
  13. </Layouts>
  14. </Div>
  15. <Static id="caption1" text="환자정보" class="tit_2" position="absolute 3 47 76 67"/>
  16. <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 2 63 627 69" style="strokepen:3 solid #33bbbbff;"/>
  17. <Static id="caption3" text="진단 (자문 병리의사)" class="tit_2" position="absolute 7 434 168 450"/>
  18. <Shape id="line4" linetype="horizontal" class="line_1" position="absolute 2 452 627 460" style="strokepen:3 solid #33bbbbff;"/>
  19. <Static id="caption7" text="등록번호" class="cell_1" position="absolute 188 68 268 91"/>
  20. <Edit id="opt_pid" taborder="1" readonly="true" position="absolute 271 69 371 88" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  21. <Static id="caption2" text="환자명" class="cell_1" position="absolute 374 68 454 91"/>
  22. <Static id="caption4" text="성별/나이" class="cell_1" position="absolute 2 92 82 115"/>
  23. <Static id="caption5" text="주민번호" class="cell_1" position="absolute 188 92 268 115"/>
  24. <Static id="caption6" text="병리번호" class="cell_1" position="absolute 2 68 82 91"/>
  25. <Static id="caption8" text="병변위치" class="cell_1" position="absolute 2 116 82 139"/>
  26. <Static id="caption14" text="추정진단 (의뢰 병리의사)" class="tit_2" position="absolute 7 329 182 345"/>
  27. <TextArea id="tar_estmdiag" taborder="2" position="absolute 2 351 627 401"/>
  28. <Static id="caption15" text="접수일자" class="cell_1" position="absolute 374 92 454 115"/>
  29. <Shape id="line6" linetype="horizontal" class="line_3" position="absolute 2 136 627 142"/>
  30. <Static id="caption9" text="자문정보" class="tit_2" position="absolute 2 146 74 162"/>
  31. <Shape id="line7" linetype="horizontal" class="line_1" position="absolute 2 163 279 169" style="strokepen:3 solid #33bbbbff;"/>
  32. <Static id="caption10" text="Case to be discussed" class="tit_2" position="absolute 285 146 453 162"/>
  33. <Shape id="line8" linetype="horizontal" class="line_1" position="absolute 282 163 625 169" style="strokepen:3 solid #33bbbbff;"/>
  34. <Static id="caption13" text="발송일" class="cell_1" position="absolute 2 242 52 265" style="padding:0 0 0 5;"/>
  35. <Static id="caption16" text="진단일" class="cell_1" position="absolute 142 242 192 265" style="padding:0 0 0 5;"/>
  36. <Calendar id="ipt_senddd" taborder="3" class="input_default" position="absolute 55 243 139 262"/>
  37. <Edit id="opt_ptno" taborder="6" readonly="true" position="absolute 85 69 185 88" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  38. <Edit id="opt_patnm" taborder="7" readonly="true" position="absolute 457 69 627 88" enable="true" enableevent="true" usebitmapcache="false" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  39. <Edit id="opt_sexage" taborder="8" readonly="true" position="absolute 85 93 185 112" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  40. <Edit id="opt_rrgstno" taborder="9" readonly="true" position="absolute 271 93 371 112" enableevent="true" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  41. <MaskEdit id="acptdd" taborder="10" readonly="true" mask="####-##-##" position="absolute 457 93 627 112" type="string" style="caretcolor:#6a543aff;align:left middle;" usebitmapcache="false" autoskip="false" clipmode="includespace" transparenthittest="false" trimtype="none" tooltiptype="default"/>
  42. <Edit id="opt_spcnm" taborder="11" readonly="true" position="absolute 85 117 627 136" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  43. <Shape id="line2" linetype="horizontal" class="line_2" position="absolute 2 87 627 93"/>
  44. <Shape id="line5" linetype="horizontal" class="line_2" position="absolute 2 111 627 117"/>
  45. <Calendar id="ipt_cnstdiagdd" taborder="12" class="input_default" position="absolute 195 243 279 262"/>
  46. <Combo id="cmb_trustdrid" taborder="13" innerdataset="@ds_userinfolist" codecolumn="userid" datacolumn="usernm" position="absolute 172 219 279 238"/>
  47. <TextArea id="tar_cnstdiag" taborder="15" position="absolute 2 457 627 682"/>
  48. <Static id="cap_trustdrid" text="의뢰자" class="cell_1" position="absolute 2 218 52 241" style="padding:0 0 0 5;"/>
  49. <Shape id="line12" linetype="vertical" class="line_2" position="absolute 2 237 279 243"/>
  50. <Tab id="swt_cnstdrchoi" taborder="16" tabindex="0" position="absolute 2 268 279 320" enable="true" enableevent="false">
  51. <Tabpages>
  52. <Tabpage id="case_in" text="원내자문">
  53. <Layouts>
  54. <Layout>
  55. <Combo id="cmb_cnstdrid" taborder="1" innerdataset="@ds_userinfolist" codecolumn="usernm" datacolumn="usernm" class="combo_default" position="absolute 143 3 272 22"/>
  56. <Edit id="opt_cnstdrnm" taborder="2" readonly="true" position="absolute 3 3 140 22"/>
  57. </Layout>
  58. </Layouts>
  59. </Tabpage>
  60. <Tabpage id="case_out" text="원외자문">
  61. <Layouts>
  62. <Layout>
  63. <Edit id="opt_hosoutcnsthospnm" taborder="4" readonly="true" position="absolute 111 3 273 22"/>
  64. <Combo id="cbo_outdrchoi" taborder="5" innerdataset="@ds_cnsltlist" codecolumn="cnstdrid" datacolumn="cnstdrnm" class="combo_default" position="absolute 3 3 108 22" onitemchanged="swt_cnstdrchoi_case_out_cbo_outdrchoi_onitemchanged"/>
  65. </Layout>
  66. </Layouts>
  67. </Tabpage>
  68. </Tabpages>
  69. </Tab>
  70. <Edit id="input1" taborder="17" visible="false" position="absolute 142 142 246 161"/>
  71. <Button id="btn_reqfrm" taborder="18" text="의뢰지 보기" class="btn2" position="absolute 544 43 627 62" onclick="btn_reqfrm_onclick"/>
  72. <Static id="cap_cnsthospcd" text="자문병원" class="cell_1" visible="false" position="absolute 192 322 249 345" style="padding:0 0 0 5;"/>
  73. <Static id="cap_cnstdrid" text="자문의사" class="cell_1" visible="false" position="absolute 257 322 317 345" style="padding:0 0 0 5;"/>
  74. <Static id="cap_outdrchoi" text="자문의사" class="cell_1" visible="false" position="absolute 322 322 379 345" style="padding:0 0 0 5;"/>
  75. <Div id="grp_prnt" taborder="19" visible="false" position="absolute 261 42 301 72"/>
  76. <Combo id="cmb_cnsthospcd" taborder="20" innerdataset="ds_init_cmb_cnsthospcd" codecolumn="cdid" datacolumn="cdnm" class="combo_default" visible="false" position="absolute 427 327 592 346"/>
  77. <Edit id="opt_trsmnm" taborder="21" readonly="true" position="absolute 55 219 169 238" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;"/>
  78. <Combo id="cmb_estmdiagstat" taborder="22" innerdataset="@FilteredDataset3" codecolumn="resncd" datacolumn="resncnts" position="absolute 2 407 277 426"/>
  79. <Button id="btn_save" taborder="24" text="저장" class="btn4" position="absolute 510 693 566 715" onclick="btn_save_onclick"/>
  80. <Button id="btn_cls" taborder="25" text="닫기" class="btn4" position="absolute 569 693 625 715" onclick="btn_cls_onclick"/>
  81. <Button id="btn_prt" taborder="26" text="출력" class="btn6" position="absolute 0 693 56 715"/>
  82. <cp_checkboxList id="cp_checkboxList1" titletext="CheckBox List" taborder="27" scrollbars="none" position="absolute 293 250 563 294" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" visible="false"/>
  83. <cp_checkboxList id="cp_checkboxList2" taborder="28" scrollbars="none" position="absolute 287 169 622 318" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="300" itemHeight="20" overflow="visible"/>
  84. <Radio id="Radio00" taborder="29" columncount="0" rowcount="0" position="absolute 7 170 273 216" innerdataset="@FilteredDataset1" codecolumn="resncd" onitemchanged="Radio00_onitemchanged" datacolumn="resncnts" value="0" index="-1"/>
  85. </Layout>
  86. </Layouts>
  87. <Objects>
  88. <Dataset id="ds_init_cmb_cnstdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  89. <ColumnInfo>
  90. <Column id="cnstdg" type="STRING"/>
  91. <Column id="cnstdg" type="STRING"/>
  92. </ColumnInfo>
  93. </Dataset>
  94. <Dataset id="ds_init_cmb_trustdrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  95. <ColumnInfo>
  96. <Column id="usernm" type="STRING"/>
  97. <Column id="userid" type="STRING"/>
  98. </ColumnInfo>
  99. </Dataset>
  100. <Dataset id="ds_init_cmb_cnstdrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  101. <ColumnInfo>
  102. <Column id="usernm" type="STRING"/>
  103. <Column id="userid" type="STRING"/>
  104. </ColumnInfo>
  105. </Dataset>
  106. <Dataset id="ds_init_cbo_outdrchoi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  107. <ColumnInfo>
  108. <Column id="cnstdrnm" type="STRING"/>
  109. <Column id="cnstdrid" type="STRING"/>
  110. </ColumnInfo>
  111. </Dataset>
  112. <Dataset id="ds_init_combo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  113. <ColumnInfo>
  114. <Column id="cnstdrnm" type="STRING"/>
  115. <Column id="cnstdrid" type="STRING"/>
  116. </ColumnInfo>
  117. </Dataset>
  118. <Dataset id="ds_init_cmb_cnsthospcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  119. <ColumnInfo>
  120. <Column id="cdnm" type="STRING"/>
  121. <Column id="cdid" type="STRING"/>
  122. </ColumnInfo>
  123. </Dataset>
  124. <Dataset id="ds_init_cmb_estmdiagstat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  125. <ColumnInfo>
  126. <Column id="resncnts" type="STRING"/>
  127. <Column id="resncd" type="STRING"/>
  128. </ColumnInfo>
  129. </Dataset>
  130. <Dataset id="ds_hospenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  131. <ColumnInfo>
  132. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  133. <Column id="lendrtnterm" type="STRING" size="256" sumtext="대출반환기간"/>
  134. <Column id="recvqualmthdcd" type="STRING" size="256" sumtext="수신확인방법"/>
  135. <Column id="plgydeptcd" type="STRING" size="256" sumtext="병리과"/>
  136. <Column id="plgyteamcd" type="STRING" size="256" sumtext="병리팀"/>
  137. <Column id="doctjobgradcd" type="STRING" size="256" sumtext="병리의사직급코드"/>
  138. <Column id="teamjobgradcd" type="STRING" size="256" sumtext="레지던트직급코드"/>
  139. <Column id="csteeqmtip" type="STRING" size="256" sumtext="Cassette장비IP"/>
  140. <Column id="csteeqmtport" type="STRING" size="256" sumtext="Cassette장비Port"/>
  141. <Column id="slideqmtip" type="STRING" size="256" sumtext="슬라이드장비IP"/>
  142. <Column id="norcptacptyn" type="STRING" size="256" sumtext="외래미수납접수여부"/>
  143. <Column id="slidbceqmtip" type="STRING" size="256" sumtext="슬라이드(라벨지)장비IP"/>
  144. <Column id="acptreaddr" type="STRING" size="256" sumtext="접수시점판독의지정여부"/>
  145. <Column id="slidbceqmtip2" type="STRING" size="256" sumtext="슬라이드(라벨지)장비IP2"/>
  146. <Column id="slidbceqmtport2" type="STRING" size="256" sumtext="슬라이드(라벨지)장비Port2"/>
  147. <Column id="repttitl" type="STRING" size="256" sumtext="보고서제목"/>
  148. <Column id="repttitl2" type="STRING" size="256" sumtext="자문의뢰제목"/>
  149. <Column id="plgyrecroom1" type="STRING" size="256" sumtext="병리과기록실1"/>
  150. <Column id="plgyrecroom2" type="STRING" size="256" sumtext="병리과기록실2"/>
  151. <Column id="ptnoacptflag" type="STRING" size="256" sumtext="병리번호접수구분"/>
  152. <Column id="autoacptflagcd" type="STRING" size="256" sumtext="자동접수구분"/>
  153. </ColumnInfo>
  154. </Dataset>
  155. <Dataset id="ds_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  156. <ColumnInfo>
  157. <Column id="sysdd" type="STRING" size="256" sumtext="시스템일자"/>
  158. <Column id="systm" type="STRING" size="256" sumtext="시스템시간"/>
  159. </ColumnInfo>
  160. </Dataset>
  161. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  162. <ColumnInfo>
  163. <Column id="detlrefcrite" type="STRING" size="256"/>
  164. <Column id="userdeptcd" type="STRING" size="256"/>
  165. <Column id="prtndirect" type="STRING" size="256"/>
  166. </ColumnInfo>
  167. <Rows>
  168. <Row>
  169. <Col id="prtndirect">1</Col>
  170. </Row>
  171. </Rows>
  172. </Dataset>
  173. <Dataset id="ds_userinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  174. <ColumnInfo>
  175. <Column id="choi" type="STRING" size="256" sumtext="선택"/>
  176. <Column id="dutplceinstcd" type="STRING" size="256" sumtext="기관코드"/>
  177. <Column id="userid" type="STRING" size="256" sumtext="사용자ID"/>
  178. <Column id="usernm" type="STRING" size="256" sumtext="사용자명"/>
  179. <Column id="jobkindcd" type="STRING" size="256" sumtext="직종구분코드"/>
  180. <Column id="userabbr" type="STRING" size="256" sumtext="직종구분코드"/>
  181. <Column id="mpphonno" type="STRING" size="256" sumtext="직종구분코드"/>
  182. </ColumnInfo>
  183. </Dataset>
  184. <Dataset id="ds_resncdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  185. <ColumnInfo>
  186. <Column id="choi" type="STRING" size="256" sumtext="선택"/>
  187. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  188. <Column id="baseflagcd" type="STRING" size="256" sumtext="구분코드"/>
  189. <Column id="resncd" type="STRING" size="256" sumtext="사유코드"/>
  190. <Column id="resncnts" type="STRING" size="256" sumtext="사유내용"/>
  191. </ColumnInfo>
  192. </Dataset>
  193. <Dataset id="ds_cnsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  194. <ColumnInfo>
  195. <Column id="instcd" type="STRING" size="256" sumtext="병원코드"/>
  196. <Column id="hospnm" type="STRING" size="256" sumtext="병원명"/>
  197. <Column id="dutydeptnm" type="STRING" size="256" sumtext="부서명"/>
  198. <Column id="cnstdrid" type="STRING" size="256" sumtext="자문의사ID"/>
  199. <Column id="cnstdrnm" type="STRING" size="256" sumtext="자문의사명"/>
  200. <Column id="cntctelno" type="STRING" size="256" sumtext="연락처"/>
  201. </ColumnInfo>
  202. </Dataset>
  203. <Dataset id="ds_cnstrsltinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  204. <ColumnInfo>
  205. <Column id="cnstflagcd" type="STRING" size="256"/>
  206. <Column id="cnstcasecd" type="STRING" size="256"/>
  207. <Column id="casedcuscd" type="STRING" size="256"/>
  208. <Column id="trsmid" type="STRING" size="256"/>
  209. <Column id="trsmdd" type="STRING" size="256"/>
  210. <Column id="trsmtm" type="STRING" size="256"/>
  211. <Column id="diagdd" type="STRING" size="256"/>
  212. <Column id="diagtm" type="STRING" size="256"/>
  213. <Column id="cnsthospcd" type="STRING" size="256"/>
  214. <Column id="cnstdrid" type="STRING" size="256"/>
  215. <Column id="hosoutcnsthospnm" type="STRING" size="256"/>
  216. <Column id="hosoutcnstdrid" type="STRING" size="256"/>
  217. <Column id="hosoutcnstdrnm" type="STRING" size="256"/>
  218. <Column id="estmdiagcnts" type="STRING" size="256"/>
  219. <Column id="cnstdiagcnts" type="STRING" size="256"/>
  220. <Column id="reqfrminfo" type="STRING" size="256"/>
  221. <Column id="trsmnm" type="STRING" size="256"/>
  222. <Column id="estmdiagstat" type="STRING" size="256"/>
  223. <Column id="cnstdrnm" type="STRING" size="256"/>
  224. <Column id="cnstdg" type="STRING" size="256"/>
  225. </ColumnInfo>
  226. <Rows>
  227. <Row/>
  228. </Rows>
  229. </Dataset>
  230. <Dataset id="ds_init_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  231. <ColumnInfo>
  232. <Column id="ptno" type="STRING" size="256"/>
  233. <Column id="patnm" type="STRING" size="256"/>
  234. <Column id="rrgstno" type="STRING" size="256"/>
  235. <Column id="pid" type="STRING" size="256"/>
  236. <Column id="sexage" type="STRING" size="256"/>
  237. <Column id="acptdd" type="STRING" size="256"/>
  238. <Column id="readdd" type="STRING" size="256"/>
  239. <Column id="grosdrid" type="STRING" size="256"/>
  240. <Column id="grosdrnm" type="STRING" size="256"/>
  241. <Column id="spcnm" type="STRING" size="256"/>
  242. </ColumnInfo>
  243. <Rows>
  244. <Row/>
  245. </Rows>
  246. </Dataset>
  247. <Dataset id="ds_cnstrsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  248. <ColumnInfo>
  249. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  250. <Column id="ptno" type="STRING" size="256" sumtext="병리번호"/>
  251. <Column id="dispptno" type="STRING" size="256" sumtext="표시병리번호"/>
  252. <Column id="cnstdg" type="STRING" size="256" sumtext="자문차수"/>
  253. <Column id="cnstflagcd" type="STRING" size="256" sumtext="자문구분코드"/>
  254. <Column id="casedcuscd" type="STRING" size="256" sumtext="case"/>
  255. <Column id="trsmdd" type="STRING" size="256" sumtext="의뢰일자"/>
  256. <Column id="trsmtm" type="STRING" size="256" sumtext="의뢰시간"/>
  257. <Column id="trsmid" type="STRING" size="256" sumtext="의뢰자ID"/>
  258. <Column id="trsmnm" type="STRING" size="256" sumtext="의뢰자명"/>
  259. <Column id="diagdd" type="STRING" size="256" sumtext="진단일자"/>
  260. <Column id="diagtm" type="STRING" size="256" sumtext="진단시간"/>
  261. <Column id="cnsthospcd" type="STRING" size="256" sumtext="자문병원코드"/>
  262. <Column id="cnstdrid" type="STRING" size="256" sumtext="자문의사ID"/>
  263. <Column id="cnstdrnm" type="STRING" size="256" sumtext="자문의사명"/>
  264. <Column id="hosoutcnsthospnm" type="STRING" size="256" sumtext="원외자문병원명"/>
  265. <Column id="hosoutcnstdrid" type="STRING" size="256" sumtext="원외자문의사ID"/>
  266. <Column id="hosoutcnstdrnm" type="STRING" size="256" sumtext="원외자문의사명"/>
  267. <Column id="estmdiagcnts" type="STRING" size="256" sumtext="추정진단내용"/>
  268. <Column id="cnstdiagcnts" type="STRING" size="256" sumtext="자문진단내용"/>
  269. <Column id="mpphonno" type="STRING" size="256" sumtext="원내자문의연락처"/>
  270. <Column id="cntctelno" type="STRING" size="256" sumtext="원외자문의연락처"/>
  271. <Column id="estmdiagstat" type="STRING" size="256" sumtext="자문진단확인"/>
  272. </ColumnInfo>
  273. </Dataset>
  274. <FilteredDataset id="FilteredDataset1" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_resncdlist" filterstr="baseflagcd== &quot;J1&quot;"/>
  275. <FilteredDataset id="FilteredDataset2" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_resncdlist" filterstr="baseflagcd== &quot;J2&quot;"/>
  276. <FilteredDataset id="FilteredDataset3" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_resncdlist" filterstr="baseflagcd== &quot;J3&quot;"/>
  277. <Dataset id="ds_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  278. <ColumnInfo>
  279. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  280. <Column id="ptno" type="STRING" size="256" sumtext="병리번호"/>
  281. <Column id="cnstdg" type="STRING" size="256" sumtext="자문차수"/>
  282. <Column id="cnstflagcd" type="STRING" size="256" sumtext="자문구분코드"/>
  283. <Column id="casedcuscd" type="STRING" size="256" sumtext="case"/>
  284. <Column id="trsmdd" type="STRING" size="256" sumtext="의뢰일자"/>
  285. <Column id="trsmtm" type="STRING" size="256" sumtext="의뢰시간"/>
  286. <Column id="trsmid" type="STRING" size="256" sumtext="의뢰자ID"/>
  287. <Column id="diagdd" type="STRING" size="256" sumtext="진단일자"/>
  288. <Column id="diagtm" type="STRING" size="256" sumtext="진단시간"/>
  289. <Column id="cnsthospcd" type="STRING" size="256" sumtext="자문병원코드"/>
  290. <Column id="cnstdrid" type="STRING" size="256" sumtext="자문의사ID"/>
  291. <Column id="hosoutcnsthospnm" type="STRING" size="256" sumtext="원외자문병원명"/>
  292. <Column id="hosoutcnstdrid" type="STRING" size="256" sumtext="원외자문의사ID"/>
  293. <Column id="hosoutcnstdrnm" type="STRING" size="256" sumtext="원외자문의사명"/>
  294. <Column id="estmdiagcnts" type="STRING" size="256" sumtext="추정진단내용"/>
  295. <Column id="cnstdiagcnts" type="STRING" size="256" sumtext="자문진단내용"/>
  296. <Column id="mpphonno" type="STRING" size="256" sumtext="원내자문의연락처"/>
  297. <Column id="cntctelno" type="STRING" size="256" sumtext="원외자문의연락처"/>
  298. <Column id="newflagcd" type="STRING" size="256" sumtext="자문진단내용"/>
  299. <Column id="hospnm" type="STRING" size="256" sumtext="의뢰기관명"/>
  300. <Column id="trsmdrnm" type="STRING" size="256" sumtext="의뢰자명"/>
  301. <Column id="incnstdrnm" type="STRING" size="256" sumtext="원내 자문의명"/>
  302. <Column id="outcnstdrnm" type="STRING" size="256" sumtext="원외 자문의명"/>
  303. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  304. <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
  305. <Column id="estmdiagstat" type="STRING" size="256" sumtext="자문진단확인"/>
  306. </ColumnInfo>
  307. <Rows>
  308. <Row>
  309. <Col id="cnstflagcd"/>
  310. </Row>
  311. </Rows>
  312. </Dataset>
  313. </Objects>
  314. <Bind>
  315. <BindItem id="item0" compid="opt_trsmnm" propid="value" datasetid="ds_cnstrsltinfo" columnid="trsmnm"/>
  316. <BindItem id="item1" compid="cmb_trustdrid" propid="value" datasetid="ds_cnstrsltinfo" columnid="trsmid"/>
  317. <BindItem id="item2" compid="ipt_senddd" propid="value" datasetid="ds_cnstrsltinfo" columnid="trsmdd"/>
  318. <BindItem id="item3" compid="ipt_cnstdiagdd" propid="value" datasetid="ds_cnstrsltinfo" columnid="diagdd"/>
  319. <BindItem id="item4" compid="cmb_cnsthospcd" propid="value" datasetid="ds_cnstrsltinfo" columnid="cnsthospcd"/>
  320. <BindItem id="item5" compid="tar_estmdiag" propid="value" datasetid="ds_cnstrsltinfo" columnid="estmdiagcnts"/>
  321. <BindItem id="item6" compid="cmb_estmdiagstat" propid="value" datasetid="ds_cnstrsltinfo" columnid="estmdiagstat"/>
  322. <BindItem id="item7" compid="opt_ptno" propid="value" datasetid="ds_init_patinfo" columnid="ptno"/>
  323. <BindItem id="item8" compid="opt_pid" propid="value" datasetid="ds_init_patinfo" columnid="pid"/>
  324. <BindItem id="item9" compid="opt_patnm" propid="value" datasetid="ds_init_patinfo" columnid="patnm"/>
  325. <BindItem id="item10" compid="opt_sexage" propid="value" datasetid="ds_init_patinfo" columnid="sexage"/>
  326. <BindItem id="item11" compid="opt_rrgstno" propid="value" datasetid="ds_init_patinfo" columnid="rrgstno"/>
  327. <BindItem id="item12" compid="acptdd" propid="value" datasetid="ds_init_patinfo" columnid="acptdd"/>
  328. <BindItem id="item13" compid="opt_spcnm" propid="value" datasetid="ds_init_patinfo" columnid="spcnm"/>
  329. <BindItem id="item14" compid="Radio00" propid="value" datasetid="ds_cnstrsltinfo" columnid="cnstflagcd"/>
  330. <BindItem id="item15" compid="swt_cnstdrchoi.case_out.opt_hosoutcnsthospnm" propid="value" datasetid="ds_cnstrsltinfo" columnid="hosoutcnsthospnm"/>
  331. <BindItem id="item16" compid="swt_cnstdrchoi.case_in.cmb_cnstdrid" propid="value" datasetid="ds_cnstrsltinfo" columnid="cnstdrid"/>
  332. <BindItem id="item17" compid="swt_cnstdrchoi.case_in.opt_cnstdrnm" propid="value" datasetid="ds_cnstrsltinfo" columnid="cnstdrnm"/>
  333. <BindItem id="item18" compid="swt_cnstdrchoi.case_out.cbo_outdrchoi" propid="value" datasetid="ds_cnstrsltinfo" columnid="hosoutcnstdrid"/>
  334. <BindItem id="item20" compid="tar_cnstdiag" propid="value" datasetid="ds_cnstrsltinfo" columnid="cnstdiagcnts"/>
  335. <BindItem id="item19" compid="Div00.cmb_cnstdg" propid="value" datasetid="ds_cnstrsltinfo" columnid="cnstdg"/>
  336. </Bind>
  337. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  338. * System Name :
  339. * Job Name :
  340. * Creator :
  341. * Make Date : 2015-11-13
  342. * Description :
  343. *---------------------------------------------------------------------------------------
  344. * Modify Date Modifier Modify Description
  345. *---------------------------------------------------------------------------------------
  346. * 2015-11-13 Live Converter TF->XP
  347. *
  348. *---------------------------------------------------------------------------------------
  349. ****************************************************************************************/
  350. include "com_commonxp::comm_main.xjs";
  351. include "lis_commonxp::LPZ001.xjs";
  352. function SPLPR00300_oninit(obj:Form, e:InitEventInfo)
  353. {
  354. frmf_initForm(obj);
  355. }
  356. function SPLPR00300_onload(obj:Form, e:LoadEventInfo)
  357. {
  358. // makeReportPreview(0, 50, 1179, 678, "grp_prnt");
  359. ds_init_patinfo.copyData(arg_ds_init_patinfo);
  360. fExeInitialize();
  361. }
  362. //화면 초기화 처리 Function
  363. function fExeInitialize()
  364. {
  365. //----------------
  366. // 시스템일시 조회
  367. dsf_createDsRow("ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}]);
  368. var oParam = {};
  369. oParam.id = "TRLPZ00101";
  370. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  371. oParam.method = "reqGetHospitalEnvironmentSetInfo";
  372. oParam.inds = "refData=ds_send";
  373. oParam.outds = "ds_hospenvinfo=hospenvinfo";
  374. oParam.async = false;
  375. //oParam.callback = "cf_TRLPZ00101";
  376. tranf_submit(oParam);
  377. //submit("TRLPZ00102");
  378. var oParam = {};
  379. oParam.id = "TRLPZ00102";
  380. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  381. oParam.method = "reqGetSystemDateTimeInformation";
  382. oParam.inds = "refData=ds_send";
  383. oParam.outds = "ds_sysdtinfo=sysdtinfo";
  384. oParam.async = false;
  385. //oParam.callback = "cf_TRLPZ00102";
  386. tranf_submit(oParam);
  387. //---------------------------------------------------------
  388. // 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
  389. lpzfUserDeptCd(ds_hospenvinfo, ds_hidden);
  390. ds_send.clear();
  391. dsf_createDsRow("ds_send", [{col : "userdeptcd", val : ds_hidden.getColumn(0, "userdeptcd")}
  392. ,{col : "doctjobgradcd", val : ds_hospenvinfo.getColumn(0, "doctjobgradcd")}
  393. ,{col : "teamjobgradcd", val : ds_hospenvinfo.getColumn(0, "teamjobgradcd")}]);
  394. var oParam = {};
  395. oParam.id = "TRLPZ00105";
  396. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  397. oParam.method = "reqGetUserInfoList";
  398. oParam.inds = "refdata=ds_send";
  399. oParam.outds = "ds_userinfolist=reflist";
  400. oParam.async = false;
  401. //oParam.callback = "cf_TRLPZ00105";
  402. tranf_submit(oParam);
  403. ds_userinfolist.filter("jobkindcd=='1'");
  404. ds_send.clear();
  405. dsf_createDsRow("ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  406. ,{col : "baseflagcd", val : "'J1', 'J2', 'J3'"}]); // 자문정보(J1), Case to be discussed(J2) 목록 조회
  407. var oParam = {};
  408. oParam.id = "TRLPZ00103";
  409. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  410. oParam.method = "reqGetReasonCodeList";
  411. oParam.inds = "refData=ds_send";
  412. oParam.outds = "ds_resncdlist=refrslt";
  413. oParam.async = false;
  414. //oParam.callback = "cf_TRLPZ00103";
  415. tranf_submit(oParam);
  416. ds_resncdlist.filter("resncd!='ZZZZ'");
  417. var sProp1 = "row=2,cellspacing=4,vcellspacing=0,itemWidth=400,itemHeight=22,overflow='visible'";
  418. cp_checkboxList1.setInitComp(sProp1, FilteredDataset1, "resncd", "resncnts");
  419. var sProp2 = "row=6,cellspacing=4,vcellspacing=0,itemWidth=400,itemHeight=22,overflow='visible'";
  420. cp_checkboxList2.setInitComp(sProp2, FilteredDataset2, "resncd", "resncnts");
  421. var arrParam = [{dsNm: "ds_init_Z0007", cdGrpId: "Z0007"}]
  422. appf_getCodeList(arrParam);
  423. //-------------------
  424. // 자문의사 목록 조회
  425. ds_send.clear();
  426. dsf_createDsRow("ds_send", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  427. ,{col : "delflagcd", val : "0"}
  428. ,{col : "refflag", val : "0"}
  429. ,{col : "refval", val : ""}]);
  430. var oParam = {};
  431. oParam.id = "TRLPC01201";
  432. oParam.service = "plgybaseinfomngtapp.CnstDrCode";
  433. oParam.method = "reqGetCnstDrCodeList";
  434. oParam.inds = "refData=ds_send";
  435. oParam.outds = "ds_cnsltlist=rsltlist";
  436. oParam.async = false;
  437. //oParam.callback = "cf_TRLPC01201";
  438. tranf_submit(oParam);
  439. swt_cnstdrchoi.tabindex = 0;
  440. // 자문결과목록 검색
  441. fGetCnstRsltList();
  442. // 초기값 설정
  443. fExeValInit();
  444. }
  445. //자문정보 초기값 설정 처리 Function
  446. function fExeValInit()
  447. {
  448. Div00.cmb_cnstdg.value = ds_cnstrsltlist.getColumn(0, "cnstdg");
  449. ds_cnstrsltinfo.setColumn(0, "cnstflagcd", "1001");
  450. ds_cnstrsltinfo.setColumn(0, "cnstcasecd", "");
  451. ds_cnstrsltinfo.setColumn(0, "casedcuscd", "");
  452. ds_cnstrsltinfo.setColumn(0, "trsmid", sysf_getUserInfo("userid"));
  453. ds_cnstrsltinfo.setColumn(0, "trsmdd", ds_sysdtinfo.getColumn(0, "sysdd"));
  454. ds_cnstrsltinfo.setColumn(0, "trsmtm", ds_sysdtinfo.getColumn(0, "systm"));
  455. ds_cnstrsltinfo.setColumn(0, "diagdd", ds_sysdtinfo.getColumn(0, "sysdd"));
  456. ds_cnstrsltinfo.setColumn(0, "diagtm", ds_sysdtinfo.getColumn(0, "systm"));
  457. ds_cnstrsltinfo.setColumn(0, "cnsthospcd", sysf_getUserInfo("dutplceinstcd"));
  458. ds_cnstrsltinfo.setColumn(0, "hosoutcnsthospnm", "");
  459. ds_cnstrsltinfo.setColumn(0, "hosoutcnstdrid", "");
  460. ds_cnstrsltinfo.setColumn(0, "hosoutcnstdrnm", "");
  461. ds_cnstrsltinfo.setColumn(0, "estmdiagcnts", ds_cnstrsltlist.getColumn(0, "estmdiagcnts")); //추정진단
  462. ds_cnstrsltinfo.setColumn(0, "estmdiagstat", ds_cnstrsltlist.getColumn(0, "estmdiagstat"));
  463. ds_cnstrsltinfo.setColumn(0, "cnstdiagcnts", ds_cnstrsltlist.getColumn(0, "cnstdiagcnts"));
  464. ds_cnstrsltinfo.setColumn(0, "reqfrminfo", "");
  465. ds_cnstrsltinfo.setColumn(0, "cnstdrid", ds_cnstrsltlist.getColumn(0, "cnstdrnm"));
  466. ds_cnstrsltinfo.setColumn(0, "cnstdrnm", ds_cnstrsltlist.getColumn(0, "cnstdrnm"));
  467. //cp_checkboxList2.setData(utlf_transNullToEmpty(ds_cnstrsltlist.getColumn(0, "casedcuscd").split("▨"), "", false));
  468. cp_checkboxList2.setData(utlf_transNullToEmpty(ds_cnstrsltlist.lookup("cnstflagcd", "1001", "casedcuscd")).split("▨"), "", false);
  469. }
  470. //자문정보 검색 처리 함수
  471. function fGetCnstRsltList()
  472. {
  473. // ds_send.clear();
  474. dsf_createDsRow( "ds_send1", [{col : "instcd", val : sysf_getUserInfo("dutplceinstcd")}
  475. ,{col : "ptno", val : ds_init_patinfo.getColumn(0, "ptno")}]);
  476. var oParam = {};
  477. oParam.id = "TRLPR00301";
  478. oParam.service = "plgyrsltmngtapp.TestRsltRgst";
  479. oParam.method = "reqGetCnstRsltList";
  480. oParam.inds = "reqdata=ds_send1";
  481. oParam.outds = "ds_cnstrsltlist=refrslt";
  482. oParam.async = false;
  483. //oParam.callback = "cf_TRLPR00301";
  484. tranf_submit(oParam);
  485. //------------------------------------------------------------
  486. //if (getNodesetCount("/root/main/cnstrslt/cnstrsltlist") > 0)
  487. if(ds_cnstrsltlist.rowcount > 0)
  488. {
  489. //cmb_cnstdg.select(0);
  490. // copyNodesetType("/root/main/cnstrslt/cnstrsltinfo", "/root/main/cnstrslt/cnstrsltlist[cnstdg='" + model.getValue("/root/main/cnstrslt/cnstrsltinfo/cnstdg") + "']");
  491. }
  492. else
  493. {
  494. //model.makeValue("/root/main/cnstrslt/cnstrsltinfo/instcd", getUserInfo("dutplceinstcd"));
  495. //model.makeValue("/root/main/cnstrslt/cnstrsltinfo/ptno", model.getValue("/root/init/testrslt/patinfo/ptno"));
  496. ds_cnstrsltlist.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  497. ds_cnstrsltlist.setColumn(0, "ptno", ds_init_patinfo.getColumn(0, "ptno"));
  498. }
  499. }
  500. //의뢰지보기
  501. function btn_reqfrm_onclick(obj:Button, e:ClickEventInfo)
  502. {
  503. fGetReqFrmInfo();
  504. }
  505. //처방의뢰지 정보 검색 처리 Function
  506. function fGetReqFrmInfo()
  507. {
  508. var sRwqInfoNode = ds_init_patinfo;
  509. dsf_createDsRow("ds_reqfrminfo", [{col : "pid", val : sRwqInfoNode.getColumn(0, "pid")}
  510. ,{col : "prcpcd", val : opener.frmf_getParameter("SMLPR00100_prcpcd")}
  511. ,{col : "prcpnm", val : opener.frmf_getParameter("SMLPR00100_prcpnm")}
  512. ,{col : "opnm", val : ""}
  513. ,{col : "spccd", val : opener.frmf_getParameter("SMLPR00100_spccd")}
  514. ,{col : "spcnm", val : sRwqInfoNode.getColumn(0, "spcnm")}
  515. ,{col : "reqno", val : opener.frmf_getParameter("SMLPR00100_reqfrmno")}
  516. ,{col : "reqfrmflagcd", val : opener.frmf_getParameter("SMLPR00100_reqfrmflagcd")}
  517. ,{col : "prcpstatcd", val : "430"}
  518. ,{col : "reqhistno", val : "1"}
  519. ,{col : "scrnno", val : "50"}
  520. ,{col : "xrwGBN", val : ""}
  521. ,{col : "prcpdd", val : ""}
  522. ,{col : "execprcpuniqno", val : ""}
  523. ,{col : "workflagcd", val : ""}
  524. ,{col : "bcgbn", val : ""}]);
  525. lpzfExeReqFrmInfo(ds_reqfrminfo, "", "1");
  526. }
  527. //저장
  528. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  529. {
  530. fExeCnstRslt();
  531. }
  532. //자문결과 저장 처리 함수
  533. function fExeCnstRslt()
  534. {
  535. var sCnstFlagCd = ds_cnstrsltinfo.getColumn(0, "cnstflagcd");
  536. // 자문정보는 반드시 1개만 선택되어야 한다.
  537. if (sCnstFlagCd.length > 4 )
  538. {
  539. sysf_messageBox("자문정보는 1개이상 선택", "E001");
  540. return false;
  541. }
  542. // var cnstdrid = ds_cnstrsltinfo.getColumn(0, "cnstdrid");
  543. // var outdrchoi = ds_cnstrsltinfo.getColumn(0, "hosoutcnstdrid");
  544. if (!frmf_isRequiredControls("swt_cnstdrchoi.case_in.cmb_cnstdrid")) return false;
  545. // 의뢰 병리의사 선택여부 검사
  546. if(swt_cnstdrchoi.tabindex == 0)
  547. {
  548. //alert("tabindex == ?");
  549. //if (!frmf_isRequiredControls(new Array("swt_cnstdrchoi.case_in.cmb_cnstdrid"))) //if(utlf_isNull(ds_cnstrsltinfo.getColumn(0, "cnstdrid")))
  550. if(!frmf_isRequiredControls("swt_cnstdrchoi.case_in.cmb_cnstdrid"))
  551. {
  552. return false;
  553. }
  554. }
  555. else if(swt_cnstdrchoi.tabindex == 1)
  556. {
  557. //if (!frmf_isRequiredControls(new Array("swt_cnstdrchoi.case_out.cbo_outdrchoi")))
  558. if(frmf_isRequiredControls("swt_cnstdrchoi.case_in.opt_cnstdrnm"))
  559. {
  560. return false;
  561. }
  562. }
  563. else
  564. {
  565. sysf_messageBox("원내 및 원외를 선택하여 주십시오!", "E000");
  566. return false;
  567. }
  568. //-----------------------------------------------------
  569. yesno = sysf_messageBox("신규로 저장하시겠습니까?", "S002"); // 6:yes, 7:no, 2:cancel
  570. if (yesno == "2") return false;
  571. // dsf_createDs( "ds_send");
  572. // ds_send.copyData(ds_cnstrsltinfo);
  573. // dsf_makeValue(ds_send, "newflagcd", "string", yesno);
  574. // dsf_makeValue(ds_send, "hospnm", "string", sysf_getUserInfo("dutinstnm")); // 의뢰기관명
  575. // dsf_makeValue(ds_send, "trsmdrnm", "string", cmb_trustdrid.value); // 의뢰자명
  576. // dsf_makeValue(ds_send, "incnstdrnm", "string", swt_cnstdrchoi.case_in.cmb_cnstdrid.value); // 원내 자문의명
  577. // dsf_makeValue(ds_send, "outcnstdrnm", "string", swt_cnstdrchoi.case_out.cbo_outdrchoi.value); // 원외 자문의명
  578. // //dsf_makeValue(ds_send, "incnstdrnm", "string", swt_cnstdrchoi.case_out.cbo_outdrchoi.value); // 원외 자문의명
  579. // dsf_makeValue(ds_send, "pid", "string", ds_init_patinfo.getColumn(0, "pid")); // 등록번호
  580. // dsf_makeValue(ds_send, "patnm", "string", ds_init_patinfo.getColumn(0, "patnm")); // 환자명
  581. // dsf_makeValue(ds_send, "cntctelno", "string", ds_cnstrsltinfo.getColumn(0, "estmdiagstat"));
  582. // dsf_makeValue(ds_send, "instcd", "string", ds_hospenvinfo.getColumn(0, "instcd"));
  583. ds_reqdata.setColumn(0, "instcd", ds_hospenvinfo.getColumn(0, "instcd"));
  584. ds_reqdata.setColumn(0, "ptno", ds_init_patinfo.getColumn(0, "ptno"));
  585. ds_reqdata.setColumn(0, "cnstdg", ds_cnstrsltlist.getColumn(0, "cnstdg"));
  586. ds_reqdata.setColumn(0, "cnstflagcd", ds_cnstrsltinfo.getColumn(0, "cnstflagcd"));
  587. ds_reqdata.setColumn(0, "casedcuscd", String(cp_checkboxList2.getData()).replace(",", "▨"));
  588. ds_reqdata.setColumn(0, "trsmdd", ds_cnstrsltinfo.getColumn(0, "trsmdd"));
  589. ds_reqdata.setColumn(0, "trsmtm", ds_cnstrsltinfo.getColumn(0, "trsmtm"));
  590. ds_reqdata.setColumn(0, "trsmid", ds_cnstrsltinfo.getColumn(0, "trsmid"));
  591. ds_reqdata.setColumn(0, "diagdd", ds_cnstrsltinfo.getColumn(0, "diagdd"));
  592. ds_reqdata.setColumn(0, "diagtm", ds_cnstrsltinfo.getColumn(0, "diagtm"));
  593. ds_reqdata.setColumn(0, "cnsthospcd", ds_cnstrsltinfo.getColumn(0, "cnsthospcd"));
  594. ds_reqdata.setColumn(0, "cnstdrid", ds_cnstrsltinfo.getColumn(0, "cnstdrid"));
  595. ds_reqdata.setColumn(0, "hosoutcnsthospnm", ds_cnstrsltinfo.getColumn(0, "hosoutcnsthospnm"));
  596. ds_reqdata.setColumn(0, "hosoutcnstdrid", ds_cnstrsltinfo.getColumn(0, "hosoutcnstdrid"));
  597. ds_reqdata.setColumn(0, "hosoutcnstdrnm", ds_cnstrsltinfo.getColumn(0, "hosoutcnstdrnm"));
  598. ds_reqdata.setColumn(0, "estmdiagcnts", ds_cnstrsltinfo.getColumn(0, "estmdiagcnts"));
  599. ds_reqdata.setColumn(0, "cnstdiagcnts", ds_cnstrsltinfo.getColumn(0, "cnstdiagcnts"));
  600. ds_reqdata.setColumn(0, "mpphonno", ds_userinfolist.getColumn("userid='"+ds_cnstrsltinfo.getColumn(0, "cnstdrid")+"'", "mpphonno"));
  601. ds_reqdata.setColumn(0, "cntctelno", ds_cnsltlist.getColumn("cnstdrid='"+ds_cnstrsltinfo.getColumn(0, "hosoutcnstdrid")+"'", "cntctelno"));
  602. ds_reqdata.setColumn(0, "newflagcd", yesno);
  603. ds_reqdata.setColumn(0, "hospnm",sysf_getUserInfo("dutinstnm")); // 의뢰기관명
  604. ds_reqdata.setColumn(0, "trsmdrnm", ds_cnstrsltinfo.getColumn(0, "diagdd")); // 의뢰자명
  605. ds_reqdata.setColumn(0, "incnstdrnm", swt_cnstdrchoi.case_in.cmb_cnstdrid.value); // 원내 자문의명
  606. ds_reqdata.setColumn(0, "outcnstdrnm", swt_cnstdrchoi.case_out.cbo_outdrchoi.value);// 원외 자문의명
  607. ds_reqdata.setColumn(0, "pid", ds_init_patinfo.getColumn(0, "pid"));
  608. ds_reqdata.setColumn(0, "patnm", ds_init_patinfo.getColumn(0, "patnm"));
  609. ds_reqdata.setColumn(0, "estmdiagstat", ds_cnstrsltinfo.getColumn(0, "estmdiagstat"));
  610. //-----------
  611. if ( yesno == "7")
  612. {
  613. var tcnstdg = ds_cnstrsltinfo.getColumn(0, "cnstdg");
  614. if(utlf_isNull(tcnstdg))
  615. {
  616. sysf_messageBox("자문번호가 있어야 수정저장가능합디다.","I000");
  617. return;
  618. }
  619. else
  620. {
  621. var oParam = {};
  622. oParam.id = "TXLPR00301";
  623. oParam.service = "plgyrsltmngtapp.TestRsltRgst";
  624. oParam.method = "reqExeCnstRslt";
  625. oParam.inds = "reqdata=ds_reqdata";
  626. oParam.async = false;
  627. //oParam.callback = "cf_TXLPR00301";
  628. tranf_submit(oParam);
  629. // this.close();
  630. }
  631. }
  632. else
  633. {
  634. var oParam = {};
  635. oParam.id = "TXLPR00301";
  636. oParam.service = "plgyrsltmngtapp.TestRsltRgst";
  637. oParam.method = "reqExeCnstRslt";
  638. oParam.inds = "reqdata=ds_reqdata";
  639. oParam.async = false;
  640. //oParam.callback = "cf_TXLPR00301";
  641. tranf_submit(oParam);
  642. // this.close();
  643. }
  644. }
  645. function btn_cls_onclick(obj:Button, e:ClickEventInfo)
  646. {
  647. this.close();
  648. }
  649. function Radio00_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  650. {
  651. fExeOutCnstChoi();
  652. }
  653. //원내자문구분 선택 처리 함수
  654. function fExeOutCnstChoi()
  655. {
  656. //var sCnstInfo = model.getValue("/root/main/cnstrslt/cnstrsltinfo/cnstflagcd");
  657. var sCnstInfo = ds_cnstrsltinfo.getColumn(0, "cnstflagcd");
  658. var aCnstInfo = sCnstInfo.split(" ");
  659. //-------------------------
  660. if (aCnstInfo.length > 1)
  661. {
  662. //messageBox("자문정보는 하나만 선택하셔야 합니다!", "E000");
  663. //return false;
  664. //model.setValue("/root/main/cnstrslt/cnstrsltinfo/cnstflagcd", aCnstInfo[1]);
  665. ds_cnstrsltinfo.setColumn(0, "cnstflagcd", aCnstInfo[1]);
  666. //chk_cnstflagcd.refresh();
  667. }
  668. //----------------------------------------------------------------------------
  669. //if (model.getValue("/root/main/cnstrslt/cnstrsltinfo/cnstflagcd") == "1001")
  670. if(ds_cnstrsltinfo.getColumn(0, "cnstflagcd") == "1001")
  671. {
  672. swt_cnstdrchoi.tabindex = 0;
  673. ds_cnstrsltinfo.setColumn(0, "hosoutcnsthospnm", "");
  674. ds_cnstrsltinfo.setColumn(0, "hosoutcnstdrid", "");
  675. ds_cnstrsltinfo.setColumn(0, "hosoutcnstdrnm", "");
  676. }
  677. else
  678. {
  679. swt_cnstdrchoi.tabindex = 1;
  680. ds_cnstrsltinfo.setColumn(0, "cnsthospcd", "");
  681. ds_cnstrsltinfo.setColumn(0, "cnstdrid", "");
  682. ds_cnstrsltinfo.setColumn(0, "cnstdrnm", "");
  683. }
  684. }
  685. function swt_cnstdrchoi_case_out_cbo_outdrchoi_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  686. {
  687. fExeCnstOutDrChange();
  688. }
  689. //외부 자문의사 변경 처리 함수
  690. function fExeCnstOutDrChange()
  691. {
  692. //var strNode = "/root/main/cnstrslt/cnstrsltinfo";
  693. var strNode = ds_cnstrsltinfo;
  694. //var sDrID = model.getValue("/root/main/cnstrslt/cnstrsltinfo/hosoutcnstdrid");
  695. var sDrID =ds_cnstrsltinfo.getColumn(ds_cnstrsltinfo.rowposition, "hosoutcnstdrid");
  696. //model.makeValue(strNode+"/hosoutcnsthospnm", model.getValue("/root/init/cnstdr/cnsltlist[cnstdrid='" + sDrID + "']/hospnm"));
  697. strNode.setColumn(0, "hosoutcnsthospnm", ds_cnsltlist.getColumn("cnstdrid='"+sDrID+"'", "hospnm"));
  698. //model.makeValue(strNode+"/hosoutcnstdrnm", model.getValue("/root/init/cnstdr/cnsltlist[cnstdrid='" + sDrID + "']/cnstdrnm"));
  699. //if ( model.getValue(strNode+"/hosoutcnsthospnm") == "기타")
  700. if(strNode.getColumn(0, "hosoutcnsthospnm") == "기타")
  701. {
  702. //model.toggle ("case_edit");
  703. }
  704. }
  705. function cmb_cnstdg_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  706. {
  707. fExeDgChange();
  708. }
  709. //자문결과 차수변경 처리 함수
  710. function fExeDgChange()
  711. {
  712. var cnstdg = Div00.cmb_cnstdg.value;
  713. trace("cnstdg="+cnstdg);
  714. //copyNodesetType("/root/main/cnstrslt/cnstrsltinfo", "/root/main/cnstrslt/cnstrsltlist[cnstdg='" + model.getValue("/root/main/cnstrslt/cnstrsltinfo/cnstdg") + "']");
  715. //ds_cnstrsltinfo.copyData(ds_cnstrsltlist.getColumn("cnstdg == '" + ds_cnstrsltinfo.getColumn(cn
  716. //ds_cnstrsltinfo.lookupExpr("cnstdg=='" + ds_cnstrsltinfo.lookup
  717. //ds_cnstrsltinfo.copyData(ds_cnstrsltlist.lookupExpr("cnstdg == '" + ds_cnstrsltlist.getColumn(0, "cnstdg") + "'" ));
  718. ds_cnstrsltlist.lookupExpr("cnstdg =='"+cnstdg+"'" , "cnstdg");
  719. //ds_cnstrsltinfo.copyData(ds_cnstrsltlist);
  720. //fExeOutCnstChoi();
  721. }
  722. //원내자문구분 선택 처리 함수
  723. // function fExeOutCnstChoi()
  724. // {
  725. // //var sCnstInfo = model.getValue("/root/main/cnstrslt/cnstrsltinfo/cnstflagcd");
  726. // var sCnstInfo = ds_cnstrsltinfo.getColumn(0, "cnstflagcd");
  727. // var aCnstInfo = sCnstInfo.split(" ");
  728. //
  729. // //-------------------------
  730. // if (aCnstInfo.length > 1)
  731. // {
  732. // //messageBox("자문정보는 하나만 선택하셔야 합니다!", "E000");
  733. // //return false;
  734. // //model.setValue("/root/main/cnstrslt/cnstrsltinfo/cnstflagcd", aCnstInfo[1]);
  735. // ds_cnstrsltinfo.setColumn(0, "cnstflagcd", sCnstInfo[1]);
  736. // //chk_cnstflagcd.refresh();
  737. // }
  738. //
  739. // //----------------------------------------------------------------------------
  740. // //if (model.getValue("/root/main/cnstrslt/cnstrsltinfo/cnstflagcd") == "1001")
  741. // if(ds_cnstrsltinfo.getColumn(0, "cnstflagcd") == "1001")
  742. // {
  743. // //model.toggle("case_in");
  744. //
  745. // //btn_incnst.selected = true;
  746. //
  747. // // model.makeValue("/root/main/cnstrslt/cnstrsltinfo/hosoutcnsthospnm", "");
  748. // // model.makeValue("/root/main/cnstrslt/cnstrsltinfo/hosoutcnstdrid", "");
  749. // // model.makeValue("/root/main/cnstrslt/cnstrsltinfo/hosoutcnstdrnm", "");
  750. //
  751. // ds_cnstrsltinfo.setColumn(0, "hosoutcnsthospnm", "");
  752. // ds_cnstrsltinfo.setColumn(0, "hosoutcnstdrid", "");
  753. // ds_cnstrsltinfo.setColumn(0, "hosoutcnstdrnm", "");
  754. //
  755. // //opt_hosoutcnsthospnm.refresh();
  756. // //cbo_outdrchoi.refresh();
  757. // }
  758. // else
  759. // {
  760. // //model.toggle("case_out");
  761. // //btn_outcnst.selected = true;
  762. //
  763. // //model.makeValue("/root/main/cnstrslt/cnstrsltinfo/cnsthospcd", "");
  764. // //model.makeValue("/root/main/cnstrslt/cnstrsltinfo/cnstdrid", "");
  765. // //model.makeValue("/root/main/cnstrslt/cnstrsltinfo/cnstdrnm", "");
  766. // ds_cnstrsltinfo.setColumn(0, "cnsthospcd", "");
  767. // ds_cnstrsltinfo.setColumn(0, "cnstdrid", "");
  768. // ds_cnstrsltinfo.setColumn(0, "cnstdrnm", "");
  769. //
  770. // //cmb_cnsthospcd.refresh();
  771. // //cmb_cnstdrid.refresh();
  772. // //opt_cnstdrnm.refresh();
  773. // }
  774. //}]]></Script>
  775. </Form>
  776. </FDL>