SMPID31200_적정성평가조회.xfdl 36 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPPI01100" position="absolute 0 0 1167 733" titletext="청구 적정성평가 조회" oninit="SMPPI01100_oninit" onload="SMPPI01100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 26 1161 732" id="grp_biz" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout width="1161" height="706">
  10. <Grid position="absolute 0 86 1160 698" id="grd_dpcdlist" class="datagrid3" binddataset="ds_grd_dpcdlist" autofittype="none" anchor="all" cellsizingtype="both" autoenter="select" cellclickbound="cell" cellmovingtype="col" autosizingtype="row" extendsizetype="row">
  11. <Formats>
  12. <Format id="default">
  13. <Columns>
  14. <Column size="25" band="left"/>
  15. <Column size="65" band="left"/>
  16. <Column size="80" band="left"/>
  17. <Column size="75"/>
  18. <Column size="80"/>
  19. <Column size="80"/>
  20. <Column size="80"/>
  21. <Column size="105"/>
  22. <Column size="75"/>
  23. <Column size="30"/>
  24. <Column size="40"/>
  25. <Column size="40"/>
  26. <Column size="80"/>
  27. <Column size="65"/>
  28. <Column size="35"/>
  29. <Column size="35"/>
  30. <Column size="35"/>
  31. <Column size="35"/>
  32. <Column size="35"/>
  33. <Column size="35"/>
  34. <Column size="35"/>
  35. <Column size="35"/>
  36. <Column size="35"/>
  37. <Column size="35"/>
  38. <Column size="75"/>
  39. <Column size="100"/>
  40. <Column size="80"/>
  41. <Column size="80"/>
  42. <Column size="80"/>
  43. <Column size="80"/>
  44. <Column size="75"/>
  45. <Column size="75"/>
  46. <Column size="50"/>
  47. <Column size="30"/>
  48. <Column size="40"/>
  49. <Column size="0"/>
  50. <Column size="0"/>
  51. </Columns>
  52. <Rows>
  53. <Row size="22" band="head"/>
  54. <Row size="38" band="head"/>
  55. <Row size="24"/>
  56. </Rows>
  57. <Band id="head">
  58. <Cell rowspan="2" taborder="undefined"/>
  59. <Cell col="1" rowspan="2" text="환자번호" taborder="undefined"/>
  60. <Cell col="2" rowspan="2" text="환자명" taborder="undefined"/>
  61. <Cell col="3" rowspan="2" text="진료개시일" taborder="undefined"/>
  62. <Cell col="4" colspan="2" text="expr:getGrdCaption('pvod1') + ' 평가기간내처방'" taborder="undefined"/>
  63. <Cell col="6" colspan="2" text="expr:getGrdCaption('pvod1') + ' 평가기간내처방(원외)'" taborder="undefined"/>
  64. <Cell col="8" rowspan="2" text="진단코드" taborder="undefined"/>
  65. <Cell col="9" rowspan="2" text="사망&#13;&#10;유무" taborder="undefined"/>
  66. <Cell col="10" rowspan="2" text="성별" taborder="undefined"/>
  67. <Cell col="11" rowspan="2" text="나이" taborder="undefined"/>
  68. <Cell col="12" rowspan="2" displaytype="normal" text="진료과" taborder="undefined"/>
  69. <Cell col="13" rowspan="2" displaytype="normal" text="진료의" taborder="undefined"/>
  70. <Cell col="14" colspan="2" text="expr:getGrdCaption('pvod2')" taborder="undefined"/>
  71. <Cell col="16" colspan="2" text="expr:getGrdCaption('pvod3')" taborder="undefined"/>
  72. <Cell col="18" colspan="2" text="expr:getGrdCaption('pvod4')" taborder="undefined"/>
  73. <Cell col="20" colspan="2" text="expr:getGrdCaption('pvod5')" taborder="undefined"/>
  74. <Cell col="22" colspan="2" text="expr:getGrdCaption('pvod6')" taborder="undefined"/>
  75. <Cell col="24" rowspan="2" text="호흡기내과&#13;&#10;진료예약일" taborder="undefined"/>
  76. <Cell col="25" rowspan="2" text="알래르기감염내과&#13;&#10;진료예약일" taborder="undefined"/>
  77. <Cell col="26" colspan="2" text="expr:getGrdCaption('pvod1') + ' 적용기간내처방'" taborder="undefined"/>
  78. <Cell col="28" colspan="2" text="expr:getGrdCaption('pvod1') + ' 적용기간내처방(원외)'" taborder="undefined"/>
  79. <Cell col="30" rowspan="2" text="입원일자" taborder="undefined"/>
  80. <Cell col="31" rowspan="2" text="퇴원일자" taborder="undefined"/>
  81. <Cell col="32" rowspan="2" text="청구년월" taborder="undefined"/>
  82. <Cell col="33" rowspan="2" displaytype="normal" text="입원&#13;&#10;일수" taborder="undefined"/>
  83. <Cell col="34" rowspan="2" text="청구&#13;&#10;차수" taborder="undefined"/>
  84. <Cell col="35" rowspan="2" text="순번" taborder="undefined"/>
  85. <Cell col="36" rowspan="2" text="valucd" taborder="undefined"/>
  86. <Cell row="1" col="4" text="실시일자" taborder="undefined"/>
  87. <Cell row="1" col="5" text="처방코드"/>
  88. <Cell row="1" col="6" text="실시일자" taborder="undefined"/>
  89. <Cell row="1" col="7" text="처방코드"/>
  90. <Cell row="1" col="14" text="원내" taborder="undefined"/>
  91. <Cell row="1" col="15" text="원외" taborder="undefined"/>
  92. <Cell row="1" col="16" text="원내" taborder="undefined"/>
  93. <Cell row="1" col="17" text="원외" taborder="undefined"/>
  94. <Cell row="1" col="18" text="원내" taborder="undefined"/>
  95. <Cell row="1" col="19" text="원외" taborder="undefined"/>
  96. <Cell row="1" col="20" text="원내" taborder="undefined"/>
  97. <Cell row="1" col="21" text="원외" taborder="undefined"/>
  98. <Cell row="1" col="22" text="원내" taborder="undefined"/>
  99. <Cell row="1" col="23" text="원외" taborder="undefined"/>
  100. <Cell row="1" col="26" text="실시일자"/>
  101. <Cell row="1" col="27" text="처방코드" taborder="undefined"/>
  102. <Cell row="1" col="28" text="실시일자"/>
  103. <Cell row="1" col="29" text="처방코드" taborder="undefined"/>
  104. </Band>
  105. <Band id="body">
  106. <Cell celltype="head" expr="currow+1"/>
  107. <Cell col="1" displaytype="normal" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:pid" suppress="1" suppressalign="middle,over"/>
  108. <Cell col="2" displaytype="normal" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:patnm" suppress="2" suppressalign="middle,over"/>
  109. <Cell col="3" displaytype="date" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:ordfromdd"/>
  110. <Cell col="4" displaytype="expr:utlf_isNull(pvod6_execdd) ? 'text' : 'date'" style="align:center middle;" text="bind:pvod6_execdd" suppress="3" suppressalign="middle,over" autosizerow="limitmin"/>
  111. <Cell col="5" style="align:left middle;" text="bind:pvod6_prcpcd" suppress="3" suppressalign="middle,over"/>
  112. <Cell col="6" displaytype="expr:utlf_isNull(pvod6_p_execdd) ? 'text' : 'date'" style="align:center middle;" text="bind:pvod6_p_execdd" suppress="3" suppressalign="middle,over" autosizerow="limitmin"/>
  113. <Cell col="7" style="align:left middle;" text="bind:pvod6_p_prcpcd" suppress="3" suppressalign="middle,over"/>
  114. <Cell col="8" displaytype="normal" style="align:left middle;background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:diagcd"/>
  115. <Cell col="9" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:dethyn"/>
  116. <Cell col="10" text="bind:gender"/>
  117. <Cell col="11" text="bind:patage"/>
  118. <Cell col="12" displaytype="combo" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:orddeptcd" combodataset="ds_init_orddeptcdlist" combocodecol="cd" combodatacol="nm"/>
  119. <Cell col="13" displaytype="combo" style="align:center;background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:orddrid" combodataset="ds_init_orddridlist" combocodecol="cd" combodatacol="nm"/>
  120. <Cell col="14" text="bind:pvod4_i"/>
  121. <Cell col="15" text="bind:pvod4_o"/>
  122. <Cell col="16" text="bind:pvod5_i"/>
  123. <Cell col="17" text="bind:pvod5_o"/>
  124. <Cell col="18" text="bind:pvod6_i"/>
  125. <Cell col="19" text="bind:pvod6_o"/>
  126. <Cell col="20" text="bind:pvod7_i"/>
  127. <Cell col="21" text="bind:pvod7_o"/>
  128. <Cell col="22" text="bind:pvod8_i"/>
  129. <Cell col="23" text="bind:pvod8_o"/>
  130. <Cell col="24" displaytype="expr:utlf_isNull(next_ordd) ? 'text' : 'date'" text="bind:next_ordd" suppress="4" suppressalign="middle,over"/>
  131. <Cell col="25" displaytype="expr:utlf_isNull(next2_ordd) ? 'text' : 'date'" text="bind:next2_ordd" suppress="4" suppressalign="middle,over"/>
  132. <Cell col="26" displaytype="expr:utlf_isNull(pvod3_execdd) ? 'text' : 'date'" text="bind:pvod3_execdd" suppress="5" suppressalign="middle,over" autosizerow="limitmin"/>
  133. <Cell col="27" style="align:left middle;" text="bind:pvod3_prcpcd" suppress="5" suppressalign="middle,over" autosizerow="limitmin"/>
  134. <Cell col="28" displaytype="expr:utlf_isNull(pvod3_p_execdd) ? 'text' : 'date'" text="bind:pvod3_p_execdd" suppress="5" suppressalign="middle,over" autosizerow="limitmin"/>
  135. <Cell col="29" style="align:left middle;" text="bind:pvod3_p_prcpcd" suppress="5" suppressalign="middle,over" autosizerow="limitmin"/>
  136. <Cell col="30" displaytype="date" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:indd"/>
  137. <Cell col="31" displaytype="date" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:dschdd"/>
  138. <Cell col="32" displaytype="date" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:clamym" mask="yyyy-MM"/>
  139. <Cell col="33" displaytype="normal" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:chosindayno"/>
  140. <Cell col="34" displaytype="text" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:clamdg"/>
  141. <Cell col="35" displaytype="normal" style="background:EXPR(opprvn == 'Y' ? 'moccasin' : '');background2:EXPR(opprvn == 'Y' ? 'moccasin' : '');barcolor:moccasin;" text="bind:pidsn"/>
  142. <Cell col="36" text="bind:valucd"/>
  143. </Band>
  144. </Format>
  145. </Formats>
  146. </Grid>
  147. <Static text="청구 적정성평가 조회" position="absolute 0 65 174 80" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
  148. <Shape position="absolute 0 81 1160 87" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  149. <Div position="absolute 0 0 1160 58" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
  150. <Layouts>
  151. <Layout width="1160" height="40">
  152. <Button position="absolute 1095 10 1151 32" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
  153. <Shape position="absolute 1077 5 1083 38" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
  154. <Static text="평가대상기간 :" position="absolute 224 11 322 28" id="caption2" class="search_name" anchor="default" onclick="grp_biz_group1_caption2_onclick"/>
  155. <Calendar position="absolute 324 10 439 29" id="ipt_fromdd" enable="true" mask="yyyy-mm-dd" anchor="default" onkeydown="grp_biz_group1_input2_onkeydown" oneditclick="grp_biz_group1_ipt_fromdd_oneditclick" onkeyup="grp_biz_group1_ipt_fromdd_onkeyup" onchanged="grp_biz_group1_ipt_fromdd_onchanged" autoselect="true"/>
  156. <Calendar id="ipt_todd" taborder="33" onkeydown="grp_biz_group1_input2_onkeydown" position="absolute 463 10 578 29" mask="yyyy-mm-dd" onkeyup="grp_biz_group1_ipt_todd_onkeyup" autoselect="true" anchor="default"/>
  157. <Static id="Static00" text="~" position="absolute 442 9 460 29" style="align:center middle;" anchor="default"/>
  158. <Static id="caption00" text="구분 :" class="search_name" position="absolute 8 11 71 28" visible="true" anchor="default" onclick="grp_biz_group1_caption00_onclick"/>
  159. <Combo id="Combo00" taborder="34" codecolumn="valucd" datacolumn="valunm" position="absolute 72 10 213 30" visible="true" innerdataset="@ds_hidden_obpvlist" onitemchanged="grp_biz_group1_Combo00_onitemchanged" anchor="default">
  160. <Dataset id="innerdataset">
  161. <ColumnInfo>
  162. <Column id="codecolumn" size="256"/>
  163. <Column id="datacolumn" size="256"/>
  164. </ColumnInfo>
  165. <Rows>
  166. <Row>
  167. <Col id="codecolumn"/>
  168. <Col id="datacolumn">전체</Col>
  169. </Row>
  170. <Row>
  171. <Col id="codecolumn">A</Col>
  172. <Col id="datacolumn">재원</Col>
  173. </Row>
  174. <Row>
  175. <Col id="codecolumn">D</Col>
  176. <Col id="datacolumn">퇴원</Col>
  177. </Row>
  178. </Rows>
  179. </Dataset>
  180. </Combo>
  181. <Edit id="ipt_pid" taborder="35" position="absolute 667 10 767 30" onkeydown="grp_biz_group1_ipt_pid_onkeydown" autoselect="true" anchor="default"/>
  182. <Static id="caption01" text="환자번호 :" class="search_name" position="absolute 589 12 670 29" anchor="default"/>
  183. <Static id="caption03" text="진료과 :" class="search_name" position="absolute 8 34 75 51" anchor="default"/>
  184. <Combo id="cmb_orddeptcd" taborder="36" innerdataset="ds_init_orddeptcdlist" codecolumn="cd" datacolumn="nm" position="absolute 72 33 213 53" anchor="default">
  185. <Dataset id="innerdataset">
  186. <ColumnInfo>
  187. <Column id="codecolumn" size="256"/>
  188. <Column id="datacolumn" size="256"/>
  189. </ColumnInfo>
  190. <Rows>
  191. <Row>
  192. <Col id="codecolumn"/>
  193. <Col id="datacolumn">전체</Col>
  194. </Row>
  195. <Row>
  196. <Col id="codecolumn">A</Col>
  197. <Col id="datacolumn">재원</Col>
  198. </Row>
  199. <Row>
  200. <Col id="codecolumn">D</Col>
  201. <Col id="datacolumn">퇴원</Col>
  202. </Row>
  203. </Rows>
  204. </Dataset>
  205. </Combo>
  206. <Static id="caption04" text="예약진료일자 :" onclick="grp_biz_group1_caption2_onclick" class="search_name" position="absolute 224 35 325 52"/>
  207. <Calendar id="ipt_fromdd00" taborder="37" autoselect="true" position="absolute 324 34 439 53" mask="yyyy-mm-dd"/>
  208. <Static id="Static01" text="~" position="absolute 442 33 460 53" style="align:center middle;"/>
  209. <Calendar id="ipt_todd00" taborder="38" autoselect="true" position="absolute 463 34 578 53" mask="yyyy-mm-dd"/>
  210. <CheckBox id="CheckBox01" taborder="39" text="실시간조회" value="N" truevalue="Y" falsevalue="N" position="absolute 978 6 1067 26" anchor="left top"/>
  211. </Layout>
  212. </Layouts>
  213. </Div>
  214. <Button position="absolute 1080 61 1160 80" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excelsave_onclick"/>
  215. <Static id="Static00" text="※ 더블Click 시 외래진료예약화면을 바로 보실수 있습니다. " position="absolute 192 62 566 82" style="font:Dotum,9,bold;" onclick="grp_biz_Static00_onclick"/>
  216. <Button id="button1" taborder="1" text="대상자수집 실행" onclick="grp_biz_button1_onclick" class="btn4" position="absolute 955 61 1079 80" anchor="top right"/>
  217. <Button id="btn_cretrslt" taborder="2" text="생성로그확인" onclick="grp_biz_btn_cretrslt_onclick" class="btn2" position="absolute 857 61 954 80" anchor="top right" style="align:center ;"/>
  218. <Button id="Button00" taborder="3" text="외래진료예약 조회" position="absolute 572 61 704 80" class="btn3" onclick="grp_biz_Button00_onclick"/>
  219. <Button id="Button02" taborder="4" text="미시행처방조회" position="absolute 706 61 822 80" class="btn3" onclick="grp_biz_Button02_onclick"/>
  220. </Layout>
  221. </Layouts>
  222. </Div>
  223. <Static id="cap_title" text="청구 적정성평가 조회" class="tit_1" position="absolute 0 0 272 26"/>
  224. </Layout>
  225. </Layouts>
  226. <Objects>
  227. <Dataset id="ds_grd_dpcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_dpcdlist_oncolumnchanged">
  228. <ColumnInfo>
  229. <Column id="instcd" type="STRING" size="255"/>
  230. <Column id="clamym" type="STRING" size="255"/>
  231. <Column id="clamdg" type="BIGDECIMAL" size="255"/>
  232. <Column id="pid" type="STRING" size="255"/>
  233. <Column id="pidsn" type="BIGDECIMAL" size="255"/>
  234. <Column id="patnm" type="STRING" size="255"/>
  235. <Column id="indd" type="STRING" size="255"/>
  236. <Column id="dschdd" type="STRING" size="255"/>
  237. <Column id="orddeptcd" type="STRING" size="255"/>
  238. <Column id="orddrid" type="STRING" size="255"/>
  239. <Column id="opdd" type="STRING" size="255"/>
  240. <Column id="opcd" type="STRING" size="255"/>
  241. <Column id="drgtype" type="STRING" size="255"/>
  242. <Column id="drgno" type="STRING" size="255"/>
  243. <Column id="drgnm" type="STRING" size="255"/>
  244. <Column id="clamno" type="STRING" size="255"/>
  245. <Column id="acptno" type="STRING" size="255"/>
  246. <Column id="docuseqno" type="STRING" size="255"/>
  247. <Column id="chosindayno" type="BIGDECIMAL" size="255"/>
  248. <Column id="diagcd" type="STRING" size="255"/>
  249. <Column id="diagnm" type="STRING" size="255"/>
  250. <Column id="diagcd1" type="STRING" size="255"/>
  251. <Column id="diagnm1" type="STRING" size="255"/>
  252. <Column id="diagcd2" type="STRING" size="255"/>
  253. <Column id="diagnm2" type="STRING" size="255"/>
  254. <Column id="diagcd3" type="STRING" size="255"/>
  255. <Column id="diagnm3" type="STRING" size="255"/>
  256. <Column id="obgy" type="STRING" size="255"/>
  257. <Column id="obgy_1" type="STRING" size="255"/>
  258. <Column id="obgy_2" type="STRING" size="255"/>
  259. <Column id="mach" type="STRING" size="255"/>
  260. <Column id="mul" type="STRING" size="255"/>
  261. <Column id="su" type="STRING" size="255"/>
  262. <Column id="tu" type="STRING" size="255"/>
  263. <Column id="ma" type="STRING" size="255"/>
  264. <Column id="ma_1" type="STRING" size="255"/>
  265. <Column id="ma_2" type="STRING" size="255"/>
  266. <Column id="gam" type="STRING" size="255"/>
  267. <Column id="hab" type="STRING" size="255"/>
  268. <Column id="hab_1" type="STRING" size="255"/>
  269. <Column id="hab_2" type="STRING" size="255"/>
  270. <Column id="dschyn" type="STRING" size="255"/>
  271. <Column id="dsch_1" type="STRING" size="255"/>
  272. <Column id="dschchk" type="STRING" size="255"/>
  273. <Column id="dschchk_1" type="STRING" size="255"/>
  274. <Column id="dschchk_2" type="STRING" size="255"/>
  275. <Column id="dschchk_4" type="STRING" size="255"/>
  276. <Column id="dschchk_5" type="STRING" size="255"/>
  277. <Column id="recrslta" type="STRING" size="255"/>
  278. <Column id="tnsmyn" type="STRING" size="255"/>
  279. </ColumnInfo>
  280. </Dataset>
  281. <Dataset id="ds_grd_bfaclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  282. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  283. <ColumnInfo>
  284. <Column id="valucd" type="STRING" size="256"/>
  285. <Column id="clamymfrom" type="STRING" size="256"/>
  286. <Column id="clamymto" type="STRING" size="256"/>
  287. <Column id="pid" type="STRING" size="256"/>
  288. <Column id="orddeptcd" type="STRING" size="256"/>
  289. <Column id="ordfromdd" type="STRING" size="256"/>
  290. <Column id="ordtodd" type="STRING" size="256"/>
  291. <Column id="realyn" type="STRING" size="256"/>
  292. </ColumnInfo>
  293. <Rows>
  294. <Row>
  295. <Col id="pid"/>
  296. <Col id="valucd"/>
  297. </Row>
  298. </Rows>
  299. </Dataset>
  300. <Dataset id="ds_grd_cmb_mach" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  301. <ColumnInfo>
  302. <Column id="cd" type="STRING" size="256"/>
  303. <Column id="nm" type="STRING" size="256"/>
  304. </ColumnInfo>
  305. <Rows>
  306. <Row>
  307. <Col id="cd">1</Col>
  308. <Col id="nm">전신마취</Col>
  309. </Row>
  310. <Row>
  311. <Col id="cd">2</Col>
  312. <Col id="nm">부위마취(척추마취및 기타 부위마취 포함)</Col>
  313. </Row>
  314. <Row>
  315. <Col id="cd">3</Col>
  316. <Col id="nm">국소마취</Col>
  317. </Row>
  318. </Rows>
  319. </Dataset>
  320. <Dataset id="ds_grd_cmb_dsch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  321. <ColumnInfo>
  322. <Column id="cd" type="STRING" size="256"/>
  323. <Column id="nm" type="STRING" size="256"/>
  324. </ColumnInfo>
  325. <Rows>
  326. <Row>
  327. <Col id="cd">1</Col>
  328. <Col id="nm">의학적 권고에 반하는 퇴원</Col>
  329. </Row>
  330. <Row>
  331. <Col id="cd">2</Col>
  332. <Col id="nm">타 의료기관으로의 응급전원</Col>
  333. </Row>
  334. <Row>
  335. <Col id="nm">타 의료기관으로의 기타전원</Col>
  336. <Col id="cd">3</Col>
  337. </Row>
  338. <Row>
  339. <Col id="cd">4</Col>
  340. <Col id="nm">사망</Col>
  341. </Row>
  342. </Rows>
  343. </Dataset>
  344. <Dataset id="ds_init_hardcd5908" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  345. <Dataset id="ds_init_hardcd5904" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  346. <Dataset id="ds_hidden_obpvlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  347. <Dataset id="ds_init_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  348. </Objects>
  349. <Bind>
  350. <BindItem id="item3" compid="grp_biz.group1.Combo00" propid="value" datasetid="ds_send" columnid="valucd"/>
  351. <BindItem id="item0" compid="grp_biz.group1.ipt_fromdd" propid="value" datasetid="ds_send" columnid="clamymfrom"/>
  352. <BindItem id="item1" compid="grp_biz.group1.ipt_todd" propid="value" datasetid="ds_send" columnid="clamymto"/>
  353. <BindItem id="item2" compid="grp_biz.group1.ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
  354. <BindItem id="item4" compid="grp_biz.group1.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
  355. <BindItem id="item5" compid="grp_biz.group1.ipt_fromdd00" propid="value" datasetid="ds_send" columnid="ordfromdd"/>
  356. <BindItem id="item6" compid="grp_biz.group1.ipt_todd00" propid="value" datasetid="ds_send" columnid="ordtodd"/>
  357. <BindItem id="item7" compid="grp_biz.group1.CheckBox01" propid="value" datasetid="ds_send" columnid="realyn"/>
  358. </Bind>
  359. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  360. * System Name :
  361. * Job Name :
  362. * Creator :
  363. * Make Date : 2016-05-24
  364. * Description :
  365. *---------------------------------------------------------------------------------------
  366. * Modify Date Modifier Modify Description
  367. *---------------------------------------------------------------------------------------
  368. * 2016-05-24 Live Converter TF->XP
  369. *
  370. *---------------------------------------------------------------------------------------
  371. ****************************************************************************************/
  372. include "com_commonxp::comm_main.xjs";
  373. include "pam_pamcomnxp::PAM001.xjs";
  374. include "pam_pamcomnxp::PAM.xjs";
  375. var lgv_hscroll_pos = 0;
  376. var lgv_vscroll_pos = 0;
  377. function SMPPI01100_oninit(obj:Form, e:InitEventInfo)
  378. {
  379. frmf_initForm(obj)
  380. }
  381. function SMPPI01100_onload(obj:Form, e:LoadEventInfo)
  382. {
  383. grdf_initGrid(grp_biz.grd_dpcdlist);
  384. grdf_setToolTipBind(grp_biz.grd_dpcdlist);
  385. //grdf_setRowTypeIcon(grp_biz.grd_dpcdlist, 0);
  386. fInitialize();
  387. }
  388. function fInitialize(){
  389. var fromdd = utlf_getCurrentDate();
  390. fromdd = fromdd.toDate().getAddDate(-1, "Y").getDateFormat();
  391. ds_send.setColumn(0,"clamymfrom", String(fromdd).substr(0,4) + "0501");
  392. ds_send.setColumn(0,"clamymto", utlf_getCurrentDate());
  393. pamGetDeptCDDrIDList();
  394. frmf_addComboItem("grp_biz.group1.cmb_orddeptcd","전체","","below");
  395. lf_search();
  396. }
  397. function lf_search() {
  398. var oParam = {};
  399. oParam.id = "TRPID31100";
  400. oParam.service = "aftjudgapp.InAftJudgTrgtMan";
  401. oParam.method = "reqGetPidmobpvList";
  402. oParam.inds = "req=ds_send";
  403. oParam.outds = "ds_hidden_obpvlist=obpv";
  404. oParam.async = false;
  405. //oParam.callback = "cf_TRPID20202";
  406. tranf_submit(oParam);
  407. }
  408. function cf_TRPPI01001(sSvcId, nErrorCode, sErrorMsg) {
  409. if(nErrorCode < 0) return;
  410. }
  411. function fGetDocuList(){
  412. lgv_hscroll_pos = grp_biz.grd_dpcdlist.hscrollbar.pos;
  413. lgv_vscroll_pos = grp_biz.grd_dpcdlist.vscrollbar.pos;
  414. var oParam = {};
  415. oParam.id = "TRPPI01300";
  416. oParam.service = "aftjudgapp.InAftJudgTrgtMan";
  417. oParam.method = "reqGetPvList";
  418. oParam.inds = "req=ds_send";
  419. oParam.outds = "ds_grd_dpcdlist=pv";
  420. oParam.async = false;
  421. oParam.callback = "cf_TRPPI01300";
  422. tranf_submit(oParam);
  423. ds_grd_dpcdlist.updatecontrol = false;
  424. ds_grd_dpcdlist.enableevent = false;
  425. ds_grd_dpcdlist.addColumn("pvod3_execdd","string",255);
  426. ds_grd_dpcdlist.addColumn("pvod3_prcpcd","string",255);
  427. ds_grd_dpcdlist.addColumn("pvod3_p_execdd","string",255);
  428. ds_grd_dpcdlist.addColumn("pvod3_p_prcpcd","string",255);
  429. ds_grd_dpcdlist.addColumn("pvod6_execdd","string",255);
  430. ds_grd_dpcdlist.addColumn("pvod6_prcpcd","string",255);
  431. ds_grd_dpcdlist.addColumn("pvod6_p_execdd","string",255);
  432. ds_grd_dpcdlist.addColumn("pvod6_p_prcpcd","string",255);
  433. for (var i=0; i < ds_grd_dpcdlist.rowcount; i++){
  434. ds_grd_dpcdlist.setColumn(i,"pvod3_execdd", String(ds_grd_dpcdlist.getColumn(i,"pvod3")).split("|")[0] );
  435. ds_grd_dpcdlist.setColumn(i,"pvod3_prcpcd", String(ds_grd_dpcdlist.getColumn(i,"pvod3")).split("|")[1] );
  436. ds_grd_dpcdlist.setColumn(i,"pvod3_p_execdd", String(ds_grd_dpcdlist.getColumn(i,"pvod3_p")).split("|")[0] );
  437. ds_grd_dpcdlist.setColumn(i,"pvod3_p_prcpcd", String(ds_grd_dpcdlist.getColumn(i,"pvod3_p")).split("|")[1] );
  438. ds_grd_dpcdlist.setColumn(i,"pvod6_execdd", String(ds_grd_dpcdlist.getColumn(i,"pvod6")).split("|")[0] );
  439. ds_grd_dpcdlist.setColumn(i,"pvod6_prcpcd", String(ds_grd_dpcdlist.getColumn(i,"pvod6")).split("|")[1] );
  440. ds_grd_dpcdlist.setColumn(i,"pvod6_p_execdd", String(ds_grd_dpcdlist.getColumn(i,"pvod6_p")).split("|")[0] );
  441. ds_grd_dpcdlist.setColumn(i,"pvod6_p_prcpcd", String(ds_grd_dpcdlist.getColumn(i,"pvod6_p")).split("|")[1] );
  442. }
  443. ds_grd_dpcdlist.enableevent = true;
  444. ds_grd_dpcdlist.updatecontrol = true;
  445. }
  446. function cf_TRPPI01300(sSvcId, nErrorCode, sErrorMsg) {
  447. if(nErrorCode < 0) {return};
  448. // ds_grd_dpcdlist.updatecontrol = false;
  449. // for (var i=0, rowcnt= ds_grd_dpcdlist.rowcount; i < rowcnt; i++) {
  450. //
  451. // if (ds_grd_dpcdlist.getColumn(i,"flag") == "I") {
  452. // ds_grd_dpcdlist.setRowType(i, 2)
  453. // } else {
  454. // ds_grd_dpcdlist.setRowType(i, 1)
  455. // }
  456. // }
  457. // ds_grd_dpcdlist.updatecontrol = true;
  458. grp_biz.grd_dpcdlist.hscrollbar.pos = lgv_hscroll_pos;
  459. grp_biz.grd_dpcdlist.vscrollbar.pos = lgv_vscroll_pos;
  460. }
  461. function grp_biz_btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  462. {
  463. if (ds_grd_dpcdlist.rowcount > 0) {
  464. grdf_exportExcel(grp_biz.grd_dpcdlist, grp_biz.cap_judgtrgtman.text , "see");
  465. }else{
  466. sysf_messageBox("엑셀저장할 내역이", "I004");
  467. }
  468. }
  469. function grp_biz_group1_btn_select_onclick(obj:Button, e:ClickEventInfo)
  470. {
  471. fGetDocuList();
  472. }
  473. function grp_biz_group1_ipt_diagcd_onkeydown(obj:Edit, e:KeyEventInfo)
  474. {
  475. if(e.keycode == 13)
  476. {
  477. grp_biz_group1_btn_select_onclick();
  478. }
  479. }
  480. function grp_biz_group1_input1_onkeydown(obj:Edit, e:KeyEventInfo)
  481. {
  482. if(e.keycode == 13)
  483. {
  484. grp_biz_group1_btn_select_onclick();
  485. }
  486. }
  487. function grp_biz_group1_ipt_fromdd_onkeyup(obj:Calendar, e:KeyEventInfo)
  488. {
  489. if(e.keycode == 13)
  490. {
  491. obj.updateToDataset();
  492. grp_biz.group1.ipt_todd.setFocus();
  493. }
  494. }
  495. function grp_biz_group1_ipt_todd_onkeyup(obj:Calendar, e:KeyEventInfo)
  496. {
  497. if(e.keycode == 13)
  498. {
  499. obj.updateToDataset();
  500. grp_biz_group1_btn_select_onclick();
  501. }
  502. }
  503. function grp_biz_group1_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  504. {
  505. grp_biz.group1.ipt_todd.value = e.postvalue;
  506. }
  507. function grp_biz_group1_caption2_onclick(obj:Static, e:ClickEventInfo)
  508. {
  509. }
  510. function grp_biz_group1_Combo00_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  511. {
  512. //var frow = ds_hidden_obpvlist.findRowExpr("valucd=='"+ obj.value +"'");
  513. //grp_biz.grd_dpcdlist.setCellProperty("head", grp_biz.grd_dpcdlist.getBindCellIndex("body","pvod3"),"text" , utlf_transNull(ds_hidden_obpvlist.getColumn(frow,"pvod1"),"대상평가") );
  514. // grp_biz.grd_dpcdlist.setCellProperty("head", grp_biz.grd_dpcdlist.getBindCellIndex("body","pvod4_i"),"text" , utlf_transNull(ds_hidden_obpvlist.getColumn(frow,"pvod2"),"대상평가") );
  515. // grp_biz.grd_dpcdlist.setCellProperty("head", grp_biz.grd_dpcdlist.getBindCellIndex("body","pvod4_o"),"text" , utlf_transNull(ds_hidden_obpvlist.getColumn(frow,"pvod3"),"대상평가") );
  516. }
  517. function grp_biz_group1_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  518. {
  519. if(e.keycode == 13)
  520. {
  521. obj.updateToDataset();
  522. grp_biz_group1_btn_select_onclick();
  523. }
  524. }
  525. function getGrdCaption(colnm){
  526. var frow = ds_hidden_obpvlist.findRowExpr("valucd=='"+ grp_biz.group1.Combo00.value +"'");
  527. var nm = utlf_transNull(ds_hidden_obpvlist.getColumn(frow,colnm),"대상평가");
  528. return nm;
  529. }
  530. function grp_biz_group1_caption00_onclick(obj:Static, e:ClickEventInfo)
  531. {
  532. }
  533. function grp_biz_grd_dpcdlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  534. {
  535. frmf_setParameter("SMPMO00200_PARM2", obj.getCellValue(e.row, obj.getBindCellIndex("body","pid")) + "▦"
  536. + obj.getCellValue(e.row, obj.getBindCellIndex("body","orddeptcd")) + "▦"
  537. + obj.getCellValue(e.row, obj.getBindCellIndex("body","orddrid")) );
  538. frmf_modal("SMPMO00300","SMPMO00300",null,"","","","","","","","","","M");
  539. }
  540. function grp_biz_button1_onclick(obj:Button, e:ClickEventInfo)
  541. {
  542. var oParam = {};
  543. oParam.id = "TRPIJ04201";
  544. oParam.service = "aftjudgapp.InAftJudgTrgtMan";
  545. oParam.method = "reqExeClamPrvnTrgtBatch";
  546. oParam.inds = "req=ds_send";
  547. //oParam.outds = "ds_main_chklist=chklist";
  548. oParam.async = false;
  549. oParam.force = true;
  550. //oParam.callback = "cf_TRPIJ04201";
  551. tranf_submit(oParam);
  552. }
  553. function grp_biz_btn_cretrslt_onclick(obj:Button, e:ClickEventInfo)
  554. {
  555. var todd = utlf_getCurrentDate();
  556. todd = todd.toDate().getAddDate(+1, "D").getDateFormat();
  557. var objArg = new Object();
  558. objArg.todd = todd;
  559. objArg.execrid = sysf_getUserId();
  560. objArg.prgmid = "ClamPrvnTrgtBatch";
  561. frmf_open("SPZSB00301", "SPZSB00301", objArg, "","","","","","","","","","M");
  562. }
  563. function grp_biz_Button00_onclick(obj:Button, e:ClickEventInfo)
  564. {
  565. var obj = grp_biz.grd_dpcdlist;
  566. frmf_setParameter("SMPMO00200_PARM2", obj.getCellValue(e.row, obj.getBindCellIndex("body","pid")) + "▦"
  567. + obj.getCellValue(e.row, obj.getBindCellIndex("body","orddeptcd")) + "▦"
  568. + obj.getCellValue(e.row, obj.getBindCellIndex("body","orddrid")) );
  569. frmf_modal("SMPMO00300","SMPMO00300",null,"","","","","","","","","","M");
  570. }
  571. function grp_biz_Button02_onclick(obj:Button, e:ClickEventInfo)
  572. {
  573. var obj = grp_biz.grd_dpcdlist;
  574. frmf_setParameter("SMPID31300_pid", obj.getCellValue(obj.currentrow, obj.getBindCellIndex("body","pid")));
  575. frmf_setParameter("SMPID31300_valucd", grp_biz.group1.Combo00.value );
  576. frmf_setParameter("SMPID31300_orddeptcd", obj.getCellValue(obj.currentrow, obj.getBindCellIndex("body","orddeptcd")));
  577. frmf_setParameter("SMPID31300_fromdd", grp_biz.group1.ipt_fromdd.value );
  578. frmf_setParameter("SMPID31300_todd", grp_biz.group1.ipt_todd.value);
  579. frmf_setParameter("SMPID31300_patnm", obj.getCellValue(obj.currentrow, obj.getBindCellIndex("body","patnm")));
  580. var sChildSMPID31300 = frmf_findPopup("SMPID31300");
  581. if(!utlf_isNull(sChildSMPID31300)){
  582. sChildSMPID31300.fInitialize();
  583. } else {
  584. frmf_open("SMPID31300","SMPID31300",null,"","","","","","","","","","M");
  585. }
  586. }
  587. ]]></Script>
  588. </Form>
  589. </FDL>