SMPPI00700_환자별약제누적관리.xfdl 56 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPPI00700" position="absolute 0 0 1222 950" titletext="환자별약제누적관리" oninit="SMPPI00700_oninit" onload="SMPPI00700_onload" ontimer="click_test_ontimer">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="환자별약제누적관리" class="tit_1" position="absolute 1 1 217 24"/>
  8. <Button id="btn_init" taborder="2" text="닫 기" class="btn4" visible="false" position="absolute 1147 927 1215 949" anchor="right bottom" onclick="btn_init_onclick"/>
  9. <Static id="caption1" text="처방 List" class="tit_2" position="absolute 2 70 97 91"/>
  10. <Grid id="grd_clamcutlist" taborder="4" binddataset="ds_grd_clamcutlist" useinputpanel="false" autofittype="none" position="absolute 2 282 1214 367" anchor="left top right" cellsizingtype="col" cellmovingtype="col">
  11. <Formats>
  12. <Format id="default">
  13. <Columns>
  14. <Column size="100"/>
  15. <Column size="100"/>
  16. <Column size="100"/>
  17. <Column size="100"/>
  18. <Column size="100"/>
  19. <Column size="100"/>
  20. <Column size="100"/>
  21. <Column size="100"/>
  22. <Column size="100"/>
  23. <Column size="100"/>
  24. <Column size="100"/>
  25. <Column size="100"/>
  26. <Column size="100"/>
  27. <Column size="100"/>
  28. <Column size="100"/>
  29. <Column size="100"/>
  30. <Column size="100"/>
  31. <Column size="100"/>
  32. <Column size="100"/>
  33. <Column size="100"/>
  34. <Column size="100"/>
  35. </Columns>
  36. <Rows>
  37. <Row size="24" band="head"/>
  38. <Row size="24"/>
  39. </Rows>
  40. <Band id="head">
  41. <Cell text="내원유형"/>
  42. <Cell col="1" text="청구과"/>
  43. <Cell col="2" text="진료의"/>
  44. <Cell col="3" text="주상병"/>
  45. <Cell col="4" text="처방코드"/>
  46. <Cell col="5" text="EDI코드"/>
  47. <Cell col="6" text="한글명"/>
  48. <Cell col="7" text="단가"/>
  49. <Cell col="8" text="유형시작일"/>
  50. <Cell col="9" text="삭감투여량"/>
  51. <Cell col="10" text="삭감횟수"/>
  52. <Cell col="11" text="삭감일수"/>
  53. <Cell col="12" text="총투삭감량"/>
  54. <Cell col="13" text="조정금액"/>
  55. <Cell col="14" text="이의신청금액"/>
  56. <Cell col="15" text="실삭감금액"/>
  57. <Cell col="16" text="원외"/>
  58. <Cell col="17" text="심사자"/>
  59. <Cell col="18" text="접수번호"/>
  60. <Cell col="19" text="명일련"/>
  61. <Cell col="20" text="줄번호"/>
  62. </Band>
  63. <Band id="body">
  64. <Cell text="bind:ioflag"/>
  65. <Cell col="1" text="bind:clamdeptcd"/>
  66. <Cell col="2" text="bind:orddrnm"/>
  67. <Cell col="3" text="bind:diagcd"/>
  68. <Cell col="4" text="bind:prcpcd"/>
  69. <Cell col="5" text="bind:edicd"/>
  70. <Cell col="6" text="bind:calchngnm"/>
  71. <Cell col="7" text="bind:unitcost"/>
  72. <Cell col="8" text="bind:ordfromdd"/>
  73. <Cell col="9" text="bind:cutdrugqty"/>
  74. <Cell col="10" text="bind:cuttims"/>
  75. <Cell col="11" text="bind:cutdayno"/>
  76. <Cell col="12" text="bind:totcutqty"/>
  77. <Cell col="13" text="bind:adjtamt"/>
  78. <Cell col="14" text="bind:obtappamt"/>
  79. <Cell col="15" text="bind:orgreduamt"/>
  80. <Cell col="16" text="bind:oprcp"/>
  81. <Cell col="17" text="bind:judgrnm"/>
  82. <Cell col="18" text="bind:acptno"/>
  83. <Cell col="19" text="bind:docuseqno"/>
  84. <Cell col="20" text="bind:edilnno"/>
  85. </Band>
  86. </Format>
  87. </Formats>
  88. </Grid>
  89. <Static id="caption7" text="삭감내역" class="tit_2" position="absolute 2 260 77 281"/>
  90. <Shape id="line01" class="line_1" position="absolute 2 87 1213 92" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  91. <Static id="caption2" text="년도별내역" class="tit_2" position="absolute 2 372 159 393"/>
  92. <Button id="button7" taborder="5" class="icon_bottom" position="absolute 1186 256 1212 275" anchor="top right" onclick="button7_onclick"/>
  93. <Button id="button8" taborder="6" class="icon_top" position="absolute 1156 256 1182 275" anchor="top right" onclick="button8_onclick"/>
  94. <Button id="button3" taborder="7" class="icon_bottom" position="absolute 1186 66 1212 85" anchor="top right" onclick="button3_onclick"/>
  95. <Button id="button2" taborder="8" class="icon_top" position="absolute 1156 66 1182 85" anchor="top right" onclick="button2_onclick"/>
  96. <Button id="btn_rowadd" taborder="9" text="저장" class="btn2" position="absolute 1169 369 1211 388" onclick="btn_rowadd_onclick"/>
  97. <Div id="group2" taborder="10" class="div_SA" position="absolute 2 24 1213 64" anchor="left top right">
  98. <Layouts>
  99. <Layout>
  100. <Button id="btn_search" taborder="11" text="조회" class="btn1" position="absolute 1130 10 1186 32" anchor="top right" onclick="group2_btn_search_onclick"/>
  101. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 7 1110 34" anchor="top right"/>
  102. <Static id="caption5" text="환 자 :" class="search_name" position="absolute 20 13 137 30" anchor="default"/>
  103. <Edit id="ipt_pid" taborder="12" class="input_search" position="absolute 120 12 220 31" anchor="default" onkeydown="group2_ipt_pid_onkeydown"/>
  104. <Button id="button1" taborder="13" class="icon_search" position="absolute 224 13 240 29" anchor="default" onclick="group2_button1_onclick"/>
  105. <Edit id="ipt_hngnm" taborder="14" class="input_search" position="absolute 246 12 363 31" anchor="default" onkeydown="group2_ipt_hngnm_onkeydown"/>
  106. <Calendar id="ipt_aplydd" taborder="15" class="input_search" position="absolute 670 10 777 29" mask="yyyy-mm-dd" anchor="default" visible="true"/>
  107. <Static id="caption4" text="기관 :" class="search_name" position="absolute 826 14 914 31" onclick="group2_caption4_onclick" anchor="default"/>
  108. <Static id="caption00" text="적 용 일 :" class="search_name" position="absolute 586 13 674 30" anchor="default" visible="true"/>
  109. <Static id="caption01" text="적용기간 :" class="search_name" position="absolute 390 13 466 30" anchor="default" onclick="group2_caption01_onclick"/>
  110. <Combo id="cmb_aplyym" taborder="16" position="absolute 468 10 568 30" index="1" codecolumn="codecolumn" datacolumn="datacolumn" value="2" text="2년" onitemchanged="group2_cmb_aplyym_onitemchanged" anchor="default">
  111. <Dataset id="innerdataset">
  112. <ColumnInfo>
  113. <Column id="codecolumn" size="256"/>
  114. <Column id="datacolumn" size="256"/>
  115. </ColumnInfo>
  116. <Rows>
  117. <Row>
  118. <Col id="codecolumn">1</Col>
  119. <Col id="datacolumn">1년</Col>
  120. </Row>
  121. <Row>
  122. <Col id="codecolumn">2</Col>
  123. <Col id="datacolumn">2년</Col>
  124. </Row>
  125. <Row>
  126. <Col id="codecolumn">3</Col>
  127. <Col id="datacolumn">3년</Col>
  128. </Row>
  129. <Row>
  130. <Col id="codecolumn">4</Col>
  131. <Col id="datacolumn">4년</Col>
  132. </Row>
  133. <Row>
  134. <Col id="codecolumn">5</Col>
  135. <Col id="datacolumn">5년</Col>
  136. </Row>
  137. <Row>
  138. <Col id="codecolumn">10</Col>
  139. <Col id="datacolumn">10년</Col>
  140. </Row>
  141. <Row>
  142. <Col id="codecolumn">15</Col>
  143. <Col id="datacolumn">15년</Col>
  144. </Row>
  145. <Row>
  146. <Col id="codecolumn">20</Col>
  147. <Col id="datacolumn">20년</Col>
  148. </Row>
  149. </Rows>
  150. </Dataset>
  151. </Combo>
  152. </Layout>
  153. </Layouts>
  154. </Div>
  155. <Grid id="grd_picmdrhiyear" taborder="11" binddataset="ds_grd_picmdrhiyear" useinputpanel="false" autofittype="col" position="absolute 2 393 1214 508" anchor="left top right" cellsizingtype="both" extendsizetype="row" autosizingtype="row" cellmovingtype="col">
  156. <Formats>
  157. <Format id="default">
  158. <Columns>
  159. <Column size="23"/>
  160. <Column size="145"/>
  161. <Column size="100"/>
  162. <Column size="100"/>
  163. <Column size="550"/>
  164. <Column size="0"/>
  165. <Column size="0"/>
  166. <Column size="0"/>
  167. </Columns>
  168. <Rows>
  169. <Row size="24" band="head"/>
  170. <Row size="24"/>
  171. <Row size="24" band="summ"/>
  172. </Rows>
  173. <Band id="head">
  174. <Cell/>
  175. <Cell col="1" text="투여연도"/>
  176. <Cell col="2" text="급여구분"/>
  177. <Cell col="3" text="일수"/>
  178. <Cell col="4" text="비고"/>
  179. <Cell col="5" text="환자번호"/>
  180. <Cell col="6" text="기관코드"/>
  181. <Cell col="7" text="수가코드"/>
  182. </Band>
  183. <Band id="body">
  184. <Cell celltype="head"/>
  185. <Cell col="1" displaytype="normal" edittype="none" text="bind:prcpyear"/>
  186. <Cell col="2" displaytype="combo" edittype="combo" style="align:center;" text="bind:payflagcd" combodataset="ds_prcpyear" combocodecol="value" combodatacol="label" enable="false"/>
  187. <Cell col="3" displaytype="number" edittype="none" text="bind:prcpdayno"/>
  188. <Cell col="4" displaytype="text" edittype="textarea" style="align:left top;" text="bind:remark" wordwrap="word" autosizerow="limitmin"/>
  189. <Cell col="5" displaytype="none" edittype="none" text="bind:pid"/>
  190. <Cell col="6" displaytype="none" edittype="none" text="bind:instcd"/>
  191. <Cell col="7" displaytype="none" edittype="none" text="bind:prcpcd"/>
  192. </Band>
  193. <Band id="summary">
  194. <Cell/>
  195. <Cell col="1" text="총계"/>
  196. <Cell col="2"/>
  197. <Cell col="3" style="align:right middle;" expr="expr:getSum('prcpdayno')"/>
  198. <Cell col="4"/>
  199. <Cell col="5"/>
  200. <Cell col="6"/>
  201. <Cell col="7"/>
  202. </Band>
  203. </Format>
  204. </Formats>
  205. </Grid>
  206. <Shape id="line02" class="line_1" position="absolute 2 386 1213 396" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  207. <Shape id="line04" class="line_1" position="absolute 1 277 1214 283" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
  208. <Combo id="dutplceinstcd" taborder="15" position="absolute 891 34 1061 57" index="-1" innerdataset="@ds_item" datacolumn="label" codecolumn="value"/>
  209. <Static id="caption3" text="처방내역" class="tit_2" position="absolute 3 515 160 537"/>
  210. <Grid id="grd_prcplist" class="datagrid2" taborder="12" binddataset="ds_grd_prcplist" useinputpanel="false" autofittype="col" position="absolute 3 536 1215 731" anchor="left top right" cellsizingtype="col" cellmovingtype="col">
  211. <Formats>
  212. <Format id="default">
  213. <Columns>
  214. <Column size="0"/>
  215. <Column size="25"/>
  216. <Column size="129"/>
  217. <Column size="89"/>
  218. <Column size="89"/>
  219. <Column size="36"/>
  220. <Column size="71"/>
  221. <Column size="56"/>
  222. <Column size="80"/>
  223. <Column size="36"/>
  224. <Column size="56"/>
  225. <Column size="100"/>
  226. <Column size="40"/>
  227. <Column size="40"/>
  228. <Column size="82"/>
  229. <Column size="184"/>
  230. <Column size="78"/>
  231. </Columns>
  232. <Rows>
  233. <Row size="39" band="head"/>
  234. <Row size="24"/>
  235. </Rows>
  236. <Band id="head">
  237. <Cell text="기관코드"/>
  238. <Cell col="1"/>
  239. <Cell col="2" text="진료과"/>
  240. <Cell col="3" text="처방일자"/>
  241. <Cell col="4" text="실시일자"/>
  242. <Cell col="5" text="내원&#10;구분"/>
  243. <Cell col="6" text="보험유형"/>
  244. <Cell col="7" text="보조유형"/>
  245. <Cell col="8" text="수술구분"/>
  246. <Cell col="9" text="일수"/>
  247. <Cell col="10" text="급여구분"/>
  248. <Cell col="11" text="1회용량"/>
  249. <Cell col="12" text="1회&#10;수량"/>
  250. <Cell col="13" text="1일&#10;횟수"/>
  251. <Cell col="14" text="처방상태"/>
  252. <Cell col="15" text="처방"/>
  253. <Cell col="16" text="처방코드"/>
  254. </Band>
  255. <Band id="body">
  256. <Cell displaytype="none" edittype="none" text="bind:instcd"/>
  257. <Cell col="1" celltype="head" text="expr:currow + 1"/>
  258. <Cell col="2" displaytype="combo" edittype="combo" style="align:left;" text="bind:orddeptcd" combodataset="ds_init_orddeptcdlist" combocodecol="cd" combodatacol="nm" enable="false"/>
  259. <Cell col="3" displaytype="expr:utlf_isNull(execdd) ? 'text' : 'date'" edittype="none" style="align:center middle;" text="bind:prcpdd"/>
  260. <Cell col="4" displaytype="expr:utlf_isNull(execdd) ? 'text' : 'date'" edittype="none" text="bind:execdd"/>
  261. <Cell col="5" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:ioflag" combodataset="ds_ioflag" combocodecol="value" combodatacol="label"/>
  262. <Cell col="6" displaytype="text" edittype="none" style="align:center middle;" text="bind:insukind"/>
  263. <Cell col="7" style="align:center middle;" text="bind:suppkind"/>
  264. <Cell col="8" displaytype="normal" edittype="none" text="bind:opansflagcd"/>
  265. <Cell col="9" displaytype="number" edittype="none" style="align:right middle;" text="bind:prcpdayno"/>
  266. <Cell col="10" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:payflagcd2" combodataset="ds_M0029" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  267. <Cell col="11" displaytype="text" edittype="none" style="align:right middle;" text="bind:prcponevol"/>
  268. <Cell col="12" displaytype="text" edittype="none" style="align:right middle;" text="bind:prcponeqty"/>
  269. <Cell col="13" displaytype="text" edittype="none" style="align:right middle;" text="bind:prcptims"/>
  270. <Cell col="14" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:prcpstatcd" combodataset="ds_M0011" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  271. <Cell col="15" displaytype="normal" edittype="none" style="align:left middle;" text="bind:prcpnm"/>
  272. <Cell col="16" displaytype="text" edittype="none" style="align:left;" text="bind:prcpcd"/>
  273. </Band>
  274. </Format>
  275. </Formats>
  276. </Grid>
  277. <Button id="button4" taborder="13" class="icon_top" position="absolute 1159 512 1185 531" onclick="button4_onclick"/>
  278. <Button id="button6" taborder="14" class="icon_bottom" position="absolute 1187 512 1213 531" onclick="button6_onclick"/>
  279. <Shape id="line03" class="line_1" position="absolute 3 532 1215 537" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  280. <Grid id="grd_picmdrrulist" class="datagrid2" taborder="3" binddataset="ds_grd_picmdrrulist" useinputpanel="false" autofittype="col" position="absolute 2 91 1213 254" oncellclick="grd_picmdrrulist_oncellclick" anchor="left top right" cellsizingtype="col" cellmovingtype="col">
  281. <Formats>
  282. <Format id="default">
  283. <Columns>
  284. <Column size="23"/>
  285. <Column size="100"/>
  286. <Column size="78"/>
  287. <Column size="270"/>
  288. <Column size="0"/>
  289. <Column size="75"/>
  290. <Column size="75"/>
  291. <Column size="50"/>
  292. <Column size="39"/>
  293. <Column size="420"/>
  294. <Column size="0"/>
  295. <Column size="0"/>
  296. <Column size="0"/>
  297. <Column size="0"/>
  298. <Column size="0"/>
  299. <Column size="0"/>
  300. </Columns>
  301. <Rows>
  302. <Row size="40" band="head"/>
  303. <Row size="24"/>
  304. </Rows>
  305. <Band id="head">
  306. <Cell/>
  307. <Cell col="1" text="수가코드"/>
  308. <Cell col="2" text="처방상태"/>
  309. <Cell col="3" text="구분"/>
  310. <Cell col="4" text="진료과"/>
  311. <Cell col="5" text="개시일자"/>
  312. <Cell col="6" text="종료일자"/>
  313. <Cell col="7" text="타병원&#10;일수"/>
  314. <Cell col="8" text="삭감&#10;건수"/>
  315. <Cell col="9" text="비고"/>
  316. <Cell col="10" text="환자번호"/>
  317. <Cell col="11" text="환자명"/>
  318. <Cell col="12" text="기관코드"/>
  319. <Cell col="13" text="제어코드"/>
  320. <Cell col="14" text="종료일자"/>
  321. <Cell col="15"/>
  322. </Band>
  323. <Band id="body">
  324. <Cell celltype="head" text="expr:currow + 1"/>
  325. <Cell col="1" displaytype="normal" edittype="none" style="align:left middle;" text="bind:prcpcd"/>
  326. <Cell col="2" displaytype="combo" edittype="none" style="align:center;" text="bind:prcpstatcd" combodataset="ds_M0011" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  327. <Cell col="3" displaytype="normal" edittype="none" style="align:left middle;" text="bind:prcpnm"/>
  328. <Cell col="4" displaytype="combo" edittype="combo" text="bind:orddeptcd" enable="false"/>
  329. <Cell col="5" displaytype="date" edittype="none" text="bind:startdd" mask="yyyy-MM-dd"/>
  330. <Cell col="6" displaytype="date" edittype="none" text="bind:enddd" mask="yyyy-MM-dd"/>
  331. <Cell col="7" displaytype="normal" edittype="none" text="bind:thospdayno"/>
  332. <Cell col="8" displaytype="normal" edittype="none" style="align:right middle;" text="bind:cnt"/>
  333. <Cell col="9" displaytype="normal" edittype="none" style="align:left middle;" text="bind:remark"/>
  334. <Cell col="10" displaytype="none" edittype="none" text="bind:pid"/>
  335. <Cell col="11" displaytype="none" edittype="none" text="bind:hngnm"/>
  336. <Cell col="12" displaytype="none" edittype="none" text="bind:instcd"/>
  337. <Cell col="13" displaytype="none" edittype="none" text="bind:rulecd"/>
  338. <Cell col="14" displaytype="none" edittype="none" text="bind:todd"/>
  339. <Cell col="15" displaytype="none" edittype="none" text="bind:grupsnglflag"/>
  340. </Band>
  341. </Format>
  342. </Formats>
  343. </Grid>
  344. <Button id="btn_excel" taborder="16" text="엑셀저장" class="btn7" position="absolute 1080 512 1157 531" onclick="btn_excel_onclick"/>
  345. <Grid id="grd_oscllist" class="datagrid2" taborder="17" binddataset="ds_grd_oscllist" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 3 759 1215 924" anchor="left top right" cellmovingtype="col">
  346. <Formats>
  347. <Format id="default">
  348. <Columns>
  349. <Column size="0"/>
  350. <Column size="25"/>
  351. <Column size="115"/>
  352. <Column size="80"/>
  353. <Column size="80"/>
  354. <Column size="36"/>
  355. <Column size="71"/>
  356. <Column size="40"/>
  357. <Column size="80"/>
  358. <Column size="80"/>
  359. <Column size="56"/>
  360. <Column size="35"/>
  361. <Column size="30"/>
  362. <Column size="150"/>
  363. <Column size="35"/>
  364. <Column size="35"/>
  365. <Column size="35"/>
  366. <Column size="82"/>
  367. <Column size="94"/>
  368. <Column size="78"/>
  369. <Column size="60"/>
  370. </Columns>
  371. <Rows>
  372. <Row size="39" band="head"/>
  373. <Row size="24"/>
  374. </Rows>
  375. <Band id="head">
  376. <Cell text="기관코드"/>
  377. <Cell col="1"/>
  378. <Cell col="2" text="진료과"/>
  379. <Cell col="3" text="처방일자"/>
  380. <Cell col="4" text="실시일자"/>
  381. <Cell col="5" text="내원&#10;구분"/>
  382. <Cell col="6" text="보험유형"/>
  383. <Cell col="7" text="보조&#13;&#10;유형"/>
  384. <Cell col="8" text="그룹코드"/>
  385. <Cell col="9" text="수가코드"/>
  386. <Cell col="10" text="급여&#13;&#10;구분"/>
  387. <Cell col="11" text="본인&#13;&#10;부담율"/>
  388. <Cell col="12" text="항"/>
  389. <Cell col="13" text="처방명"/>
  390. <Cell col="14" text="일수"/>
  391. <Cell col="15" text="1회&#10;수량"/>
  392. <Cell col="16" text="1일&#10;횟수"/>
  393. <Cell col="17" text="EDI코드"/>
  394. <Cell col="18" text="총 금액"/>
  395. <Cell col="19" text="수납일자"/>
  396. <Cell col="20" text="수납시간"/>
  397. </Band>
  398. <Band id="body">
  399. <Cell displaytype="none" edittype="none" text="bind:instcd"/>
  400. <Cell col="1" celltype="head" text="expr:currow + 1"/>
  401. <Cell col="2" displaytype="combo" edittype="combo" style="align:left;" text="bind:orddeptcd" suppress="1" suppressalign="middle,over" combodataset="ds_init_orddeptcdlist" combocodecol="cd" combodatacol="nm" enable="false"/>
  402. <Cell col="3" displaytype="expr:utlf_isNull(execdd) ? 'text' : 'date'" edittype="none" style="align:center middle;" text="bind:prcpdd" suppress="2" suppressalign="middle,over"/>
  403. <Cell col="4" displaytype="expr:utlf_isNull(execdd) ? 'text' : 'date'" edittype="none" text="bind:execdd" suppress="3" suppressalign="middle,over"/>
  404. <Cell col="5" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:ioflag" suppress="4" suppressalign="middle,over" combodataset="ds_ioflag" combocodecol="value" combodatacol="label"/>
  405. <Cell col="6" displaytype="normal" edittype="none" style="align:left;" text="bind:insukind" suppress="5" suppressalign="middle,over"/>
  406. <Cell col="7" style="align:left;" text="bind:suppkind" suppress="6" suppressalign="middle,over"/>
  407. <Cell col="8" displaytype="normal" edittype="none" style="align:left;" text="bind:grupcalcscorcd" suppress="7" suppressalign="middle,over"/>
  408. <Cell col="9" displaytype="normal" edittype="none" style="align:left;" text="bind:snglcalcscorcd"/>
  409. <Cell col="10" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:calcpayflag" combodataset="ds_cmb_payflagcd" combocodecol="value" combodatacol="label" enable="false"/>
  410. <Cell col="11" text="bind:payownbrate"/>
  411. <Cell col="12" text="bind:hangno"/>
  412. <Cell col="13" displaytype="normal" edittype="none" style="align:left middle;" text="bind:hngnm"/>
  413. <Cell col="14" displaytype="number" edittype="none" style="align:right middle;" text="bind:calcdays"/>
  414. <Cell col="15" displaytype="number" edittype="none" style="align:right middle;" text="bind:calcqty"/>
  415. <Cell col="16" displaytype="number" edittype="none" style="align:right middle;" text="bind:calctims"/>
  416. <Cell col="17" displaytype="text" edittype="none" style="align:left;" text="bind:edicd" combodataset="ds_M0011" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  417. <Cell col="18" displaytype="number" edittype="none" text="bind:totamamt"/>
  418. <Cell col="19" displaytype="date" edittype="none" style="align:center middle;" text="bind:rcptexecdd"/>
  419. <Cell col="20" text="bind:rcpttm" mask="##:##:##"/>
  420. </Band>
  421. </Format>
  422. </Formats>
  423. </Grid>
  424. <Static id="caption00" text="계산내역" class="tit_2" position="absolute 3 738 160 760"/>
  425. <Shape id="line00" class="line_1" position="absolute 3 755 1215 760" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
  426. <Button id="btn_EnvSetup00" taborder="18" text="환경초기화" onclick="btn_EnvSetup00_onclick" class="btn4" position="absolute 1041 4 1129 23" anchor="top right"/>
  427. <Button id="btn_EnvSetup" taborder="19" text="환경저장" onclick="grp_calc_btn_EnvSetup_onclick" class="btn4" position="absolute 1130 4 1213 23" anchor="top right"/>
  428. </Layout>
  429. </Layouts>
  430. <Objects>
  431. <Dataset id="ds_grd_picmdrhiyear" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  432. <ColumnInfo>
  433. <Column id="prcpyear" type="STRING"/>
  434. <Column id="payflagcd" type="STRING"/>
  435. <Column id="dayno" type="STRING"/>
  436. <Column id="remark" type="STRING"/>
  437. <Column id="pid" type="STRING"/>
  438. <Column id="instcd" type="STRING"/>
  439. <Column id="prcpcd" type="STRING"/>
  440. <Column id="rulecd" type="STRING" size="256"/>
  441. <Column id="prcphistno" type="STRING" size="256"/>
  442. <Column id="prcpno" type="STRING" size="256"/>
  443. </ColumnInfo>
  444. </Dataset>
  445. <Dataset id="ds_grd_clamcutlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  446. <ColumnInfo>
  447. <Column id="ioflag" type="STRING"/>
  448. <Column id="clamdeptcd" type="STRING"/>
  449. <Column id="orddrnm" type="STRING"/>
  450. <Column id="diagcd" type="STRING"/>
  451. <Column id="prcpcd" type="STRING"/>
  452. <Column id="edicd" type="STRING"/>
  453. <Column id="calchngnm" type="STRING"/>
  454. <Column id="unitcost" type="STRING"/>
  455. <Column id="ordfromdd" type="STRING"/>
  456. <Column id="cutdrugqty" type="STRING"/>
  457. <Column id="cuttims" type="STRING"/>
  458. <Column id="cutdayno" type="STRING"/>
  459. <Column id="totcutqty" type="STRING"/>
  460. <Column id="adjtamt" type="STRING"/>
  461. <Column id="obtappamt" type="STRING"/>
  462. <Column id="orgreduamt" type="STRING"/>
  463. <Column id="oprcp" type="STRING"/>
  464. <Column id="judgrnm" type="STRING"/>
  465. <Column id="acptno" type="STRING"/>
  466. <Column id="docuseqno" type="STRING"/>
  467. <Column id="edilnno" type="STRING"/>
  468. </ColumnInfo>
  469. </Dataset>
  470. <Dataset id="ds_grd_picmdrrulist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  471. <ColumnInfo>
  472. <Column id="prcpcd" type="STRING"/>
  473. <Column id="prcpstatcd" type="STRING"/>
  474. <Column id="prcpnm" type="STRING"/>
  475. <Column id="orddeptcd" type="STRING"/>
  476. <Column id="startdd" type="STRING"/>
  477. <Column id="thospdayno" type="STRING"/>
  478. <Column id="cnt" type="STRING"/>
  479. <Column id="remark" type="STRING"/>
  480. <Column id="pid" type="STRING"/>
  481. <Column id="hngnm" type="STRING"/>
  482. <Column id="instcd" type="STRING"/>
  483. <Column id="rulecd" type="STRING"/>
  484. <Column id="todd" type="STRING"/>
  485. <Column id="grupsnglflag" type="STRING"/>
  486. <Column id="enddd" type="STRING" size="256"/>
  487. </ColumnInfo>
  488. </Dataset>
  489. <Dataset id="ds_grd_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  490. <ColumnInfo>
  491. <Column id="instcd" type="STRING"/>
  492. <Column id="orddeptcd" type="STRING"/>
  493. <Column id="prcpdd" type="STRING"/>
  494. <Column id="execdd" type="STRING"/>
  495. <Column id="ioflag" type="STRING"/>
  496. <Column id="insukind" type="STRING"/>
  497. <Column id="opansflagcd" type="STRING"/>
  498. <Column id="prcpdayno" type="STRING"/>
  499. <Column id="payflagcd" type="STRING"/>
  500. <Column id="prcponevol" type="STRING"/>
  501. <Column id="prcponeqty" type="STRING"/>
  502. <Column id="prcptims" type="STRING"/>
  503. <Column id="prcpstatcd" type="STRING"/>
  504. <Column id="prcpnm" type="STRING"/>
  505. <Column id="prcpcd" type="STRING"/>
  506. </ColumnInfo>
  507. </Dataset>
  508. <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  509. <ColumnInfo>
  510. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  511. <Column id="rulecd" type="STRING" size="256" sumtext="제어코드"/>
  512. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  513. <Column id="aplydd" type="STRING" size="256" sumtext="적용일자"/>
  514. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  515. <Column id="hngnm" type="STRING" size="256"/>
  516. <Column id="aplyym" type="STRING" size="256"/>
  517. </ColumnInfo>
  518. <Rows>
  519. <Row/>
  520. </Rows>
  521. </Dataset>
  522. <Dataset id="ds_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  523. <Dataset id="ds_C0048" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  524. <ColumnInfo>
  525. <Column id="cdnm" type="STRING" size="256"/>
  526. <Column id="cdid" type="STRING" size="256"/>
  527. </ColumnInfo>
  528. </Dataset>
  529. <Dataset id="ds_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  530. <ColumnInfo>
  531. <Column id="label" type="STRING" size="256"/>
  532. <Column id="value" type="STRING" size="256"/>
  533. </ColumnInfo>
  534. <Rows>
  535. <Row>
  536. <Col id="label">경북대학교병원</Col>
  537. <Col id="value">031</Col>
  538. </Row>
  539. <Row>
  540. <Col id="value">032</Col>
  541. <Col id="label">칠곡경북대학교병원</Col>
  542. </Row>
  543. </Rows>
  544. </Dataset>
  545. <Dataset id="ds_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  546. <ColumnInfo>
  547. <Column id="srchcond" type="STRING" size="256"/>
  548. <Column id="pid" type="STRING" size="256"/>
  549. <Column id="hnqnm" type="STRING" size="256"/>
  550. <Column id="rrqstno1" type="STRING" size="256"/>
  551. <Column id="rrqstno2" type="STRING" size="256"/>
  552. <Column id="acptdd" type="STRING" size="256"/>
  553. </ColumnInfo>
  554. <Rows>
  555. <Row/>
  556. </Rows>
  557. </Dataset>
  558. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  559. <ColumnInfo>
  560. <Column id="picmdrrulist" type="STRING" size="256"/>
  561. <Column id="patinfo" type="STRING" size="256"/>
  562. <Column id="picmdrhiyear" type="STRING" size="256"/>
  563. <Column id="prcplist" type="STRING" size="256"/>
  564. <Column id="clamcutlist" type="STRING" size="256"/>
  565. </ColumnInfo>
  566. <Rows>
  567. <Row/>
  568. </Rows>
  569. </Dataset>
  570. <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  571. <ColumnInfo>
  572. <Column id="pid" type="STRING" size="256"/>
  573. <Column id="instcd" type="STRING" size="256"/>
  574. <Column id="prcpcd" type="STRING" size="256"/>
  575. <Column id="rulecd" type="STRING" size="256"/>
  576. <Column id="prcpdd" type="STRING" size="256"/>
  577. <Column id="grupsnglflag" type="STRING" size="256"/>
  578. </ColumnInfo>
  579. </Dataset>
  580. <Dataset id="ds_prcpyear" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  581. <ColumnInfo>
  582. <Column id="label" type="STRING" size="256"/>
  583. <Column id="value" type="STRING" size="256"/>
  584. </ColumnInfo>
  585. <Rows>
  586. <Row>
  587. <Col id="label">급여</Col>
  588. <Col id="value">0</Col>
  589. </Row>
  590. <Row>
  591. <Col id="label">본인부담</Col>
  592. <Col id="value">1</Col>
  593. </Row>
  594. <Row>
  595. <Col id="label">비급여</Col>
  596. <Col id="value">2</Col>
  597. </Row>
  598. </Rows>
  599. </Dataset>
  600. <Dataset id="ds_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  601. <ColumnInfo>
  602. <Column id="label" type="STRING" size="256"/>
  603. <Column id="value" type="STRING" size="256"/>
  604. </ColumnInfo>
  605. <Rows>
  606. <Row>
  607. <Col id="label">외래</Col>
  608. <Col id="value">O</Col>
  609. </Row>
  610. <Row>
  611. <Col id="label">입원</Col>
  612. <Col id="value">I</Col>
  613. </Row>
  614. </Rows>
  615. </Dataset>
  616. <Dataset id="ds_send_data3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  617. <Dataset id="ds_cmb_payflagcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  618. <ColumnInfo>
  619. <Column id="label" type="STRING" size="256"/>
  620. <Column id="value" type="STRING" size="256"/>
  621. </ColumnInfo>
  622. <Rows>
  623. <Row>
  624. <Col id="label">급여</Col>
  625. <Col id="value">0</Col>
  626. </Row>
  627. <Row>
  628. <Col id="label">본인부담</Col>
  629. <Col id="value">1</Col>
  630. </Row>
  631. <Row>
  632. <Col id="label">비급여</Col>
  633. <Col id="value">2</Col>
  634. </Row>
  635. </Rows>
  636. </Dataset>
  637. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  638. <Dataset id="ds_grd_oscllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  639. <ColumnInfo>
  640. <Column id="orddeptcd" type="STRING" size="255"/>
  641. <Column id="prcpdd" type="STRING" size="255"/>
  642. <Column id="execdd" type="STRING" size="255"/>
  643. <Column id="ioflag" type="STRING" size="255"/>
  644. <Column id="insukind" type="STRING" size="255"/>
  645. <Column id="suppkind" type="STRING" size="255"/>
  646. <Column id="grupcalcscorcd" type="STRING" size="255"/>
  647. <Column id="snglcalcscorcd" type="STRING" size="255"/>
  648. <Column id="calcpayflag" type="STRING" size="255"/>
  649. <Column id="payownbrate" type="BIGDECIMAL" size="255"/>
  650. <Column id="hangno" type="STRING" size="255"/>
  651. <Column id="hngnm" type="STRING" size="255"/>
  652. <Column id="calcqty" type="BIGDECIMAL" size="255"/>
  653. <Column id="calctims" type="BIGDECIMAL" size="255"/>
  654. <Column id="calcdays" type="BIGDECIMAL" size="255"/>
  655. <Column id="edicd" type="STRING" size="255"/>
  656. <Column id="totamamt" type="BIGDECIMAL" size="255"/>
  657. <Column id="rcptexecdd" type="STRING" size="255"/>
  658. <Column id="rcpttm" type="STRING" size="255"/>
  659. </ColumnInfo>
  660. </Dataset>
  661. <Dataset id="ds_hidden_listval_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  662. <ColumnInfo>
  663. <Column id="scrnid" type="STRING" size="256" sumtext="화면(xrw)의 ID"/>
  664. <Column id="compsnm" type="STRING" size="256" sumtext="Grid ID 정보"/>
  665. <Column id="compscnts" type="STRING" size="256" sumtext="Grid의 칼럼명"/>
  666. <Column id="compsrefcnts" type="STRING" size="256" sumtext="Grid의 reference명"/>
  667. <Column id="compssizecnts" type="STRING" size="256" sumtext="Grid의 칼럼Size"/>
  668. </ColumnInfo>
  669. </Dataset>
  670. <Dataset id="ds_send_listval_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  671. <ColumnInfo>
  672. <Column id="scrnid" type="STRING" size="256"/>
  673. </ColumnInfo>
  674. <Rows>
  675. <Row>
  676. <Col id="scrnid">SMPIJ00300</Col>
  677. </Row>
  678. </Rows>
  679. </Dataset>
  680. <Dataset id="ds_M0029" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  681. </Objects>
  682. <Bind>
  683. <BindItem id="item0" compid="dutplceinstcd" propid="value" datasetid="ds_send_data1" columnid="instcd"/>
  684. <BindItem id="item1" compid="group2.ipt_pid" propid="value" datasetid="ds_send_data1" columnid="pid"/>
  685. <BindItem id="item2" compid="group2.ipt_hngnm" propid="value" datasetid="ds_send_data1" columnid="hngnm"/>
  686. <BindItem id="item3" compid="group2.ipt_aplydd" propid="value" datasetid="ds_send_data1" columnid="aplydd"/>
  687. <BindItem id="item4" compid="group2.cmb_aplyym" propid="value" datasetid="ds_send_data1" columnid=""/>
  688. </Bind>
  689. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  690. * System Name :
  691. * Job Name :
  692. * Creator :
  693. * Make Date : 2016-05-24
  694. * Description :
  695. *---------------------------------------------------------------------------------------
  696. * Modify Date Modifier Modify Description
  697. *---------------------------------------------------------------------------------------
  698. * 2016-05-24 Live Converter TF->XP
  699. *
  700. *---------------------------------------------------------------------------------------
  701. ****************************************************************************************/
  702. include "com_commonxp::comm_main.xjs";
  703. include "pam_pamcomnxp::PAM.xjs";
  704. include "pam_bfjudgxp::pam_grd.xjs";
  705. var grd_picmdrrulist_height = grd_picmdrrulist.position.height;
  706. var grd_clamcutlist_height = grd_clamcutlist.position.height;
  707. var grd_prcplist_top = grd_prcplist.position.top;
  708. var button4_y = button4.position.y;
  709. function SMPPI00700_oninit(obj:Form, e:InitEventInfo)
  710. {
  711. frmf_initForm(obj);
  712. }
  713. function SMPPI00700_onload(obj:Form, e:LoadEventInfo)
  714. {
  715. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  716. pamGetDeptCDDrIDList();
  717. var arrParam = [{dsNm: "ds_M0011", cdGrpId: "M0011"}
  718. ,{dsNm: "ds_M0029", cdGrpId: "M0029"}
  719. ,{dsNm: "ds_C0048", cdGrpId: "C0048"}]
  720. appf_getCodeList(arrParam);
  721. //20190927 self 항목 급여구분에 self 표시 -- payfalgcd2 추가
  722. if(ds_M0029.rowcount > 0) {
  723. dsf_addDsItem( ds_M0029, "cdid", "cdnm", "Self", "9", "below" );
  724. }
  725. if(sysf_getUserInfo("dutplceinstcd")== "031" || sysf_getUserInfo("dutplceinstcd")== "032")
  726. {
  727. dutplceinstcd.enable = true;
  728. }
  729. else
  730. {
  731. dutplceinstcd.enable = false;
  732. }
  733. group2.ipt_aplydd.value = utlf_getCurrentDateTime();
  734. group2.ipt_aplydd.updateToDataset();
  735. ds_send_data1.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  736. ds_send_data1.setColumn(0, "aplyym", utlf_addMonth(utlf_getCurrentDate(), -(group2.cmb_aplyym.value * 12)) );
  737. fInitalize();
  738. }
  739. function fInitalize()
  740. {
  741. ds_grd_clamcutlist.clearData();
  742. ds_grd_picmdrhiyear.clearData();
  743. ds_grd_picmdrrulist.clearData();
  744. ds_grd_prcplist.clearData();
  745. ds_grd_oscllist.clearData();
  746. if(frmf_checkOpener())
  747. {
  748. btn_init.visible = true;
  749. var vpid = opener.frmf_getParameter("pid");
  750. var vhngnm = opener.frmf_getParameter("hngnm");
  751. var vprcpdd = opener.frmf_getParameter("prcpdd");
  752. var vprcpcd = opener.frmf_getParameter("prcpcd");
  753. if(!utlf_isNull(vpid))
  754. {
  755. ds_send_data1.setColumn(0, "pid", vpid);
  756. ds_send_data1.setColumn(0, "hngnm", vhngnm);
  757. ds_send_data1.setColumn(0, "aplydd", vprcpdd);
  758. var oParam = {};
  759. oParam.id = "TRPPI00401";
  760. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  761. oParam.method = "reqGetPicmdrruList";
  762. oParam.inds = "req=ds_send_data1";
  763. oParam.outds = "ds_grd_picmdrrulist=picmdrrulist";
  764. oParam.async = true;
  765. oParam.progress = false;
  766. oParam.callback = "cf_TRPPI00401";
  767. tranf_submit(oParam);
  768. grd_picmdrrulist.nodatatext = "조회중입니다...";
  769. }
  770. }
  771. }
  772. function group2_button1_onclick(obj:Button, e:ClickEventInfo)
  773. {
  774. var srch_pid = ds_send_data1.getColumn(0, "pid");
  775. ds_send_data1.setColumn(0, "srchcond", "1");
  776. var objArg = new Object();
  777. objArg.arg_ds_send = ds_send_data1;
  778. frmf_modal("SPPMC02500","SPPMC02500",objArg,"",1,10,10,"","","","","","M");
  779. var srch_pid = ds_patinfolist.getColumn(0, "pid");
  780. var srch_hngnm = ds_patinfolist.getColumn(0, "hngnm");
  781. if(!utlf_isNull(srch_pid)){
  782. ds_send_data1.setColumn(0, "pid", srch_pid);
  783. ds_send_data1.setColumn(0, "hngnm", srch_hngnm);
  784. ds_patinfolist.clearData();
  785. }
  786. }
  787. function group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  788. {
  789. if(e.keycode == 13)
  790. {
  791. obj.updateToDataset();
  792. group2_btn_search_onclick();
  793. }
  794. }
  795. function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
  796. {
  797. group2.ipt_pid.updateToDataset();
  798. var pid = group2.ipt_pid.value;
  799. if(utlf_isNull(pid))
  800. {
  801. alert("환자번호는 필수입니다.");
  802. return;
  803. }
  804. ds_grd_clamcutlist.clearData();
  805. ds_grd_picmdrhiyear.clearData();
  806. ds_grd_prcplist.clearData();
  807. ds_grd_oscllist.clearData();
  808. var oParam = {};
  809. oParam.id = "TRPPI00401";
  810. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  811. oParam.method = "reqGetPicmdrruList";
  812. oParam.inds = "req=ds_send_data1";
  813. oParam.outds = "ds_grd_picmdrrulist=picmdrrulist";
  814. oParam.async = false;
  815. //oParam.callback = "cf_TRPPI00401";
  816. tranf_submit(oParam);
  817. ds_send_data1.setColumn(0,"hngnm", ds_grd_picmdrrulist.getColumn(0,"hngnm"))
  818. }
  819. function grd_picmdrrulist_oncellclick(obj:Grid, e:GridClickEventInfo)
  820. {
  821. var rowno = ds_grd_picmdrrulist.rowposition;
  822. ds_send_data2.clearData();
  823. ds_send_data2.addRow();
  824. ds_send_data2.setColumn(0, "pid" , ds_grd_picmdrrulist.getColumn(rowno, "pid"));
  825. ds_send_data2.setColumn(0, "instcd" , ds_grd_picmdrrulist.getColumn(rowno, "instcd"));
  826. ds_send_data2.setColumn(0, "prcpcd" , ds_grd_picmdrrulist.getColumn(rowno, "prcpcd"));
  827. ds_send_data2.setColumn(0, "grupsnglflag" , ds_grd_picmdrrulist.getColumn(rowno, "grupsnglflag"));
  828. ds_send_data2.setColumn(0, "prcpdd" , group2.ipt_aplydd.value);
  829. ds_grd_picmdrhiyear.clearData();
  830. ds_grd_prcplist.clearData();
  831. ds_grd_clamcutlist.clearData();
  832. ds_grd_oscllist.clearData();
  833. var oParam = {};
  834. oParam.id = "TRPPI00701";
  835. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  836. oParam.method = "reqGetPicmdrhiyearList";
  837. oParam.inds = "req=ds_send_data2";
  838. oParam.outds = "ds_grd_picmdrhiyear=picmdrhiyear ds_grd_prcplist=prcplist ds_grd_clamcutlist=clamcutlist ds_grd_oscllist=oscllist";
  839. oParam.async = false;
  840. oParam.callback = "cf_TRPPI00701";
  841. tranf_submit(oParam);
  842. }
  843. function group2_ipt_hngnm_onkeydown(obj:Edit, e:KeyEventInfo)
  844. {
  845. if(e.keycode == 13)
  846. {
  847. group2_btn_search_onclick();
  848. }
  849. }
  850. function button2_onclick(obj:Button, e:ClickEventInfo)
  851. {
  852. grd_picmdrrulist.position.height = grd_picmdrrulist_height;
  853. caption7.visible = true;
  854. line04.visible = true;
  855. grd_clamcutlist.visible = true;
  856. button8.visible = true;
  857. button7.visible = true;
  858. // this.object['ds'] == null
  859. // if(caption2.visible == true)
  860. // {
  861. caption2.visible = true;
  862. line02.visible = true;
  863. grd_picmdrhiyear.visible = true;
  864. btn_rowadd.visible = true;
  865. // }
  866. grd_picmdrhiyear.bringToFront();
  867. }
  868. function button3_onclick(obj:Button, e:ClickEventInfo)
  869. {
  870. grd_picmdrrulist.position.height = grd_picmdrrulist_height + 250;
  871. caption7.visible = false;
  872. line04.visible = false;
  873. grd_clamcutlist.visible = false;
  874. button8.visible = false;
  875. button7.visible = false;
  876. caption2.visible = false;
  877. line02.visible = false;
  878. grd_picmdrhiyear.visible = false;
  879. btn_rowadd.visible = false;
  880. grd_picmdrhiyear.bringToFront();
  881. }
  882. function button8_onclick(obj:Button, e:ClickEventInfo)
  883. {
  884. grd_clamcutlist.position.height = grd_clamcutlist_height;
  885. grd_picmdrhiyear.visible = true;
  886. line02.visible = true;
  887. caption2.visible = true;
  888. btn_rowadd.visible = true;
  889. }
  890. function button7_onclick(obj:Button, e:ClickEventInfo)
  891. {
  892. grd_clamcutlist.position.height = grd_clamcutlist_height + 150;
  893. grd_picmdrhiyear.visible = false;
  894. line02.visible = false;
  895. caption2.visible = false;
  896. btn_rowadd.visible = false;
  897. }
  898. function btn_rowadd_onclick(obj:Button, e:ClickEventInfo)
  899. {
  900. var updtdata = grdf_getGridUpdateData(grd_picmdrhiyear);
  901. if ( updtdata.rowcount == 0)
  902. {
  903. sysf_messageBox("업데이트 정보가 없습니다.", "I");
  904. return;
  905. }else {
  906. var oParam = {};
  907. oParam.id = "TXPPI00701";
  908. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  909. oParam.method = "reqSetDrhiRemark";
  910. oParam.inds = "req=ds_grd_picmdrhiyear:U";
  911. oParam.async = false;
  912. oParam.typeStr = "m";
  913. oParam.callback = "cf_TXPPI00701";
  914. tranf_submit(oParam);
  915. }
  916. }
  917. function cf_TXPPI00701(sSvcId, nErrorCode, sErrorMsg)
  918. {
  919. if(nErrorCode < 0) return;
  920. //sysf_messageBox("저장이","I002");
  921. }
  922. function btn_init_onclick(obj:Button, e:ClickEventInfo)
  923. {
  924. this.close();
  925. }
  926. function button4_onclick(obj:Button, e:ClickEventInfo)
  927. {
  928. grd_picmdrhiyear.visible = false;
  929. caption2.visible = false;
  930. line02.visible = false;
  931. btn_rowadd.visible = false;
  932. grd_prcplist.position.top = grd_prcplist_top - 147;
  933. caption3.position.y = grd_prcplist_top - 168;
  934. line03.position.y = grd_prcplist_top - 151;
  935. button4.position.y= grd_prcplist_top - 171;
  936. button6.position.y= grd_prcplist_top - 171;
  937. btn_excel.position.y= grd_prcplist_top - 171;
  938. button4.bringToFront();
  939. button6.bringToFront();
  940. btn_excel.bringToFront();
  941. caption3.bringToFront();
  942. line03.bringToFront();
  943. grd_prcplist.bringToFront();
  944. }
  945. function button6_onclick(obj:Button, e:ClickEventInfo)
  946. {
  947. grd_picmdrhiyear.visible = true;
  948. caption2.visible = true;
  949. line02.visible = true;
  950. btn_rowadd.visible = true;
  951. button4.position.y = button4_y;
  952. button6.position.y = button4_y;
  953. btn_excel.position.y= button4_y;
  954. line03.position.y = grd_prcplist_top - 4;
  955. caption3.position.y = grd_prcplist_top - 21;
  956. grd_prcplist.position.top = grd_prcplist_top;
  957. grd_picmdrrulist.bringToFront();
  958. button4.bringToFront();
  959. button6.bringToFront();
  960. btn_excel.bringToFront();
  961. caption3.bringToFront();
  962. line03.bringToFront();
  963. grd_prcplist.bringToFront();
  964. }
  965. function fGridfindrow()
  966. {
  967. grd_picmdrrulist.nodatatext = "";
  968. var vprcpcd = opener.frmf_getParameter("prcpcd");
  969. ds_send_data2.clearData();
  970. var frow = ds_grd_picmdrrulist.findRow("prcpcd", vprcpcd);
  971. if(frow < 0)
  972. {
  973. frow = 0;
  974. }
  975. ds_grd_picmdrrulist.selectRow(frow);
  976. var nRow = ds_send_data2.addRow();
  977. ds_send_data2.setColumn(nRow, "pid", ds_grd_picmdrrulist.getColumn(frow, "pid"));
  978. ds_send_data2.setColumn(nRow, "instcd", ds_grd_picmdrrulist.getColumn(frow, "instcd"));
  979. ds_send_data2.setColumn(nRow, "prcpcd", ds_grd_picmdrrulist.getColumn(frow, "prcpcd"));
  980. ds_send_data2.setColumn(nRow, "rulecd", ds_grd_picmdrrulist.getColumn(frow, "rulecd"));
  981. ds_send_data2.setColumn(nRow, "grupsnglflag" , ds_grd_picmdrrulist.getColumn(frow, "grupsnglflag"));
  982. ds_send_data2.setColumn(nRow, "prcpdd", group2.ipt_aplydd.value);
  983. ds_grd_picmdrhiyear.clearData();
  984. ds_grd_prcplist.clearData();
  985. ds_grd_clamcutlist.clearData();
  986. ds_grd_oscllist.clearData();
  987. var oParam = {};
  988. oParam.id = "TRPPI00701";
  989. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  990. oParam.method = "reqGetPicmdrhiyearList";
  991. oParam.inds = "req=ds_send_data2";
  992. oParam.outds = "ds_grd_picmdrhiyear=picmdrhiyear ds_grd_prcplist=prcplist ds_grd_clamcutlist=clamcutlist ds_grd_oscllist=oscllist";
  993. oParam.async = true;
  994. oParam.progress = false;
  995. oParam.callback = "cf_TRPPI00701";
  996. tranf_submit(oParam);
  997. grd_clamcutlist.nodatatext = "조회중입니다...";
  998. grd_picmdrhiyear.nodatatext = "조회중입니다...";
  999. grd_prcplist.nodatatext = "조회중입니다...";
  1000. grd_oscllist.nodatatext = "조회중입니다...";
  1001. }
  1002. function cf_TRPPI00401(sSvcId, nErrorCode, sErrorMsg)
  1003. {
  1004. if(nErrorCode < 0)
  1005. {
  1006. grd_picmdrrulist.nodatatext = "에러발생";
  1007. return;
  1008. }
  1009. else
  1010. {
  1011. fGridfindrow();
  1012. }
  1013. }
  1014. function cf_TRPPI00701(sSvcId, nErrorCode, sErrorMsg) {
  1015. if(nErrorCode < 0) {
  1016. grd_clamcutlist.nodatatext = "에러발생";
  1017. grd_picmdrhiyear.nodatatext = "에러발생";
  1018. grd_prcplist.nodatatext = "에러발생";
  1019. grd_oscllist.nodatatext = "에러발생";
  1020. return;
  1021. }
  1022. grd_clamcutlist.nodatatext = "";
  1023. grd_picmdrhiyear.nodatatext = "";
  1024. grd_prcplist.nodatatext = "";
  1025. grd_oscllist.nodatatext = "";
  1026. ds_grd_picmdrhiyear.updateColID("dayno", "prcpdayno");
  1027. }
  1028. function group2_caption01_onclick(obj:Static, e:ClickEventInfo)
  1029. {
  1030. }
  1031. function group2_cmb_aplyym_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1032. {
  1033. ds_send_data1.setColumn(0, "aplyym", utlf_addMonth(utlf_getCurrentDate(), -(obj.value * 12)) );
  1034. }
  1035. function btn_excel_onclick(obj:Button, e:ClickEventInfo)
  1036. {
  1037. grdf_exportExcel(grd_prcplist, "환자별약제누적관리_처방내역", "see",true,"","user", true); //파일 다이얼로그로
  1038. }
  1039. function btn_EnvSetup00_onclick(obj:Button, e:ClickEventInfo)
  1040. {
  1041. var msg = sysf_messageBox("환경저장 데이터가 모두 삭제 됩니다.","Q003");
  1042. if (msg == 6) { // 6세미만 요율을 적용한다.
  1043. grdf_DelUuee(grd_picmdrrulist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1044. grd_picmdrrulist.formatid = "default";
  1045. grdf_DelUuee(grd_clamcutlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1046. grd_clamcutlist.formatid = "default";
  1047. grdf_DelUuee(grd_picmdrhiyear, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1048. grd_picmdrhiyear.formatid = "default";
  1049. grdf_DelUuee(grd_prcplist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1050. grd_prcplist.formatid = "default";
  1051. grdf_DelUuee(grd_oscllist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1052. grd_oscllist.formatid = "default";
  1053. grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  1054. }
  1055. }
  1056. function grp_calc_btn_EnvSetup_onclick(obj:Button, e:ClickEventInfo)
  1057. {
  1058. grdf_SaveOrderInfoOfCol(grd_picmdrrulist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1059. grdf_SaveOrderInfoOfCol(grd_clamcutlist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1060. grdf_SaveOrderInfoOfCol(grd_picmdrhiyear, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1061. grdf_SaveOrderInfoOfCol(grd_prcplist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1062. grdf_SaveOrderInfoOfCol(grd_oscllist, ds_hidden_listval_uuee, frmf_getScreenID(), "cf_Cnfm_"+frmf_getScreenID());
  1063. //grdf_GetUuee("ds_send_listval_uuee", "ds_hidden_listval_uuee",frmf_getScreenID(), "cf_Uuee_"+frmf_getScreenID());
  1064. }
  1065. function cf_Cnfm_SMPPI00700(){
  1066. }
  1067. function cf_Uuee_SMPPI00700(sSvcId, nErrorCode, sErrorMsg) {
  1068. var grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_picmdrrulist","compsnm");
  1069. var refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_picmdrrulist","compscnts");
  1070. var sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_picmdrrulist","compssizecnts");
  1071. var clamcutlist_grd_name = ds_hidden_listval_uuee.lookup("compsnm","grd_clamcutlist","compsnm");
  1072. var clamcutlist_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_clamcutlist","compscnts");
  1073. var clamcutlist_sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_clamcutlist","compssizecnts");
  1074. var picmdrhiyear_name = ds_hidden_listval_uuee.lookup("compsnm","grd_picmdrhiyear","compsnm");
  1075. var picmdrhiyear_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_picmdrhiyear","compscnts");
  1076. var picmdrhiyear_sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_picmdrhiyear","compssizecnts");
  1077. var prcplist_name = ds_hidden_listval_uuee.lookup("compsnm","grd_prcplist","compsnm");
  1078. var prcplist_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_prcplist","compscnts");
  1079. var prcplist_sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_prcplist","compssizecnts");
  1080. var oscllist_name = ds_hidden_listval_uuee.lookup("compsnm","grd_oscllist","compsnm");
  1081. var oscllist_refdata = ds_hidden_listval_uuee.lookup("compsnm","grd_oscllist","compscnts");
  1082. var oscllist_sizedata = ds_hidden_listval_uuee.lookup("compsnm","grd_oscllist","compssizecnts");
  1083. if (!utlf_isNull(grd_name)) {
  1084. grdf_SetOrderInfoOfCol_format(grd_picmdrrulist,refdata,sizedata);
  1085. }
  1086. if (!utlf_isNull(clamcutlist_grd_name)) {
  1087. grdf_SetOrderInfoOfCol_format(grd_clamcutlist,clamcutlist_refdata,clamcutlist_sizedata);
  1088. }
  1089. if (!utlf_isNull(picmdrhiyear_name)) {
  1090. grdf_SetOrderInfoOfCol_format(grd_picmdrhiyear,picmdrhiyear_refdata,picmdrhiyear_sizedata);
  1091. }
  1092. if (!utlf_isNull(prcplist_name)) {
  1093. grdf_SetOrderInfoOfCol_format(grd_prcplist,prcplist_refdata,prcplist_sizedata);
  1094. }
  1095. if (!utlf_isNull(oscllist_name)) {
  1096. grdf_SetOrderInfoOfCol_format(grd_oscllist,oscllist_refdata,oscllist_sizedata);
  1097. }
  1098. grdf_initGrid(grd_picmdrhiyear);
  1099. grdf_setToolTipBind(grd_picmdrhiyear);
  1100. grdf_setRowTypeIcon(grd_picmdrhiyear, 0);
  1101. grdf_initGrid(grd_clamcutlist);
  1102. grdf_setToolTipBind(grd_clamcutlist);
  1103. grdf_initGrid(grd_picmdrrulist);
  1104. grdf_setToolTipBind(grd_picmdrrulist);
  1105. grdf_initGrid(grd_prcplist);
  1106. grdf_setToolTipBind(grd_prcplist);
  1107. grdf_initGrid(grd_oscllist);
  1108. grdf_setToolTipBind(grd_oscllist);
  1109. //lf_grid_band_left(grd_picmdrhiyear, 10);
  1110. }]]></Script>
  1111. </Form>
  1112. </FDL>