SMADT40100_처방확인.xfdl 49 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADT40100" position="absolute 0 0 1194 787" titletext="처방확인" onload="SMADT40100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 15 1193 784" id="grp_main" scrollbars="autoboth">
  8. <Layouts>
  9. <Layout>
  10. <Div position="absolute 0 10 389 119" id="grp_srch" class="div_SA" anchor="default">
  11. <Layouts>
  12. <Layout>
  13. <Button position="absolute 324 81 380 103" id="btn_srch" class="btn1" text="조회" onclick="grp_main_grp_srch_btn_srch_onclick" anchor="default"/>
  14. <Calendar position="absolute 88 8 203 27" id="ipt_srchprcpdd" class="input_s_essential" oneditclick="grp_main_grp_srch_ipt_srchprcpdd_oneditclick" onkeyup="grp_main_grp_srch_ipt_srchprcpdd_onkeyup" anchor="default" autoselect="true"/>
  15. <Static text="검색일자 :" position="absolute 12 10 90 27" id="caption5" class="search_name" anchor="default"/>
  16. <Shape position="absolute 313 82 319 102" linetype="vertical" id="line13" anchor="default"/>
  17. <Static text="투약번호 :" position="absolute 215 60 290 77" id="caption15" class="search_name" anchor="default"/>
  18. <Static text="구분 :" position="absolute 12 85 89 102" id="caption13" class="search_name" anchor="default"/>
  19. <Static text="등록번호 :" position="absolute 12 60 91 77" id="caption17" class="search_name" anchor="default"/>
  20. <Static text="병동 :" position="absolute 12 35 89 52" id="caption19" class="search_name" anchor="default"/>
  21. <Edit position="absolute 294 56 370 75" id="ipt_drugno" class="input_search" onkeyup="grp_main_grp_srch_ipt_drugno_onkeyup" anchor="default" autoselect="true"/>
  22. <Edit position="absolute 88 56 193 75" id="ipt_pid" class="input_search" onkeyup="grp_main_grp_srch_ipt_pid_onkeyup" anchor="default" autoselect="true"/>
  23. <Radio position="absolute 88 80 233 105" id="rdo_div" class="radio_search" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="grp_main_grp_srch_rdo_div_onitemchanged" anchor="default">
  24. <Dataset id="innerdataset">
  25. <ColumnInfo>
  26. <Column id="codecolumn"/>
  27. <Column id="datacolumn"/>
  28. </ColumnInfo>
  29. <Rows>
  30. <Row>
  31. <Col id="codecolumn">O</Col>
  32. <Col id="datacolumn">외래</Col>
  33. </Row>
  34. <Row>
  35. <Col id="codecolumn">I</Col>
  36. <Col id="datacolumn">입원</Col>
  37. </Row>
  38. <Row>
  39. <Col id="codecolumn">E</Col>
  40. <Col id="datacolumn">응급</Col>
  41. </Row>
  42. </Rows>
  43. </Dataset>
  44. </Radio>
  45. <Combo position="absolute 88 32 203 51" id="cmb_ward" class="combo_search" columncount="2" innerdataset="@ds_init_deptlist_ward" datacolumn="deptnm" codecolumn="deptcd" onitemchanged="grp_main_grp_srch_cmb_ward_onitemchanged" onkeyup="grp_main_grp_srch_cmb_ward_onkeyup" anchor="default" autoselect="true"/>
  46. <CheckBox position="absolute 237 85 307 100" id="checkbox1" class="checkbox_search" onclick="grp_main_grp_srch_checkbox1_onclick" text="특수조제" anchor="default" truevalue="S"/>
  47. </Layout>
  48. </Layouts>
  49. </Div>
  50. <Grid position="absolute 0 155 345 767" align="align:center middle;" id="grd_chklist" binddataset="ds_main_patinfo_patlist" oncellclick="grp_main_grd_chklist_oncellclick" anchor="default" cellsizingtype="both" extendsizetype="row">
  51. <Formats>
  52. <Format id="default">
  53. <Columns>
  54. <Column size="35" band="left"/>
  55. <Column size="56"/>
  56. <Column size="68"/>
  57. <Column size="59"/>
  58. <Column size="49"/>
  59. <Column size="102"/>
  60. </Columns>
  61. <Rows>
  62. <Row size="24" band="head"/>
  63. <Row size="24"/>
  64. </Rows>
  65. <Band id="head">
  66. <Cell/>
  67. <Cell col="1" text="투약번호"/>
  68. <Cell col="2" text="등록번호"/>
  69. <Cell col="3" text="환자이름"/>
  70. <Cell col="4" text="병실"/>
  71. <Cell col="5" text="진료과"/>
  72. </Band>
  73. <Band id="body">
  74. <Cell celltype="head" text="expr:currow+1"/>
  75. <Cell col="1" displaytype="number" edittype="none" style="background:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');background2:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');" text="bind:drugno" wordwrap="char" mask="######"/>
  76. <Cell col="2" style="background:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');background2:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');" text="bind:pid" wordwrap="char"/>
  77. <Cell col="3" style="background:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');background2:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');" text="bind:hngnm" wordwrap="char"/>
  78. <Cell col="4" style="background:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');background2:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');" text="bind:roomcd" wordwrap="char"/>
  79. <Cell col="5" style="align:left;background:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');background2:EXPR(drugno &gt; 0 &amp;&amp; ordcnt != pharmcnt ? '#FFF000' : '');" text="bind:deptnm" wordwrap="char"/>
  80. </Band>
  81. </Format>
  82. </Formats>
  83. </Grid>
  84. <Static text="처방내역" position="absolute 350 134 494 155" id="caption1" class="tit_2" anchor="default"/>
  85. <Grid position="absolute 773 155 1192 767" align="align:center middle;" id="grd_pharmlist" binddataset="ds_main_prcpinfo_druglist" anchor="default" cellsizingtype="both" extendsizetype="row">
  86. <Formats>
  87. <Format id="default">
  88. <Columns>
  89. <Column size="25" band="left"/>
  90. <Column size="47"/>
  91. <Column size="88"/>
  92. <Column size="138"/>
  93. <Column size="114"/>
  94. <Column size="30"/>
  95. <Column size="30"/>
  96. <Column size="30"/>
  97. <Column size="30"/>
  98. <Column size="34"/>
  99. <Column size="58"/>
  100. <Column size="66"/>
  101. </Columns>
  102. <Rows>
  103. <Row size="24" band="head"/>
  104. <Row size="24"/>
  105. </Rows>
  106. <Band id="head">
  107. <Cell/>
  108. <Cell col="1" text="Mix no"/>
  109. <Cell col="2" text="처방코드"/>
  110. <Cell col="3" text="처방명"/>
  111. <Cell col="4" text="용법"/>
  112. <Cell col="5" text="수량"/>
  113. <Cell col="6" text="횟수"/>
  114. <Cell col="7" text="일수"/>
  115. <Cell col="8" text="PRN"/>
  116. <Cell col="9" text="원내"/>
  117. <Cell col="10" text="수행부서"/>
  118. <Cell col="11" text="집계여부"/>
  119. </Band>
  120. <Band id="body">
  121. <Cell celltype="head" text="expr:currow+1"/>
  122. <Cell col="1" text="bind:prcpmixno" wordwrap="char"/>
  123. <Cell col="2" text="bind:prcpcd" wordwrap="char"/>
  124. <Cell col="3" style="align:left;" text="bind:prcpnm" wordwrap="char"/>
  125. <Cell col="4" text="bind:mthdhngnm" wordwrap="char"/>
  126. <Cell col="5" text="bind:prcpqty" wordwrap="char"/>
  127. <Cell col="6" text="bind:prcptims" wordwrap="char"/>
  128. <Cell col="7" text="bind:prcpdayno" wordwrap="char"/>
  129. <Cell col="8" text="bind:prnprcp" wordwrap="char"/>
  130. <Cell col="9" text="bind:hosinhosoutflagnm" wordwrap="char"/>
  131. <Cell col="10" text="bind:exedeptnm" wordwrap="char"/>
  132. <Cell col="11" text="bind:sumflag" wordwrap="char"/>
  133. </Band>
  134. </Format>
  135. </Formats>
  136. </Grid>
  137. <Static text="약국접수자료" position="absolute 773 134 917 155" id="caption2" class="tit_2" anchor="default"/>
  138. <Grid position="absolute 350 155 769 767" id="grd_ordlist" binddataset="ds_main_prcpinfo_prcplist" anchor="default" cellsizingtype="both" extendsizetype="row">
  139. <Formats>
  140. <Format id="default">
  141. <Columns>
  142. <Column size="25" band="left"/>
  143. <Column size="47"/>
  144. <Column size="88"/>
  145. <Column size="138"/>
  146. <Column size="114"/>
  147. <Column size="30"/>
  148. <Column size="30"/>
  149. <Column size="30"/>
  150. <Column size="30"/>
  151. <Column size="34"/>
  152. <Column size="58"/>
  153. <Column size="66"/>
  154. </Columns>
  155. <Rows>
  156. <Row size="24" band="head"/>
  157. <Row size="24"/>
  158. </Rows>
  159. <Band id="head">
  160. <Cell/>
  161. <Cell col="1" text="Mix no"/>
  162. <Cell col="2" text="처방코드"/>
  163. <Cell col="3" text="처방명"/>
  164. <Cell col="4" text="용법"/>
  165. <Cell col="5" text="수량"/>
  166. <Cell col="6" text="횟수"/>
  167. <Cell col="7" text="일수"/>
  168. <Cell col="8" text="PRN"/>
  169. <Cell col="9" text="원내"/>
  170. <Cell col="10" text="수행부서"/>
  171. <Cell col="11" text="처방상태"/>
  172. </Band>
  173. <Band id="body">
  174. <Cell celltype="head" text="expr:currow+1"/>
  175. <Cell col="1" text="bind:prcpmixno" wordwrap="char"/>
  176. <Cell col="2" text="bind:prcpcd" wordwrap="char"/>
  177. <Cell col="3" style="align:left;" text="bind:prcpnm" wordwrap="char"/>
  178. <Cell col="4" text="bind:mthdhngnm" wordwrap="char"/>
  179. <Cell col="5" text="bind:prcpqty" wordwrap="char"/>
  180. <Cell col="6" text="bind:prcptims" wordwrap="char"/>
  181. <Cell col="7" text="bind:prcpdayno" wordwrap="char"/>
  182. <Cell col="8" text="bind:prnprcp" wordwrap="char"/>
  183. <Cell col="9" text="bind:hosinhosoutflagnm" wordwrap="char"/>
  184. <Cell col="10" text="bind:exedeptnm" wordwrap="char"/>
  185. <Cell col="11" displaytype="combo" edittype="combo" text="bind:actflag" wordwrap="char" combodataset="ds_M0011" combocodecol="wardcd" combodatacol="wardnm" enable="false"/>
  186. </Band>
  187. </Format>
  188. </Formats>
  189. </Grid>
  190. <Shape position="absolute 393 8 1191 14" linetype="horizontal" id="line2" class="line_1" anchor="default"/>
  191. <Shape id="line00" class="line_1" position="absolute 393 9 1191 15" anchor="default"/>
  192. <Shape id="line01" class="line_1" position="absolute 393 10 1191 16" anchor="default"/>
  193. <Shape id="line1" class="line_3" position="absolute 394 114 1191 120" anchor="default"/>
  194. <Shape id="line03" class="line_3" position="absolute 394 115 1191 121" anchor="default"/>
  195. <Shape id="line02" class="line_3" position="absolute 394 116 1191 122" anchor="default"/>
  196. <Static id="caption3" text="대상자" class="tit_2" position="absolute 0 134 144 155" anchor="default"/>
  197. <Shape id="line04" class="line_3" position="absolute 0 149 345 155" anchor="default"/>
  198. <Shape id="line05" class="line_3" position="absolute 0 150 345 156" anchor="default"/>
  199. <Shape id="line06" class="line_3" position="absolute 0 151 345 157" anchor="default"/>
  200. <Shape id="line07" class="line_3" position="absolute 350 149 769 155" anchor="default"/>
  201. <Shape id="line08" class="line_3" position="absolute 350 150 769 156" anchor="default"/>
  202. <Shape id="line09" class="line_3" position="absolute 350 151 769 157" anchor="default"/>
  203. <Shape id="line10" class="line_3" position="absolute 773 149 1192 155" anchor="default"/>
  204. <Shape id="line11" class="line_3" position="absolute 773 150 1192 156" anchor="default"/>
  205. <Shape id="line12" class="line_3" position="absolute 773 151 1192 157" anchor="default"/>
  206. </Layout>
  207. </Layouts>
  208. </Div>
  209. <Tab position="absolute 392 9 1193 137" id="switch1" class="tab_Normal">
  210. <Tabpages>
  211. <Tabpage text="" id="외래">
  212. <Layouts>
  213. <Layout>
  214. <Edit readonly="true" position="absolute 92 33 181 52" id="output6" class="output"/>
  215. <Static text="주소" position="absolute 367 83 447 106" id="cap_detladdr" class="cell_1"/>
  216. <Static text="면허번호" position="absolute 367 31 447 54" align="align:center middle;" id="cap_licenseno" class="cell_1"/>
  217. <Static text="보험유형" position="absolute 186 83 266 106" id="cap_insukind" class="cell_1"/>
  218. <Edit readonly="true" position="absolute 450 33 542 52" id="output7" class="output"/>
  219. <Edit readonly="true" position="absolute 450 7 542 26" id="output8" class="output"/>
  220. <Edit readonly="true" position="absolute 629 7 799 26" id="output9" class="output"/>
  221. <Static text="나이/성별" position="absolute 2 57 90 80" id="cap_age" class="cell_1"/>
  222. <Edit readonly="true" position="absolute 92 7 181 26" id="output10" class="output"/>
  223. <Static text="원내사유" position="absolute 547 31 627 54" id="cap_hostin" class="cell_1"/>
  224. <Static text="등록번호" position="absolute 2 5 90 28" id="cap_pid" class="cell_1"/>
  225. <MaskEdit readonly="true" position="absolute 270 59 362 78" id="output11" mask="####-##-##" type="string" displaynulltext=" " style="align:left middle;"/>
  226. <Static text="담당의" position="absolute 367 5 447 28" id="cap_orddrnm" class="cell_1"/>
  227. <Shape position="absolute 2 53 799 59" linetype="horizontal" id="line3" class="line_2"/>
  228. <Static text="환자명" position="absolute 2 31 90 54" id="cap_hngnm" class="cell_1"/>
  229. <Static text="진료과" position="absolute 187 5 267 28" id="cap_orddeptnm" class="cell_1"/>
  230. <Static text="예약일" position="absolute 186 57 266 80" id="cap_rsvdd" class="cell_1"/>
  231. <Edit readonly="true" position="absolute 270 7 362 26" id="output12" class="output"/>
  232. <Shape position="absolute 2 79 799 85" linetype="horizontal" id="line4" class="line_2"/>
  233. <Edit readonly="true" position="absolute 450 59 799 78" id="output13" class="output"/>
  234. <Shape position="absolute 2 27 799 33" linetype="horizontal" id="line7" class="line_2"/>
  235. <Edit readonly="true" position="absolute 92 59 181 78" id="output14" class="output"/>
  236. <Static text="상병" position="absolute 367 57 447 80" id="cap_diagnm" class="cell_1"/>
  237. <Static text="연락처" position="absolute 547 5 627 28" id="cap_tel" class="cell_1"/>
  238. <Static text="진료일자" position="absolute 186 31 266 54" id="cap_orddd" class="cell_1"/>
  239. <MaskEdit readonly="true" position="absolute 270 33 362 52" id="output15" mask="####-##-##" type="string" displaynulltext=" " style="align:left middle;"/>
  240. <Edit readonly="true" position="absolute 629 33 799 52" id="output16" class="output"/>
  241. <Static text="주민등록번호" position="absolute 2 83 90 106" id="cap_rrgstno" class="cell_1"/>
  242. <Edit readonly="true" position="absolute 270 85 362 104" id="output17" class="output"/>
  243. <Edit readonly="true" position="absolute 450 85 799 104" id="output18" class="output"/>
  244. <Edit position="absolute 92 85 181 104" id="secret1" class="output" readonly="true"/>
  245. </Layout>
  246. </Layouts>
  247. <InitValue>
  248. <MaskEdit id="output15" style="align:left;"/>
  249. <MaskEdit id="output11" style="align:left;"/>
  250. </InitValue>
  251. </Tabpage>
  252. <Tabpage text="" id="입원">
  253. <Layouts>
  254. <Layout>
  255. <Edit readonly="true" position="absolute 450 85 799 104" id="stw_output18" class="output"/>
  256. <Static text="전화번호" position="absolute 367 5 447 28" id="stw_caption12" class="cell_1"/>
  257. <Shape position="absolute 2 79 799 85" linetype="horizontal" id="stw_line4" class="line_2"/>
  258. <Static text="보험유형" position="absolute 186 83 266 106" id="stw_caption8" class="cell_1"/>
  259. <Static text="핸드폰" position="absolute 582 5 662 28" id="stw_caption26" class="cell_1"/>
  260. <Static text="전문의사명" position="absolute 2 57 86 80" id="stw_caption9" class="cell_1"/>
  261. <Static text="나이/성별" position="absolute 186 31 266 54" id="stw_caption27" class="cell_1"/>
  262. <Static text="환자명" position="absolute 2 31 86 54" id="stw_caption16" class="cell_1"/>
  263. <Static text="주민등록번호" position="absolute 2 83 86 106" id="stw_caption28" class="cell_1"/>
  264. <Static text="입원일자" position="absolute 187 5 267 28" id="stw_caption18" class="cell_1"/>
  265. <Edit readonly="true" position="absolute 88 7 180 26" id="stw_output10" class="output"/>
  266. <Edit readonly="true" position="absolute 88 33 180 52" id="stw_output6" class="output"/>
  267. <Edit readonly="true" position="absolute 450 7 577 26" id="stw_output8" class="output"/>
  268. <MaskEdit readonly="true" position="absolute 270 7 362 26" id="stw_output12" mask="####-##-##" type="string" displaynulltext=" " style="align:left middle;"/>
  269. <Edit readonly="true" position="absolute 664 7 799 26" id="stw_output9" class="output"/>
  270. <Edit readonly="true" position="absolute 450 33 799 52" id="stw_output13" class="output"/>
  271. <Edit readonly="true" position="absolute 88 59 180 78" id="stw_output14" class="output"/>
  272. <Static text="주치의사명" position="absolute 186 57 266 80" id="stw_caption21" class="cell_1"/>
  273. <Static text="주소" position="absolute 367 83 447 106" id="stw_caption4" class="cell_1"/>
  274. <Edit readonly="true" position="absolute 270 85 362 104" id="stw_output17" class="output"/>
  275. <Static text="상병" position="absolute 367 31 447 54" id="stw_caption22" class="cell_1"/>
  276. <Static text="등록번호" position="absolute 2 5 86 28" id="stw_caption11" class="cell_1"/>
  277. <Static text="진료과" position="absolute 582 57 662 80" id="swt_caption2" class="cell_1"/>
  278. <Edit readonly="true" position="absolute 450 59 577 78" id="swt_output1" class="output"/>
  279. <Edit readonly="true" position="absolute 664 59 799 78" id="swt_output2" class="output"/>
  280. <Static text="주치의 PDA" position="absolute 367 57 447 80" align="align:center middle;" id="swt_caption1" class="cell_1"/>
  281. <Edit position="absolute 88 85 180 104" id="secret2" readonly="true" class="output"/>
  282. <Shape id="stw_line00" class="line_2" position="absolute 2 53 799 59"/>
  283. <Shape id="stw_line01" class="line_2" position="absolute 2 27 799 33"/>
  284. <Edit id="stw_output11" taborder="2" readonly="true" oneditclick="switch1_입원_stw_output11_oneditclick" class="output" position="absolute 270 59 362 78"/>
  285. <Edit id="stw_output15" taborder="3" readonly="true" class="output" position="absolute 270 33 362 52"/>
  286. </Layout>
  287. </Layouts>
  288. </Tabpage>
  289. <Tabpage text="" id="응급실">
  290. <Layouts>
  291. <Layout>
  292. <Static text="응급실" position="absolute 75 40 175 60" id="caption14"/>
  293. </Layout>
  294. </Layouts>
  295. </Tabpage>
  296. </Tabpages>
  297. </Tab>
  298. <Static id="caption6" text="처방확인" class="tit_1" position="absolute 0 0 100 25"/>
  299. </Layout>
  300. </Layouts>
  301. <Objects>
  302. <Dataset id="ds_init_cmb_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  303. <ColumnInfo>
  304. <Column id="wardnm" type="STRING"/>
  305. <Column id="wardcd" type="STRING"/>
  306. </ColumnInfo>
  307. </Dataset>
  308. <Dataset id="ds_main_patinfo_patlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  309. <ColumnInfo>
  310. <Column id="drugno" type="STRING"/>
  311. <Column id="pid" type="STRING"/>
  312. <Column id="hngnm" type="STRING"/>
  313. <Column id="roomcd" type="STRING"/>
  314. <Column id="deptnm" type="STRING"/>
  315. </ColumnInfo>
  316. <Rows>
  317. <Row/>
  318. </Rows>
  319. </Dataset>
  320. <Dataset id="ds_main_prcpinfo_druglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  321. <ColumnInfo>
  322. <Column id="prcpmixno" type="STRING"/>
  323. <Column id="prcpcd" type="STRING"/>
  324. <Column id="prcpnm" type="STRING"/>
  325. <Column id="mthdhngnm" type="STRING"/>
  326. <Column id="prcpqty" type="STRING"/>
  327. <Column id="prcptims" type="STRING"/>
  328. <Column id="prcpdayno" type="STRING"/>
  329. <Column id="prnprcp" type="STRING"/>
  330. <Column id="hosinhosoutflagnm" type="STRING"/>
  331. <Column id="exedeptnm" type="STRING"/>
  332. <Column id="sumflag" type="STRING"/>
  333. </ColumnInfo>
  334. <Rows>
  335. <Row/>
  336. </Rows>
  337. </Dataset>
  338. <Dataset id="ds_main_prcpinfo_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  339. <ColumnInfo>
  340. <Column id="prcpmixno" type="STRING"/>
  341. <Column id="prcpcd" type="STRING"/>
  342. <Column id="prcpnm" type="STRING"/>
  343. <Column id="mthdhngnm" type="STRING"/>
  344. <Column id="prcpqty" type="STRING"/>
  345. <Column id="prcptims" type="STRING"/>
  346. <Column id="prcpdayno" type="STRING"/>
  347. <Column id="prnprcp" type="STRING"/>
  348. <Column id="hosinhosoutflagnm" type="STRING"/>
  349. <Column id="exedeptnm" type="STRING"/>
  350. <Column id="actflag" type="STRING"/>
  351. </ColumnInfo>
  352. <Rows>
  353. <Row/>
  354. </Rows>
  355. </Dataset>
  356. <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  357. <ColumnInfo>
  358. <Column id="srchprcpdd" type="STRING" size="256"/>
  359. <Column id="ioflag" type="STRING" size="256"/>
  360. <Column id="srchpid" type="STRING" size="256"/>
  361. <Column id="srchorddd" type="STRING" size="256"/>
  362. <Column id="srchcretno" type="STRING" size="256"/>
  363. <Column id="srchdrugno" type="STRING" size="256"/>
  364. <Column id="srchdrugdd" type="STRING" size="256"/>
  365. <Column id="srchroomno" type="STRING" size="256"/>
  366. <Column id="srchiptdrugno" type="STRING" size="256"/>
  367. <Column id="srchiptpid" type="STRING" size="256"/>
  368. <Column id="deptflag" type="STRING" size="256"/>
  369. <Column id="drugflag" type="STRING" size="256"/>
  370. </ColumnInfo>
  371. <Rows>
  372. <Row>
  373. <Col id="ioflag">O</Col>
  374. </Row>
  375. </Rows>
  376. </Dataset>
  377. <Dataset id="ds_init_deptlist_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  378. <ColumnInfo>
  379. <Column id="deptcd" type="STRING" size="256"/>
  380. <Column id="deptnm" type="STRING" size="256"/>
  381. </ColumnInfo>
  382. <Rows>
  383. <Row/>
  384. </Rows>
  385. </Dataset>
  386. <Dataset id="ds_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  387. <ColumnInfo>
  388. <Column id="wardcd" type="STRING" size="256"/>
  389. <Column id="wardnm" type="STRING" size="256"/>
  390. </ColumnInfo>
  391. <Rows>
  392. <Row/>
  393. </Rows>
  394. </Dataset>
  395. <Dataset id="ds_temp_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  396. <ColumnInfo>
  397. <Column id="wardcd" type="STRING" size="256"/>
  398. <Column id="wardnm" type="STRING" size="256"/>
  399. </ColumnInfo>
  400. <Rows>
  401. <Row/>
  402. </Rows>
  403. </Dataset>
  404. <Dataset id="ds_init_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  405. <ColumnInfo>
  406. <Column id="ward" type="STRING" size="256"/>
  407. </ColumnInfo>
  408. <Rows>
  409. <Row/>
  410. </Rows>
  411. </Dataset>
  412. <Dataset id="ds_main_prcpinfo_patdetlinfoout" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  413. <ColumnInfo>
  414. <Column id="pid" type="STRING" size="256"/>
  415. <Column id="orddeptnm" type="STRING" size="256"/>
  416. <Column id="orddrnm" type="STRING" size="256"/>
  417. <Column id="tel" type="STRING" size="256"/>
  418. <Column id="hngnm" type="STRING" size="256"/>
  419. <Column id="orddd" type="STRING" size="256"/>
  420. <Column id="liceseno" type="STRING" size="256"/>
  421. <Column id="hostinprcpresnm" type="STRING" size="256"/>
  422. <Column id="age" type="STRING" size="256"/>
  423. <Column id="rsvdd" type="STRING" size="256"/>
  424. <Column id="diagnm" type="STRING" size="256"/>
  425. <Column id="rrgstno" type="STRING" size="256"/>
  426. <Column id="insukind" type="STRING" size="256"/>
  427. <Column id="detladdr" type="STRING" size="256"/>
  428. </ColumnInfo>
  429. <Rows>
  430. <Row/>
  431. </Rows>
  432. </Dataset>
  433. <Dataset id="ds_main_prcpinfo_patdetlinfoin" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  434. <ColumnInfo>
  435. <Column id="pid" type="STRING" size="256"/>
  436. <Column id="indd" type="STRING" size="256"/>
  437. <Column id="hometel" type="STRING" size="256"/>
  438. <Column id="mpphontel" type="STRING" size="256"/>
  439. <Column id="hngnm" type="STRING" size="256"/>
  440. <Column id="age" type="STRING" size="256"/>
  441. <Column id="diagnm" type="STRING" size="256"/>
  442. <Column id="medispclnm" type="STRING" size="256"/>
  443. <Column id="pdano" type="STRING" size="256"/>
  444. <Column id="atdocnm" type="STRING" size="256"/>
  445. <Column id="orddeptnm" type="STRING" size="256"/>
  446. <Column id="rrgstno" type="STRING" size="256"/>
  447. <Column id="insukind" type="STRING" size="256"/>
  448. <Column id="detladdr" type="STRING" size="256"/>
  449. </ColumnInfo>
  450. <Rows>
  451. <Row/>
  452. </Rows>
  453. </Dataset>
  454. </Objects>
  455. <Bind>
  456. <BindItem id="item25" compid="switch1.입원.stw_output15" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="age"/>
  457. <BindItem id="item26" compid="switch1.입원.stw_output11" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="atdocnm"/>
  458. <BindItem id="item0" compid="grp_main.grp_srch.ipt_srchprcpdd" propid="value" datasetid="ds_send_req" columnid="srchprcpdd"/>
  459. <BindItem id="item1" compid="grp_main.grp_srch.cmb_ward" propid="value" datasetid="ds_send_req" columnid="srchroomno"/>
  460. <BindItem id="item2" compid="grp_main.grp_srch.ipt_pid" propid="value" datasetid="ds_send_req" columnid="srchiptpid"/>
  461. <BindItem id="item3" compid="grp_main.grp_srch.rdo_div" propid="value" datasetid="ds_send_req" columnid="ioflag"/>
  462. <BindItem id="item4" compid="grp_main.grp_srch.checkbox1" propid="value" datasetid="ds_send_req" columnid="drugflag"/>
  463. <BindItem id="item5" compid="grp_main.grp_srch.ipt_drugno" propid="value" datasetid="ds_send_req" columnid="srchiptdrugno"/>
  464. <BindItem id="item6" compid="switch1.외래.output10" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="pid"/>
  465. <BindItem id="item7" compid="switch1.외래.output6" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="hngnm"/>
  466. <BindItem id="item8" compid="switch1.외래.output14" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="age"/>
  467. <BindItem id="item9" compid="switch1.외래.secret1" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="rrgstno"/>
  468. <BindItem id="item10" compid="switch1.외래.output12" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="orddeptnm"/>
  469. <BindItem id="item11" compid="switch1.외래.output15" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="orddd"/>
  470. <BindItem id="item12" compid="switch1.외래.output11" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="rsvdd"/>
  471. <BindItem id="item13" compid="switch1.외래.output17" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="insukind"/>
  472. <BindItem id="item14" compid="switch1.외래.output8" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="orddrnm"/>
  473. <BindItem id="item15" compid="switch1.외래.output7" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="liceseno"/>
  474. <BindItem id="item16" compid="switch1.외래.output9" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="tel"/>
  475. <BindItem id="item17" compid="switch1.외래.output16" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="hostinprcpresnm"/>
  476. <BindItem id="item18" compid="switch1.외래.output13" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="diagnm"/>
  477. <BindItem id="item19" compid="switch1.외래.output18" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoout" columnid="detladdr"/>
  478. <BindItem id="item20" compid="switch1.입원.stw_output10" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="pid"/>
  479. <BindItem id="item21" compid="switch1.입원.stw_output6" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="hngnm"/>
  480. <BindItem id="item22" compid="switch1.입원.stw_output14" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="medispclnm"/>
  481. <BindItem id="item23" compid="switch1.입원.secret2" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="rrgstno"/>
  482. <BindItem id="item24" compid="switch1.입원.stw_output12" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="indd"/>
  483. <BindItem id="item27" compid="switch1.입원.stw_output17" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="insukind"/>
  484. <BindItem id="item28" compid="switch1.입원.stw_output8" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="hometel"/>
  485. <BindItem id="item29" compid="switch1.입원.stw_output9" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="mpphontel"/>
  486. <BindItem id="item30" compid="switch1.입원.stw_output13" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="diagnm"/>
  487. <BindItem id="item31" compid="switch1.입원.swt_output1" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="pdano"/>
  488. <BindItem id="item32" compid="switch1.입원.swt_output2" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="orddeptnm"/>
  489. <BindItem id="item33" compid="switch1.입원.stw_output18" propid="value" datasetid="ds_main_prcpinfo_patdetlinfoin" columnid="detladdr"/>
  490. </Bind>
  491. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  492. * System Name :
  493. * Job Name :
  494. * Creator :
  495. * Make Date : 2015-11-13
  496. * Description :
  497. *---------------------------------------------------------------------------------------
  498. * Modify Date Modifier Modify Description
  499. *---------------------------------------------------------------------------------------
  500. * 2015-11-13 Live Converter TF->XP
  501. *
  502. *---------------------------------------------------------------------------------------
  503. ****************************************************************************************/
  504. include "com_commonxp::comm_main.xjs";
  505. include "ast_commonxp::AST.xjs";
  506. include "com_basiccodexp::ZBC001.xjs";
  507. include "com_departmentcodexp::ZSD001.xjs";
  508. include "ast_examcurexp::AEZ0001.xjs";
  509. var arErrorCode = new HashArray();
  510. function SMADT40100_onload(obj:Form, e:LoadEventInfo)
  511. {
  512. frmf_initForm(obj); // 폼 초기화
  513. //grp_main.grd_ordlist.colhidden(1) = true;
  514. //grp_main.grd_pharmlist.colhidden(1) = true;
  515. switch1.selectedIndex = 0;
  516. //model.setValue("/root/send/req/srchprcpdd", getCurrentDate());
  517. ds_send_req.setColumn(0,"srchprcpdd" , utlf_getCurrentDate());
  518. //병동 Combo 조회
  519. //model.setValue("/root/send/req/deptflag", "W");
  520. ds_send_req.setColumn(0,"deptflag" , "W");
  521. //submit("TRADT10203");
  522. var oParam = {};
  523. oParam.id = "TRADC10203";
  524. oParam.service = "pharmacyprescriptionapp.DrugPrint";
  525. oParam.method = "reqGetDeptList";
  526. oParam.inds = "req=ds_send_req";
  527. oParam.outds = "ds_init_deptlist_ward=ward";
  528. oParam.async = false;
  529. oParam.callback = "cf_TRADC10203";
  530. tranf_submit(oParam);
  531. // trace(ds_init_deptlist_ward.saveXML());
  532. //처방상태 콤보
  533. //zbcfGetCodeList( new Array("M0011"), new Array("/root/init/cmbinfo/execprcpstatcd"));
  534. var arrParam = [{dsNm: "ds_M0011", cdGrpId: "M0011"} ]
  535. appf_getCodeList(arrParam);
  536. //model.makeNode("/root/temp/ward");
  537. //model.makeValue("/root/temp/ward/wardcd", "");
  538. //model.makeValue("/root/temp/ward/wardnm", "");
  539. ds_temp_ward.setColumn(0,"wardcd" , "");
  540. ds_temp_ward.setColumn(0,"wardnm" , "");
  541. //model.duplicate("/root/init/deptlist", "/root/temp/ward", "*[1]"); //위치를 지정해서 복사한다.
  542. var row = ds_init_deptlist.addRow();
  543. ds_init_deptlist.copyRow(row, ds_temp_ward, 1);
  544. // grp_main.grp_srch.cmb_ward.index = 0;
  545. grp_main.grp_srch.cmb_ward.enable = false ;
  546. grp_main.grp_srch.checkbox1.enable = false ;
  547. frmf_inputEnterKey("grp_main.grp_srch.rdo_div", "onitemchanged", new ItemChangeEventInfo);
  548. }
  549. function cf_TRADC10203(sSvcId, nErrorCode, sErrorMsg) {
  550. if(nErrorCode < 0) return;
  551. ds_init_deptlist_ward.insertRow(0);
  552. }
  553. function fSelectPrcp(){
  554. if(grp_main.grp_srch.rdo_div.value == 'O') {
  555. //submit("TRADT40101");
  556. var oParam = {};
  557. oParam.id = "TRADT40101";
  558. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  559. oParam.method = "reqGetPrcpCnfmOut";
  560. oParam.inds = "req=ds_send_req";
  561. oParam.outds = "ds_main_patinfo_patlist=patlist";
  562. oParam.async = false;
  563. //oParam.callback = "cf_TRADT40101";
  564. tranf_submit(oParam);
  565. } else if(grp_main.grp_srch.rdo_div.value == 'I' || grp_main.grp_srch.rdo_div.value == 'E') {
  566. //submit("TRADT40103");
  567. var oParam = {};
  568. oParam.id = "TRADT40103";
  569. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  570. oParam.method = "reqGetPrcpCnfmIn";
  571. oParam.inds = "req=ds_send_req";
  572. oParam.outds = "ds_main_patinfo_patlist=patlist";
  573. oParam.async = false;
  574. //oParam.callback = "cf_TRADT40103";
  575. tranf_submit(oParam);
  576. }
  577. }
  578. function fCompareGrid(grid1, grid2) {
  579. var rows_count;
  580. for (var i = 1 ; i<(grid1.rowcount) ; i++) {
  581. rows_count = 0;
  582. for(var j = 1 ; j<(grid2.rowcount) ; j++) {
  583. //if(model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/prcpcd") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/prcpcd")
  584. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/mthdhngnm") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/mthdhngnm")
  585. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/prcpqty") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/prcpqty")
  586. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/prcptims") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/prcptims")
  587. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/prcpdayno") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/prcpdayno")
  588. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/prnprcp") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/prnprcp")
  589. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/hosinhosoutflagnm") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/hosinhosoutflagnm")
  590. //&& model.getValue("/root/main/prcpinfo/prcplist["+ i +"]/prcpno") == model.getValue("/root/main/prcpinfo/druglist["+ j +"]/prcpno")
  591. if ( ds_main_prcpinfo_prcplist.getColumn(i, "prcpcd") == ds_main_prcpinfo_druglist.getColumn(j, "prcpcd")
  592. && ds_main_prcpinfo_prcplist.getColumn(i, "mthdhngnm") == ds_main_prcpinfo_druglist.getColumn(j, "mthdhngnm")
  593. && ds_main_prcpinfo_prcplist.getColumn(i, "prcpqty") == ds_main_prcpinfo_druglist.getColumn(j, "prcpqty")
  594. && ds_main_prcpinfo_prcplist.getColumn(i, "prcptims") == ds_main_prcpinfo_druglist.getColumn(j, "prcptims")
  595. && ds_main_prcpinfo_prcplist.getColumn(i, "prcpdayno") == ds_main_prcpinfo_druglist.getColumn(j, "prcpdayno")
  596. && ds_main_prcpinfo_prcplist.getColumn(i, "prnprcp") == ds_main_prcpinfo_druglist.getColumn(j, "prnprcp")
  597. && ds_main_prcpinfo_prcplist.getColumn(i, "hosinhosoutflagnm") == ds_main_prcpinfo_druglist.getColumn(j, "hosinhosoutflagnm")
  598. && ds_main_prcpinfo_prcplist.getColumn(i, "prcpno") == ds_main_prcpinfo_druglist.getColumn(j, "prcpno")
  599. ) {
  600. rows_count++; //두 grid의 각 컬럼들을 비교하여 일치하는 로우를 발견하면 카운트
  601. break;
  602. }
  603. }
  604. if (rows_count < 1) {
  605. //grid1.rowstyle(i, "all", "background-color") = "#FFF000"; //일치하는 로우를 발견하지 못하였을 경우 해당 로우의 색을 노란색으로 표시.
  606. grid1.setColumn(i, "bgcolor", 1);
  607. }
  608. }
  609. }
  610. function fCompareGrid2(grid1, grid2) {
  611. var rows_count;
  612. for (var i = 1 ; i<(grid1.rowcount) ; i++) {
  613. rows_count = 0;
  614. for(var j = 1 ; j<(grid2.rowcount) ; j++) {
  615. //if(model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/prcpcd") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/prcpcd")
  616. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/mthdhngnm") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/mthdhngnm")
  617. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/prcpqty") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/prcpqty")
  618. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/prcptims") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/prcptims")
  619. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/prcpdayno") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/prcpdayno")
  620. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/prnprcp") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/prnprcp")
  621. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/hosinhosoutflagnm") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/hosinhosoutflagnm")
  622. //&& model.getValue("/root/main/prcpinfo/prcplist["+ j +"]/prcpno") == model.getValue("/root/main/prcpinfo/druglist["+ i +"]/prcpno")
  623. if ( ds_main_prcpinfo_prcplist.getColumn(j, "prcpcd") == ds_main_prcpinfo_druglist.getColumn(i, "prcpcd")
  624. && ds_main_prcpinfo_prcplist.getColumn(j, "mthdhngnm") == ds_main_prcpinfo_druglist.getColumn(i, "mthdhngnm")
  625. && ds_main_prcpinfo_prcplist.getColumn(j, "prcpqty") == ds_main_prcpinfo_druglist.getColumn(i, "prcpqty")
  626. && ds_main_prcpinfo_prcplist.getColumn(j, "prcptims") == ds_main_prcpinfo_druglist.getColumn(i, "prcptims")
  627. && ds_main_prcpinfo_prcplist.getColumn(j, "prcpdayno") == ds_main_prcpinfo_druglist.getColumn(i, "prcpdayno")
  628. && ds_main_prcpinfo_prcplist.getColumn(j, "prnprcp") == ds_main_prcpinfo_druglist.getColumn(i, "prnprcp")
  629. && ds_main_prcpinfo_prcplist.getColumn(j, "hosinhosoutflagnm") == ds_main_prcpinfo_druglist.getColumn(i, "hosinhosoutflagnm")
  630. && ds_main_prcpinfo_prcplist.getColumn(j, "prcpno") == ds_main_prcpinfo_druglist.getColumn(i, "prcpno")
  631. ) {
  632. rows_count++; //두 grid의 각 컬럼들을 비교하여 일치하는 로우를 발견하면 카운트
  633. break;
  634. }
  635. }
  636. if (rows_count < 1) {
  637. //grid1.rowstyle(i, "all", "background-color") = "#FFF000"; //일치하는 로우를 발견하지 못하였을 경우 해당 로우의 색을 노란색으로 표시.
  638. grid1.setColumn(i, "bgcolor", 1);
  639. }
  640. }
  641. }
  642. // function fCompareCol() {
  643. // for (var i = 0 ; i < ds_main_patinfo_patlist.rowcount ; i++) {
  644. // if (ds_main_patinfo_patlist.getColumn(i, "drugno") > 0 ){
  645. // if (ds_main_patinfo_patlist.getColumn(i, "ordcnt") != ds_main_patinfo_patlist.getColumn(i, "pharmcnt") ){
  646. // ds_main_patinfo_patlist.setColumn(i, "bgcolor", 1);
  647. // }
  648. // }
  649. // }
  650. // }
  651. function fDisplayReset() {
  652. //model.removeNodeset("/root/main/patinfo");
  653. //model.removeNodeset("/root/main/prcpinfo");
  654. //grd_chklist.rebuildStyle();
  655. //grd_ordlist.rebuildStyle();
  656. //grd_pharmlist.rebuildStyle();
  657. ds_main_patinfo_patlist.clearData();
  658. ds_main_prcpinfo_druglist.clearData();
  659. ds_main_prcpinfo_prcplist.clearData();
  660. ds_main_prcpinfo_patdetlinfoout.clearData();
  661. }
  662. function grp_main_grp_srch_btn_srch_onclick(obj:Button, e:ClickEventInfo)
  663. {
  664. fDisplayReset();
  665. fSelectPrcp();
  666. // fCompareCol();
  667. }
  668. function grp_main_grp_srch_ipt_srchprcpdd_onkeyup(obj:Calendar, e:KeyEventInfo)
  669. {
  670. if(e.keycode == 13) {
  671. obj.updateToDataset();
  672. var e = new ClickEventInfo;
  673. frmf_inputEnterKey("grp_main.grp_srch.btn_srch", "onclick", e);
  674. }
  675. }
  676. function grp_main_grp_srch_ipt_drugno_onkeyup(obj:Edit, e:KeyEventInfo)
  677. {
  678. if(e.keycode == 13) {
  679. obj.updateToDataset();
  680. var e = new ClickEventInfo;
  681. frmf_inputEnterKey("grp_main.grp_srch.btn_srch", "onclick", e);
  682. }
  683. }
  684. function grp_main_grp_srch_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
  685. {
  686. if(e.keycode == 13) {
  687. obj.updateToDataset();
  688. var e = new ClickEventInfo;
  689. frmf_inputEnterKey("grp_main.grp_srch.btn_srch", "onclick", e);
  690. }
  691. }
  692. function grp_main_grp_srch_rdo_div_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  693. {
  694. if(grp_main.grp_srch.rdo_div.value == 'O') {
  695. //grp_main.grp_srch.cmb_ward.disabled = true;
  696. //grp_main.grp_srch.checkbox1.disabled = true;
  697. grp_main.grp_srch.cmb_ward.enable = false;
  698. grp_main.grp_srch.checkbox1.enable = false;
  699. //grp_main.grd_ordlist.colhidden(1) = true;
  700. //grp_main.grd_pharmlist.colhidden(1) = true;
  701. grp_main.grd_ordlist.setRealColSize(0,0) ;
  702. grp_main.grd_pharmlist.setRealColSize(0,0) ;
  703. switch1.tabindex = 0;
  704. grp_main.grp_srch.cmb_ward.index = 0;
  705. } else if(grp_main.grp_srch.rdo_div.value == 'I' ) {
  706. //grp_main.grp_srch.cmb_ward.disabled = false;
  707. //grp_main.grp_srch.checkbox1.disabled = false;
  708. grp_main.grp_srch.cmb_ward.enable = true;
  709. grp_main.grp_srch.checkbox1.enable = true;
  710. grp_main.grd_ordlist.setRealColSize(0,grp_main.grd_ordlist.getFormatColSize(1)) ;
  711. grp_main.grd_pharmlist.setRealColSize(0,grp_main.grd_ordlist.getFormatColSize(1)) ;
  712. switch1.tabindex = 1;
  713. } else if(grp_main.grp_srch.rdo_div.value == 'E' ) {
  714. //grp_main.grp_srch.cmb_ward.disabled = true;
  715. //grp_main.grp_srch.checkbox1.disabled = true;
  716. grp_main.grp_srch.cmb_ward.enable = false;
  717. grp_main.grp_srch.checkbox1.enable = false;
  718. //grp_main.grd_ordlist.colhidden(1) = true;
  719. //grp_main.grd_pharmlist.colhidden(1) = true;
  720. grp_main.grd_ordlist.setRealColSize(0,0) ;
  721. grp_main.grd_pharmlist.setRealColSize(0,0) ;
  722. switch1.tabindex = 1;
  723. }
  724. grp_main.grp_srch.cmb_ward.value = "";
  725. grp_main.grp_srch.checkbox1.value = "";
  726. fDisplayReset();
  727. //model.refresh();
  728. }
  729. function grp_main_grp_srch_cmb_ward_onkeyup(obj:Combo, e:KeyEventInfo)
  730. {
  731. //if(event.keyCode == "13") {
  732. if(e.keycode == "13") {
  733. setInputNodeCurText();
  734. //btn_srch.dispatch("DOMActivate");
  735. var e = new ClickEventInfo;
  736. frmf_inputEnterKey("grp_main.grp_srch.btn_srch", "onclick", e);
  737. }
  738. }
  739. function grp_main_grd_chklist_oncellclick(obj:Grid, e:GridClickEventInfo)
  740. {
  741. //model.setValue("/root/send/req/srchpid" , model.getValue("/root/main/patinfo/patlist["+grd_chklist.row+"]/pid"));
  742. //model.setValue("/root/send/req/srchorddd" , model.getValue("/root/main/patinfo/patlist["+grd_chklist.row+"]/srchorddd"));
  743. //model.setValue("/root/send/req/srchcretno" , model.getValue("/root/main/patinfo/patlist["+grd_chklist.row+"]/srchcretno"));
  744. //model.setValue("/root/send/req/srchdrugdd" , model.getValue("/root/main/patinfo/patlist["+grd_chklist.row+"]/drugdd"));
  745. //model.setValue("/root/send/req/srchdrugno" , model.getValue("/root/main/patinfo/patlist["+grd_chklist.row+"]/drugno"));
  746. ds_send_req.setColumn(0, "srchpid", ds_main_patinfo_patlist.getColumn(ds_main_patinfo_patlist.rowposition, "pid"));
  747. ds_send_req.setColumn(0, "srchorddd", ds_main_patinfo_patlist.getColumn(ds_main_patinfo_patlist.rowposition, "srchorddd"));
  748. ds_send_req.setColumn(0, "srchcretno", ds_main_patinfo_patlist.getColumn(ds_main_patinfo_patlist.rowposition, "srchcretno"));
  749. ds_send_req.setColumn(0, "srchdrugdd", ds_main_patinfo_patlist.getColumn(ds_main_patinfo_patlist.rowposition, "drugdd"));
  750. ds_send_req.setColumn(0, "srchdrugno", ds_main_patinfo_patlist.getColumn(ds_main_patinfo_patlist.rowposition, "drugno"));
  751. //if(model.getValue("/root/send/req/srchpid") != "")
  752. if (ds_send_req.getColumn(0, "srchpid") != "") {
  753. if(grp_main.grp_srch.rdo_div.value == 'O') {
  754. //submit("TRADT40102");
  755. var oParam = {};
  756. oParam.id = "TRADT40102";
  757. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  758. oParam.method = "reqGetPrcpCnfmList";
  759. oParam.inds = "req=ds_send_req";
  760. oParam.outds = "ds_main_prcpinfo_patdetlinfoout=patdetlinfoout ds_main_prcpinfo_prcplist=prcplist ds_main_prcpinfo_druglist=druglist";
  761. oParam.async = false;
  762. oParam.callback = "cf_TRADT40102";
  763. tranf_submit(oParam);
  764. } else if(grp_main.grp_srch.rdo_div.value == 'I' || grp_main.grp_srch.rdo_div.value == 'E') {
  765. //submit("TRADT40104");
  766. var oParam = {};
  767. oParam.id = "TRADT40104";
  768. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  769. oParam.method = "reqGetPrcpCnfmInList";
  770. oParam.inds = "req=ds_send_req";
  771. oParam.outds = "ds_=patdetlinfoin ds_=prcplist ds_=druglist";
  772. oParam.outds = "ds_main_prcpinfo_patdetlinfoin=patdetlinfoin ds_main_prcpinfo_prcplist=prcplist ds_main_prcpinfo_druglist=druglist";
  773. oParam.async = false;
  774. oParam.callback = "cf_TRADT40104";
  775. tranf_submit(oParam);
  776. }
  777. //grd_ordlist.rebuildStyle();
  778. //grd_pharmlist.rebuildStyle();
  779. fCompareGrid(grp_main.grd_ordlist, grp_main.grd_pharmlist);
  780. fCompareGrid2(grp_main.grd_pharmlist, grp_main.grd_ordlist);
  781. }
  782. }
  783. function cf_TRADT40102(sSvcId, nErrorCode, sErrorMsg) {
  784. if(nErrorCode < 0) return;
  785. }
  786. function cf_TRADT40104(sSvcId, nErrorCode, sErrorMsg) {
  787. if(nErrorCode < 0) return;
  788. }
  789. function switch1_입원_stw_output11_oneditclick(obj:Edit, e:EditClickEventInfo)
  790. {
  791. }
  792. ]]></Script>
  793. </Form>
  794. </FDL>