SMPMB02510_휴진의사처방관리.xfdl 34 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684
  1. <?xml version="1.0" encoding="utf-8" standalone="no"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPMB02510" position="absolute 0 0 1100 800" titletext="휴진의사처방관리" onload="SMPMB02510_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid id="datagrid1" binddataset="ds_main_sliplist" position="absolute 15 65 1080 505" style="" oncelldblclick="datagrid1_oncelldblclick">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="24"/>
  12. <Column size="66"/>
  13. <Column size="45"/>
  14. <Column size="73"/>
  15. <Column size="100"/>
  16. <Column size="0"/>
  17. <Column size="56"/>
  18. <Column size="50"/>
  19. <Column size="80"/>
  20. <Column size="80"/>
  21. <Column size="198"/>
  22. <Column size="65"/>
  23. <Column size="50"/>
  24. <Column size="35"/>
  25. <Column size="66"/>
  26. <Column size="47"/>
  27. <Column size="100"/>
  28. <Column size="0"/>
  29. <Column size="65"/>
  30. <Column size="50"/>
  31. <Column size="70"/>
  32. <Column size="70"/>
  33. <Column size="70"/>
  34. <Column size="100"/>
  35. <Column size="100"/>
  36. <Column size="66"/>
  37. <Column size="80"/>
  38. <Column size="99"/>
  39. <Column size="55"/>
  40. <Column size="60"/>
  41. <Column size="71"/>
  42. <Column size="100"/>
  43. <Column size="100"/>
  44. </Columns>
  45. <Rows>
  46. <Row size="32" band="head"/>
  47. <Row size="24"/>
  48. </Rows>
  49. <Band id="head">
  50. <Cell/>
  51. <Cell col="1" text="환자번호"/>
  52. <Cell col="2" text="구분"/>
  53. <Cell col="3" text="진료일자"/>
  54. <Cell col="4" text="진료과"/>
  55. <Cell col="5" text="orddeptcd"/>
  56. <Cell col="6" colspan="2" text="진료의" taborder="undefined"/>
  57. <Cell col="8" colspan="2" text="처방코드" taborder="undefined"/>
  58. <Cell col="10" text="처방명"/>
  59. <Cell col="11" colspan="2" text="판독의" taborder="undefined"/>
  60. <Cell col="13" text="선택&#10;YN"/>
  61. <Cell col="14" colspan="2" text="시행일자(시간)" taborder="undefined"/>
  62. <Cell col="16" text="시행부서"/>
  63. <Cell col="17" text="execdeptcd"/>
  64. <Cell col="18" text="시행의사"/>
  65. <Cell col="19" text="시행의사"/>
  66. <Cell col="20" text="현진료의사"/>
  67. <Cell col="21" text="현판독의사"/>
  68. <Cell col="22" text="현실시의사"/>
  69. <Cell col="23" text="휴진의사"/>
  70. <Cell col="24" text="휴진기간"/>
  71. <Cell col="25" text="cretno"/>
  72. <Cell col="26" text="calcseqno"/>
  73. <Cell col="27" text="calcscorseqno"/>
  74. <Cell col="28" text="prcpdd"/>
  75. <Cell col="29" text="prcpno"/>
  76. <Cell col="30" text="prcphistno"/>
  77. <Cell col="31" text="execprcpseqno"/>
  78. <Cell col="32" text="execprcpuniqno"/>
  79. </Band>
  80. <Band id="body">
  81. <Cell expr="currow + 1"/>
  82. <Cell col="1" text="bind:pid"/>
  83. <Cell col="2" displaytype="combo" style="align:center middle;" text="bind:ordtype" combodataset="ds_init_ordtype" combocodecol="value" combodatacol="label"/>
  84. <Cell col="3" text="bind:orddd"/>
  85. <Cell col="4" style="align:left middle;" text="bind:orddeptnm"/>
  86. <Cell col="5" text="bind:orddeptcd"/>
  87. <Cell col="6" text="bind:orddrnm"/>
  88. <Cell col="7" text="bind:orddrid"/>
  89. <Cell col="8" style="align:left middle;" text="bind:grupcalcscorcd"/>
  90. <Cell col="9" style="align:left middle;" text="bind:snglcalcscorcd"/>
  91. <Cell col="10" style="align:left middle;" text="bind:ordhngnm"/>
  92. <Cell col="11" text="bind:readdrnm"/>
  93. <Cell col="12" style="align:left middle;" text="bind:readdrid"/>
  94. <Cell col="13" text="bind:specordyn"/>
  95. <Cell col="14" text="bind:execdd"/>
  96. <Cell col="15" text="bind:exectm"/>
  97. <Cell col="16" text="bind:execdeptnm"/>
  98. <Cell col="17" text="bind:execdeptcd"/>
  99. <Cell col="18" text="bind:execrnm"/>
  100. <Cell col="19" text="bind:execrid"/>
  101. <Cell col="20" text="bind:orgorddrnm"/>
  102. <Cell col="21" text="bind:orgreaddrnm"/>
  103. <Cell col="22" text="bind:orgexecrnm"/>
  104. <Cell col="23" style="align:left middle;" text="bind:holiorddrnm"/>
  105. <Cell col="24" style="align:left middle;" text="bind:holifromtodd"/>
  106. <Cell col="25" text="bind:cretno"/>
  107. <Cell col="26" text="bind:calcseqno"/>
  108. <Cell col="27" text="bind:calcscorseqno"/>
  109. <Cell col="28" text="bind:prcpdd"/>
  110. <Cell col="29" text="bind:prcpno"/>
  111. <Cell col="30" text="bind:prcphistno"/>
  112. <Cell col="31" text="bind:execprcpseqno"/>
  113. <Cell col="32" text="bind:execprcpuniqno"/>
  114. </Band>
  115. </Format>
  116. </Formats>
  117. </Grid>
  118. <Shape id="roundrect1" anchor="default" type="roundrectangle" position="absolute 15 10 1080 55" style=""/>
  119. <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio1" taborder="2" position="absolute 295 24 390 44" style="">
  120. <Dataset id="innerdataset">
  121. <ColumnInfo>
  122. <Column id="codecolumn"/>
  123. <Column id="datacolumn"/>
  124. </ColumnInfo>
  125. <Rows>
  126. <Row>
  127. <Col id="codecolumn">O</Col>
  128. <Col id="datacolumn">외래</Col>
  129. </Row>
  130. <Row>
  131. <Col id="codecolumn">I</Col>
  132. <Col id="datacolumn">입원</Col>
  133. </Row>
  134. </Rows>
  135. </Dataset>
  136. </Radio>
  137. <Button id="button1" class="btn1_letter2" taborder="6" position="absolute 1010 22 1066 44" style="align:left ;" text="조회" onclick="button1_onclick"/>
  138. <Combo innerdataset="ds_init_orddeptcd_orddeptcdlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_orddeptcd" position="absolute 15 697 175 716" style="" onitemchanged="cmb_orddeptcd_onitemchanged"/>
  139. <Combo innerdataset="@dsft_init_orddrid_orddridlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_orddrid" position="absolute 180 697 280 716" style=""/>
  140. <Edit id="input1" enable="False" position="absolute 15 555 70 574" style="" anchor="default"/>
  141. <Edit id="input2" enable="False" position="absolute 75 555 155 574" style="" anchor="default"/>
  142. <Edit id="input3" enable="False" position="absolute 160 555 210 574" style="" anchor="default"/>
  143. <Static id="caption1" class="cell_1" position="absolute 15 533 70 553" style="" text="pid"/>
  144. <Static id="caption2" class="cell_1" position="absolute 75 533 155 553" style="" text="orddd(indd)"/>
  145. <Static id="caption3" class="cell_1" position="absolute 160 533 210 553" style="" text="cretno"/>
  146. <Static id="caption4" class="cell_1" position="absolute 790 533 870 553" style="" text="calcseqno"/>
  147. <Button id="button2" class="btn4_letter4" position="absolute 870 695 950 717" style="" text="슬립적용" onclick="button2_onclick"/>
  148. <Edit id="input5" enable="False" position="absolute 790 555 870 574" style="" anchor="default"/>
  149. <Static id="caption6" position="absolute 180 675 280 695" style="background:#b7cfff ;" text="진료의사"/>
  150. <Static id="caption5" class="cell_1" position="absolute 875 533 975 553" style="" text="cslcscorseqno"/>
  151. <Edit id="input4" enable="False" position="absolute 875 555 975 574" style="" anchor="default"/>
  152. <Static id="caption8" class="cell_1" position="absolute 15 605 115 625" style="" text="진료의사"/>
  153. <Edit id="input6" enable="False" position="absolute 15 627 115 646" style="" anchor="default"/>
  154. <Static id="caption9" position="absolute 15 585 199 605" style="" text="[대상자자료(복사본) 의사정보]"/>
  155. <Static id="caption7" position="absolute 15 675 175 695" style="background:#b7cfff ;" text="진료의사부서"/>
  156. <Static id="caption10" position="absolute 350 585 450 605" style="" text="[현재자료(원본)]"/>
  157. <Static id="caption11" class="cell_2" position="absolute 350 605 450 625" style="" text="진료의사"/>
  158. <Edit id="input7" enable="False" position="absolute 350 627 450 646" style="" anchor="default"/>
  159. <Edit id="input8" enable="False" position="absolute 455 627 555 646" style="" anchor="default"/>
  160. <Static id="caption12" class="cell_2" position="absolute 455 605 555 625" style="" text="판독의사"/>
  161. <Edit id="input9" enable="False" position="absolute 560 627 660 646" style="" anchor="default"/>
  162. <Static id="caption13" class="cell_2" position="absolute 560 605 660 625" style="" text="실시의사"/>
  163. <Combo innerdataset="@dsft_init_orddrid_orddridlist1" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_readdrid" position="absolute 470 697 570 716" style=""/>
  164. <Combo innerdataset="ds_init_orddeptcd_orddeptcdlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_readdeptcd" position="absolute 305 697 465 716" style="" onitemchanged="cmb_readdeptcd_onitemchanged"/>
  165. <Static id="caption14" position="absolute 470 675 570 695" style="background:#b7cfff ;" text="판독의사"/>
  166. <Static id="caption15" position="absolute 305 675 465 695" style="background:#b7cfff ;" text="판독의사부서"/>
  167. <Combo innerdataset="@dsft_init_orddrid_orddridlist2" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_execrid" position="absolute 760 697 860 716" style=""/>
  168. <Combo innerdataset="ds_init_orddeptcd_orddeptcdlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_execdeptcd" position="absolute 595 697 755 716" style="" onitemchanged="cmb_execdeptcd_onitemchanged"/>
  169. <Static id="caption16" position="absolute 760 675 860 695" style="background:#b7cfff ;" text="실시의사"/>
  170. <Static id="caption17" position="absolute 595 675 755 695" style="background:#b7cfff ;" text="실시의사부서"/>
  171. <Static id="caption18" position="absolute 15 655 291 675" style="" text="[슬립 수정내용(원본에 적용)]"/>
  172. <Static id="caption19" position="absolute 950 510 1030 530" style="" text="데이터 건수 :"/>
  173. <Static id="caption20" position="absolute 980 510 1080 530" style="align:right ;" text="0"/>
  174. <Static id="caption21" class="cell_1" position="absolute 120 605 220 625" style="" text="판독의사"/>
  175. <Edit id="input10" enable="False" position="absolute 120 627 220 646" style="" anchor="default"/>
  176. <Edit id="input11" enable="False" position="absolute 225 627 325 646" style="" anchor="default"/>
  177. <Static id="caption22" class="cell_1" position="absolute 225 605 325 625" style="" text="실시의사"/>
  178. <Calendar id="input12" taborder="4" position="absolute 710 24 810 43" style="" anchor="default"/>
  179. <Calendar id="input13" taborder="5" position="absolute 830 24 930 43" style="" anchor="default" onkeypress="input13_onkeypress"/>
  180. <Static id="caption23" position="absolute 810 27 830 42" style="align:center ;" text="~"/>
  181. <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio2" taborder="1" position="absolute 95 24 265 44" style="">
  182. <Dataset id="innerdataset">
  183. <ColumnInfo>
  184. <Column id="codecolumn"/>
  185. <Column id="datacolumn"/>
  186. </ColumnInfo>
  187. <Rows>
  188. <Row>
  189. <Col id="codecolumn">Y</Col>
  190. <Col id="datacolumn">휴진데이터</Col>
  191. </Row>
  192. <Row>
  193. <Col id="codecolumn">N</Col>
  194. <Col id="datacolumn">일반데이터</Col>
  195. </Row>
  196. </Rows>
  197. </Dataset>
  198. </Radio>
  199. <Static id="caption24" class="search_name" position="absolute 625 25 710 42" style="" text="진료일자"/>
  200. <Static id="caption25" class="search_name" position="absolute 30 25 85 42" style="" text="기간"/>
  201. <Static id="caption26" class="search_name" position="absolute 415 25 491 42" style="" text="환자번호"/>
  202. <Edit id="input14" taborder="3" position="absolute 500 24 600 43" style="" anchor="default" onkeypress="input14_onkeypress"/>
  203. <Combo innerdataset="ds_init_orddeptcd_orddeptcdlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_specdeptcd" position="absolute 15 767 175 786" style="" onitemchanged="cmb_specdeptcd_onitemchanged"/>
  204. <Combo innerdataset="ds_init_orddrid_orddridlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_specdrid" position="absolute 180 767 280 786" style=""/>
  205. <Static id="caption27" position="absolute 15 745 175 765" style="background:#b1b1fc ;" text="특진의사부서"/>
  206. <Static id="caption28" position="absolute 180 745 280 765" style="background:#bebefc ;" text="특진의사"/>
  207. <Static id="caption29" position="absolute 15 725 275 745" style="" text="[처방 수정내용(원본에 적용)]"/>
  208. <Button id="button3" class="btn4_letter4" position="absolute 290 765 370 787" style="" text="처방적용" onclick="button3_onclick"/>
  209. <Static id="caption30" class="cell_1" position="absolute 215 533 315 553" style="" text="prcpdd"/>
  210. <Edit id="input15" enable="False" position="absolute 215 555 315 574" style="" anchor="default"/>
  211. <Static id="caption31" class="cell_1" position="absolute 320 533 420 553" style="" text="prcpno"/>
  212. <Edit id="input16" enable="False" position="absolute 320 555 420 574" style="" anchor="default"/>
  213. <Static id="caption32" class="cell_1" position="absolute 425 533 525 553" style="" text="prcphistno"/>
  214. <Edit id="input17" enable="False" position="absolute 425 555 525 574" style="" anchor="default"/>
  215. <Static id="caption33" position="absolute 15 515 217 535" style="" text="[대상자자료(복사본) 처방_슬립정보]"/>
  216. <Static id="caption34" class="cell_1" position="absolute 530 533 655 553" style="" text="execprcpuniqno"/>
  217. <Edit id="input18" enable="False" position="absolute 530 555 655 574" style="" anchor="default"/>
  218. <Static id="caption35" class="cell_1" position="absolute 660 533 785 553" style="" text="snglcalcscorcd"/>
  219. <Edit id="input19" enable="False" position="absolute 660 555 785 574" style="" anchor="default"/>
  220. </Layout>
  221. </Layouts>
  222. <Objects>
  223. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  224. <ColumnInfo>
  225. <Column id="sliplist" type="STRING" size="256"/>
  226. </ColumnInfo>
  227. <Rows>
  228. <Row>
  229. <Col id="sliplist"/>
  230. </Row>
  231. </Rows>
  232. </Dataset>
  233. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  234. <ColumnInfo/>
  235. </Dataset>
  236. <Dataset id="ds_init_orddrid_orddridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  237. <ColumnInfo>
  238. <Column id="cd" type="STRING" size="256"/>
  239. <Column id="nm" type="STRING" size="256"/>
  240. <Column id="dp" type="STRING" size="256"/>
  241. <Column id="sp" type="STRING" size="256"/>
  242. </ColumnInfo>
  243. <Rows>
  244. <Row>
  245. <Col id="cd"/>
  246. <Col id="nm"/>
  247. <Col id="dp"/>
  248. <Col id="sp"/>
  249. </Row>
  250. </Rows>
  251. </Dataset>
  252. <Dataset id="ds_init_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  253. <ColumnInfo/>
  254. </Dataset>
  255. <Dataset id="ds_init_orddeptcd_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  256. <ColumnInfo>
  257. <Column id="cd" type="STRING" size="256"/>
  258. <Column id="nm" type="STRING" size="256"/>
  259. </ColumnInfo>
  260. <Rows>
  261. <Row>
  262. <Col id="cd"/>
  263. <Col id="nm"/>
  264. </Row>
  265. </Rows>
  266. </Dataset>
  267. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  268. <ColumnInfo>
  269. <Column id="ordtype" type="STRING" size="256"/>
  270. <Column id="holiflag" type="STRING" size="256"/>
  271. <Column id="fromdd" type="STRING" size="256"/>
  272. <Column id="todd" type="STRING" size="256"/>
  273. <Column id="pid" type="STRING" size="256"/>
  274. </ColumnInfo>
  275. <Rows>
  276. <Row>
  277. <Col id="ordtype">O</Col>
  278. </Row>
  279. </Rows>
  280. </Dataset>
  281. <Dataset id="ds_send_orddesc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  282. <ColumnInfo>
  283. <Column id="pid" type="STRING" size="256"/>
  284. <Column id="orddd" type="STRING" size="256"/>
  285. <Column id="cretno" type="STRING" size="256"/>
  286. <Column id="prcpdd" type="STRING" size="256"/>
  287. <Column id="prcpno" type="STRING" size="256"/>
  288. <Column id="prcphistno" type="STRING" size="256"/>
  289. <Column id="execprcpuniqno" type="STRING" size="256"/>
  290. <Column id="snglcalcscorcd" type="STRING" size="256"/>
  291. <Column id="calcseqno" type="STRING" size="256"/>
  292. <Column id="calcscorseqno" type="STRING" size="256"/>
  293. <Column id="orddrnm" type="STRING" size="256"/>
  294. <Column id="readdrnm" type="STRING" size="256"/>
  295. <Column id="execrnm" type="STRING" size="256"/>
  296. <Column id="orgorddrnm" type="STRING" size="256"/>
  297. <Column id="orgreaddrnm" type="STRING" size="256"/>
  298. <Column id="orgexecrnm" type="STRING" size="256"/>
  299. </ColumnInfo>
  300. <Rows>
  301. <Row>
  302. <Col id="pid"/>
  303. <Col id="orddd"/>
  304. <Col id="cretno"/>
  305. <Col id="prcpdd"/>
  306. <Col id="prcpno"/>
  307. <Col id="prcphistno"/>
  308. <Col id="execprcpuniqno"/>
  309. <Col id="snglcalcscorcd"/>
  310. <Col id="calcseqno"/>
  311. <Col id="calcscorseqno"/>
  312. <Col id="orddrnm"/>
  313. <Col id="readdrnm"/>
  314. <Col id="execrnm"/>
  315. <Col id="orgorddrnm"/>
  316. <Col id="orgreaddrnm"/>
  317. <Col id="orgexecrnm"/>
  318. </Row>
  319. </Rows>
  320. </Dataset>
  321. <Dataset id="ds_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  322. <ColumnInfo/>
  323. </Dataset>
  324. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  325. <ColumnInfo>
  326. <Column id="tmp" type="STRING" size="256"/>
  327. <Column id="tmp2" type="STRING" size="256"/>
  328. </ColumnInfo>
  329. </Dataset>
  330. <Dataset id="ds_send_chgdesc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  331. <ColumnInfo>
  332. <Column id="orddeptcd" type="STRING" size="256"/>
  333. <Column id="orddrid" type="STRING" size="256"/>
  334. <Column id="readdeptcd" type="STRING" size="256"/>
  335. <Column id="readdrid" type="STRING" size="256"/>
  336. <Column id="execdeptcd" type="STRING" size="256"/>
  337. <Column id="execrid" type="STRING" size="256"/>
  338. <Column id="specdeptcd" type="STRING" size="256"/>
  339. <Column id="specdrid" type="STRING" size="256"/>
  340. </ColumnInfo>
  341. <Rows>
  342. <Row>
  343. <Col id="orddeptcd"/>
  344. <Col id="orddrid"/>
  345. <Col id="readdeptcd"/>
  346. <Col id="readdrid"/>
  347. <Col id="execdeptcd"/>
  348. <Col id="execrid"/>
  349. <Col id="specdeptcd"/>
  350. <Col id="specdrid"/>
  351. </Row>
  352. </Rows>
  353. </Dataset>
  354. <Dataset id="ds_init_ordtype" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  355. <ColumnInfo>
  356. <Column id="label" type="STRING" size="256"/>
  357. <Column id="value" type="STRING" size="256"/>
  358. </ColumnInfo>
  359. <Rows>
  360. <Row>
  361. <Col id="label">외래</Col>
  362. <Col id="value">O</Col>
  363. </Row>
  364. <Row>
  365. <Col id="label">입원</Col>
  366. <Col id="value">I</Col>
  367. </Row>
  368. </Rows>
  369. </Dataset>
  370. <Dataset id="ds_main_sliplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  371. <FilteredDataset id="dsft_init_orddrid_orddridlist" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_init_orddrid_orddridlist"/>
  372. <FilteredDataset id="dsft_init_orddrid_orddridlist1" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  373. <FilteredDataset id="dsft_init_orddrid_orddridlist2" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  374. <FilteredDataset id="dsft_init_orddrid_orddridlist3" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  375. </Objects>
  376. <Bind>
  377. <BindItem id="item0" compid="radio1" propid="value" datasetid="ds_send" columnid="ordtype"/>
  378. <BindItem id="item1" compid="cmb_orddeptcd" propid="value" datasetid="ds_send_chgdesc" columnid="orddeptcd"/>
  379. <BindItem id="item2" compid="cmb_orddrid" propid="value" datasetid="ds_send_chgdesc" columnid="orddrid"/>
  380. <BindItem id="item3" compid="input1" propid="value" datasetid="ds_send_orddesc" columnid="pid"/>
  381. <BindItem id="item4" compid="input2" propid="value" datasetid="ds_send_orddesc" columnid="orddd"/>
  382. <BindItem id="item5" compid="input3" propid="value" datasetid="ds_send_orddesc" columnid="cretno"/>
  383. <BindItem id="item6" compid="input5" propid="value" datasetid="ds_send_orddesc" columnid="calcseqno"/>
  384. <BindItem id="item7" compid="input4" propid="value" datasetid="ds_send_orddesc" columnid="calcscorseqno"/>
  385. <BindItem id="item8" compid="input6" propid="value" datasetid="ds_send_orddesc" columnid="orddrnm"/>
  386. <BindItem id="item9" compid="input7" propid="value" datasetid="ds_send_orddesc" columnid="orgorddrnm"/>
  387. <BindItem id="item10" compid="input8" propid="value" datasetid="ds_send_orddesc" columnid="orgreaddrnm"/>
  388. <BindItem id="item11" compid="input9" propid="value" datasetid="ds_send_orddesc" columnid="orgexecrnm"/>
  389. <BindItem id="item12" compid="cmb_readdrid" propid="value" datasetid="ds_send_chgdesc" columnid="readdrid"/>
  390. <BindItem id="item13" compid="cmb_readdeptcd" propid="value" datasetid="ds_send_chgdesc" columnid="readdeptcd"/>
  391. <BindItem id="item14" compid="cmb_execrid" propid="value" datasetid="ds_send_chgdesc" columnid="execrid"/>
  392. <BindItem id="item15" compid="cmb_execdeptcd" propid="value" datasetid="ds_send_chgdesc" columnid="execdeptcd"/>
  393. <BindItem id="item16" compid="input10" propid="value" datasetid="ds_send_orddesc" columnid="readdrnm"/>
  394. <BindItem id="item17" compid="input11" propid="value" datasetid="ds_send_orddesc" columnid="execrnm"/>
  395. <BindItem id="item18" compid="input12" propid="value" datasetid="ds_send" columnid="fromdd"/>
  396. <BindItem id="item19" compid="input13" propid="value" datasetid="ds_send" columnid="todd"/>
  397. <BindItem id="item20" compid="radio2" propid="value" datasetid="ds_send" columnid="holiflag"/>
  398. <BindItem id="item21" compid="input14" propid="value" datasetid="ds_send" columnid="pid"/>
  399. <BindItem id="item22" compid="cmb_specdeptcd" propid="value" datasetid="ds_send_chgdesc" columnid="specdeptcd"/>
  400. <BindItem id="item23" compid="cmb_specdrid" propid="value" datasetid="ds_send_chgdesc" columnid="specdrid"/>
  401. <BindItem id="item24" compid="input15" propid="value" datasetid="ds_send_orddesc" columnid="prcpdd"/>
  402. <BindItem id="item25" compid="input16" propid="value" datasetid="ds_send_orddesc" columnid="prcpno"/>
  403. <BindItem id="item26" compid="input17" propid="value" datasetid="ds_send_orddesc" columnid="prcphistno"/>
  404. <BindItem id="item27" compid="input18" propid="value" datasetid="ds_send_orddesc" columnid="execprcpuniqno"/>
  405. <BindItem id="item28" compid="input19" propid="value" datasetid="ds_send_orddesc" columnid="snglcalcscorcd"/>
  406. </Bind>
  407. <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";
  408. include "pam_pamcomnxp::PAM.xjs";
  409. function SMPMB02510_onload(obj:Form, e:LoadEventInfo) {
  410. frmf_initForm(obj);
  411. grdf_initGrid(datagrid1);
  412. //grdf_setGridSort(grd_XXX);
  413. //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값);
  414. pamGetDeptCDDrIDList();
  415. //ds_init_centcdlist
  416. //ds_init_subdeptcdlist
  417. //ds_init_orddridlist
  418. //ds_init_orddeptcdlist
  419. ds_init_orddrid_orddridlist.copyData(ds_init_orddridlist);
  420. ds_init_orddeptcd_orddeptcdlist.copyData(ds_init_orddeptcdlist);
  421. frmf_addComboItem("cmb_orddeptcd", "전체","", "above");
  422. frmf_addComboItem("cmb_orddrid", "전체","", "above");
  423. //model.refresh();
  424. }
  425. function datagrid1_oncelldblclick(obj:Grid, e:GridClickEventInfo) {
  426. // 선택된 처방상세 데이터 세팅
  427. var row = ds_main_sliplist.rowposition;
  428. ds_send_orddesc.setColumn( 0, "pid", ds_main_sliplist.getColumn(row, "pid")));
  429. ds_send_orddesc.setColumn( 0, "orddd", ds_main_sliplist.getColumn(row, "orddd")));
  430. ds_send_orddesc.setColumn( 0, "cretno", ds_main_sliplist.getColumn(row, "cretno")));
  431. ds_send_orddesc.setColumn( 0, "prcpdd", ds_main_sliplist.getColumn(row, "prcpdd")));
  432. ds_send_orddesc.setColumn( 0, "prcpno", ds_main_sliplist.getColumn(row, "prcpno")));
  433. ds_send_orddesc.setColumn( 0, "prcphistno", ds_main_sliplist.getColumn(row, "prcphistno")));
  434. ds_send_orddesc.setColumn( 0, "execprcpuniqno", ds_main_sliplist.getColumn(row, "execprcpuniqno")));
  435. ds_send_orddesc.setColumn( 0, "snglcalcscorcd", ds_main_sliplist.getColumn(row, "snglcalcscorcd")));
  436. ds_send_orddesc.setColumn( 0, "calcseqno", ds_main_sliplist.getColumn(row, "calcseqno")));
  437. ds_send_orddesc.setColumn( 0, "calcscorseqno", ds_main_sliplist.getColumn(row, "calcscorseqno")));
  438. ds_send_orddesc.setColumn( 0, "orddrnm", ds_main_sliplist.getColumn(row, "orddrnm")));
  439. ds_send_orddesc.setColumn( 0, "readdrnm", ds_main_sliplist.getColumn(row, "readdrnm")));
  440. ds_send_orddesc.setColumn( 0, "execrnm", ds_main_sliplist.getColumn(row, "execrnm")));
  441. ds_send_orddesc.setColumn( 0, "orgorddrnm", ds_main_sliplist.getColumn(row, "orgorddrnm")));
  442. ds_send_orddesc.setColumn( 0, "orgreaddrnm", ds_main_sliplist.getColumn(row, "orgreaddrnm")));
  443. ds_send_orddesc.setColumn( 0, "orgexecrnm", ds_main_sliplist.getColumn(row, "orgexecrnm")));
  444. //model.refresh();
  445. }
  446. function button1_onclick(obj:Button, e:ClickEventInfo) {
  447. /*
  448. 검색조건체크
  449. */
  450. if (ds_send.getColumn(0, "holiflag") == "Y"
  451. && ds_send.getColumn(0, "ordtype") == "I"
  452. && utlf_isNull(ds_send.getColumn(0, "fromdd"))
  453. && utlf_isNull(ds_send.getColumn(0, "todd")) ) {
  454. sysf_messageBox("입원데이터의 조회는 반드시 기간을 설정해주세요", "C0800");
  455. return;
  456. }
  457. if (ds_send.getColumn(0, "holiflag") != "Y"
  458. && utlf_isNull(ds_send.getColumn(0, "fromdd"))
  459. && utlf_isNull(ds_send.getColumn(0, "todd")) ) {
  460. sysf_messageBox("일반데이터의 조회는 반드시 기간을 설정해주세요", "C000");
  461. return;
  462. }
  463. // 수정정보 초기화
  464. ds_send_orddesc.clearData(); ds_send_orddesc.addRow();
  465. ds_send_chgdesc.clearData(); ds_send_chgdesc.addRow();
  466. // submit("TRPMB02510");
  467. var oParam = {};
  468. oParam.id = "TRPMB02510";
  469. oParam.service = "pambaseinfomngtapp.OrdSche";
  470. oParam.method = "reqGetOrdScheOrder";
  471. oParam.inds = "req=ds_send";
  472. oParam.outds = "ds_main_sliplist=resultlist";
  473. oParam.async = false;
  474. tranf_submit(oParam);
  475. caption20.text = ds_main_sliplist.rowcount;
  476. //caption20.refresh();
  477. }
  478. function cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
  479. if (utlf_isNull(ds_send_chgdesc.getColumn(0, "orddeptcd"))) {
  480. //cmb_orddrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist";
  481. dsft_init_orddrid_orddridlist.filterstr = "";
  482. } else {
  483. //cmb_orddrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist[dp = '" + cmb_orddeptcd.value + "']";
  484. dsft_init_orddrid_orddridlist.filterstr = "dp == '" + cmb_orddeptcd.text + "'";
  485. }
  486. ds_send_chgdesc.setColumn( 0, "orddrid", "");
  487. //cmb_orddrid.refresh();
  488. }
  489. function button2_onclick(obj:Button, e:ClickEventInfo) {
  490. // 사용자 확인
  491. var userId = sysf_getUserId();
  492. if (userId != 'PAM' && userId != '09166' && userId != '93899' && userId != '10258') {
  493. sysf_messageBox("업무처리중 오류가 발생하였습니다. \r\n", "C000");
  494. return;
  495. }
  496. if (utlf_isNull(ds_send_orddesc.getColumn(0, "pid"))) {
  497. sysf_messageBox("처방이 선택되지 않았습니다.", "C000");
  498. return;
  499. }
  500. if (utlf_isNull(ds_send_chgdesc.getColumn(0, "orddrid"))
  501. && utlf_isNull(ds_send_chgdesc.getColumn(0, "readdrid"))
  502. && utlf_isNull(ds_send_chgdesc.getColumn(0, "execrid"))) {
  503. sysf_messageBox("진료의 또는 판독의 또는 실시의가 선택되지 않았습니다.", "C000");
  504. return;
  505. }
  506. //if (submit("TXPMB02511")) {
  507. var oParam = {};
  508. oParam.id = "TXPMB02511";
  509. oParam.service = "pambaseinfomngtapp.OrdSche";
  510. oParam.method = "reqSetReadDr";
  511. oParam.inds = "req=ds_send_orddesc";
  512. oParam.outds = "ds_hidden_tmp2_resultlist=resultlist";
  513. oParam.async = false;
  514. oParam.callback = "cf_TXPMB02511";
  515. tranf_submit(oParam);
  516. if(arErrorCode.pop("TXPMB02511") > -1) {
  517. sysf_messageBox("정상적으로 처리되었습니다.", "I000");
  518. }
  519. }
  520. function cf_TXPMB02511(sSvcId, nErrorCode, sErrorMsg) {
  521. arErrorCode.push(sSvcId, nErrorCode);
  522. }
  523. function cmb_readdeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
  524. if (utlf_isNull(ds_send_chgdesc.getColumn(0, "readdeptcd"))) {
  525. //cmb_readdrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist";
  526. dsft_init_orddrid_orddridlist1.filterstr = "";
  527. } else {
  528. //cmb_readdrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist[dp = '" + cmb_readdeptcd.value + "']";
  529. dsft_init_orddrid_orddridlist1.filterstr = "dp == '" + cmb_readdeptcd.value + "'";
  530. }
  531. ds_send_chgdesc.setColumn( 0, "readdrid", "");
  532. //cmb_readdrid.refresh();
  533. }
  534. function cmb_execdeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
  535. if (utlf_isNull(ds_send_chgdesc.getColumn(0, "execdeptcd"))) {
  536. //cmb_execrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist";
  537. dsft_init_orddrid_orddridlist2.filterstr = "";
  538. } else {
  539. //cmb_execrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist[dp = '" + cmb_execdeptcd.value + "']";
  540. dsft_init_orddrid_orddridlist2.filterstr = "dp == '" + cmb_execdeptcd.value + "'";
  541. }
  542. ds_send_chgdesc.setColumn( 0, "execrid", "");
  543. //cmb_execrid.refresh();
  544. }
  545. function input13_onkeydown(obj:Calendar, e:KeyEventInfo) {
  546. if(e.keycode == 13) {
  547. obj.updateToDataset();
  548. button1.dispatch("onkeypress");
  549. }
  550. }
  551. function input14_onkeydown(obj:Edit, e:KeyEventInfo) {
  552. if(e.keycode == 13) {
  553. obj.updateToDataset();
  554. button1.dispatch("onkeypress");
  555. }
  556. }
  557. function cmb_specdeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
  558. if (utlf_isNull(ds_send_chgdesc.getColumn(0, "specdeptcd"))) {
  559. //cmb_specdrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist";
  560. dsft_init_orddrid_orddridlist3.filterstr = "";
  561. } else {
  562. //cmb_specdrid.choices.itemset.attribute("nodeset") = "ds_init_orddrid_orddridlist[dp = '" + cmb_specdeptcd.value + "']";
  563. dsft_init_orddrid_orddridlist3.filterstr = "dp == '" + cmb_specdeptcd.value + "'";
  564. }
  565. ds_send_chgdesc.setColumn( 0, "specdrid", "");
  566. //cmb_specdrid.refresh();
  567. }
  568. function button3_onclick(obj:Button, e:ClickEventInfo) {
  569. // 사용자 확인
  570. var userId = sysf_getUserId();
  571. if (userId != 'PAM' && userId != '09166' && userId != '93899' && userId != '10258') {
  572. sysf_messageBox("업무처리중 오류가 발생하였습니다. \r\n", "C000");
  573. return;
  574. }
  575. if (utlf_isNull(ds_send_orddesc.getColumn(0, "pid"))) {
  576. sysf_messageBox("처방이 선택되지 않았습니다.", "C000");
  577. return;
  578. }
  579. if (utlf_isNull(ds_send_chgdesc.getColumn(0, "specdrid"))) {
  580. sysf_messageBox("선택진료의가 선택되지 않았습니다.", "C000");
  581. return;
  582. }
  583. //if (submit("TXPMB02512")) {
  584. var oParam = {};
  585. oParam.id = "TXPMB02512";
  586. oParam.service = "pambaseinfomngtapp.OrdSche";
  587. oParam.method = "reqSetSpecDr";
  588. oParam.inds = "req=ds_send_chgdesc";
  589. oParam.outds = "ds_hidden_tmp2_resultlist=resultlist";
  590. oParam.async = false;
  591. oParam.callback = "cf_TXPMB02512";
  592. tranf_submit(oParam);
  593. if(arErrorCode.pop("TXPMB02512") > -1) {
  594. sysf_messageBox("정상적으로 처리되었습니다.", "I000");
  595. }
  596. }
  597. function cf_TXPMB02512(sSvcId, nErrorCode, sErrorMsg) {
  598. arErrorCode.push(sSvcId, nErrorCode);
  599. }
  600. ]]></Script>
  601. </Form>
  602. </FDL>