SMADT12002_통합마약불출반환현황.xfdl 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADT12002" classname="SMADT12000_통합마약조회" inheritanceid="" position="absolute 0 0 1133 845" titletext="New Form" oninit="SMADT12002_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text=" 통합 마약 불출, 반환 관리" class="tit_1" position="absolute 3 1 216 26" onclick="caption6_onclick"/>
  8. <Static id="caption00" text="불출 현황" class="tit_2" position="absolute 7 72 89 93"/>
  9. <Grid id="grd_daypatlist" class="grd_daypatlist" taborder="25" binddataset="ds_patdaylist" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" position="absolute 6 96 404 835" anchor="all" oncelldblclick="grd_daypatlist_oncelldblclick">
  10. <Formats>
  11. <Format id="default">
  12. <Columns>
  13. <Column size="30" band="left"/>
  14. <Column size="64" band="left"/>
  15. <Column size="54" band="left"/>
  16. <Column size="57" band="left"/>
  17. <Column size="60" band="left"/>
  18. <Column size="70"/>
  19. <Column size="39"/>
  20. </Columns>
  21. <Rows>
  22. <Row size="30" band="head"/>
  23. <Row size="24"/>
  24. </Rows>
  25. <Band id="head">
  26. <Cell/>
  27. <Cell col="1" text="처방일자" wordwrap="char"/>
  28. <Cell col="2" text="투약번호" wordwrap="char"/>
  29. <Cell col="3" text="환자번호" wordwrap="char"/>
  30. <Cell col="4" text="환자명" wordwrap="char"/>
  31. <Cell col="5" text="약품코드" wordwrap="char"/>
  32. <Cell col="6" text="수량" wordwrap="char"/>
  33. </Band>
  34. <Band id="body">
  35. <Cell celltype="head" text="expr:currow+1"/>
  36. <Cell col="1" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:drugdd" wordwrap="char" autosizerow="limitmin"/>
  37. <Cell col="2" displaytype="text" style="align:center top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:drugno" wordwrap="char" autosizerow="limitmin"/>
  38. <Cell col="3" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:pid" wordwrap="char" autosizerow="limitmin"/>
  39. <Cell col="4" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:pat_nm" wordwrap="char" autosizerow="limitmin"/>
  40. <Cell col="5" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  41. <Cell col="6" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:sum_qy" wordwrap="char" autosizerow="limitmin"/>
  42. </Band>
  43. </Format>
  44. </Formats>
  45. </Grid>
  46. <Div id="grp_srch" taborder="29" class="div_SA" position="absolute 8 32 1104 63">
  47. <Layouts>
  48. <Layout width="776" height="31">
  49. <Calendar id="Calendar00" taborder="1" position="absolute 300 5 400 25" anchor="default"/>
  50. <Calendar id="Calendar01" taborder="2" position="absolute 428 5 528 25" anchor="default"/>
  51. <Static id="Static00" text=". 조회구간 :" position="absolute 218 10 297 22" style="font:Dotum,9,bold;"/>
  52. <Static id="Static01" text="~" position="absolute 408 13 420 17"/>
  53. <Radio id="radio2" taborder="3" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 636 6 848 26" style="font:Dotum,9,bold;" onitemclick="grp_srch_radio2_onitemclick">
  54. <Dataset id="innerdataset">
  55. <ColumnInfo>
  56. <Column id="codecolumn" size="256"/>
  57. <Column id="datacolumn" size="256"/>
  58. </ColumnInfo>
  59. <Rows>
  60. <Row>
  61. <Col id="codecolumn">O</Col>
  62. <Col id="datacolumn">불출</Col>
  63. </Row>
  64. <Row>
  65. <Col id="codecolumn">R</Col>
  66. <Col id="datacolumn">반환</Col>
  67. </Row>
  68. <Row>
  69. <Col id="codecolumn">S</Col>
  70. <Col id="datacolumn">잔량폐기</Col>
  71. </Row>
  72. </Rows>
  73. </Dataset>
  74. </Radio>
  75. <Static id="Static02" text=". 조회구분" position="absolute 562 10 641 22" style="font:Dotum,9,bold;"/>
  76. <Static id="Static03" text=". 저장소 :" position="absolute 10 10 89 22" style="font:Dotum,9,bold;"/>
  77. </Layout>
  78. </Layouts>
  79. </Div>
  80. <Button id="btn_sea" taborder="30" text="조회" onclick="group2_btn_sea_onclick" class="btn1" position="absolute 1041 37 1097 59"/>
  81. <Grid id="grd_narclist00" class="grd_orderlist" taborder="31" binddataset="ds_adnmstoclist" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onkeyup="switch1_grd_onkeyup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 407 96 1116 592">
  82. <Formats>
  83. <Format id="default">
  84. <Columns>
  85. <Column size="27" band="left"/>
  86. <Column size="60" band="left"/>
  87. <Column size="60" band="left"/>
  88. <Column size="50" band="left"/>
  89. <Column size="77" band="left"/>
  90. <Column size="95" band="left"/>
  91. <Column size="111" band="left"/>
  92. <Column size="75" band="left"/>
  93. <Column size="127"/>
  94. <Column size="94"/>
  95. <Column size="34"/>
  96. <Column size="22"/>
  97. <Column size="47"/>
  98. <Column size="89"/>
  99. <Column size="65"/>
  100. <Column size="66"/>
  101. <Column size="65"/>
  102. <Column size="40"/>
  103. </Columns>
  104. <Rows>
  105. <Row size="30" band="head"/>
  106. <Row size="22"/>
  107. </Rows>
  108. <Band id="head">
  109. <Cell/>
  110. <Cell col="1" text="환자번호"/>
  111. <Cell col="2" text="환자명"/>
  112. <Cell col="3" text="투약번호"/>
  113. <Cell col="4" text="처방&#10;코드" wordwrap="char"/>
  114. <Cell col="5" text="LabelNo"/>
  115. <Cell col="6" text="제품번호" wordwrap="char"/>
  116. <Cell col="7" text="유효기간" wordwrap="char"/>
  117. <Cell col="8" text="제조번호" wordwrap="char"/>
  118. <Cell col="9" text="일련번호" wordwrap="char"/>
  119. <Cell col="10" colspan="2" text="seq" taborder="undefined">
  120. <Cell text="seq" wordwrap="char" taborder="undefined"/>
  121. <Cell col="1"/>
  122. </Cell>
  123. <Cell col="12" text="불출유무"/>
  124. <Cell col="13" text="불출일자"/>
  125. <Cell col="14"/>
  126. <Cell col="15"/>
  127. <Cell col="16" text="불출유무"/>
  128. <Cell col="17"/>
  129. </Band>
  130. <Band id="body">
  131. <Cell celltype="head" text="expr:currow + 1"/>
  132. <Cell col="1" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:pid"/>
  133. <Cell col="2" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:pat_nm"/>
  134. <Cell col="3" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugno"/>
  135. <Cell col="4" style="align:center top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  136. <Cell col="5" text="bind:labelno"/>
  137. <Cell col="6" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
  138. <Cell col="7" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
  139. <Cell col="8" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
  140. <Cell col="9" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
  141. <Cell col="10" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
  142. <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
  143. </Cell>
  144. <Cell col="11" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
  145. <Cell col="12" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:fnshfg"/>
  146. <Cell col="13" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:outdd"/>
  147. <Cell col="14" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:instcd"/>
  148. <Cell col="15" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:infg"/>
  149. <Cell col="16" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:fnshfg"/>
  150. <Cell col="17" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));"/>
  151. </Band>
  152. </Format>
  153. <Format id="format_copy"/>
  154. </Formats>
  155. </Grid>
  156. <Grid id="grd_daydrugtong" class="grd_daydrugtong" taborder="32" binddataset="ds_daydrugtong" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" oncelldblclick="grd_daypatlist_oncelldblclick" position="absolute 409 600 1116 833" anchor="all">
  157. <Formats>
  158. <Format id="default">
  159. <Columns>
  160. <Column size="30" band="left"/>
  161. <Column size="80"/>
  162. <Column size="59"/>
  163. </Columns>
  164. <Rows>
  165. <Row size="30" band="head"/>
  166. <Row size="24"/>
  167. </Rows>
  168. <Band id="head">
  169. <Cell/>
  170. <Cell col="1" text="약품코드" wordwrap="char"/>
  171. <Cell col="2" text="수량" wordwrap="char"/>
  172. </Band>
  173. <Band id="body">
  174. <Cell celltype="head" text="expr:currow+1"/>
  175. <Cell col="1" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
  176. <Cell col="2" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(sel == 'Y' ? 'yellow' : '');background2:EXPR(sel == 'Y' ? 'yellow' : '');" text="bind:sum_qy" wordwrap="char" autosizerow="limitmin"/>
  177. </Band>
  178. </Format>
  179. </Formats>
  180. </Grid>
  181. <Combo id="Combo00" taborder="33" position="absolute 108 38 208 58" onitemchanged="Combo00_onitemchanged" codecolumn="codecolumn" datacolumn="datacolumn" index="-1">
  182. <Dataset id="innerdataset">
  183. <ColumnInfo>
  184. <Column id="codecolumn" size="256"/>
  185. <Column id="datacolumn" size="256"/>
  186. </ColumnInfo>
  187. <Rows>
  188. <Row>
  189. <Col id="codecolumn">3240300000</Col>
  190. <Col id="datacolumn">병동약국</Col>
  191. </Row>
  192. <Row>
  193. <Col id="codecolumn">3240400000</Col>
  194. <Col id="datacolumn">외래약국</Col>
  195. </Row>
  196. <Row>
  197. <Col id="codecolumn">3240807000</Col>
  198. <Col id="datacolumn">특수조제실</Col>
  199. </Row>
  200. </Rows>
  201. </Dataset>
  202. </Combo>
  203. </Layout>
  204. </Layouts>
  205. <Bind>
  206. <BindItem id="item0" compid="grp_srch.Calendar00" propid="value" datasetid="ds_senddata" columnid="startdate"/>
  207. <BindItem id="item1" compid="grp_srch.Calendar01" propid="value" datasetid="ds_senddata" columnid="enddate"/>
  208. <BindItem id="item5" compid="grp_srch.radio2" propid="value" datasetid="ds_senddata" columnid="seltype"/>
  209. <BindItem id="item2" compid="grp_srch.radio2" propid="" datasetid="ds_senddata" columnid="seltype"/>
  210. <BindItem id="item3" compid="Combo00" propid="value" datasetid="ds_storgdata" columnid="storge_no"/>
  211. </Bind>
  212. <Objects>
  213. <Dataset id="ds_senddata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  214. <ColumnInfo>
  215. <Column id="storge_no" type="STRING" size="256"/>
  216. <Column id="startdate" type="STRING" size="256"/>
  217. <Column id="enddate" type="STRING" size="256"/>
  218. <Column id="seltype" type="STRING" size="256"/>
  219. </ColumnInfo>
  220. <Rows>
  221. <Row/>
  222. </Rows>
  223. </Dataset>
  224. <Dataset id="ds_patdaylist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  225. <ColumnInfo>
  226. <Column id="prcpno" type="STRING" size="256"/>
  227. <Column id="drugdd" type="STRING" size="256"/>
  228. <Column id="drugno" type="STRING" size="256"/>
  229. <Column id="pat_id_no" type="STRING" size="256"/>
  230. <Column id="pat_nm" type="STRING" size="256"/>
  231. <Column id="sum_qy" type="STRING" size="256"/>
  232. <Column id="seltype" type="STRING" size="256"/>
  233. <Column id="drugcd" type="STRING" size="256"/>
  234. <Column id="pid" type="STRING" size="256"/>
  235. </ColumnInfo>
  236. </Dataset>
  237. <Dataset id="ds_sendpatdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  238. <ColumnInfo>
  239. <Column id="seltype" type="STRING" size="256"/>
  240. <Column id="pat_id_no" type="STRING" size="256"/>
  241. <Column id="drugdd" type="STRING" size="256"/>
  242. <Column id="drugno" type="STRING" size="256"/>
  243. <Column id="prcpno" type="STRING" size="256"/>
  244. <Column id="pid" type="STRING" size="256"/>
  245. <Column id="rtype" type="STRING" size="256"/>
  246. </ColumnInfo>
  247. <Rows>
  248. <Row/>
  249. </Rows>
  250. </Dataset>
  251. <Dataset id="ds_adnmstoclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  252. <ColumnInfo>
  253. <column id="instcd" type="STRING" size="256"/>
  254. <column id="drugcd" type="STRING" size="256"/>
  255. <column id="infg" type="STRING" size="256"/>
  256. <column id="histdt" type="STRING" size="256"/>
  257. <column id="gtin" type="STRING" size="256"/>
  258. <column id="prd_valid_de" type="STRING" size="256"/>
  259. <column id="mnf_no" type="STRING" size="256"/>
  260. <column id="mnf_seq" type="STRING" size="256"/>
  261. <column id="seq" type="STRING" size="256"/>
  262. <column id="prd_sgtin" type="STRING" size="256"/>
  263. <column id="storge_no" type="STRING" size="256"/>
  264. <column id="prtm_se_nm" type="STRING" size="256"/>
  265. <column id="prd_min_distb_qy" type="STRING" size="256"/>
  266. <column id="prd_min_distb_unit" type="STRING" size="256"/>
  267. <column id="prd_tot_pce_qy" type="STRING" size="256"/>
  268. <column id="prd_pce_unit" type="STRING" size="256"/>
  269. <column id="in_pce_qy" type="STRING" size="256"/>
  270. <column id="indd" type="STRING" size="256"/>
  271. <column id="opp_bssh_cd" type="STRING" size="256"/>
  272. <column id="opp_bssh_nm" type="STRING" size="256"/>
  273. <column id="opp_storge_no" type="STRING" size="256"/>
  274. <column id="in_dtl_cd" type="STRING" size="256"/>
  275. <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
  276. <column id="out_fg" type="STRING" size="256"/>
  277. <column id="out_pce_qy" type="STRING" size="256"/>
  278. <column id="fnshfg" type="STRING" size="256"/>
  279. <column id="prcpno" type="STRING" size="256"/>
  280. <column id="drugdd" type="STRING" size="256"/>
  281. <column id="drugno" type="STRING" size="256"/>
  282. <column id="ioflag" type="STRING" size="256"/>
  283. <column id="drugseqno" type="STRING" size="256"/>
  284. <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
  285. <column id="pat_id_no" type="STRING" size="256"/>
  286. <column id="pat_in" type="STRING" size="256"/>
  287. <column id="lcns_asort_cd" type="STRING" size="256"/>
  288. <column id="lcns_no" type="STRING" size="256"/>
  289. <column id="prsc_doc_nm" type="STRING" size="256"/>
  290. <column id="prsc_ord_no" type="STRING" size="256"/>
  291. <column id="diss_code" type="STRING" size="256"/>
  292. <column id="once_qy" type="STRING" size="256"/>
  293. <column id="ade_cnt" type="STRING" size="256"/>
  294. <column id="tot_dcnt" type="STRING" size="256"/>
  295. <column id="sum_qy" type="STRING" size="256"/>
  296. <column id="aft_dsuse_qy" type="STRING" size="256"/>
  297. <column id="dsuse_se_cd" type="STRING" size="256"/>
  298. <column id="dsuse_prv_cd" type="STRING" size="256"/>
  299. <column id="dsuse_mth_cd" type="STRING" size="256"/>
  300. <column id="dsuse_loc" type="STRING" size="256"/>
  301. <column id="dsuse_de" type="STRING" size="256"/>
  302. <column id="dsuse_instt_cd" type="STRING" size="256"/>
  303. <column id="dsuse_doc_de" type="STRING" size="256"/>
  304. <column id="outdd" type="STRING" size="256"/>
  305. <column id="out_bssh_cd" type="STRING" size="256"/>
  306. <column id="out_bssh_nm" type="STRING" size="256"/>
  307. <column id="out_storge_no" type="STRING" size="256"/>
  308. <column id="out_dtl_cd" type="STRING" size="256"/>
  309. <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
  310. <column id="insendfg" type="STRING" size="256"/>
  311. <column id="outsendfg" type="STRING" size="256"/>
  312. <Column id="pid" type="STRING" size="256"/>
  313. <Column id="labelno" type="STRING" size="256"/>
  314. <Column id="indt" type="STRING" size="256"/>
  315. <Column id="outdt" type="STRING" size="256"/>
  316. </ColumnInfo>
  317. <Rows>
  318. <Row/>
  319. </Rows>
  320. </Dataset>
  321. <Dataset id="ds_daydrugtong" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  322. <ColumnInfo>
  323. <Column id="sum_qy" type="STRING" size="256"/>
  324. <Column id="drugcd" type="STRING" size="256"/>
  325. </ColumnInfo>
  326. </Dataset>
  327. <Dataset id="ds_storgdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  328. <ColumnInfo>
  329. <Column id="storge_no" type="STRING" size="256"/>
  330. </ColumnInfo>
  331. <Rows>
  332. <Row/>
  333. </Rows>
  334. </Dataset>
  335. </Objects>
  336. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  337. * System Name :
  338. * Job Name :
  339. * Creator :
  340. * Make Date : 2018-03-08
  341. * Description :
  342. ****************************************************************************************/
  343. //=======================================================================================
  344. // Lib Include
  345. //---------------------------------------------------------------------------------------
  346. include "com_commonxp::comm_main.xjs"
  347. include "ast_commonxp::AST.xjs"
  348. var Arstorge_no = "";
  349. function SMADT12002_oninit(obj:Form, e:InitEventInfo)
  350. {
  351. frmf_initForm(obj); // 폼 초기화
  352. // ds_senddata.clearData()
  353. ds_patdaylist.clearData()
  354. // ds_sendpatdata.clearData()
  355. ds_adnmstoclist.clearData()
  356. ds_daydrugtong.clearData()
  357. var Vdeptcd = ds_storgdata.getColumn(0, "storge_no") ;
  358. if ( Vdeptcd == '3240300000') {
  359. Arstorge_no = "S0002";
  360. } else if ( Vdeptcd == '3240400000') {
  361. Arstorge_no = "S0003";
  362. } else if ( Vdeptcd == '3240807000') {
  363. Arstorge_no = "S0004";
  364. } else {
  365. Arstorge_no = "S0001";
  366. }
  367. /*3240000000 약제부
  368. 3240300000 병동약국
  369. 3240400000 외래약국
  370. 3240807000 특수조제실
  371. 3241800000 조제팀
  372. 3242106000 외래조제
  373. 3242400000 약무과
  374. 3242406000 약무정보팀
  375. 3242500000 조제팀*/
  376. var sCurDate = utlf_getCurrentDate();
  377. var currentDate = new Date(sCurDate.substr(0,4), sCurDate.substr(4,2) -1, sCurDate.substr(6,2));
  378. //조회날짜 초기화
  379. ds_senddata.setColumn( 0, "startdate", currentDate.getAddDate(-7,"D").getDateFormat("YYYYMMDD"));
  380. ds_senddata.setColumn( 0, "enddate", utlf_getCurrentDate());
  381. ds_senddata.setColumn(0,"storge_no" , Arstorge_no );
  382. ds_senddata.setColumn(0,"seltype" , 'O' ); ///"R", "S"
  383. //alert(sysf_getUserInfo("dutplcecd") );
  384. }
  385. function group2_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  386. {
  387. var oParam = {};
  388. oParam.id = "TRADT12003";
  389. oParam.service = "pharmacydrugsumapp.NarcManagent";
  390. oParam.method = "reqGetPatDayList";
  391. oParam.inds = "req=ds_senddata";
  392. oParam.outds = "ds_patdaylist=patdaylist";
  393. oParam.async = false;
  394. tranf_submit(oParam);
  395. var oParam = {};
  396. oParam.id = "TRADT12006";
  397. oParam.service = "pharmacydrugsumapp.NarcManagent";
  398. oParam.method = "reqGetDayDrugTong";
  399. oParam.inds = "req=ds_senddata";
  400. oParam.outds = "ds_daydrugtong=daydrugtong";
  401. oParam.async = false;
  402. tranf_submit(oParam);
  403. }
  404. function grd_daypatlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  405. {
  406. var cRow = e.row;
  407. if( cRow > -1 ){
  408. ds_sendpatdata.setColumn(0, "pid", ds_patdaylist.getColumn(cRow, "pid"));
  409. ds_sendpatdata.setColumn(0, "pat_id_no", ds_patdaylist.getColumn(cRow, "pat_id_no"));
  410. ds_sendpatdata.setColumn(0, "drugdd", ds_patdaylist.getColumn(cRow, "drugdd"));
  411. ds_sendpatdata.setColumn(0, "drugno", ds_patdaylist.getColumn(cRow, "drugno"));
  412. ds_sendpatdata.setColumn(0, "prcpno", ds_patdaylist.getColumn(cRow, "prcpno"));
  413. ds_sendpatdata.setColumn(0, "seltype", ds_patdaylist.getColumn(cRow, "seltype"));
  414. ds_sendpatdata.setColumn(0, "rtype", ds_senddata.getColumn(0, "seltype"));
  415. // ds_senddata.setColumn(0,"seltype" , 'O' ); ///"R", "S"
  416. var oParam = {};
  417. oParam.id = "TRADT12004";
  418. oParam.service = "pharmacydrugsumapp.NarcManagent";
  419. oParam.method = "reqGetPatOrdList";
  420. oParam.inds = "req=ds_sendpatdata";
  421. oParam.outds = "ds_adnmstoclist=stocdata";
  422. oParam.async = false;
  423. tranf_submit(oParam);
  424. }
  425. }
  426. function Combo00_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  427. {
  428. }
  429. ]]></Script>
  430. </Form>
  431. </FDL>