SMADC10900_임상약출력.xfdl 58 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADC10900" position="absolute 0 0 1196 805" titletext="임상약 처방전 출력" oninit="SMADC10900_oninit" onload="SMADC10900_onload" ontimer="SMADC10900_ontimer">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 25 1195 805" id="group3" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Edit position="absolute 964 6 1044 27" id="input3" class="input_default" anchor="top right" onkeyup="group3_input3_onkeyup"/>
  11. <Shape id="line00" class="line_2" position="absolute 899 53 1194 59" anchor="top right"/>
  12. <Shape position="absolute 899 26 1194 32" linetype="horizontal" id="line3" class="line_2" anchor="top right"/>
  13. <Edit position="absolute 1111 33 1191 54" id="input8" class="input_default" anchor="top right"/>
  14. <Static text="불출자ID" position="absolute 901 31 961 56" align="align:center middle;" id="caption3" class="cell_1" anchor="top right"/>
  15. <Static text="조제완료" position="absolute 901 4 961 29" align="align:center middle;" id="caption13" class="cell_1" anchor="top right"/>
  16. <Static text="불출자" position="absolute 1048 31 1108 56" align="align:center middle;" id="caption6" class="cell_1" anchor="top right"/>
  17. <Shape position="absolute 899 -1 1194 5" linetype="horizontal" id="line2" class="line_1" anchor="top right"/>
  18. <Edit position="absolute 964 33 1044 54" id="input5" class="input_default" anchor="top right"/>
  19. <Shape position="absolute 899 56 1194 62" linetype="horizontal" id="line6" class="line_3" anchor="top right"/>
  20. <Static text="투약완료" position="absolute 1048 4 1108 29" align="align:center middle;" id="caption9" class="cell_1" anchor="top right"/>
  21. <Edit position="absolute 1111 6 1191 27" id="input4" class="input_default" anchor="top right" onkeyup="group3_input4_onkeyup"/>
  22. <Shape id="line01" class="line_3" position="absolute 0 86 1194 92" anchor="left top right"/>
  23. <Grid id="grd_crdruglist" taborder="1" binddataset="ds_main_crdruglist_item" useinputpanel="false" selecttype="multirow" extendsizetype="row" cellsizingtype="both" onlbuttonup="group3_grd_crdruglist_onlbuttonup" position="absolute 0 91 1194 779" anchor="all">
  24. <Formats>
  25. <Format id="default">
  26. <Columns>
  27. <Column size="25" band="left"/>
  28. <Column size="0" band="left"/>
  29. <Column size="0" band="left"/>
  30. <Column size="26"/>
  31. <Column size="60"/>
  32. <Column size="60"/>
  33. <Column size="75"/>
  34. <Column size="70"/>
  35. <Column size="50"/>
  36. <Column size="40"/>
  37. <Column size="100"/>
  38. <Column size="70"/>
  39. <Column size="50"/>
  40. <Column size="100"/>
  41. <Column size="0"/>
  42. <Column size="100"/>
  43. <Column size="201"/>
  44. <Column size="52"/>
  45. <Column size="51"/>
  46. <Column size="36"/>
  47. <Column size="39"/>
  48. <Column size="33"/>
  49. <Column size="52"/>
  50. <Column size="34"/>
  51. <Column size="0"/>
  52. <Column size="0"/>
  53. <Column size="41"/>
  54. <Column size="41"/>
  55. </Columns>
  56. <Rows>
  57. <Row size="24" band="head"/>
  58. <Row size="24"/>
  59. </Rows>
  60. <Band id="head">
  61. <Cell/>
  62. <Cell col="1" text="약번호(hidden)"/>
  63. <Cell col="2" text="구분(hidden)"/>
  64. <Cell col="3" displaytype="checkbox" edittype="checkbox"/>
  65. <Cell col="4" text="투약번호"/>
  66. <Cell col="5" text="상태"/>
  67. <Cell col="6" text="처방일자"/>
  68. <Cell col="7" text="등록번호"/>
  69. <Cell col="8" text="성명"/>
  70. <Cell col="9" text="구분"/>
  71. <Cell col="10" text="진료과"/>
  72. <Cell col="11" text="병동"/>
  73. <Cell col="12" text="담당의"/>
  74. <Cell col="13" text="과제번호"/>
  75. <Cell col="14" text="약품번호"/>
  76. <Cell col="15" text="약품코드"/>
  77. <Cell col="16" text="약품명"/>
  78. <Cell col="17" text=" 1일수량"/>
  79. <Cell col="18" text="1회수량"/>
  80. <Cell col="19" text="단위"/>
  81. <Cell col="20" text="횟수"/>
  82. <Cell col="21" text="일수"/>
  83. <Cell col="22" text="총량"/>
  84. <Cell col="23" text="단위"/>
  85. <Cell col="24" text="불출일시"/>
  86. <Cell col="25" text="불출약사"/>
  87. <Cell col="26" text="반환"/>
  88. <Cell col="27" text="상태"/>
  89. </Band>
  90. <Band id="body">
  91. <Cell celltype="head" text="expr:currow+1"/>
  92. <Cell col="1" text="bind:drugno" suppress="1"/>
  93. <Cell col="2" text="bind:crflag" suppress="2"/>
  94. <Cell col="3" displaytype="checkbox" edittype="checkbox" text="bind:sel" expr="expr:(sel==&quot;Y&quot;||sel==1)?1:0" suppress="1"/>
  95. <Cell col="4" displaytype="text" text="bind:drugno" suppress="2"/>
  96. <Cell col="5" text="bind:drugstatnm" suppress="3"/>
  97. <Cell col="6" displaytype="date" text="bind:drugdd" suppress="4"/>
  98. <Cell col="7" text="bind:pid" suppress="4"/>
  99. <Cell col="8" text="bind:hngnm" suppress="4"/>
  100. <Cell col="9" text="bind:crflag" suppress="5"/>
  101. <Cell col="10" style="align:left;padding:0 2 0 2;" text="bind:orddeptnm" suppress="6"/>
  102. <Cell col="11" style="align:left;padding:0 2 0 2;" text="bind:wardnm" suppress="7"/>
  103. <Cell col="12" text="bind:orddrnm" suppress="8"/>
  104. <Cell col="13" style="align:left;padding:0 2 0 2;" text="bind:clincstdycd" suppress="9"/>
  105. <Cell col="14" displaytype="text" style="align:left;padding:0 2 0 2;" text="bind:prcpno"/>
  106. <Cell col="15" style="align:left;" text="bind:prcpcd"/>
  107. <Cell col="16" style="align:left top;padding:5 2 0 2;" text="bind:prcpnm" wordwrap="char"/>
  108. <Cell col="17" text="bind:prcpqty"/>
  109. <Cell col="18" text="bind:prcpqty2"/>
  110. <Cell col="19" text="bind:prcpqtyunit"/>
  111. <Cell col="20" text="bind:prcptims"/>
  112. <Cell col="21" text="bind:prcpdayno"/>
  113. <Cell col="22" text="bind:totqty"/>
  114. <Cell col="23" text="bind:totqtyunit"/>
  115. <Cell col="24" text="bind:delivedt"/>
  116. <Cell col="25" text="bind:deliveid"/>
  117. <Cell col="26" text="bind:prcphistcd"/>
  118. <Cell col="27" text="bind:drugstat"/>
  119. </Band>
  120. </Format>
  121. </Formats>
  122. </Grid>
  123. <Shape id="line04" class="line_3" position="absolute 899 57 1194 63" anchor="top right"/>
  124. <Shape id="line05" class="line_1" position="absolute 899 -2 1194 4" anchor="top right"/>
  125. <Shape id="line07" class="line_3" position="absolute 0 85 1194 91" anchor="left top right"/>
  126. <Shape id="line08" class="line_3" position="absolute 0 87 1194 93" anchor="left top right"/>
  127. </Layout>
  128. </Layouts>
  129. </Div>
  130. <Div position="absolute 0 85 1195 112" id="group4" scrollbars="autoboth" anchor="left top right">
  131. <Layouts>
  132. <Layout>
  133. <Button position="absolute 1113 3 1193 25" id="button2" class="btn4" text="투약취소" anchor="top right" onclick="group4_button2_onclick"/>
  134. <Button position="absolute 1030 3 1110 25" id="button3" class="btn4" text="투약완료" anchor="top right" onclick="group4_button3_onclick"/>
  135. <Button position="absolute 84 3 176 25" id="button4" class="btn6" text="처방전출력" anchor="default" onclick="group4_button4_onclick"/>
  136. <Button position="absolute 179 3 259 25" id="button5" class="btn6" text="라벨출력" anchor="default" onclick="group4_button5_onclick"/>
  137. <Button position="absolute 1 3 81 25" id="button23" class="btn3" text="약력조회" anchor="default" onclick="group4_button23_onclick"/>
  138. <Button position="absolute 805 3 861 25" id="btn_excel" class="btn7" text="엑셀" anchor="top right" onclick="group4_btn_excel_onclick"/>
  139. <Button position="absolute 262 3 354 25" id="btn_prnt" class="btn3" taborder="18" text="프린터설정" anchor="default" onclick="group4_btn_prnt_onclick"/>
  140. <Button position="absolute 947 3 1027 25" id="button6" class="btn4" text="조제취소" anchor="top right" onclick="group4_button6_onclick"/>
  141. <Button position="absolute 864 3 944 25" id="button7" class="btn4" text="조제완료" anchor="top right" onclick="group4_button7_onclick"/>
  142. <Static text="실출고부서" position="absolute 551 5 620 25" id="caption10" anchor="default" style="color:#ff0000ff;font:Dotum,9,bold;"/>
  143. <Combo position="absolute 625 5 746 24" id="combo3" innerdataset="@ds_init_misdeptlist_deptlist" datacolumn="deptnm" codecolumn="deptcd" anchor="default" onitemchanged="group4_combo3_onitemchanged"/>
  144. </Layout>
  145. </Layouts>
  146. </Div>
  147. <Static id="caption19" text="임상약 처방전 출력" class="tit_1" position="absolute 0 0 160 25"/>
  148. <Div id="group2" taborder="1" class="div_SA" position="absolute 0 25 895 85" anchor="left top right">
  149. <Layouts>
  150. <Layout>
  151. <Static id="caption2" text="처방일자 :" class="search_name" position="absolute 5 11 96 28" anchor="default"/>
  152. <Static id="caption24" text="진료과 :" class="search_name" position="absolute 315 35 374 52" anchor="default"/>
  153. <Static id="caption4" text="병동 :" class="search_name" position="absolute 315 11 374 28" anchor="default"/>
  154. <Shape id="line1" linetype="vertical" class="line_4" position="absolute 697 32 703 54" anchor="top right"/>
  155. <Calendar id="input1" taborder="1" class="input_s_essential" position="absolute 91 9 192 28" anchor="default" autoselect="true"/>
  156. <Radio id="radio2" taborder="2" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 95 33 240 53" anchor="default">
  157. <Dataset id="innerdataset">
  158. <ColumnInfo>
  159. <Column id="codecolumn"/>
  160. <Column id="datacolumn"/>
  161. </ColumnInfo>
  162. <Rows>
  163. <Row>
  164. <Col id="codecolumn">O</Col>
  165. <Col id="datacolumn">외래</Col>
  166. </Row>
  167. <Row>
  168. <Col id="codecolumn">I</Col>
  169. <Col id="datacolumn">병동</Col>
  170. </Row>
  171. <Row>
  172. <Col id="codecolumn">A</Col>
  173. <Col id="datacolumn">전체</Col>
  174. </Row>
  175. </Rows>
  176. </Dataset>
  177. </Radio>
  178. <Button id="btn_sea" taborder="3" text="조회" class="btn1" position="absolute 825 32 881 54" anchor="top right" onclick="group2_btn_sea_onclick"/>
  179. <Combo id="cbo_srchwardcd" taborder="4" innerdataset="@ds_init_deptlist_ward" codecolumn="wardcd" datacolumn="wardnm" class="combo_search" position="absolute 378 9 483 28" columncount="2" anchor="default"/>
  180. <Combo id="cbo_srchorddeptcd" taborder="5" innerdataset="@ds_init_orddept_dept" codecolumn="deptcd" datacolumn="depthngnm" class="combo_search" position="absolute 378 33 483 52" anchor="default" onitemchanged="group2_cbo_srchorddeptcd_onitemchanged"/>
  181. <CheckBox id="chk_autoflag" taborder="6" position="absolute 712 35 758 50" anchor="top right" text="자동" truevalue="1" onchanged="group2_chk_autoflag_onchanged"/>
  182. <Button id="button1" taborder="7" text="마감" class="btn4" position="absolute 767 32 823 54" anchor="top right" onclick="group2_button1_onclick"/>
  183. <Edit id="input7" taborder="8" class="input_s_default" position="absolute 777 9 880 28" anchor="default"/>
  184. <Static id="caption5" text="등록번호 :" class="search_name" position="absolute 501 11 575 28" anchor="default"/>
  185. <Static id="caption7" text="약품코드 :" class="search_name" position="absolute 695 11 774 28" anchor="default"/>
  186. <Edit id="input6" taborder="9" class="input_s_default" position="absolute 580 9 675 28" anchor="default"/>
  187. <Calendar id="input2" taborder="10" class="input_s_essential" position="absolute 204 9 305 28" anchor="default" autoselect="true"/>
  188. <Static id="caption1" text="~" position="absolute 193 11 208 26" anchor="default"/>
  189. <Static id="caption8" text="담당의 :" class="search_name" position="absolute 501 35 575 52" anchor="default"/>
  190. <Combo id="combo1" taborder="11" innerdataset="@ds_init_orddrlist" codecolumn="userid" datacolumn="usernm" class="combo_search" position="absolute 580 33 675 52" anchor="default"/>
  191. </Layout>
  192. </Layouts>
  193. </Div>
  194. </Layout>
  195. </Layouts>
  196. <Objects>
  197. <Dataset id="ds_main_crdruglist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_crdruglist_item_oncolumnchanged">
  198. <ColumnInfo>
  199. <Column id="sel" type="STRING" size="256"/>
  200. <Column id="drugstatnm" type="STRING" size="256"/>
  201. <Column id="pid" type="STRING" size="256"/>
  202. <Column id="hngnm" type="STRING" size="256"/>
  203. <Column id="crflag" type="STRING" size="256"/>
  204. <Column id="orddeptnm" type="STRING" size="256"/>
  205. <Column id="wardnm" type="STRING" size="256"/>
  206. <Column id="orddrnm" type="STRING" size="256"/>
  207. <Column id="drugno" type="STRING" size="256"/>
  208. <Column id="clincstdycd" type="STRING" size="256"/>
  209. <Column id="prcpno" type="STRING" size="256"/>
  210. <Column id="prcpcd" type="STRING" size="256"/>
  211. <Column id="prcpnm" type="STRING" size="256"/>
  212. <Column id="prcpqty" type="STRING" size="256"/>
  213. <Column id="prcpqtyunit" type="STRING" size="256"/>
  214. <Column id="prcptims" type="STRING" size="256"/>
  215. <Column id="prcpdayno" type="STRING" size="256"/>
  216. <Column id="totqty" type="STRING" size="256"/>
  217. <Column id="totqtyunit" type="STRING" size="256"/>
  218. <Column id="delivedt" type="STRING" size="256"/>
  219. <Column id="deliveid" type="STRING" size="256"/>
  220. <Column id="prcphistcd" type="STRING" size="256"/>
  221. <Column id="drugstat" type="STRING" size="256"/>
  222. <Column id="ioflag" type="STRING" size="256"/>
  223. <Column id="hosinhosoutflag" type="STRING" size="256"/>
  224. <Column id="drugdd" type="STRING" size="256"/>
  225. </ColumnInfo>
  226. </Dataset>
  227. <Dataset id="ds_main_paramdata_param" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  228. <ColumnInfo>
  229. <Column id="pid" type="STRING" size="256"/>
  230. <Column id="orddd" type="STRING" size="256"/>
  231. <Column id="cretno" type="STRING" size="256"/>
  232. <Column id="orddeptcd" type="STRING" size="256"/>
  233. <Column id="orddrid" type="STRING" size="256"/>
  234. <Column id="prcpdd" type="STRING" size="256"/>
  235. <Column id="drugdd" type="STRING" size="256"/>
  236. <Column id="drugno" type="STRING" size="256"/>
  237. </ColumnInfo>
  238. <Rows>
  239. <Row>
  240. <Col id="pid"/>
  241. <Col id="orddd"/>
  242. <Col id="cretno"/>
  243. <Col id="orddeptcd"/>
  244. <Col id="orddrid"/>
  245. <Col id="prcpdd"/>
  246. <Col id="drugdd"/>
  247. <Col id="drugno"/>
  248. </Row>
  249. </Rows>
  250. </Dataset>
  251. <Dataset id="ds_main_barcdprntsetup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  252. <Dataset id="ds_send_srchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  253. <ColumnInfo>
  254. <Column id="srchprcpdd" type="STRING" size="256"/>
  255. <Column id="srchtoprcpdd" type="STRING" size="256"/>
  256. <Column id="srchioflag" type="STRING" size="256"/>
  257. <Column id="srchwardcd" type="STRING" size="256"/>
  258. <Column id="srchorddeptcd" type="STRING" size="256"/>
  259. <Column id="srchbcno" type="STRING" size="256"/>
  260. <Column id="srchpid" type="STRING" size="256"/>
  261. <Column id="srchdrugcd" type="STRING" size="256"/>
  262. <Column id="srchorddrid" type="STRING" size="256"/>
  263. </ColumnInfo>
  264. <Rows>
  265. <Row>
  266. <Col id="srchprcpdd"/>
  267. <Col id="srchtoprcpdd"/>
  268. <Col id="srchioflag">A</Col>
  269. <Col id="srchwardcd"/>
  270. <Col id="srchorddeptcd"/>
  271. <Col id="srchbcno"/>
  272. <Col id="srchpid"/>
  273. <Col id="srchdrugcd"/>
  274. <Col id="srchorddrid"/>
  275. </Row>
  276. </Rows>
  277. </Dataset>
  278. <Dataset id="ds_send_deptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  279. <ColumnInfo>
  280. <Column id="deptflag" type="STRING" size="256"/>
  281. </ColumnInfo>
  282. <Rows>
  283. <Row/>
  284. </Rows>
  285. </Dataset>
  286. <Dataset id="ds_send_paramsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  287. <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  288. <ColumnInfo>
  289. <Column id="drugdd" type="STRING" size="256"/>
  290. <Column id="drugno" type="STRING" size="256"/>
  291. <Column id="ioflag" type="STRING" size="256"/>
  292. <Column id="drugstat" type="STRING" size="256"/>
  293. <Column id="dispflag" type="STRING" size="256"/>
  294. <Column id="dispcnts" type="STRING" size="256"/>
  295. <Column id="inputtm" type="STRING" size="256"/>
  296. <Column id="userid" type="STRING" size="256"/>
  297. <Column id="stocdeptcd" type="STRING" size="256"/>
  298. <Column id="instcd" type="STRING" size="256"/>
  299. <Column id="crdrugprintflag" type="STRING" size="256"/>
  300. </ColumnInfo>
  301. <Rows>
  302. <Row>
  303. <Col id="drugdd"/>
  304. <Col id="drugno"/>
  305. <Col id="ioflag"/>
  306. <Col id="drugstat"/>
  307. <Col id="dispflag"/>
  308. <Col id="dispcnts"/>
  309. <Col id="inputtm"/>
  310. <Col id="userid"/>
  311. <Col id="stocdeptcd"/>
  312. <Col id="instcd"/>
  313. <Col id="crdrugprintflag"/>
  314. </Row>
  315. </Rows>
  316. </Dataset>
  317. <Dataset id="ds_init_deptlist_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  318. <ColumnInfo>
  319. <Column id="wardnm" type="STRING" size="256"/>
  320. <Column id="wardcd" type="STRING" size="256"/>
  321. </ColumnInfo>
  322. <Rows>
  323. <Row/>
  324. </Rows>
  325. </Dataset>
  326. <Dataset id="ds_init_orddept_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  327. <ColumnInfo>
  328. <Column id="depthngnm" type="STRING" size="256"/>
  329. <Column id="deptcd" type="STRING" size="256"/>
  330. </ColumnInfo>
  331. </Dataset>
  332. <Dataset id="ds_init_barcdprntsetup_setupinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  333. <Dataset id="ds_init_orddrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  334. <ColumnInfo>
  335. <Column id="usernm" type="STRING" size="256"/>
  336. <Column id="userid" type="STRING" size="256"/>
  337. </ColumnInfo>
  338. <Rows>
  339. <Row/>
  340. </Rows>
  341. </Dataset>
  342. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  343. <ColumnInfo>
  344. <Column id="autoflag" type="STRING" size="256"/>
  345. </ColumnInfo>
  346. <Rows>
  347. <Row/>
  348. </Rows>
  349. </Dataset>
  350. <Dataset id="ds_hidden_prcpsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  351. <ColumnInfo>
  352. <Column id="drugno" type="STRING" size="256"/>
  353. <Column id="prntflag" type="STRING" size="256"/>
  354. <Column id="stocdeptcd" type="STRING" size="256"/>
  355. </ColumnInfo>
  356. <Rows>
  357. <Row>
  358. <Col id="drugno"/>
  359. <Col id="prntflag"/>
  360. <Col id="stocdeptcd"/>
  361. </Row>
  362. </Rows>
  363. </Dataset>
  364. <Dataset id="ds_temp_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  365. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  366. <ColumnInfo>
  367. <Column id="scrnid" type="STRING" size="256"/>
  368. </ColumnInfo>
  369. <Rows>
  370. <Row/>
  371. </Rows>
  372. </Dataset>
  373. <Dataset id="ds_init_misdeptlist_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  374. <Dataset id="ds_hidden_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  375. </Objects>
  376. <Bind>
  377. <BindItem id="item0" compid="group2.chk_autoflag" propid="value" datasetid="ds_init" columnid="autoflag"/>
  378. <BindItem id="item1" compid="group2.input1" propid="value" datasetid="ds_send_srchinfo" columnid="srchprcpdd"/>
  379. <BindItem id="item2" compid="group2.radio2" propid="value" datasetid="ds_send_srchinfo" columnid="srchioflag"/>
  380. <BindItem id="item3" compid="group2.input2" propid="value" datasetid="ds_send_srchinfo" columnid="srchtoprcpdd"/>
  381. <BindItem id="item4" compid="group2.cbo_srchwardcd" propid="value" datasetid="ds_send_srchinfo" columnid="srchwardcd"/>
  382. <BindItem id="item5" compid="group2.cbo_srchorddeptcd" propid="value" datasetid="ds_send_srchinfo" columnid="srchorddeptcd"/>
  383. <BindItem id="item6" compid="group2.input6" propid="value" datasetid="ds_send_srchinfo" columnid="srchpid"/>
  384. <BindItem id="item7" compid="group2.combo1" propid="value" datasetid="ds_send_srchinfo" columnid="srchorddrid"/>
  385. <BindItem id="item8" compid="group2.input7" propid="value" datasetid="ds_send_srchinfo" columnid="srchdrugcd"/>
  386. <BindItem id="item9" compid="group4.combo3" propid="value" datasetid="ds_hidden_prcpsrch" columnid="stocdeptcd"/>
  387. <BindItem id="item10" compid="group3.input3" propid="value" datasetid="ds_send_srchinfo" columnid="srchbcno"/>
  388. <BindItem id="item11" compid="group3.input4" propid="value" datasetid="ds_send_srchinfo" columnid="srchbcno"/>
  389. </Bind>
  390. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  391. * System Name :
  392. * Job Name :
  393. * Creator :
  394. * Make Date : 2015-11-13
  395. * Description :
  396. *---------------------------------------------------------------------------------------
  397. * Modify Date Modifier Modify Description
  398. *---------------------------------------------------------------------------------------
  399. * 2015-11-13 Live Converter TF->XP
  400. *
  401. *---------------------------------------------------------------------------------------
  402. ****************************************************************************************/
  403. //=======================================================================================
  404. // Lib Include
  405. //---------------------------------------------------------------------------------------
  406. include "com_commonxp::comm_main.xjs"
  407. include "ast_commonxp::AST.xjs"
  408. include "emr_prcpmngtxp::MMOCommon.xjs"
  409. include "com_commodulexp::SSZFM00901.xjs"
  410. //=======================================================================================
  411. // Global Form Variable
  412. //---------------------------------------------------------------------------------------
  413. var arErrorCode = new HashArray();
  414. var gTimer;
  415. //=======================================================================================
  416. // Function
  417. //---------------------------------------------------------------------------------------
  418. /****************************************************************************************
  419. * Argument : N/A
  420. * Description : 엑셀저장
  421. ****************************************************************************************/
  422. function fExeSaveToExcel(){
  423. if(ds_main_crdruglist_item.rowcount > 0) {
  424. grdf_exportExcel(group3.grd_crdruglist,"임상약리스트"+utlf_getCurrentDate(),"sheet1");
  425. sysf_messageBox("저장이 ", "I002");
  426. } else {
  427. sysf_messageBox("조회된 데이터가 ", "I004");
  428. }
  429. }
  430. /****************************************************************************************
  431. * Argument : N/A
  432. * Description : 처방전/라벨 출력
  433. ****************************************************************************************/
  434. function fPrcpMPSPrint() {
  435. var chk_drugno = ds_hidden_prcpsrch.getColumn(0,"drugno");
  436. ds_hidden_prcpsrch.setColumn(0,"prntflag", "Y");
  437. ds_send_paramsrch.copyData(ds_hidden_prcpsrch);
  438. //원외 처방전 출력
  439. fHosOutMPSPrint();
  440. }
  441. /****************************************************************************************
  442. * Argument : N/A
  443. * Description : 라벨 출력
  444. ****************************************************************************************/
  445. function fHosInLBLPrint() {
  446. var sParam = "";
  447. var drugdd = "";
  448. var drugno = "";
  449. var ioflag = "";
  450. for (var i = 0; i < ds_main_crdruglist_item.rowcount; i++){
  451. if(ds_main_crdruglist_item.getColumn(i,"sel")=="Y"){
  452. if ( drugdd + drugno + ioflag != ds_main_crdruglist_item.getColumn(i,"drugdd")+ds_main_crdruglist_item.getColumn(i,"drugno")+ds_main_crdruglist_item.getColumn(i,"ioflag")){
  453. drugdd = ds_main_crdruglist_item.getColumn(i,"drugdd");
  454. drugno = ds_main_crdruglist_item.getColumn(i,"drugno");
  455. ioflag = ds_main_crdruglist_item.getColumn(i,"ioflag");
  456. sParam = "drugdd▦drugno▦ioflag▦prcpdd▦orddd▦cretno▦prcpgenrflag▦pid▦orddeptcd▦wardcd▦lblflag▦prcpflag▦prntflag▦drugflag▦prcpno▦prcpmixno▦spclblflag▦prcptims▩";
  457. sParam += utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"drugdd")) +"▦"+
  458. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"drugno")) +"▦"+
  459. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"ioflag")) +"▦"+
  460. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"prcpdd")) +"▦"+
  461. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"orddd")) +"▦"+
  462. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"cretno")) +"▦"+
  463. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"prcpgenrflag")) +"▦"+
  464. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"pid")) +"▦"+
  465. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"orddeptcd")) +"▦"+
  466. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"wardcd")) +"▦"+
  467. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"lblflag")) +"▦"+
  468. //ds_main_crdruglist_item.getColumn(i,"prcpflag") +"▦"+
  469. //20110111_laboru_경북대병원_임상약 라벨위해 flag 값 셋팅
  470. "R" +"▦"+
  471. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"prntflag")) +"▦"+
  472. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"drugflag")) +"▦"+
  473. //""+"▦"+""+"▦"+"C"+"▩"; // 20100325_laboru_라벨출력
  474. utlf_transNullToEmpty(ds_main_crdruglist_item.getColumn(i,"prcpno")) +"▦"+""+"▦"+"C"+"▩"; // 20100325_laboru_라벨출력
  475. // model.setAttribute("params", sParam);
  476. frmf_setParameter("params", sParam);
  477. ds_init_barcdprntsetup_setupinfo.copyData(ds_main_barcdprntsetup);
  478. //modal("SPADT63300",0,200,200,"SPADT63300","/root/init/barcdprntsetup","/root/init/barcdprntsetup");
  479. var objArg = new Object();
  480. objArg.arg_ds_init_barcdprntsetup = ds_init_barcdprntsetup_setupinfo;
  481. frmf_modal("SPADT63300", "SPADT63300", objArg, null, 0, 200, 200, null, null, null, null, null, "M"); // 20101220 wify 경북대병원 라벨출력방식 rexpert로 변경
  482. // model.setAttribute("params", "");
  483. frmf_clearParameter("params");
  484. }
  485. }
  486. }
  487. }
  488. /****************************************************************************************
  489. * Argument : N/A
  490. * Description : 원외 처방전 출력
  491. ****************************************************************************************/
  492. function fHosOutMPSPrint() {
  493. var sParam = "";
  494. var drugno = "";
  495. for(var i = 0; i < ds_main_crdruglist_item.rowcount; i++){
  496. //********* 자동출력시 외래 원외 처방은 제외========== 2008.10.29 김귀남*************************************************************
  497. var b_prntyn = false;
  498. // autoflag =1 : 자동출력
  499. if(ds_init.getColumn(0,"autoflag") == 1){
  500. if(ds_main_crdruglist_item.getColumn(i,"sel")=="Y" && ds_main_crdruglist_item.getColumn(i,"hosinhosoutflag") != "O"){
  501. b_prntyn = true;
  502. }
  503. }else{
  504. if(ds_main_crdruglist_item.getColumn(i,"sel")=="Y"){
  505. b_prntyn = true;
  506. }
  507. }
  508. // ****************************************************************************************************************************
  509. if (b_prntyn) {
  510. sParam = "";
  511. if (drugno != ds_main_crdruglist_item.getColumn(i,"drugno")) {
  512. drugno = ds_main_crdruglist_item.getColumn(i,"drugno");
  513. sParam = "pid▦orddd▦prcpdd▦cretno▦orddeptcd▦orddrid▦prcpgenrflag▦ioflag▦clincstdycd▦drugno▦crflag▦hosinhosoutflag▩";
  514. sParam += ds_main_crdruglist_item.getColumn(i,"pid") +"▦"+
  515. ds_main_crdruglist_item.getColumn(i,"orddd") +"▦"+
  516. ds_main_crdruglist_item.getColumn(i,"prcpdd") +"▦"+
  517. ds_main_crdruglist_item.getColumn(i,"cretno") +"▦"+
  518. ds_main_crdruglist_item.getColumn(i,"orddeptcd") +"▦"+
  519. ds_main_crdruglist_item.getColumn(i,"orddrid") +"▦"+
  520. ds_main_crdruglist_item.getColumn(i,"prcpgenrflag") +"▦"+
  521. ds_main_crdruglist_item.getColumn(i,"ioflag") +"▦"+
  522. ds_main_crdruglist_item.getColumn(i,"clincstdycd") +"▦"+
  523. ds_main_crdruglist_item.getColumn(i,"drugno") +"▦"+
  524. ds_main_crdruglist_item.getColumn(i,"crflag") +"▦"+
  525. ds_main_crdruglist_item.getColumn(i,"hosinhosoutflag") +"▩";
  526. // setAttribute("params", sParam);
  527. frmf_setParameter("params", sParam);
  528. frmf_modal("SPADC61500", "SPADC61500", null, null, 0, 200, 200, null, null, null, null, null, "M");
  529. // setAttribute("params", "");
  530. }
  531. }
  532. }
  533. }
  534. /****************************************************************************************
  535. * Argument : N/A
  536. * Description : 임상약 처방조회
  537. ****************************************************************************************/
  538. function fGetDrugPatList(){
  539. ds_main_crdruglist_item.clearData();
  540. var oParam = {};
  541. oParam.id = "TRADC10901";
  542. oParam.service = "pharmacyprescriptionapp.DrugPrint";
  543. oParam.method = "reqGetCrDrugList";
  544. oParam.inds = "req=ds_send_srchinfo";
  545. oParam.outds = "ds_main_crdruglist_item=item";
  546. oParam.async = false;
  547. oParam.callback = "cf_TRADC10901";
  548. tranf_submit(oParam);
  549. ds_send_srchinfo.setColumn(0,"srchwardcd" ,"");
  550. ds_send_srchinfo.setColumn(0,"srchorddrid" ,"");
  551. ds_send_srchinfo.setColumn(0,"srchorddeptcd","");
  552. for (var i = 0; i < ds_main_crdruglist_item.rowcount; i++){
  553. if (ds_main_crdruglist_item.getColumn(i,"drugstat")=="NP"
  554. && ds_main_crdruglist_item.getColumn(i,"spcldrug") != "M"
  555. // 20100107_laboru_prcphistcd 가 d,c 된 처방이면 check 하지 않음
  556. && ds_main_crdruglist_item.getColumn(i,"prcphistcd") != "C"
  557. && ds_main_crdruglist_item.getColumn(i,"prcphistcd") != "D"
  558. && ds_main_crdruglist_item.getColumn(i,"prcphistcd") != "E") {
  559. ds_main_crdruglist_item.setColumn(i,"sel", "Y");
  560. }else ds_main_crdruglist_item.setColumn(i,"sel","N");
  561. }
  562. for(var i = 0; i < group3.grd_crdruglist.getCellCount("Head"); i++) {
  563. group3.grd_crdruglist.setCellProperty("body", i, "background" ,"expr(hosinhosoutflag=='O' ? '#FFFF99' : prcphistcd == 'C' ? '#B9E5FB' : prcphistcd == 'D' ? '#7BE6B7' : prcphistcd == 'E' ? '#F3E1BF' : 'default')");
  564. group3.grd_crdruglist.setCellProperty("body", i, "background2","expr(hosinhosoutflag=='O' ? '#FFFF99' : prcphistcd == 'C' ? '#B9E5FB' : prcphistcd == 'D' ? '#7BE6B7' : prcphistcd == 'E' ? '#F3E1BF' : 'default')");
  565. }
  566. }
  567. function cf_TRADC10901(sSvcId, nErrorCode, sErrorMsg) {
  568. if(nErrorCode < 0) return;
  569. dsf_setFixVal(ds_main_crdruglist_item, "sel:N");
  570. }
  571. /****************************************************************************************
  572. * Argument : N/A
  573. * Description : 임상약마감
  574. ****************************************************************************************/
  575. function fDrugNo(){
  576. dsf_createDsRow("ds_req",[
  577. {col:"prcpdd" , val:ds_send_srchinfo.getColumn(0, "srchprcpdd")}
  578. ,{col:"crsumflag" , val:ds_send_srchinfo.getColumn(0, "crsumflag")}
  579. ]);
  580. var oParam = {};
  581. oParam.id = "TXADC10901";
  582. oParam.service = "pharmacyprescriptionapp.DrugAccept";
  583. oParam.method = "reqExeOutCrSum";
  584. oParam.inds = "req=ds_req";
  585. oParam.outds = "ds_temp_ret=result";
  586. oParam.async = false;
  587. oParam.callback = "cf_TXADC10901";
  588. tranf_submit(oParam);
  589. var oParam = {};
  590. oParam.id = "TXADC10902";
  591. oParam.service = "pharmacyprescriptionapp.DrugAccept";
  592. oParam.method = "reqExeInCrSum";
  593. oParam.inds = "req=ds_req";
  594. oParam.outds = "ds_temp_ret=result";
  595. oParam.async = false;
  596. oParam.callback = "cf_TXADC10902";
  597. tranf_submit(oParam);
  598. }
  599. /****************************************************************************************
  600. * Argument : N/A
  601. * Description : 자동마감
  602. ****************************************************************************************/
  603. function fAuto(){
  604. fDrugNo();
  605. fGetDrugPatList();
  606. fPrcpMPSPrint();
  607. fHosInLBLPrint(); // 자동마감 걸었을 때 라벨 출력 기능도 포함되게 수정 2011.9.15 jmkim
  608. }
  609. /****************************************************************************************
  610. * Argument : drugstat - 처리flag (D : 조제완료, P : 조제취소, M : 투약완료 , NM : 투약취소)
  611. * Description : 임상약 처리
  612. ****************************************************************************************/
  613. function fSubmitDrugStat(drugstat){
  614. var selrow = 0;
  615. var predrugstat = ""; // 이전처방상태
  616. var success = "";
  617. // if (ds_main_crdruglist_item.rowcount > 0 && ds_main_crdruglist_item.rowposition < 0) {
  618. // selrow = 0;
  619. // } else {
  620. // selrow = ds_main_crdruglist_item.rowposition;
  621. // }
  622. for(var i = 0; i < ds_main_crdruglist_item.rowcount; i++) {
  623. selrow = i;
  624. if(ds_main_crdruglist_item.getColumn(selrow,"sel") == "Y") {
  625. // 처방상태처리
  626. predrugstat = ds_main_crdruglist_item.getColumn(selrow,"drugstat");
  627. if (drugstat == "NM" && predrugstat != "M") {
  628. sysf_messageBox("이전상태가 투약완료가 아니므로 투약취소를 하실 수 없습니다.","I999");
  629. return;
  630. }else if(drugstat == "M" && predrugstat != "D"){
  631. sysf_messageBox("이전상태가 조제완료가 아니므로 투약완료를 하실 수 없습니다.","I999");
  632. return;
  633. }else if(drugstat == "D" && predrugstat != "P") {
  634. sysf_messageBox("이전상태가 출력이 아니므로 조제완료를 하실 수 없습니다.","I999");
  635. return;
  636. }else if(drugstat == "P" && predrugstat != "D") {
  637. sysf_messageBox("이전상태가 조제완료가 아니므로 조제취소를 하실 수 없습니다.","I999");
  638. return;
  639. }
  640. // 투약취소 -> 조제완료
  641. var drugstat2 = drugstat;
  642. if (drugstat == "NM" ) drugstat = "D";
  643. // 전송정보
  644. ds_send_req.setColumn(0,"drugdd" , ds_main_crdruglist_item.getColumn(selrow,"drugdd"));
  645. ds_send_req.setColumn(0,"drugno" , ds_main_crdruglist_item.getColumn(selrow,"drugno"));
  646. ds_send_req.setColumn(0,"ioflag" , ds_main_crdruglist_item.getColumn(selrow,"ioflag"));
  647. ds_send_req.setColumn(0,"drugstat" , drugstat);
  648. ds_send_req.setColumn(0,"userid" , sysf_getUserId());
  649. ds_send_req.setColumn(0,"instcd" , sysf_getUserInfo("dutplceinstcd"));
  650. ds_send_req.setColumn(0,"crdrugprintflag", "Y");
  651. // 투약처리
  652. if (drugstat =="M") ds_send_req.setColumn(0,"stocdeptcd", "3242103000");
  653. // 수정
  654. call_TXADT00701();
  655. if (arErrorCode.pop("TXADT00701") > -1) success = true;
  656. if(drugstat2 == "NM") drugstat = "NM";
  657. }
  658. }
  659. // 처리결과
  660. if (success) fGetDrugPatList();
  661. }
  662. /****************************************************************************************
  663. * Argument : N/A
  664. * Description : 프린터 설정
  665. ****************************************************************************************/
  666. function fSetPrint() {
  667. var prntsetupinfo = ds_main_barcdprntsetup.getColumn(0,"prntsetupinfo");
  668. var objArg = new Object();
  669. objArg.arg_sSetupInfo = prntsetupinfo;
  670. objArg.arg_sCallBackFunction = "lf_convertXmlToDs";
  671. frmf_modal("SPZUR00300", "SPZUR00300", objArg, null, 0, 20, 150, null, null, null, null, null, "M");
  672. if(!utlf_isNull(frmf_getParameter("SetupInfo")))
  673. ds_main_barcdprntsetup.setColumn(0,"prntsetupinfo",frmf_clearParameter("SetupInfo"));
  674. }
  675. /****************************************************************************************
  676. * Argument : N/A
  677. * Description : 수정
  678. ****************************************************************************************/
  679. function call_TXADT00701() {
  680. var oParam = {};
  681. oParam.id = "TXADT00701";
  682. oParam.service = "pharmacyprescriptionapp.Medication";
  683. oParam.method = "reqExeDrugStatOut";
  684. oParam.inds = "req=ds_send_req";
  685. oParam.outds = "ds_hidden_item=item";
  686. oParam.async = false;
  687. oParam.callback = "cf_TXADT00701";
  688. tranf_submit(oParam);
  689. }
  690. function cf_TXADT00701(sSvcId, nErrorCode, sErrorMsg) {
  691. arErrorCode.push(sSvcId, nErrorCode);
  692. }
  693. //=======================================================================================
  694. // Event
  695. //---------------------------------------------------------------------------------------
  696. /****************************************************************************************
  697. * Components : Form
  698. * Components ID : SMADC10900
  699. * Event : oninit
  700. * Argument : 01.obj : Object Event has occurred
  701. * : 02.e : Event Object
  702. * Description : 화면 처음 초기화시 폼초기화
  703. ****************************************************************************************/
  704. function SMADC10900_oninit(obj:Form, e:InitEventInfo)
  705. {
  706. frmf_initForm(obj); // 폼 초기화
  707. }
  708. /****************************************************************************************
  709. * Components : Form
  710. * Components ID : SMADC10900
  711. * Event : onload
  712. * Argument : 01.obj : Object Event has occurred
  713. * : 02.e : Event Object
  714. * Description : 화면 처음 초기화시 폼초기화
  715. ****************************************************************************************/
  716. function SMADC10900_onload(obj:Form, e:LoadEventInfo)
  717. {
  718. // 진료과
  719. // zbcfGetDeptCodeList(getUserInfo("dutplceinstcd"), "orduseyn", "D", "/root/init/orddept"); //부서코드 콤보조회
  720. appf_getDeptCodeList(sysf_getUserInfo("dutplceinstcd"),"orduseyn","D","depthngnm","","","","","ds_init_orddept_dept",true,"");
  721. // astfAddCombo("/root/init/orddept","dept","deptcd,depthngnm",",전체");
  722. dsf_addDsItem(ds_init_orddept_dept,"deptcd","depthngnm","전체","");
  723. //병동 Combo 조회
  724. ds_send_deptinfo.setColumn(0,"deptflag", "W");
  725. var oParam = {};
  726. oParam.id = "TRADT10204";
  727. oParam.service = "pharmacyprescriptionapp.DrugPrint";
  728. oParam.method = "reqGetDeptList";
  729. oParam.inds = "req=ds_send_deptinfo";
  730. oParam.outds = "ds_init_deptlist_ward=ward";
  731. oParam.async = false;
  732. oParam.callback = "cf_TRADT10204";
  733. tranf_submit(oParam);
  734. ds_send_srchinfo.setColumn(0,"srchprcpdd" , utlf_getCurrentDate());
  735. ds_send_srchinfo.setColumn(0,"srchtoprcpdd" , utlf_getCurrentDate());
  736. // grd_crdruglist.fixedcellcheckbox(0,1) = true;
  737. grdf_initGrid(group3.grd_crdruglist); // 그리드 소트만
  738. //바코드프린터설정 초기화
  739. ds_send.setColumn(0,"scrnid", frmf_getScreenID());
  740. var oParam = {};
  741. oParam.id = "TRLLC90101";
  742. oParam.service = "diagtestapplib.LisCommon";
  743. oParam.method = "reqGetSetUpInfo";
  744. oParam.inds = "scrnid=ds_send";
  745. oParam.outds = "ds_main_barcdprntsetup=getSetUpInfo";
  746. oParam.async = false;
  747. //oParam.callback = "cf_TRLLC90101";
  748. tranf_submit(oParam);
  749. var prntsetupinfo = ds_main_barcdprntsetup.getColumn(0,"prntsetupinfo"); //프린터설정 XML형식
  750. lf_convertXmlToDs(prntsetupinfo); //XML데이터로 프리터설정 관련 DS생성
  751. var comm = ds_data_comm02.getColumn(0,"comm");
  752. var prntkind = ds_data_setupinfo.getColumn(0,"prntkind");
  753. if(comm == "2") {
  754. ds_data_comm02.setColumn(0,"comm", "1");
  755. }
  756. if(prntkind == "1") {
  757. ds_data_setupinfo.setColumn(0,"prntkind", "5");
  758. }
  759. // grd_crdruglist.fixedcellcheckbox(0,3) = true;
  760. //1일기준인지 1회기준인지 체크하여 컬럼을 hidden
  761. var colHidnValue = lf_grdBaseColHidn("D");
  762. //1회 기준
  763. if( colHidnValue == "C" ) {
  764. group3.grd_crdruglist.setFormatColProperty(group3.grd_crdruglist.getBindCellIndex("body","prcpqty"),"size",0);
  765. } else {
  766. group3.grd_crdruglist.setFormatColProperty(group3.grd_crdruglist.getBindCellIndex("body","prcpqty2"),"size",0);
  767. }
  768. // 출고부서 조회, 설정
  769. var oParam = {};
  770. oParam.id = "TRADT01106";
  771. oParam.service = "pharmacyprescriptionapp.DrugPrint";
  772. oParam.method = "reqGetMisDeptlist";
  773. oParam.inds = "";
  774. oParam.outds = "ds_init_misdeptlist_deptlist=deptlist";
  775. oParam.async = false;
  776. //oParam.callback = "cf_TRADT01106";
  777. tranf_submit(oParam);
  778. if(ds_init_misdeptlist_deptlist.rowcount == 1) {
  779. group4.combo3.index = 0;
  780. } else {
  781. // 2010.01.25 pymi 입원주사조제실 제거
  782. if(ds_init_misdeptlist_deptlist.getColumn(0,"deptcd") == "3242104000") {
  783. // combo3.choices.itemset.attribute("nodeset") = "/root/init/misdeptlist/deptlist[deptcd != '3242104000' ]";
  784. ds_init_misdeptlist_deptlist.filter("deptcd != '3242104000'");
  785. } else {
  786. group4.combo3.index = 0;
  787. }
  788. }
  789. }
  790. function cf_TRADT10204(sSvcId, nErrorCode, sErrorMsg) {
  791. if(nErrorCode < 0) return;
  792. // astfAddCombo("/root/init/deptlist","ward","wardcd,wardnm",",전체");
  793. ds_init_deptlist_ward.updateColID("deptcd","wardcd");
  794. ds_init_deptlist_ward.updateColID("deptnm","wardnm");
  795. dsf_addDsItem(ds_init_deptlist_ward,"wardcd","wardnm","전체","");
  796. }
  797. /****************************************************************************************
  798. * Components : Dataset
  799. * Components ID : ds_main_crdruglist_item
  800. * Event : oncolumnchanged
  801. * Argument : 01.obj : Object Event has occurred
  802. * : 02.e : Event Object
  803. * Description : 체크박스 값 변경
  804. ****************************************************************************************/
  805. function ds_main_crdruglist_item_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  806. {
  807. if(e.columnid=="sel") {
  808. for(var i = 0; i < obj.rowcount; i++) {
  809. if(obj.getColumn(i,"drugno") == obj.getColumn(e.row,"drugno")) {
  810. obj.setColumn(i,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
  811. }
  812. }
  813. }
  814. }
  815. /****************************************************************************************
  816. * Components : Combo
  817. * Components ID : group2.cbo_srchorddeptcd
  818. * Event : onitemchanged
  819. * Argument : 01.obj : Object Event has occurred
  820. * : 02.e : Event Object
  821. * Description : 진료과 변경시 담당의 목록 조회
  822. ****************************************************************************************/
  823. function group2_cbo_srchorddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  824. {
  825. dsf_makeValue(ds_send_srchinfo,"srchorddrid","string","");
  826. dsf_createDsRow("ds_send_orddrinfo",
  827. [{col:"userflag", val:"03%"}
  828. ,{col:"deptcd" , val:ds_send_srchinfo.getColumn(0, "srchorddeptcd")}]);
  829. var oParam = {};
  830. oParam.id = "TRADC02104";
  831. oParam.service = "pharmacyprescriptionapp.DrugPrint";
  832. oParam.method = "reqGetUserList";
  833. oParam.inds = "req=ds_send_orddrinfo";
  834. oParam.outds = "ds_init_orddrlist=user";
  835. oParam.async = false;
  836. //oParam.callback = "cf_TRADC02104";
  837. tranf_submit(oParam);
  838. }
  839. /****************************************************************************************
  840. * Components : Combo
  841. * Components ID : group2.cbo_srchorddeptcd
  842. * Event : onitemchanged
  843. * Argument : 01.obj : Object Event has occurred
  844. * : 02.e : Event Object
  845. * Description : 진료과 변경시 담당의 목록 조회
  846. ****************************************************************************************/
  847. function group2_chk_autoflag_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  848. {
  849. // obj.updateToDataset();
  850. var autoflag = e.postvalue; // ds_init.getColumn(0,"autoflag");
  851. if(autoflag == 1){
  852. this.setTimer(0,10000);
  853. gTimer = "1";
  854. }else{
  855. this.killTimer(0);
  856. gTimer = null;
  857. }
  858. }
  859. /****************************************************************************************
  860. * Components : Form
  861. * Components ID : SMADC10900
  862. * Event : ontimer
  863. * Argument : 01.obj : Object Event has occurred
  864. * : 02.e : Event Object
  865. * Description : 타이머로 함수 실행
  866. ****************************************************************************************/
  867. function SMADC10900_ontimer(obj:Form, e:TimerEventInfo)
  868. {
  869. fAuto();
  870. }
  871. /****************************************************************************************
  872. * Components : Button
  873. * Components ID : group2.button1
  874. * Event : onitemchanged
  875. * Argument : 01.obj : Object Event has occurred
  876. * : 02.e : Event Object
  877. * Description : 마감
  878. ****************************************************************************************/
  879. function group2_button1_onclick(obj:Button, e:ClickEventInfo)
  880. {
  881. fDrugNo();
  882. frmf_inputEnterKey("group2.btn_sea", "onclick", new ClickEventInfo);
  883. }
  884. /****************************************************************************************
  885. * Components : Button
  886. * Components ID : group2.btn_sea
  887. * Event : onitemchanged
  888. * Argument : 01.obj : Object Event has occurred
  889. * : 02.e : Event Object
  890. * Description : 조회
  891. ****************************************************************************************/
  892. function group2_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  893. {
  894. fGetDrugPatList();
  895. }
  896. /****************************************************************************************
  897. * Components : Edit
  898. * Components ID : group3.input3
  899. * Event : onkeyup
  900. * Argument : 01.obj : Object Event has occurred
  901. * : 02.e : Event Object
  902. * Description : 조제완료 란 입력후 엔터로
  903. ****************************************************************************************/
  904. function group3_input3_onkeyup(obj:Edit, e:KeyEventInfo)
  905. {
  906. if(e.keycode == 13) {
  907. var barcode = "";
  908. var ioflag = "";
  909. var drugdd = "";
  910. var drugno = "";
  911. var drugstat = "D";
  912. obj.updateToDataset();
  913. barcode = ds_send_srchinfo.getColumn(0,"srchbcno");
  914. // 임상약 데이터만 처리
  915. if(barcode.length > 1) {
  916. ioflag = barcode.substr(0,1);
  917. if (ioflag.toUpperCase() != "C") return;
  918. } else {
  919. return;
  920. }
  921. ioflag = barcode.substr(1,1);
  922. drugdd = barcode.substr(2,8);
  923. drugno = barcode.substr(10,5);
  924. // 전송정보
  925. ds_send_req.setColumn(0,"drugdd" , drugdd);
  926. ds_send_req.setColumn(0,"drugno" , drugno);
  927. ds_send_req.setColumn(0,"ioflag" , ioflag);
  928. ds_send_req.setColumn(0,"drugstat" , drugstat);
  929. ds_send_req.setColumn(0,"userid" , sysf_getUserId());
  930. ds_send_req.setColumn(0,"instcd" , sysf_getUserInfo("dutplceinstcd"));
  931. // 투약처리
  932. if (drugstat =="D") ds_send_req.setColumn(0,"stocdeptcd", "3242103000");
  933. // 수정
  934. call_TXADT00701();
  935. ds_send_srchinfo.setColumn(0,"srchprcpdd", drugdd);
  936. // 처리결과
  937. if (arErrorCode.pop("TXADT00701") > -1) fGetDrugPatList();
  938. ds_send_srchinfo.setColumn(0,"srchbcno","");
  939. }
  940. }
  941. /****************************************************************************************
  942. * Components : Edit
  943. * Components ID : group3.input4
  944. * Event : onkeyup
  945. * Argument : 01.obj : Object Event has occurred
  946. * : 02.e : Event Object
  947. * Description : 조제완료 란 입력후 엔터로
  948. ****************************************************************************************/
  949. function group3_input4_onkeyup(obj:Edit, e:KeyEventInfo)
  950. {
  951. if(e.keycode == 13) {
  952. var barcode = "";
  953. var ioflag = "";
  954. var drugdd = "";
  955. var drugno = "";
  956. var drugstat = "M";
  957. obj.updateToDataset();
  958. barcode = ds_send_srchinfo.getColumn(0,"srchbcno");
  959. // 임상약 데이터만 처리
  960. if (barcode.length > 1) {
  961. ioflag = barcode.substr(0,1);
  962. if (ioflag.toUpperCase() != "C") return;
  963. } else {
  964. return;
  965. }
  966. ioflag = barcode.substr(1,1);
  967. drugdd = barcode.substr(2,8);
  968. drugno = barcode.substr(10,5);
  969. // 전송정보
  970. ds_send_req.setColumn(0,"drugdd" , drugdd);
  971. ds_send_req.setColumn(0,"drugno" , drugno);
  972. ds_send_req.setColumn(0,"ioflag" , ioflag);
  973. ds_send_req.setColumn(0,"drugstat" , drugstat);
  974. ds_send_req.setColumn(0,"userid" , sysf_getUserId());
  975. ds_send_req.setColumn(0,"instcd" , sysf_getUserInfo("dutplceinstcd"));
  976. // 투약처리
  977. if(drugstat =="M") ds_send_req.setColumn(0,"stocdeptcd","3242103000");
  978. // 수정
  979. call_TXADT00701();
  980. ds_send_srchinfo.setColumn(0,"srchprcpdd", drugdd);
  981. // 처리결과
  982. if (arErrorCode.pop("TXADT00701") > -1) fGetDrugPatList();
  983. ds_send_srchinfo.setColumn(0,"srchbcno","");
  984. }
  985. }
  986. /****************************************************************************************
  987. * Components : Grid
  988. * Components ID : group3.grd_crdruglist
  989. * Event : onlbuttonup
  990. * Argument : 01.obj : Object Event has occurred
  991. * : 02.e : Event Object
  992. * Description : 그리드 로우 선택시 자동마감 종료
  993. ****************************************************************************************/
  994. function group3_grd_crdruglist_onlbuttonup(obj:Grid, e:GridMouseEventInfo)
  995. {
  996. ds_init.setColumn(0,"autoflag","");
  997. if (gTimer != null) {
  998. this.killTimer(0);
  999. gTimer = null;
  1000. }
  1001. }
  1002. /****************************************************************************************
  1003. * Components : Button
  1004. * Components ID : group4.button23
  1005. * Event : onclick
  1006. * Argument : 01.obj : Object Event has occurred
  1007. * : 02.e : Event Object
  1008. * Description : 약력조회
  1009. ****************************************************************************************/
  1010. function group4_button23_onclick(obj:Button, e:ClickEventInfo)
  1011. {
  1012. dsf_createDsRow("ds_temp_crdruglist", [
  1013. {col:"pid", val:ds_main_crdruglist_item.getColumn(ds_main_crdruglist_item.rowposition, "pid")}
  1014. ]);
  1015. var objArg = new Object();
  1016. objArg.arg_ds_temp_patinfo = ds_temp_crdruglist;
  1017. frmf_open("SMADB10100", "SMADB10100", objArg, null, 0, 0, 0, null, null, null, null, null, "M");
  1018. }
  1019. /****************************************************************************************
  1020. * Components : Button
  1021. * Components ID : group4.button4
  1022. * Event : onclick
  1023. * Argument : 01.obj : Object Event has occurred
  1024. * : 02.e : Event Object
  1025. * Description : 처방전출력
  1026. ****************************************************************************************/
  1027. function group4_button4_onclick(obj:Button, e:ClickEventInfo)
  1028. {
  1029. fPrcpMPSPrint();
  1030. fGetDrugPatList();
  1031. }
  1032. /****************************************************************************************
  1033. * Components : Button
  1034. * Components ID : group4.button5
  1035. * Event : onclick
  1036. * Argument : 01.obj : Object Event has occurred
  1037. * : 02.e : Event Object
  1038. * Description : 라벨출력
  1039. ****************************************************************************************/
  1040. function group4_button5_onclick(obj:Button, e:ClickEventInfo)
  1041. {
  1042. fHosInLBLPrint();
  1043. }
  1044. /****************************************************************************************
  1045. * Components : Button
  1046. * Components ID : group4.btn_prnt
  1047. * Event : onclick
  1048. * Argument : 01.obj : Object Event has occurred
  1049. * : 02.e : Event Object
  1050. * Description : 프린터설정
  1051. ****************************************************************************************/
  1052. function group4_btn_prnt_onclick(obj:Button, e:ClickEventInfo)
  1053. {
  1054. fSetPrint();
  1055. }
  1056. /****************************************************************************************
  1057. * Components : Combo
  1058. * Components ID : group4.combo3
  1059. * Event : onitemchanged
  1060. * Argument : 01.obj : Object Event has occurred
  1061. * : 02.e : Event Object
  1062. * Description :
  1063. ****************************************************************************************/
  1064. function group4_combo3_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1065. {
  1066. // var chk_cnt = 0;
  1067. //
  1068. // if(chk_cnt != 0) {
  1069. // var ret = messageBox("약품출고부서를 " + combo3.label +"으로 ", "S001");
  1070. // if(ret == "6") {
  1071. // model.setValue("/root/send/suminfo/mstocdeptcd", combo3.value);
  1072. // } else {
  1073. // model.setValue("/root/send/suminfo/mstocdeptcd", model.getValue("/root/temp/stocdeptcd"));
  1074. // //model.setValue("/root/hidden/prcpsrch/stocdeptcd", model.getValue("/root/temp/stocdeptcd"));
  1075. // }
  1076. // combo3.refresh();
  1077. // }
  1078. }
  1079. /****************************************************************************************
  1080. * Components : Button
  1081. * Components ID : group4.btn_excel
  1082. * Event : onclick
  1083. * Argument : 01.obj : Object Event has occurred
  1084. * : 02.e : Event Object
  1085. * Description : 엑셀저장
  1086. ****************************************************************************************/
  1087. function group4_btn_excel_onclick(obj:Button, e:ClickEventInfo)
  1088. {
  1089. fExeSaveToExcel();
  1090. }
  1091. /****************************************************************************************
  1092. * Components : Button
  1093. * Components ID : group4.button7
  1094. * Event : onclick
  1095. * Argument : 01.obj : Object Event has occurred
  1096. * : 02.e : Event Object
  1097. * Description : 조제완료
  1098. ****************************************************************************************/
  1099. function group4_button7_onclick(obj:Button, e:ClickEventInfo)
  1100. {
  1101. fSubmitDrugStat("D");
  1102. }
  1103. /****************************************************************************************
  1104. * Components : Button
  1105. * Components ID : group4.button6
  1106. * Event : onclick
  1107. * Argument : 01.obj : Object Event has occurred
  1108. * : 02.e : Event Object
  1109. * Description : 조제취소
  1110. ****************************************************************************************/
  1111. function group4_button6_onclick(obj:Button, e:ClickEventInfo)
  1112. {
  1113. fSubmitDrugStat("P");
  1114. }
  1115. /****************************************************************************************
  1116. * Components : Button
  1117. * Components ID : group4.button3
  1118. * Event : onclick
  1119. * Argument : 01.obj : Object Event has occurred
  1120. * : 02.e : Event Object
  1121. * Description : 투약완료
  1122. ****************************************************************************************/
  1123. function group4_button3_onclick(obj:Button, e:ClickEventInfo)
  1124. {
  1125. fSubmitDrugStat("M");
  1126. }
  1127. /****************************************************************************************
  1128. * Components : Button
  1129. * Components ID : group4.button2
  1130. * Event : onclick
  1131. * Argument : 01.obj : Object Event has occurred
  1132. * : 02.e : Event Object
  1133. * Description : 투약취소
  1134. ****************************************************************************************/
  1135. function group4_button2_onclick(obj:Button, e:ClickEventInfo)
  1136. {
  1137. fSubmitDrugStat("NM");
  1138. }
  1139. ]]></Script>
  1140. </Form>
  1141. </FDL>