SMATR00200_임상환자처방조회.xfdl 57 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMATR00200" position="absolute 0 0 1195 766" titletext="임상환자처방조회" oninit="SMATR00200_oninit" onload="SMATR00200_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 13 1195 763" id="group3" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Static text="임상환자 리스트" position="absolute 0 78 129 95" id="caption7" class="tit_2" anchor="default"/>
  11. <Button position="absolute 1140 75 1195 94" id="button5" class="btn7" text="엑셀" anchor="top right" onclick="group3_button5_onclick"/>
  12. <Shape position="absolute 0 94 1195 100" linetype="horizontal" id="line2" class="line_1" anchor="left top right"/>
  13. <Shape position="absolute 0 416 1195 422" id="line3" class="line_1" anchor="left top right"/>
  14. <Static text="임상환자처방 리스트" position="absolute 0 400 163 417" id="caption9" class="tit_2" anchor="default"/>
  15. <Grid position="absolute 0 99 1195 393" id="grd_patlist" binddataset="ds_main_prcppatlist_item" anchor="left top right" onlbuttonup="group3_grd_patlist_onlbuttonup">
  16. <Formats>
  17. <Format id="default">
  18. <Columns>
  19. <Column size="25"/>
  20. <Column size="50"/>
  21. <Column size="63"/>
  22. <Column size="80"/>
  23. <Column size="85"/>
  24. <Column size="70"/>
  25. <Column size="110"/>
  26. <Column size="110"/>
  27. <Column size="180"/>
  28. <Column size="70"/>
  29. <Column size="60"/>
  30. <Column size="110"/>
  31. <Column size="110"/>
  32. <Column size="60"/>
  33. <Column size="0"/>
  34. <Column size="0"/>
  35. <Column size="0"/>
  36. <Column size="0"/>
  37. </Columns>
  38. <Rows>
  39. <Row size="24" band="head"/>
  40. <Row size="24"/>
  41. </Rows>
  42. <Band id="head">
  43. <Cell displaytype="checkbox" edittype="checkbox"/>
  44. <Cell col="1" text="구분"/>
  45. <Cell col="2" text="약번호"/>
  46. <Cell col="3" text="처방상태"/>
  47. <Cell col="4" text="처방일"/>
  48. <Cell col="5" text="처방의"/>
  49. <Cell col="6" text="과제번호"/>
  50. <Cell col="7" text="연구코드"/>
  51. <Cell col="8" text="품목명"/>
  52. <Cell col="9" text="등록번호"/>
  53. <Cell col="10" text="환자명"/>
  54. <Cell col="11" text="Screen No"/>
  55. <Cell col="12" text="피험자 ID"/>
  56. <Cell col="13" text="Initial"/>
  57. <Cell col="14" text="Visit/Cycle No."/>
  58. <Cell col="15" text="BSA,체중,신장"/>
  59. <Cell col="16" text="다음예약일"/>
  60. <Cell col="17" text="과제ID"/>
  61. </Band>
  62. <Band id="body">
  63. <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr : (chk==&quot;Y&quot;||chk==1)?1:0"/>
  64. <Cell col="1" style="align:left top;padding:5 2 0 2;" text="bind:ioflag" wordwrap="char"/>
  65. <Cell col="2" displaytype="text" style="align:left top;padding:5 2 0 2;" text="bind:drugno" wordwrap="char"/>
  66. <Cell col="3" style="align:left top;padding:5 2 0 2;" text="bind:prcpstatnm" wordwrap="char"/>
  67. <Cell col="4" displaytype="expr:utlf_isNull(fstrgstdt)?'normal':'date'" style="align:left top;padding:5 2 0 2;" text="bind:fstrgstdt" wordwrap="char"/>
  68. <Cell col="5" style="align:left top;padding:5 2 0 2;" text="bind:orddrnm" wordwrap="char"/>
  69. <Cell col="6" style="align:left top;padding:5 2 0 2;" text="bind:subjno" wordwrap="char"/>
  70. <Cell col="7" style="align:left top;padding:5 2 0 2;" text="bind:stdyno" wordwrap="char"/>
  71. <Cell col="8" style="align:left top;padding:5 2 0 2;" text="bind:itemnm" wordwrap="char"/>
  72. <Cell col="9" style="align:left top;padding:5 2 0 2;" text="bind:pid" wordwrap="char"/>
  73. <Cell col="10" style="align:left top;padding:5 2 0 2;" text="bind:hngnm" wordwrap="char"/>
  74. <Cell col="11" style="align:left top;padding:5 2 0 2;" text="bind:screenno" wordwrap="char"/>
  75. <Cell col="12" style="align:left top;padding:5 2 0 2;" text="bind:subtesteephosid" wordwrap="char"/>
  76. <Cell col="13" style="align:left top;padding:5 2 0 2;" text="bind:subtesteephosnm" wordwrap="char"/>
  77. <Cell col="14"/>
  78. <Cell col="15"/>
  79. <Cell col="16"/>
  80. <Cell col="17" text="bind:subjid"/>
  81. </Band>
  82. </Format>
  83. </Formats>
  84. </Grid>
  85. <Button position="absolute 85 670 127 689" id="btn_hist" class="btn2" text="이력" anchor="default" onclick="group3_btn_hist_onclick"/>
  86. <MaskEdit position="absolute 362 669 434 688" id="ipt_writeid" class="input_essential" mask="9999999999" anchor="default" onkeyup="group3_ipt_writeid_onkeyup"/>
  87. <Static text="사번" position="absolute 324 666 359 689" align="align:center middle;" id="caption21" class="cell_1" anchor="default" style="padding:0 0 0 4;"/>
  88. <Static text="메모사항" position="absolute 0 690 82 740" align="align:center middle;" id="caption22" class="cell_1" anchor="left top bottom"/>
  89. <Edit position="absolute 476 669 551 688" id="ipt_writenm" anchor="default"/>
  90. <Static text="작성일시" position="absolute 555 666 615 689" align="align:center middle;" id="caption14" class="cell_1" anchor="default" style="padding:0 0 0 4;"/>
  91. <MaskEdit position="absolute 618 669 745 688" id="ipt_writdt" mask="@@@@-@@-@@ @@:@@:@@" anchor="default" type="string"/>
  92. <Static text="약사메모" position="absolute 0 673 90 689" id="caption26" class="tit_2" anchor="default"/>
  93. <Button position="absolute 177 670 290 689" id="btn_ref" class="btn2" text="약사메모 상용구" anchor="default" onclick="group3_btn_ref_onclick"/>
  94. <Button position="absolute 131 670 173 689" id="btn_save" class="btn5" text="저장" anchor="default" onclick="group3_btn_save_onclick"/>
  95. <Static text="이름" position="absolute 438 666 473 689" align="align:center middle;" id="caption19" class="cell_1" anchor="default" style="padding:0 0 0 4;"/>
  96. <TextArea position="absolute 85 690 1193 740" id="tar_memo" anchor="all"/>
  97. <Button position="absolute 1140 397 1195 416" id="button2" class="btn7" text="엑셀" anchor="top right" onclick="group3_button2_onclick"/>
  98. <Grid position="absolute 0 421 1195 661" id="grd_prcplist" binddataset="ds_main_prcplist_item" anchor="left top right" cellsizingtype="col">
  99. <Formats>
  100. <Format id="default">
  101. <Columns>
  102. <Column size="25"/>
  103. <Column size="100"/>
  104. <Column size="0"/>
  105. <Column size="347"/>
  106. <Column size="59"/>
  107. <Column size="57"/>
  108. <Column size="57"/>
  109. <Column size="37"/>
  110. <Column size="68"/>
  111. <Column size="68"/>
  112. <Column size="37"/>
  113. <Column size="46"/>
  114. <Column size="44"/>
  115. <Column size="47"/>
  116. <Column size="300"/>
  117. </Columns>
  118. <Rows>
  119. <Row size="24" band="head"/>
  120. <Row size="24"/>
  121. </Rows>
  122. <Band id="head">
  123. <Cell/>
  124. <Cell col="1" text="약품번호"/>
  125. <Cell col="2" text="약품코드"/>
  126. <Cell col="3" text="처방명"/>
  127. <Cell col="4" text="급비"/>
  128. <Cell col="5" text="1일용량"/>
  129. <Cell col="6" text="1회용량"/>
  130. <Cell col="7" text="단위"/>
  131. <Cell col="8" text="1일수량"/>
  132. <Cell col="9" text="1회수량"/>
  133. <Cell col="10" text="단위"/>
  134. <Cell col="11" text="횟수"/>
  135. <Cell col="12" text="일수"/>
  136. <Cell col="13" text="수납"/>
  137. <Cell col="14" text="용법"/>
  138. </Band>
  139. <Band id="body">
  140. <Cell displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr:(chk==&quot;Y&quot;||chk==1)?1:0"/>
  141. <Cell col="1" displaytype="text" text="bind:prcpno"/>
  142. <Cell col="2" text="bind:prcpcd"/>
  143. <Cell col="3" displaytype="text" style="align:left top;padding:5 2 0 2;" text="bind:prcpnm" wordwrap="char"/>
  144. <Cell col="4" text="bind:payflagcd"/>
  145. <Cell col="5" text="bind:prcpvol"/>
  146. <Cell col="6" text="bind:prcpvol2"/>
  147. <Cell col="7" text="bind:prcpvolunit"/>
  148. <Cell col="8" text="bind:prcpqty"/>
  149. <Cell col="9" text="bind:prcpqty2"/>
  150. <Cell col="10" text="bind:prcpqtyunit"/>
  151. <Cell col="11" text="bind:prcptims"/>
  152. <Cell col="12" text="bind:prcpdayno"/>
  153. <Cell col="13" text="bind:payyn"/>
  154. <Cell col="14" displaytype="text" style="align:left top;padding:5 2 0 2;" text="bind:mthdnm" wordwrap="char"/>
  155. </Band>
  156. </Format>
  157. </Formats>
  158. </Grid>
  159. <Shape position="absolute 0 740 1194 746" linetype="horizontal" id="line6" class="line_3" anchor="left right bottom"/>
  160. <Shape id="line00" class="line_1" position="absolute 0 93 1195 99" anchor="left top right"/>
  161. <Shape id="line01" class="line_1" position="absolute 0 415 1195 421" anchor="left top right"/>
  162. <Shape id="line04" class="line_1" position="absolute 0 95 1195 101" anchor="left top right"/>
  163. <Shape id="line05" class="line_1" position="absolute 0 417 1195 423" anchor="left top right"/>
  164. </Layout>
  165. </Layouts>
  166. </Div>
  167. <Static id="caption6" text="임상환자 처방조회" class="tit_1" position="absolute 0 0 160 25"/>
  168. <Div id="group2" taborder="1" position="absolute 0 25 1195 85" class="div_SA" anchor="left top right">
  169. <Layouts>
  170. <Layout>
  171. <Static id="caption10" text="구 분 :" class="search_name" position="absolute 15 36 98 53" anchor="default"/>
  172. <Static id="caption1" text="처방일자 :" class="search_name" position="absolute 15 12 98 29" anchor="default"/>
  173. <Static id="caption2" text="~" class="search_n_b" position="absolute 218 12 230 29" anchor="default"/>
  174. <Calendar id="ipt_prcptodd" taborder="1" class="input_essential" position="absolute 230 10 338 29" anchor="default" autoselect="true"/>
  175. <Calendar id="ipt_prcpfromdd" taborder="0" class="input_essential" position="absolute 107 10 215 29" anchor="default" autoselect="true"/>
  176. <Static id="caption11" text="시험자 :" class="search_name" position="absolute 930 12 1021 29" anchor="default"/>
  177. <Button id="btn_srch" taborder="2" class="icon_search" position="absolute 1062 9 1082 29" anchor="default" onclick="group2_btn_srch_onclick"/>
  178. <Radio id="rdo_prcpflag" taborder="3" columncount="-1" rowcount="-1" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 107 36 398 53" anchor="default" style="textpadding:0 3 0 3;" onitemchanged="group2_rdo_prcpflag_onitemchanged">
  179. <Dataset id="innerdataset">
  180. <ColumnInfo>
  181. <Column id="codecolumn"/>
  182. <Column id="datacolumn"/>
  183. </ColumnInfo>
  184. <Rows>
  185. <Row>
  186. <Col id="codecolumn">1</Col>
  187. <Col id="datacolumn">임상약</Col>
  188. </Row>
  189. <Row>
  190. <Col id="codecolumn">2</Col>
  191. <Col id="datacolumn">원내약</Col>
  192. </Row>
  193. <Row>
  194. <Col id="codecolumn">3</Col>
  195. <Col id="datacolumn">원외약</Col>
  196. </Row>
  197. <Row>
  198. <Col id="codecolumn">4</Col>
  199. <Col id="datacolumn">임상검사</Col>
  200. </Row>
  201. <Row>
  202. <Col id="codecolumn">5</Col>
  203. <Col id="datacolumn">전체</Col>
  204. </Row>
  205. </Rows>
  206. </Dataset>
  207. </Radio>
  208. <Static id="caption3" text="등록번호 :" class="search_name" position="absolute 414 36 497 53" anchor="default"/>
  209. <Static id="caption4" text="과제번호 :" class="search_name" position="absolute 414 12 497 29" anchor="default"/>
  210. <Edit id="input5" taborder="4" class="input_search" position="absolute 505 10 600 29" anchor="default" onkeydown="group2_input_onkeydown"/>
  211. <Edit id="input7" taborder="5" class="input_search" position="absolute 505 35 600 54" anchor="default" onkeydown="group2_input_onkeydown"/>
  212. <CheckBox id="checkbox1" taborder="6" position="absolute 605 35 675 55" anchor="default" text="종결포함"/>
  213. <Radio id="radio2" taborder="7" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 603 11 693 28" anchor="default">
  214. <Dataset id="innerdataset">
  215. <ColumnInfo>
  216. <Column id="codecolumn"/>
  217. <Column id="datacolumn"/>
  218. </ColumnInfo>
  219. <Rows>
  220. <Row>
  221. <Col id="codecolumn">1</Col>
  222. <Col id="datacolumn">포함</Col>
  223. </Row>
  224. <Row>
  225. <Col id="codecolumn">2</Col>
  226. <Col id="datacolumn">일치</Col>
  227. </Row>
  228. </Rows>
  229. </Dataset>
  230. </Radio>
  231. <Static id="caption5" text="연구코드 :" class="search_name" position="absolute 719 12 810 29" anchor="default"/>
  232. <Static id="caption8" text="품 목 명 :" class="search_name" position="absolute 719 36 810 53" anchor="default"/>
  233. <Edit id="input2" taborder="8" class="input_search" position="absolute 810 35 905 54" anchor="default" onkeydown="group2_input_onkeydown"/>
  234. <Edit id="input1" taborder="9" class="input_search" position="absolute 810 10 905 29" anchor="default" onkeydown="group2_input_onkeydown"/>
  235. <Edit id="input3" taborder="10" class="input_search" position="absolute 1002 10 1060 29" anchor="default" onkeydown="group2_input3_onkeydown"/>
  236. <Shape id="line1" linetype="vertical" class="line_4" position="absolute 1101 9 1107 52" anchor="top right"/>
  237. <Button id="button1" taborder="11" text="조회" class="btn1" position="absolute 1120 20 1176 42" anchor="top right" onclick="group2_button1_onclick"/>
  238. </Layout>
  239. </Layouts>
  240. </Div>
  241. </Layout>
  242. </Layouts>
  243. <Objects>
  244. <Dataset id="ds_main_prcppatlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_main_prcppatlist_item_oncolumnchanged">
  245. <ColumnInfo>
  246. <Column id="chk" type="STRING" size="256"/>
  247. <Column id="ioflag" type="STRING" size="256"/>
  248. <Column id="drugno" type="STRING" size="256"/>
  249. <Column id="prcpstatnm" type="STRING" size="256"/>
  250. <Column id="fstrgstdt" type="STRING" size="256"/>
  251. <Column id="orddrnm" type="STRING" size="256"/>
  252. <Column id="subjno" type="STRING" size="256"/>
  253. <Column id="stdyno" type="STRING" size="256"/>
  254. <Column id="itemnm" type="STRING" size="256"/>
  255. <Column id="pid" type="STRING" size="256"/>
  256. <Column id="hngnm" type="STRING" size="256"/>
  257. <Column id="screenno" type="STRING" size="256"/>
  258. <Column id="subtesteephosid" type="STRING" size="256"/>
  259. <Column id="subtesteephosnm" type="STRING" size="256"/>
  260. <Column id="subjid" type="STRING" size="256"/>
  261. </ColumnInfo>
  262. </Dataset>
  263. <Dataset id="ds_main_prcplist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_main_prcplist_item_oncolumnchanged">
  264. <ColumnInfo>
  265. <Column id="chk" type="STRING" size="256"/>
  266. <Column id="prcpno" type="STRING" size="256"/>
  267. <Column id="prcpcd" type="STRING" size="256"/>
  268. <Column id="prcpnm" type="STRING" size="256"/>
  269. <Column id="payflagcd" type="STRING" size="256"/>
  270. <Column id="prcpvol" type="STRING" size="256"/>
  271. <Column id="prcpvolunit" type="STRING" size="256"/>
  272. <Column id="prcpqty" type="STRING" size="256"/>
  273. <Column id="prcpqtyunit" type="STRING" size="256"/>
  274. <Column id="prcptims" type="STRING" size="256"/>
  275. <Column id="prcpdayno" type="STRING" size="256"/>
  276. <Column id="payyn" type="STRING" size="256"/>
  277. <Column id="mthdnm" type="STRING" size="256"/>
  278. </ColumnInfo>
  279. </Dataset>
  280. <Dataset id="ds_main_detailinfo_baseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  281. <ColumnInfo>
  282. <Column id="pid" type="STRING" size="256"/>
  283. <Column id="orddd" type="STRING" size="256"/>
  284. <Column id="orddrnm" type="STRING" size="256"/>
  285. <Column id="tel" type="STRING" size="256"/>
  286. <Column id="hngnm" type="STRING" size="256"/>
  287. <Column id="rsvdd" type="STRING" size="256"/>
  288. <Column id="licenseno" type="STRING" size="256"/>
  289. <Column id="diagnm" type="STRING" size="256"/>
  290. <Column id="age" type="STRING" size="256"/>
  291. <Column id="orddeptnm" type="STRING" size="256"/>
  292. <Column id="hostinprcpresnm" type="STRING" size="256"/>
  293. <Column id="instcd" type="STRING" size="256"/>
  294. <Column id="insukind" type="STRING" size="256"/>
  295. <Column id="detladdr" type="STRING" size="256"/>
  296. <Column id="orddeptcd" type="STRING" size="256"/>
  297. <Column id="rrgstno" type="STRING" size="256"/>
  298. <Column id="sideinfo" type="STRING" size="256"/>
  299. </ColumnInfo>
  300. <Rows>
  301. <Row>
  302. <Col id="pid"/>
  303. <Col id="orddd"/>
  304. <Col id="orddrnm"/>
  305. <Col id="tel"/>
  306. <Col id="hngnm"/>
  307. <Col id="rsvdd"/>
  308. <Col id="licenseno"/>
  309. <Col id="diagnm"/>
  310. <Col id="age"/>
  311. <Col id="orddeptnm"/>
  312. <Col id="hostinprcpresnm"/>
  313. <Col id="instcd"/>
  314. <Col id="insukind"/>
  315. <Col id="detladdr"/>
  316. <Col id="orddeptcd"/>
  317. <Col id="rrgstno"/>
  318. <Col id="sideinfo"/>
  319. </Row>
  320. </Rows>
  321. </Dataset>
  322. <Dataset id="ds_main_detailinfo_memoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  323. <ColumnInfo>
  324. <Column id="pid" type="STRING" size="256"/>
  325. <Column id="seqno" type="STRING" size="256"/>
  326. <Column id="hosinhosoutflag" type="STRING" size="256"/>
  327. <Column id="instcd" type="STRING" size="256"/>
  328. <Column id="orddeptcd" type="STRING" size="256"/>
  329. <Column id="orddeptnm" type="STRING" size="256"/>
  330. <Column id="drugdd" type="STRING" size="256"/>
  331. <Column id="drugno" type="STRING" size="256"/>
  332. <Column id="writid2" type="STRING" size="256"/>
  333. <Column id="writnm" type="STRING" size="256"/>
  334. <Column id="writdt" type="STRING" size="256"/>
  335. <Column id="memo" type="STRING" size="256"/>
  336. <Column id="useyn" type="STRING" size="256"/>
  337. <Column id="m" type="STRING" size="256"/>
  338. <Column id="ioflag" type="STRING" size="256"/>
  339. <Column id="writid" type="STRING" size="256"/>
  340. </ColumnInfo>
  341. <Rows>
  342. <Row>
  343. <Col id="pid"/>
  344. <Col id="seqno"/>
  345. <Col id="hosinhosoutflag"/>
  346. <Col id="instcd"/>
  347. <Col id="orddeptcd"/>
  348. <Col id="orddeptnm"/>
  349. <Col id="drugdd"/>
  350. <Col id="drugno"/>
  351. <Col id="writid2"/>
  352. <Col id="writnm"/>
  353. <Col id="writdt"/>
  354. <Col id="memo"/>
  355. <Col id="useyn"/>
  356. <Col id="m"/>
  357. <Col id="ioflag"/>
  358. <Col id="writid"/>
  359. </Row>
  360. </Rows>
  361. </Dataset>
  362. <Dataset id="ds_main_detailinfo_grid2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  363. <ColumnInfo>
  364. <Column id="hosinhosoutflagnm" type="STRING" size="256"/>
  365. <Column id="prcpcd" type="STRING" size="256"/>
  366. <Column id="prcpnm" type="STRING" size="256"/>
  367. <Column id="prcpvoldisp" type="STRING" size="256"/>
  368. <Column id="prcpqtydisp" type="STRING" size="256"/>
  369. <Column id="prcptimes" type="STRING" size="256"/>
  370. <Column id="prcpdayno" type="STRING" size="256"/>
  371. <Column id="ordrtnflag" type="STRING" size="256"/>
  372. <Column id="prcpmixno" type="STRING" size="256"/>
  373. <Column id="powdflag" type="STRING" size="256"/>
  374. <Column id="mthdcd" type="STRING" size="256"/>
  375. <Column id="payflagcd" type="STRING" size="256"/>
  376. <Column id="prcpexecdeptnm" type="STRING" size="256"/>
  377. <Column id="fstrgstdt" type="STRING" size="256"/>
  378. <Column id="lastupdtdt" type="STRING" size="256"/>
  379. <Column id="hosinprcpresncd" type="STRING" size="256"/>
  380. <Column id="prcpdelivefact" type="STRING" size="256"/>
  381. <Column id="execprcphistcdnm" type="STRING" size="256"/>
  382. <Column id="orddd" type="STRING" size="256"/>
  383. <Column id="prcpno" type="STRING" size="256"/>
  384. <Column id="prcphistno" type="STRING" size="256"/>
  385. <Column id="instcd" type="STRING" size="256"/>
  386. <Column id="orddeptnm" type="STRING" size="256"/>
  387. <Column id="prcpvol" type="STRING" size="256"/>
  388. <Column id="prcpvolunitflag" type="STRING" size="256"/>
  389. <Column id="prcpqty" type="STRING" size="256"/>
  390. <Column id="prcpqtyunitflag" type="STRING" size="256"/>
  391. <Column id="prcpdd" type="STRING" size="256"/>
  392. <Column id="execprcphistcd" type="STRING" size="256"/>
  393. </ColumnInfo>
  394. <Rows>
  395. <Row>
  396. <Col id="hosinhosoutflagnm"/>
  397. <Col id="prcpcd"/>
  398. <Col id="prcpnm"/>
  399. <Col id="prcpvoldisp"/>
  400. <Col id="prcpqtydisp"/>
  401. <Col id="prcptimes"/>
  402. <Col id="prcpdayno"/>
  403. <Col id="ordrtnflag"/>
  404. <Col id="prcpmixno"/>
  405. <Col id="powdflag"/>
  406. <Col id="mthdcd"/>
  407. <Col id="payflagcd"/>
  408. <Col id="prcpexecdeptnm"/>
  409. <Col id="fstrgstdt"/>
  410. <Col id="lastupdtdt"/>
  411. <Col id="hosinprcpresncd"/>
  412. <Col id="prcpdelivefact"/>
  413. <Col id="execprcphistcdnm"/>
  414. <Col id="orddd"/>
  415. <Col id="prcpno"/>
  416. <Col id="prcphistno"/>
  417. <Col id="instcd"/>
  418. <Col id="orddeptnm"/>
  419. <Col id="prcpvol"/>
  420. <Col id="prcpvolunitflag"/>
  421. <Col id="prcpqty"/>
  422. <Col id="prcpqtyunitflag"/>
  423. <Col id="prcpdd"/>
  424. <Col id="execprcphistcd"/>
  425. </Row>
  426. </Rows>
  427. </Dataset>
  428. <Dataset id="ds_send_srchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  429. <ColumnInfo>
  430. <Column id="prcpfromdd" type="STRING" size="256"/>
  431. <Column id="prcptodd" type="STRING" size="256"/>
  432. <Column id="prcpflag" type="STRING" size="256"/>
  433. <Column id="subjno" type="STRING" size="256"/>
  434. <Column id="subjnoflag" type="STRING" size="256"/>
  435. <Column id="srchpid" type="STRING" size="256"/>
  436. <Column id="endyn" type="STRING" size="256"/>
  437. <Column id="stdyno" type="STRING" size="256"/>
  438. <Column id="itemnm" type="STRING" size="256"/>
  439. <Column id="orddrnm" type="STRING" size="256"/>
  440. <Column id="orddrid" type="STRING" size="256"/>
  441. </ColumnInfo>
  442. <Rows>
  443. <Row>
  444. <Col id="prcpfromdd"/>
  445. <Col id="prcptodd"/>
  446. <Col id="prcpflag">5</Col>
  447. <Col id="subjno"/>
  448. <Col id="subjnoflag">2</Col>
  449. <Col id="srchpid"/>
  450. <Col id="endyn"/>
  451. <Col id="stdyno"/>
  452. <Col id="itemnm"/>
  453. <Col id="orddrnm"/>
  454. <Col id="orddrid"/>
  455. </Row>
  456. </Rows>
  457. </Dataset>
  458. <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  459. <ColumnInfo>
  460. <Column id="pid" type="STRING" size="256"/>
  461. <Column id="prcpdd" type="STRING" size="256"/>
  462. <Column id="ioflag" type="STRING" size="256"/>
  463. </ColumnInfo>
  464. <Rows>
  465. <Row>
  466. <Col id="pid"/>
  467. <Col id="prcpdd"/>
  468. <Col id="ioflag"/>
  469. </Row>
  470. </Rows>
  471. </Dataset>
  472. <Dataset id="ds_send_usersrchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  473. <ColumnInfo>
  474. <Column id="srchuserid" type="STRING" size="256"/>
  475. </ColumnInfo>
  476. <Rows>
  477. <Row/>
  478. </Rows>
  479. </Dataset>
  480. <Dataset id="ds_send_memosrchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  481. <ColumnInfo>
  482. <Column id="srchpid" type="STRING" size="256"/>
  483. <Column id="srchinstcd" type="STRING" size="256"/>
  484. <Column id="srchioflag" type="STRING" size="256"/>
  485. </ColumnInfo>
  486. <Rows>
  487. <Row>
  488. <Col id="srchpid"/>
  489. <Col id="srchinstcd"/>
  490. <Col id="srchioflag"/>
  491. </Row>
  492. </Rows>
  493. </Dataset>
  494. <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  495. <Dataset id="ds_send_detailsrchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  496. <ColumnInfo>
  497. <Column id="srchpid" type="STRING" size="256"/>
  498. <Column id="srchorddd" type="STRING" size="256"/>
  499. <Column id="srchprcpdd" type="STRING" size="256"/>
  500. <Column id="srchcretno" type="STRING" size="256"/>
  501. <Column id="srchacptseqno" type="STRING" size="256"/>
  502. <Column id="srchinstcd" type="STRING" size="256"/>
  503. <Column id="srchorddeptcd" type="STRING" size="256"/>
  504. <Column id="srchhosinhosoutflag" type="STRING" size="256"/>
  505. <Column id="srchdrugdd" type="STRING" size="256"/>
  506. <Column id="srchdrugno" type="STRING" size="256"/>
  507. <Column id="rcptyn" type="STRING" size="256"/>
  508. </ColumnInfo>
  509. <Rows>
  510. <Row>
  511. <Col id="srchpid"/>
  512. <Col id="srchorddd"/>
  513. <Col id="srchprcpdd"/>
  514. <Col id="srchcretno"/>
  515. <Col id="srchacptseqno"/>
  516. <Col id="srchinstcd"/>
  517. <Col id="srchorddeptcd"/>
  518. <Col id="srchhosinhosoutflag"/>
  519. <Col id="srchdrugdd"/>
  520. <Col id="srchdrugno"/>
  521. <Col id="rcptyn"/>
  522. </Row>
  523. </Rows>
  524. </Dataset>
  525. <Dataset id="ds_send_srchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  526. <ColumnInfo>
  527. <Column id="srchpid" type="STRING" size="256"/>
  528. <Column id="srchinstcd" type="STRING" size="256"/>
  529. <Column id="srchioflag" type="STRING" size="256"/>
  530. </ColumnInfo>
  531. <Rows>
  532. <Row>
  533. <Col id="srchpid"/>
  534. <Col id="srchinstcd"/>
  535. <Col id="srchioflag"/>
  536. </Row>
  537. </Rows>
  538. </Dataset>
  539. <Dataset id="ds_init_baseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  540. <ColumnInfo>
  541. <Column id="sumtm" type="STRING" size="256"/>
  542. <Column id="prcpitem" type="STRING" size="256"/>
  543. <Column id="deptitem" type="STRING" size="256"/>
  544. <Column id="warditem" type="STRING" size="256"/>
  545. <Column id="drugkinditem" type="STRING" size="256"/>
  546. <Column id="prcpkinditem" type="STRING" size="256"/>
  547. <Column id="drugstatitem" type="STRING" size="256"/>
  548. </ColumnInfo>
  549. <Rows>
  550. <Row>
  551. <Col id="sumtm"/>
  552. <Col id="prcpitem"/>
  553. <Col id="deptitem"/>
  554. <Col id="warditem"/>
  555. <Col id="drugkinditem"/>
  556. <Col id="prcpkinditem"/>
  557. <Col id="drugstatitem"/>
  558. </Row>
  559. </Rows>
  560. </Dataset>
  561. <Dataset id="ds_init_dateinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  562. <Dataset id="ds_init_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  563. <ColumnInfo>
  564. <Column id="Column0" type="STRING" size="256"/>
  565. </ColumnInfo>
  566. <Rows>
  567. <Row/>
  568. </Rows>
  569. </Dataset>
  570. <Dataset id="ds_init_sumdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  571. <Dataset id="ds_init_deptlist_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  572. <ColumnInfo>
  573. <Column id="wardcd" type="STRING" size="256"/>
  574. <Column id="wardnm" type="STRING" size="256"/>
  575. </ColumnInfo>
  576. <Rows>
  577. <Row/>
  578. </Rows>
  579. </Dataset>
  580. <Dataset id="ds_init_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  581. <ColumnInfo>
  582. <Column id="pid" type="STRING" size="256"/>
  583. <Column id="hngnm" type="STRING" size="256"/>
  584. </ColumnInfo>
  585. <Rows>
  586. <Row/>
  587. </Rows>
  588. </Dataset>
  589. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  590. <ColumnInfo>
  591. <Column id="autoflag" type="STRING" size="256"/>
  592. </ColumnInfo>
  593. <Rows>
  594. <Row/>
  595. </Rows>
  596. </Dataset>
  597. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  598. <Dataset id="ds_temp_userinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  599. <Dataset id="ds_init_P0096" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  600. <Dataset id="ds_init_A0014" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  601. <Dataset id="ds_init_M0003" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  602. <Dataset id="ds_hidden_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  603. </Objects>
  604. <Bind>
  605. <BindItem id="item0" compid="group2.ipt_prcpfromdd" propid="value" datasetid="ds_send_srchdata" columnid="prcpfromdd"/>
  606. <BindItem id="item1" compid="group2.ipt_prcptodd" propid="value" datasetid="ds_send_srchdata" columnid="prcptodd"/>
  607. <BindItem id="item2" compid="group2.rdo_prcpflag" propid="value" datasetid="ds_send_srchdata" columnid="prcpflag"/>
  608. <BindItem id="item3" compid="group2.input5" propid="value" datasetid="ds_send_srchdata" columnid="subjno"/>
  609. <BindItem id="item4" compid="group2.input7" propid="value" datasetid="ds_send_srchdata" columnid="srchpid"/>
  610. <BindItem id="item5" compid="group2.radio2" propid="value" datasetid="ds_send_srchdata" columnid="subjnoflag"/>
  611. <BindItem id="item6" compid="group2.input1" propid="value" datasetid="ds_send_srchdata" columnid="stdyno"/>
  612. <BindItem id="item7" compid="group2.input2" propid="value" datasetid="ds_send_srchdata" columnid="itemnm"/>
  613. <BindItem id="item8" compid="group2.input3" propid="value" datasetid="ds_send_srchdata" columnid="orddrnm"/>
  614. <BindItem id="item9" compid="group2.checkbox1" propid="value" datasetid="ds_send_srchdata" columnid="endyn"/>
  615. <BindItem id="item10" compid="group3.ipt_writenm" propid="value" datasetid="ds_main_detailinfo_memoinfo" columnid="writnm"/>
  616. <BindItem id="item11" compid="group3.ipt_writeid" propid="value" datasetid="ds_main_detailinfo_memoinfo" columnid="writid2"/>
  617. <BindItem id="item12" compid="group3.ipt_writdt" propid="value" datasetid="ds_main_detailinfo_memoinfo" columnid="writdt"/>
  618. <BindItem id="item13" compid="group3.tar_memo" propid="value" datasetid="ds_main_detailinfo_memoinfo" columnid="memo"/>
  619. </Bind>
  620. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  621. * System Name :
  622. * Job Name :
  623. * Creator :
  624. * Make Date : 2015-11-13
  625. * Description :
  626. *---------------------------------------------------------------------------------------
  627. * Modify Date Modifier Modify Description
  628. *---------------------------------------------------------------------------------------
  629. * 2015-11-13 Live Converter TF->XP
  630. *
  631. *---------------------------------------------------------------------------------------
  632. ****************************************************************************************/
  633. //=======================================================================================
  634. // Lib Include
  635. //---------------------------------------------------------------------------------------
  636. include "com_commonxp::comm_main.xjs"
  637. include "emr_prcpmngtxp::MMOCommon.xjs"
  638. //=======================================================================================
  639. // Global Form Variable
  640. //---------------------------------------------------------------------------------------
  641. var arErrorCode = new HashArray();
  642. //=======================================================================================
  643. // Function
  644. //---------------------------------------------------------------------------------------
  645. /****************************************************************************************
  646. * Argument : N/A
  647. * Description : 약사메모 저장
  648. ****************************************************************************************/
  649. function fSubmitMemo() {
  650. var varSaveMode = ""; // i-입력, m-수정(제외)
  651. var varSaveFlag = false;
  652. var varWritId = ds_main_detailinfo_memoinfo.getColumn(0,"writid2");
  653. var iRow = ds_main_prcppatlist_item.rowposition;
  654. // 환자선택 필수
  655. var pid = ds_main_prcppatlist_item.getColumn(iRow,"pid");
  656. if (utlf_isNull(pid)) {
  657. sysf_messageBox("환자를 선택하시고", "C001");
  658. return;
  659. }
  660. // 작성자
  661. if (utlf_isNull(varWritId)) {
  662. sysf_messageBox("메모작성자 이름은", "I003");
  663. return;
  664. }
  665. ds_main_detailinfo_memoinfo.setColumn(0,"pid" , ds_main_prcppatlist_item.getColumn(iRow,"pid"));
  666. ds_main_detailinfo_memoinfo.setColumn(0,"useyn" , "Y");
  667. ds_main_detailinfo_memoinfo.setColumn(0,"seqno" , "");
  668. ds_main_detailinfo_memoinfo.setColumn(0,"orddeptcd" , ds_main_prcppatlist_item.getColumn(iRow,"orddeptcd"));
  669. ds_main_detailinfo_memoinfo.setColumn(0,"writdt" , utlf_getCurrentDateTime());
  670. // 입원(F)/외래(G) 구분
  671. if( ds_main_prcppatlist_item.getColumn(iRow,"ioflag") == "외래" ){
  672. ds_main_detailinfo_memoinfo.setColumn(0,"ioflag" , "G");
  673. ds_main_detailinfo_memoinfo.setColumn(0,"hosinhosoutflag", "G"); //강제로 넣었음..
  674. }else{
  675. ds_main_detailinfo_memoinfo.setColumn(0,"ioflag" , "F");
  676. ds_main_detailinfo_memoinfo.setColumn(0,"hosinhosoutflag", "F"); //강제로 넣었음..
  677. }
  678. // 저장은 무조건 추가로 처리, 수정기능은 제외
  679. ds_main_detailinfo_memoinfo.setColumn(0,"m", "i");
  680. // 자료수집
  681. ds_main_detailinfo_memoinfo.setColumn(0,"writid",varWritId);
  682. ds_send_data2.copyData(ds_main_detailinfo_memoinfo);
  683. var oParam = {};
  684. oParam.id = "TXADT00102";
  685. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  686. oParam.method = "reqExeMemoData";
  687. oParam.inds = "req=ds_send_data2";
  688. oParam.outds = "ds_hidden_ret=memoitem";
  689. oParam.async = false;
  690. oParam.callback = "cf_TXADT00102";
  691. tranf_submit(oParam);
  692. if(arErrorCode.pop("TXADT00102") > -1){
  693. sysf_messageBox("메모저장이", "I002");
  694. }
  695. }
  696. function cf_TXADT00102(sSvcId, nErrorCode, sErrorMsg) {
  697. arErrorCode.push(sSvcId, nErrorCode);
  698. }
  699. /****************************************************************************************
  700. * Argument : N/A
  701. * Description : 임상환자 리스트 조회
  702. ****************************************************************************************/
  703. function call_TRATR00201() {
  704. var oParam = {};
  705. oParam.id = "TRATR00201";
  706. oParam.service = "crccbaseapp.CrccBase";
  707. oParam.method = "reqGetPrcpPatList";
  708. oParam.inds = "req=ds_send_srchdata";
  709. oParam.outds = "ds_main_prcppatlist_item=item";
  710. oParam.async = false;
  711. oParam.callback = "cf_TRATR00201";
  712. tranf_submit(oParam);
  713. }
  714. function cf_TRATR00201(sSvcId, nErrorCode, sErrorMsg) {
  715. if(nErrorCode < 0) return;
  716. dsf_setFixVal(ds_main_prcppatlist_item, "chk:N");
  717. }
  718. //=======================================================================================
  719. // Event
  720. //---------------------------------------------------------------------------------------
  721. /****************************************************************************************
  722. * Components : Form
  723. * Components ID : SMATR00200
  724. * Event : oninit
  725. * Argument : 01.obj : Object Event has occurred
  726. * : 02.e : Event Object
  727. * Description : 화면 처음 초기화시 폼초기화
  728. ****************************************************************************************/
  729. function SMATR00200_oninit(obj:Form, e:InitEventInfo)
  730. {
  731. frmf_initForm(obj); // 폼 초기화
  732. }
  733. /****************************************************************************************
  734. * Components : Form
  735. * Components ID : SMATR00200
  736. * Event : onload
  737. * Argument : 01.obj : Object Event has occurred
  738. * : 02.e : Event Object
  739. * Description : 화면 처음 초기화시 폼초기화
  740. ****************************************************************************************/
  741. function SMATR00200_onload(obj:Form, e:LoadEventInfo)
  742. {
  743. ds_send_srchdata.setColumn(0,"prcpfromdd", utlf_getCurrentDate());
  744. ds_send_srchdata.setColumn(0,"prcptodd" , utlf_getCurrentDate());
  745. grdf_initGrid(group3.grd_patlist); // 그리드 전체 체크 기능 + 그리드소트
  746. // var success = false;
  747. // success = submit("TRADT00103");
  748. // 현재시간
  749. var oParam = {};
  750. oParam.id = "TRADT00103";
  751. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  752. oParam.method = "reqGetCurrentDate";
  753. //oParam.inds = "req=ds_";
  754. oParam.outds = "ds_init_dateinfo=dateinfo";
  755. oParam.async = false;
  756. oParam.callback = "cf_TRADT00103";
  757. tranf_submit(oParam);
  758. ds_main_detailinfo_memoinfo.setColumn(0,"writid" , sysf_getUserId());
  759. ds_main_detailinfo_memoinfo.setColumn(0,"writnm" , sysf_getUserName());
  760. ds_main_detailinfo_memoinfo.setColumn(0,"writdt" , ds_init_dateinfo.getColumn(0,"currentdt"));
  761. //조제시참조사항
  762. // zbcfGetCodeList( new Array("P0096","A0014","M0003"), new Array("/root/init/baseinfo/prcpitem","/root/init/baseinfo/drugkinditem","/root/init/baseinfo/prcpkinditem") );
  763. var arrParam = [{dsNm: "ds_init_P0096", cdGrpId: "P0096"}
  764. ,{dsNm: "ds_init_A0014", cdGrpId: "A0014"}
  765. ,{dsNm: "ds_init_M0003", cdGrpId: "M0003"}
  766. ]
  767. appf_getCodeList(arrParam);
  768. //1일기준인지 1회기준인지 체크하여 컬럼을 hidden
  769. var colHidnValue = lf_grdBaseColHidn("D");
  770. //1회 기준
  771. if( colHidnValue == "C" ) {
  772. group3.grd_prcplist.setFormatColProperty(group3.grd_prcplist.getBindCellIndex("body","prcpvol"),"size",0);
  773. group3.grd_prcplist.setFormatColProperty(group3.grd_prcplist.getBindCellIndex("body","prcpqty"),"size",0);
  774. } else {
  775. group3.grd_prcplist.setFormatColProperty(group3.grd_prcplist.getBindCellIndex("body","prcpvol2"),"size",0);
  776. group3.grd_prcplist.setFormatColProperty(group3.grd_prcplist.getBindCellIndex("body","prcpqty2"),"size",0);
  777. }
  778. }
  779. function cf_TRADT00103(sSvcId, nErrorCode, sErrorMsg) {
  780. arErrorCode.push(sSvcId, nErrorCode);
  781. }
  782. /****************************************************************************************
  783. * Components : Dataset
  784. * Components ID : ds_main_prcppatlist_item
  785. * Event : oncolumnchanged
  786. * Argument : 01.obj : Object Event has occurred
  787. * : 02.e : Event Object
  788. * Description : 체크박스 체크시 이벤트
  789. ****************************************************************************************/
  790. function ds_main_prcppatlist_item_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  791. {
  792. if(e.columnid=="chk") {
  793. obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
  794. }
  795. }
  796. /****************************************************************************************
  797. * Components : Button
  798. * Components ID : group2.button1
  799. * Event : onclick
  800. * Argument : 01.obj : Object Event has occurred
  801. * : 02.e : Event Object
  802. * Description : 조회
  803. ****************************************************************************************/
  804. function group2_button1_onclick(obj:Button, e:ClickEventInfo)
  805. {
  806. call_TRATR00201();
  807. }
  808. /****************************************************************************************
  809. * Components : Radio
  810. * Components ID : group2.rdo_prcpflag
  811. * Event : onitemchanged
  812. * Argument : 01.obj : Object Event has occurred
  813. * : 02.e : Event Object
  814. * Description : 구분 선택시 임상환자리스트 클릭 이벤트 실행
  815. ****************************************************************************************/
  816. function group2_rdo_prcpflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  817. {
  818. obj.updateToDataset();
  819. frmf_inputEnterKey("group3.grd_patlist", "onlbuttonup", new GridMouseEventInfo);
  820. }
  821. /****************************************************************************************
  822. * Components : Edit
  823. * Components ID : group2.input
  824. * Event : onkeydown
  825. * Argument : 01.obj : Object Event has occurred
  826. * : 02.e : Event Object
  827. * Description : 조회 입력란 공통. 조건 입력후 엔터로 조회
  828. ****************************************************************************************/
  829. function group2_input_onkeydown(obj:Edit, e:KeyEventInfo)
  830. {
  831. if (e.keycode == 13 ) {
  832. obj.updateToDataset();
  833. call_TRATR00201();
  834. }
  835. }
  836. /****************************************************************************************
  837. * Components : Button
  838. * Components ID : group2.btn_srch
  839. * Event : onclick
  840. * Argument : 01.obj : Object Event has occurred
  841. * : 02.e : Event Object
  842. * Description : 시험자 조회 팝업 버튼
  843. ****************************************************************************************/
  844. function group2_btn_srch_onclick(obj:Button, e:ClickEventInfo)
  845. {
  846. var srchNm = ds_send_srchdata.getColumn(0,"orddrnm");
  847. var srchNo = ds_send_srchdata.getColumn(0,"subjno");
  848. var srchCd = ds_send_srchdata.getColumn(0,"stdyno");
  849. if( !utlf_isNull(srchNm) ) frmf_setParameter("SMATR00500_srchnm", srchNm);
  850. if( !utlf_isNull(srchNo) ) frmf_setParameter("SMATR00500_srchno", srchNo);
  851. if( !utlf_isNull(srchCd) ) frmf_setParameter("SMATR00500_srchcd", srchCd);
  852. frmf_modal("SPATR00500", "SPATR00500", "", "", "", "", "", "", "", "", "", "", "M");
  853. var rtnId = frmf_getParameter("SMATR00500_rtnid");
  854. var rtnNm = frmf_getParameter("SMATR00500_rtnnm");
  855. if( !utlf_isNull(rtnId) && !utlf_isNull(rtnNm) ){
  856. ds_send_srchdata.setColumn(0,"orddrid", rtnId);
  857. ds_send_srchdata.setColumn(0,"orddrnm", rtnNm);
  858. }
  859. frmf_clearParameter("SMATR00500_srchnm");
  860. frmf_clearParameter("SMATR00500_srchno");
  861. frmf_clearParameter("SMATR00500_srchcd");
  862. frmf_clearParameter("SMATR00500_rtnid");
  863. frmf_clearParameter("SMATR00500_rtnnm");
  864. }
  865. /****************************************************************************************
  866. * Components : Edit
  867. * Components ID : group2.input3
  868. * Event : onkeydown
  869. * Argument : 01.obj : Object Event has occurred
  870. * : 02.e : Event Object
  871. * Description : 시험자 조회 팝업
  872. ****************************************************************************************/
  873. function group2_input3_onkeydown(obj:Edit, e:KeyEventInfo)
  874. {
  875. if (e.keycode == 13) {
  876. obj.updateToDataset();
  877. frmf_inputEnterKey("group2.btn_srch", "onclick", new ClickEventInfo);
  878. }
  879. }
  880. /****************************************************************************************
  881. * Components : Button
  882. * Components ID : group3.button5
  883. * Event : onclick
  884. * Argument : 01.obj : Object Event has occurred
  885. * : 02.e : Event Object
  886. * Description : 엑셀저장
  887. ****************************************************************************************/
  888. function group3_button5_onclick(obj:Button, e:ClickEventInfo)
  889. {
  890. if( ds_main_prcppatlist_item.rowcount > 0 ){
  891. var sheetName = ds_send_srchdata.getColumn(0,"prcpfromdd") + "-" + ds_send_srchdata.getColumn(0,"prcptodd");
  892. grdf_exportExcel(group3.grd_patlist, "임상환자리스트", sheetName, false, "", "user", false);
  893. } else {
  894. sysf_messageBox("조회된 데이터가 ", "I004");
  895. }
  896. }
  897. function group3_grd_patlist_onlbuttonup(obj:Grid, e:GridMouseEventInfo)
  898. {
  899. var iRow = e.row;
  900. if( iRow > -1 ){
  901. var ioFlag = ds_main_prcppatlist_item.getColumn(iRow,"ioflag");
  902. ds_send_data.setColumn(0,"pid" , ds_main_prcppatlist_item.getColumn(iRow,"pid") );
  903. ds_send_data.setColumn(0,"prcpdd", ds_main_prcppatlist_item.getColumn(iRow,"prcpdd") );
  904. if( ioFlag == "외래") ds_send_data.setColumn(0,"ioflag", "O");
  905. else ds_send_data.setColumn(0,"ioflag", "I");
  906. var oParam = {};
  907. oParam.id = "TRATR00202";
  908. oParam.service = "crccbaseapp.CrccBase";
  909. oParam.method = "reqGetPrcpList";
  910. oParam.inds = "req=ds_send_data";
  911. oParam.outds = "ds_main_prcplist_item=item";
  912. oParam.async = false;
  913. oParam.callback = "cf_TRATR00202";
  914. tranf_submit(oParam);
  915. if(arErrorCode.pop("TRATR00202") > -1) { //처방조회
  916. // 조회조건세팅
  917. ds_send_detailsrchinfo.setColumn(0,"srchpid" , ds_main_prcppatlist_item.getColumn(iRow,"pid"));
  918. ds_send_detailsrchinfo.setColumn(0,"srchprcpdd" , ds_main_prcppatlist_item.getColumn(iRow,"prcpdd"));
  919. ds_send_detailsrchinfo.setColumn(0,"srchcretno" , ds_main_prcppatlist_item.getColumn(iRow,"cretno"));
  920. ds_send_detailsrchinfo.setColumn(0,"srchorddeptcd" , ds_main_prcppatlist_item.getColumn(iRow,"orddeptcd"));
  921. ds_send_detailsrchinfo.setColumn(0,"srchdrugdd" , ds_main_prcppatlist_item.getColumn(iRow,"drugdd"));
  922. ds_send_detailsrchinfo.setColumn(0,"srchdrugno" , ds_main_prcppatlist_item.getColumn(iRow,"drugno"));
  923. if( ioFlag == "외래"){
  924. dsf_makeValue(ds_send_detailsrchinfo,"srchorddd" ,"string",ds_main_prcppatlist_item.getColumn(iRow,"orddd")); //진료일자
  925. dsf_makeValue(ds_send_detailsrchinfo,"srchosinhosoutflag","string","G");
  926. }else{
  927. dsf_makeValue(ds_send_detailsrchinfo,"srchindd" ,"string",ds_main_prcppatlist_item.getColumn(iRow,"orddd")); //진료일자
  928. dsf_makeValue(ds_send_detailsrchinfo,"srchosinhosoutflag","string","F");
  929. }
  930. var oParam = {};
  931. oParam.id = "TRADT20102";
  932. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  933. oParam.method = "reqGetSpclDrugOrdList";
  934. oParam.inds = "req=ds_send_detailsrchinfo";
  935. oParam.outds = "ds_main_detailinfo_baseinfo=baseinfo ds_main_detailinfo_memoinfo=memoinfo ds_main_detailinfo_grid2=grid2";
  936. oParam.async = false;
  937. oParam.callback = "cf_TRADT20102";
  938. tranf_submit(oParam);
  939. if(arErrorCode.pop("TRADT20102") > -1) { // 메모조회 (2009.09.14 JJE 추가)
  940. if(!utlf_isNull(ds_main_detailinfo_memoinfo.getColumn(0,"writid"))){
  941. ds_main_detailinfo_memoinfo.setColumn(0,"writid2", ds_main_detailinfo_memoinfo.getColumn(0,"writid"));
  942. }
  943. }
  944. //메모조회해서 자료가 없을경우
  945. if(utlf_isNull(ds_main_detailinfo_memoinfo.getColumn(0,"writid"))){
  946. ds_main_detailinfo_memoinfo.setColumn(0,"writid" , sysf_getUserId() );
  947. ds_main_detailinfo_memoinfo.setColumn(0,"writnm" , sysf_getUserName() );
  948. ds_main_detailinfo_memoinfo.setColumn(0,"writdt" , ds_init_dateinfo.getColumn(0,"currentdt"));
  949. }
  950. }
  951. }
  952. }
  953. function cf_TRATR00202(sSvcId, nErrorCode, sErrorMsg) {
  954. arErrorCode.push(sSvcId, nErrorCode);
  955. dsf_setFixVal(ds_main_prcplist_item, "chk:N");
  956. }
  957. function cf_TRADT20102(sSvcId, nErrorCode, sErrorMsg) {
  958. arErrorCode.push(sSvcId, nErrorCode);
  959. if(ds_main_detailinfo_memoinfo.rowcount == 0) ds_main_detailinfo_memoinfo.addRow();
  960. }
  961. /****************************************************************************************
  962. * Components : Button
  963. * Components ID : group3.button2
  964. * Event : onclick
  965. * Argument : 01.obj : Object Event has occurred
  966. * : 02.e : Event Object
  967. * Description : 엑셀저장
  968. ****************************************************************************************/
  969. function group3_button2_onclick(obj:Button, e:ClickEventInfo)
  970. {
  971. var selPatName = "";
  972. var selPrcpDate = "";
  973. if( ds_main_prcppatlist_item.rowcount < 1 ) {
  974. sysf_messageBox("자료가조회되지 않았습니다.","I9999");
  975. return;
  976. }
  977. if( ds_main_prcppatlist_item.rowposition < 0 ) {
  978. sysf_messageBox("환자를 선택하십시오","I9999");
  979. return;
  980. }
  981. if( ds_main_prcppatlist_item.rowposition > -1 ){
  982. //1. 선택한 row의 환자 처방을 출력
  983. selPrcpDate = ds_main_prcppatlist_item.getColumn(ds_main_prcppatlist_item.rowposition,"prcpdd");
  984. selPatName = ds_main_prcppatlist_item.getColumn(ds_main_prcppatlist_item.rowposition,"hngnm");
  985. }else if( !utlf_isNull(ds_main_prcppatlist_item.lookup("chk","Y","hngnm"))){
  986. //2. 체크한 환자 중 첫번째 환자 처방을 출력
  987. selPrcpDate = ds_main_prcppatlist_item.lookup("chk","Y","prcpdd");
  988. selPatName = ds_main_prcppatlist_item.lookup("chk","Y","hngnm");
  989. }else{
  990. sysf_messageBox("환자를", "C002");
  991. return;
  992. }
  993. var fileName = selPrcpDate+" "+selPatName;
  994. if (fileName != ""){
  995. grdf_exportExcel(group3.grd_prcplist, fileName, "처방내역", false, "", "user", false);
  996. }
  997. }
  998. /****************************************************************************************
  999. * Components : Button
  1000. * Components ID : group3.btn_hist
  1001. * Event : onclick
  1002. * Argument : 01.obj : Object Event has occurred
  1003. * : 02.e : Event Object
  1004. * Description : 약사메모이력
  1005. ****************************************************************************************/
  1006. function group3_btn_hist_onclick(obj:Button, e:ClickEventInfo)
  1007. {
  1008. var iRow = ds_main_prcppatlist_item.rowposition;
  1009. if (ds_main_prcppatlist_item.rowcount < 1 ) {
  1010. sysf_messageBox("자료가조회되지 않았습니다.","I9999");
  1011. return;
  1012. }
  1013. if (iRow < 0) {
  1014. sysf_messageBox("환자를 선택하십시오.","I9999");
  1015. return;
  1016. }
  1017. ds_send_memosrchinfo.setColumn(0,"srchpid" , ds_main_prcppatlist_item.getColumn(iRow,"pid"));
  1018. ds_send_memosrchinfo.setColumn(0,"srchinstcd", "Y");
  1019. if( ds_main_prcppatlist_item.getColumn(iRow,"ioflag") == "외래" ){
  1020. ds_send_memosrchinfo.setColumn(0,"srchioflag", "F");
  1021. }else{
  1022. ds_send_memosrchinfo.setColumn(0,"srchioflag", "G");
  1023. }
  1024. var objArg = new Object();
  1025. objArg.arg_ds_send_srchinfo = ds_send_memosrchinfo;
  1026. frmf_modal("SPATR00400", "SPATR00400", objArg, "", 0, 100, 150, "", "", "", "", "", "M");
  1027. }
  1028. /****************************************************************************************
  1029. * Components : Button
  1030. * Components ID : group3.btn_save
  1031. * Event : onclick
  1032. * Argument : 01.obj : Object Event has occurred
  1033. * : 02.e : Event Object
  1034. * Description : 약사메모 저장
  1035. ****************************************************************************************/
  1036. function group3_btn_save_onclick(obj:Button, e:ClickEventInfo)
  1037. {
  1038. fSubmitMemo();
  1039. }
  1040. /****************************************************************************************
  1041. * Components : Button
  1042. * Components ID : group3.btn_ref
  1043. * Event : onclick
  1044. * Argument : 01.obj : Object Event has occurred
  1045. * : 02.e : Event Object
  1046. * Description : 약사메모 상용구
  1047. ****************************************************************************************/
  1048. function group3_btn_ref_onclick(obj:Button, e:ClickEventInfo)
  1049. {
  1050. var objArg = new Object();
  1051. objArg.arg_ds_send_memosrchinfo = ds_send_memosrchinfo;
  1052. frmf_modal("SPADB60602", "SPADB60602", objArg, "", 0, 100, 160, "", "", "", "", "", "M");
  1053. }
  1054. /****************************************************************************************
  1055. * Components : Edit
  1056. * Components ID : group3.ipt_writeid
  1057. * Event : onkeyup
  1058. * Argument : 01.obj : Object Event has occurred
  1059. * : 02.e : Event Object
  1060. * Description : 사번을 입력해서 메모를 저장?
  1061. ****************************************************************************************/
  1062. function group3_ipt_writeid_onkeyup(obj:MaskEdit, e:KeyEventInfo)
  1063. {
  1064. if(e.keycode == 13) {
  1065. obj.updateToDataset();
  1066. if( !utlf_isNull(ds_main_detailinfo_memoinfo.getColumn(0,"writid2").getTrim()) ) {
  1067. var writid = ds_main_detailinfo_memoinfo.getColumn(0,"writid2").getTrim();
  1068. ds_send_usersrchinfo.setColumn(0,"srchuserid", writid );
  1069. var oParam = {};
  1070. oParam.id = "TRADT00105";
  1071. oParam.service = "pharmacyprescriptionapp.MpsCheck";
  1072. oParam.method = "reqGetUserInfo";
  1073. oParam.inds = "req=ds_send_usersrchinfo";
  1074. oParam.outds = "ds_temp_userinfo=item";
  1075. oParam.async = false;
  1076. oParam.callback = "cf_TRADT00105";
  1077. tranf_submit(oParam);
  1078. if(arErrorCode.pop("TRADT00104") > -1){
  1079. ds_main_detailinfo_memoinfo.setColumn(0,"writid2", ds_temp_userinfo.getColumn(0,"userid"));
  1080. ds_main_detailinfo_memoinfo.setColumn(0,"writnm" , ds_temp_userinfo.getColumn(0,"usernm"));
  1081. // 반환된 약사정보(이름) 체크
  1082. if( !utlf_isNull(ds_main_detailinfo_memoinfo.getColumn(0,"writnm").getTrim()) ) {
  1083. fSubmitMemo();
  1084. } else {
  1085. sysf_messageBox("입력한 사번으로 이름 확인을", "E009");
  1086. return;
  1087. }
  1088. }
  1089. } else {
  1090. sysf_messageBox("약사메모 입력을 위해 사번은", "I003");
  1091. ds_main_detailinfo_memoinfo.setColumn(0,"writid2", ds_main_detailinfo_memoinfo.getColumn(0,"writid2").getTrim() );
  1092. return;
  1093. }
  1094. }
  1095. }
  1096. function cf_TRADT00104(sSvcId, nErrorCode, sErrorMsg) {
  1097. arErrorCode.push(sSvcId, nErrorCode);
  1098. }
  1099. function ds_main_prcplist_item_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1100. {
  1101. if(e.columnid=="chk") {
  1102. obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
  1103. }
  1104. }
  1105. ]]></Script>
  1106. </Form>
  1107. </FDL>