SMADT10700_투석액환자내역조회.xfdl 51 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADT10700" position="absolute 0 0 1197 773" titletext="투석액 환자내역 조회" onload="SMADT10700_onload" oninit="SMADT10700_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 24 1195 771" id="group3" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Div position="absolute 0 1 1195 61" id="group2" visible="true" anchor="left top right" class="div_SA">
  11. <Layouts>
  12. <Layout>
  13. <Shape position="absolute 1104 14 1110 49" linetype="vertical" id="line13" anchor="top right"/>
  14. <Static text="등록번호 :" position="absolute 335 11 421 28" id="caption1" class="search_name" anchor="default"/>
  15. <Static text="~" position="absolute 205 9 225 29" align="align:center middle;" id="caption2" anchor="default"/>
  16. <Static text="검색일자 :" position="absolute 15 11 119 28" id="caption4" class="search_name" anchor="default"/>
  17. <Radio position="absolute 900 33 1065 53" id="radio2" class="radio_search" visible="false" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio2_onitemchanged" onitemclick="group3_group2_radio2_onitemclick" value="A" index="0" anchor="default">
  18. <Dataset id="innerdataset">
  19. <ColumnInfo>
  20. <Column id="codecolumn"/>
  21. <Column id="datacolumn"/>
  22. </ColumnInfo>
  23. <Rows>
  24. <Row>
  25. <Col id="codecolumn">A</Col>
  26. <Col id="datacolumn">전체</Col>
  27. </Row>
  28. <Row>
  29. <Col id="codecolumn">I</Col>
  30. <Col id="datacolumn">입원</Col>
  31. </Row>
  32. <Row>
  33. <Col id="codecolumn">O</Col>
  34. <Col id="datacolumn">외래</Col>
  35. </Row>
  36. </Rows>
  37. </Dataset>
  38. </Radio>
  39. <Edit position="absolute 425 9 525 28" id="input1" class="input_search" onkeydown="group3_group2_input1_onkeydown" anchor="default"/>
  40. <Calendar position="absolute 221 9 320 28" id="input2" class="input_search" anchor="default" dateformat="yyyy-MM-dd"/>
  41. <Calendar position="absolute 105 9 204 28" id="input5" class="input_search" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  42. <Button position="absolute 1123 19 1179 41" id="btn_sea" class="btn1" text="조회" onclick="group3_group2_btn_sea_onclick" anchor="top right"/>
  43. <Radio position="absolute 900 9 1075 29" id="radio1" class="radio_search" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio1_onitemchanged" value="1" index="0" anchor="default">
  44. <Dataset id="innerdataset">
  45. <ColumnInfo>
  46. <Column id="codecolumn"/>
  47. <Column id="datacolumn"/>
  48. </ColumnInfo>
  49. <Rows>
  50. <Row>
  51. <Col id="codecolumn">1</Col>
  52. <Col id="datacolumn">제약회사 순</Col>
  53. </Row>
  54. <Row>
  55. <Col id="codecolumn">2</Col>
  56. <Col id="datacolumn">약품코드 순</Col>
  57. </Row>
  58. </Rows>
  59. </Dataset>
  60. </Radio>
  61. <Radio position="absolute 720 9 890 29" id="radio3" class="radio_search" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio3_onitemchanged" value="A" index="0" anchor="default">
  62. <Dataset id="innerdataset">
  63. <ColumnInfo>
  64. <Column id="codecolumn" size="256"/>
  65. <Column id="datacolumn" size="256"/>
  66. </ColumnInfo>
  67. <Rows>
  68. <Row>
  69. <Col id="codecolumn">A</Col>
  70. <Col id="datacolumn">전체</Col>
  71. </Row>
  72. <Row>
  73. <Col id="codecolumn">Y</Col>
  74. <Col id="datacolumn">발주</Col>
  75. </Row>
  76. <Row>
  77. <Col id="codecolumn">N</Col>
  78. <Col id="datacolumn">미발주</Col>
  79. </Row>
  80. </Rows>
  81. </Dataset>
  82. </Radio>
  83. <Radio position="absolute 545 33 670 53" id="radio4" columncount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio4_onitemchanged" value="D" index="0" anchor="default">
  84. <Dataset id="innerdataset">
  85. <ColumnInfo>
  86. <Column id="codecolumn"/>
  87. <Column id="datacolumn"/>
  88. </ColumnInfo>
  89. <Rows>
  90. <Row>
  91. <Col id="codecolumn">D</Col>
  92. <Col id="datacolumn">퇴원+외래선처치외</Col>
  93. </Row>
  94. </Rows>
  95. </Dataset>
  96. </Radio>
  97. <Radio position="absolute 790 33 870 53" id="radio5" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio5_onitemchanged" anchor="default">
  98. <Dataset id="innerdataset">
  99. <ColumnInfo>
  100. <Column id="codecolumn"/>
  101. <Column id="datacolumn"/>
  102. </ColumnInfo>
  103. <Rows>
  104. <Row>
  105. <Col id="codecolumn">P</Col>
  106. <Col id="datacolumn">선처치</Col>
  107. </Row>
  108. </Rows>
  109. </Dataset>
  110. </Radio>
  111. <Radio position="absolute 680 33 785 53" id="radio6" columncount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio6_onitemchanged" anchor="default">
  112. <Dataset id="innerdataset">
  113. <ColumnInfo>
  114. <Column id="codecolumn"/>
  115. <Column id="datacolumn"/>
  116. </ColumnInfo>
  117. <Rows>
  118. <Row>
  119. <Col id="codecolumn">I</Col>
  120. <Col id="datacolumn">입원선처치외</Col>
  121. </Row>
  122. </Rows>
  123. </Dataset>
  124. </Radio>
  125. <Radio position="absolute 545 9 590 29" id="radio7" class="radio_search" columncount="1" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_group2_radio7_onitemchanged" value="A" index="0" anchor="default">
  126. <Dataset id="innerdataset">
  127. <ColumnInfo>
  128. <Column id="codecolumn"/>
  129. <Column id="datacolumn"/>
  130. </ColumnInfo>
  131. <Rows>
  132. <Row>
  133. <Col id="codecolumn">A</Col>
  134. <Col id="datacolumn">전체</Col>
  135. </Row>
  136. </Rows>
  137. </Dataset>
  138. </Radio>
  139. <Radio position="absolute 600 9 645 29" id="radio8" class="radio_search" columncount="1" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" value="I" index="0" onitemchanged="group3_group2_radio8_onitemchanged" anchor="default">
  140. <Dataset id="innerdataset">
  141. <ColumnInfo>
  142. <Column id="codecolumn"/>
  143. <Column id="datacolumn"/>
  144. </ColumnInfo>
  145. <Rows>
  146. <Row>
  147. <Col id="codecolumn">I</Col>
  148. <Col id="datacolumn">입원</Col>
  149. </Row>
  150. </Rows>
  151. </Dataset>
  152. </Radio>
  153. <Radio position="absolute 652 9 697 29" id="radio9" class="radio_search" columncount="1" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" value="O" index="0" onitemchanged="group3_group2_radio9_onitemchanged" anchor="default">
  154. <Dataset id="innerdataset">
  155. <ColumnInfo>
  156. <Column id="codecolumn"/>
  157. <Column id="datacolumn"/>
  158. </ColumnInfo>
  159. <Rows>
  160. <Row>
  161. <Col id="codecolumn">O</Col>
  162. <Col id="datacolumn">외래</Col>
  163. </Row>
  164. </Rows>
  165. </Dataset>
  166. </Radio>
  167. <Static text="병 동 :" position="absolute 335 35 421 52" id="caption3" class="search_name" anchor="default"/>
  168. <Combo position="absolute 425 33 525 52" id="combo1" innerdataset="@ds_init_deptlist_ward" datacolumn="deptnm" codecolumn="deptcd" onitemchanged="group3_group2_combo1_onitemchanged" usecontextmenu="true" class="combo_search" index="-1" anchor="default"/>
  169. </Layout>
  170. </Layouts>
  171. </Div>
  172. <Static text="투석액 환자리스트" position="absolute 0 74 191 95" id="caption10" class="tit_2" anchor="default"/>
  173. <Grid position="absolute 0 95 1195 743" id="grd_prcp" visible="true" binddataset="ds_main_prcplist_prcpinfo" ontextchanged="group3_grd_prcp_ontextchanged" anchor="all" cellsizingtype="col">
  174. <Formats>
  175. <Format id="default">
  176. <Columns>
  177. <Column size="22"/>
  178. <Column size="94"/>
  179. <Column size="50"/>
  180. <Column size="65"/>
  181. <Column size="40"/>
  182. <Column size="57"/>
  183. <Column size="0"/>
  184. <Column size="70"/>
  185. <Column size="50"/>
  186. <Column size="42"/>
  187. <Column size="70"/>
  188. <Column size="70"/>
  189. <Column size="100"/>
  190. <Column size="50"/>
  191. <Column size="50"/>
  192. <Column size="50"/>
  193. <Column size="58"/>
  194. <Column size="74"/>
  195. <Column size="74"/>
  196. <Column size="40"/>
  197. <Column size="135"/>
  198. <Column size="123"/>
  199. <Column size="151"/>
  200. <Column size="0"/>
  201. <Column size="0"/>
  202. <Column size="0"/>
  203. <Column size="0"/>
  204. <Column size="0"/>
  205. <Column size="0"/>
  206. </Columns>
  207. <Rows>
  208. <Row size="24" band="head"/>
  209. <Row size="24"/>
  210. </Rows>
  211. <Band id="head">
  212. <Cell/>
  213. <Cell col="1" text="발주/불출"/>
  214. <Cell col="2" text="성명"/>
  215. <Cell col="3" text="등록번호"/>
  216. <Cell col="4" text="입/외"/>
  217. <Cell col="5" text="퇴원예고"/>
  218. <Cell col="6" text="prcpno"/>
  219. <Cell col="7" text="병동"/>
  220. <Cell col="8" text="병실"/>
  221. <Cell col="9" text="약번호"/>
  222. <Cell col="10" text="제약회사"/>
  223. <Cell col="11" text="약품코드"/>
  224. <Cell col="12" text="명칭"/>
  225. <Cell col="13" text="원처방"/>
  226. <Cell col="14" text="수령량"/>
  227. <Cell col="15" text="배송량"/>
  228. <Cell col="16" text="처방일수"/>
  229. <Cell col="17" text="처방일시"/>
  230. <Cell col="18" text="반환일시"/>
  231. <Cell col="19" text="반환"/>
  232. <Cell col="20" text="전달사항"/>
  233. <Cell col="21" text="전화번호"/>
  234. <Cell col="22" text="주소"/>
  235. <Cell col="23" text="기관코드"/>
  236. <Cell col="24" text="내원구분"/>
  237. <Cell col="25" text="내원일자"/>
  238. <Cell col="26" text="처방이력번호"/>
  239. <Cell col="27" text="실시처방번호"/>
  240. <Cell col="28" text="Update 구분"/>
  241. </Band>
  242. <Band id="body">
  243. <Cell/>
  244. <Cell col="1" displaytype="checkbox" edittype="expr:isReadonly_trsmflag(currow) ? &quot;none&quot; : &quot;checkbox&quot;" style="controlbackground:EXPR(isReadonly_trsmflag(currow) ? &quot;silver&quot; : &quot;default&quot;);controlborder:EXPR((isReadonly_trsmflag(currow) ? &quot;1 solid #708090cc&quot; : &quot;default&quot;));" text="bind:trsmflag" expr="expr:(trsmflag==&quot;Y&quot; || trsmflag==1)?1:0"/>
  245. <Cell col="2" text="bind:hngnm"/>
  246. <Cell col="3" text="bind:pid"/>
  247. <Cell col="4" text="bind:ioflagname"/>
  248. <Cell col="5" text="bind:dschdclrtyn"/>
  249. <Cell col="6" text="bind:prcpno"/>
  250. <Cell col="7" text="bind:wardnm"/>
  251. <Cell col="8" text="bind:roomnm"/>
  252. <Cell col="9" displaytype="text" text="bind:drugno"/>
  253. <Cell col="10" style="align:left;" text="bind:company"/>
  254. <Cell col="11" text="bind:prcpcd"/>
  255. <Cell col="12" style="align:left;" text="bind:prcpnm"/>
  256. <Cell col="13" style="align:right;" text="bind:totqty"/>
  257. <Cell col="14" displaytype="text" edittype="text" style="align:right;font:,9,bold;" class="gridinput" text="bind:getqty"/>
  258. <Cell col="15" style="align:right;font:,9,bold;" text="bind:shipqty"/>
  259. <Cell col="16" style="align:right;" text="bind:prcpdayno"/>
  260. <Cell col="17" text="bind:prcpdd" mask="####-##-##"/>
  261. <Cell col="18" text="bind:dcdd" mask="####-##-## ##:##:##"/>
  262. <Cell col="19" displaytype="checkbox" edittype="readonly" style="controlbackground:silver;controlborder:1 solid #708090cc ;" text="bind:dcyn" expr="expr:(dcyn==&quot;Y&quot; || dcyn==1)?1:0" enable="false"/>
  263. <Cell col="20" displaytype="text" edittype="text" class="gridinput" text="bind:rem"/>
  264. <Cell col="21" displaytype="text" edittype="text" class="gridinput" text="bind:telno"/>
  265. <Cell col="22" displaytype="text" edittype="text" class="gridinput" text="bind:addr"/>
  266. <Cell col="23" text="bind:instcd"/>
  267. <Cell col="24" text="bind:ioflag"/>
  268. <Cell col="25" text="bind:orddd"/>
  269. <Cell col="26" text="bind:prcphistno"/>
  270. <Cell col="27" text="bind:execprcpno"/>
  271. <Cell col="28" text="bind:updtflag"/>
  272. </Band>
  273. </Format>
  274. </Formats>
  275. </Grid>
  276. <Grid position="absolute 0 395 894 495" id="grd_exel" visible="false" binddataset="ds_send_prcplist_prcpinfo" anchor="default">
  277. <Formats>
  278. <Format id="default">
  279. <Columns>
  280. <Column size="94"/>
  281. <Column size="50"/>
  282. <Column size="65"/>
  283. <Column size="0"/>
  284. <Column size="57"/>
  285. <Column size="70"/>
  286. <Column size="70"/>
  287. <Column size="50"/>
  288. <Column size="42"/>
  289. <Column size="70"/>
  290. <Column size="70"/>
  291. <Column size="100"/>
  292. </Columns>
  293. <Rows>
  294. <Row size="24" band="head"/>
  295. <Row size="24"/>
  296. </Rows>
  297. <Band id="head">
  298. <Cell text="성명"/>
  299. <Cell col="1" text="등록번호"/>
  300. <Cell col="2" text="입/외"/>
  301. <Cell col="3" text="prcpno"/>
  302. <Cell col="4" text="제약회사"/>
  303. <Cell col="5" text="약품코드"/>
  304. <Cell col="6" text="명칭"/>
  305. <Cell col="7" text="원처방"/>
  306. <Cell col="8" text="배송량"/>
  307. <Cell col="9" text="처방일시"/>
  308. <Cell col="10" text="전화번호"/>
  309. <Cell col="11" text="주소"/>
  310. </Band>
  311. <Band id="body">
  312. <Cell text="bind:hngnm"/>
  313. <Cell col="1" text="bind:pid"/>
  314. <Cell col="2" text="bind:ioflagname"/>
  315. <Cell col="3" text="bind:prcpno"/>
  316. <Cell col="4" text="bind:company"/>
  317. <Cell col="5" text="bind:prcpcd"/>
  318. <Cell col="6" text="bind:prcpnm"/>
  319. <Cell col="7" text="bind:totqty"/>
  320. <Cell col="8" text="bind:shipqty"/>
  321. <Cell col="9" text="bind:prcpdd" mask="yyyy-mm-dd"/>
  322. <Cell col="10" class="gridinput" text="bind:telno" edittype="text" displaytype="text"/>
  323. <Cell col="11" class="gridinput" text="bind:addr" edittype="text" displaytype="text"/>
  324. </Band>
  325. </Format>
  326. </Formats>
  327. </Grid>
  328. <Grid position="absolute 0 455 894 555" id="grd_exel1" visible="false" binddataset="ds_send_prcplist_prcpinfo1" anchor="default">
  329. <Formats>
  330. <Format id="default">
  331. <Columns>
  332. <Column size="94"/>
  333. <Column size="50"/>
  334. <Column size="0"/>
  335. <Column size="70"/>
  336. <Column size="57"/>
  337. <Column size="70"/>
  338. <Column size="70"/>
  339. <Column size="50"/>
  340. <Column size="42"/>
  341. <Column size="70"/>
  342. <Column size="70"/>
  343. </Columns>
  344. <Rows>
  345. <Row size="24" band="head"/>
  346. <Row size="24"/>
  347. </Rows>
  348. <Band id="head">
  349. <Cell text="성명"/>
  350. <Cell col="1" text="등록번호"/>
  351. <Cell col="2" text="prcpno"/>
  352. <Cell col="3" text="병동"/>
  353. <Cell col="4" text="제약회사"/>
  354. <Cell col="5" text="약품코드"/>
  355. <Cell col="6" text="명칭"/>
  356. <Cell col="7" text="원처방"/>
  357. <Cell col="8" text="배송량"/>
  358. <Cell col="9" text="처방일시"/>
  359. <Cell col="10" text="전화번호"/>
  360. </Band>
  361. <Band id="body">
  362. <Cell text="bind:hngnm"/>
  363. <Cell col="1" text="bind:pid"/>
  364. <Cell col="2" text="bind:prcpno"/>
  365. <Cell col="3" text="bind:wardnm"/>
  366. <Cell col="4" text="bind:company"/>
  367. <Cell col="5" text="bind:prcpcd"/>
  368. <Cell col="6" text="bind:prcpnm"/>
  369. <Cell col="7" text="bind:totqty"/>
  370. <Cell col="8" text="bind:shipqty"/>
  371. <Cell col="9" text="bind:prcpdd" mask="yyyy-mm-dd"/>
  372. <Cell col="10" class="gridinput" text="bind:telno" edittype="text" displaytype="text"/>
  373. </Band>
  374. </Format>
  375. </Formats>
  376. </Grid>
  377. <Static text="* 외래선치치외 조건의 경우 수납일자 기준으로 조회됩니다." position="absolute 545 70 940 95" id="caption5" anchor="default"/>
  378. <Shape id="line01" class="line_1" position="absolute 0 89 1195 95" anchor="left top right"/>
  379. <Shape id="line00" class="line_1" position="absolute 0 90 1195 96" anchor="left top right"/>
  380. <Shape id="line02" class="line_1" position="absolute 0 91 1195 97" anchor="left top right"/>
  381. </Layout>
  382. </Layouts>
  383. </Div>
  384. <Div position="absolute 0 87 1195 123" id="group4" scrollbars="autoboth" anchor="left top right">
  385. <Layouts>
  386. <Layout>
  387. <Button position="absolute 999 5 1055 27" id="btn_save" class="btn4" text="저장" onclick="group4_btn_save_onclick" anchor="top right"/>
  388. <Button id="button1" taborder="1" text="출력" onclick="group4_button1_onclick" class="btn6" position="absolute 1058 5 1114 27" anchor="top right"/>
  389. <Button id="btn_excsave" taborder="2" text="엑셀저장" onclick="group4_btn_excsave_onclick" class="btn7" position="absolute 1117 5 1195 27" anchor="top right"/>
  390. </Layout>
  391. </Layouts>
  392. </Div>
  393. <Static id="caption6" text="투석액 환자내역 조회" class="tit_1" position="absolute 0 0 180 25"/>
  394. </Layout>
  395. </Layouts>
  396. <Objects>
  397. <Dataset id="ds_init_combo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  398. <ColumnInfo>
  399. <Column id="wardnm" type="STRING"/>
  400. <Column id="wardcd" type="STRING"/>
  401. </ColumnInfo>
  402. </Dataset>
  403. <Dataset id="ds_main_prcplist_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  404. <ColumnInfo>
  405. <Column id="trsmflag" type="STRING"/>
  406. <Column id="hngnm" type="STRING"/>
  407. <Column id="pid" type="STRING"/>
  408. <Column id="ioflagname" type="STRING"/>
  409. <Column id="dschdclrtyn" type="STRING"/>
  410. <Column id="prcpno" type="STRING"/>
  411. <Column id="wardnm" type="STRING"/>
  412. <Column id="roomnm" type="STRING"/>
  413. <Column id="drugno" type="STRING"/>
  414. <Column id="company" type="STRING"/>
  415. <Column id="prcpcd" type="STRING"/>
  416. <Column id="prcpnm" type="STRING"/>
  417. <Column id="totqty" type="STRING"/>
  418. <Column id="getqty" type="STRING"/>
  419. <Column id="shipqty" type="STRING"/>
  420. <Column id="prcpdayno" type="STRING"/>
  421. <Column id="prcpdd" type="STRING"/>
  422. <Column id="dcdd" type="STRING"/>
  423. <Column id="dcyn" type="STRING"/>
  424. <Column id="rem" type="STRING"/>
  425. <Column id="telno" type="STRING"/>
  426. <Column id="addr" type="STRING"/>
  427. <Column id="instcd" type="STRING"/>
  428. <Column id="ioflag" type="STRING"/>
  429. <Column id="orddd" type="STRING"/>
  430. <Column id="prcphistno" type="STRING"/>
  431. <Column id="execprcpno" type="STRING"/>
  432. <Column id="updtflag" type="STRING"/>
  433. </ColumnInfo>
  434. </Dataset>
  435. <Dataset id="ds_grd_exel" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  436. <ColumnInfo>
  437. <Column id="hngnm" type="STRING"/>
  438. <Column id="pid" type="STRING"/>
  439. <Column id="ioflagname" type="STRING"/>
  440. <Column id="prcpno" type="STRING"/>
  441. <Column id="company" type="STRING"/>
  442. <Column id="prcpcd" type="STRING"/>
  443. <Column id="prcpnm" type="STRING"/>
  444. <Column id="totqty" type="STRING"/>
  445. <Column id="shipqty" type="STRING"/>
  446. <Column id="prcpdd" type="STRING"/>
  447. <Column id="telno" type="STRING"/>
  448. <Column id="addr" type="STRING"/>
  449. </ColumnInfo>
  450. </Dataset>
  451. <Dataset id="ds_grd_exel1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  452. <ColumnInfo>
  453. <Column id="hngnm" type="STRING"/>
  454. <Column id="pid" type="STRING"/>
  455. <Column id="prcpno" type="STRING"/>
  456. <Column id="wardnm" type="STRING"/>
  457. <Column id="company" type="STRING"/>
  458. <Column id="prcpcd" type="STRING"/>
  459. <Column id="prcpnm" type="STRING"/>
  460. <Column id="totqty" type="STRING"/>
  461. <Column id="shipqty" type="STRING"/>
  462. <Column id="prcpdd" type="STRING"/>
  463. <Column id="telno" type="STRING"/>
  464. </ColumnInfo>
  465. </Dataset>
  466. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  467. <ColumnInfo>
  468. <Column id="srchtodd" type="STRING" size="256"/>
  469. <Column id="srchfromdd" type="STRING" size="256"/>
  470. <Column id="prcplist" type="STRING" size="256"/>
  471. <Column id="srchpid" type="STRING" size="256"/>
  472. <Column id="srchioflag" type="STRING" size="256"/>
  473. <Column id="sortflag" type="STRING" size="256"/>
  474. <Column id="trsmflag" type="STRING" size="256"/>
  475. <Column id="req" type="STRING" size="256"/>
  476. <Column id="cond1" type="STRING" size="256"/>
  477. <Column id="srchwardcd" type="STRING" size="256"/>
  478. <Column id="deptinfo" type="STRING" size="256"/>
  479. <Column id="selflist" type="STRING" size="256"/>
  480. </ColumnInfo>
  481. <Rows>
  482. <Row>
  483. <Col id="srchioflag">A</Col>
  484. <Col id="sortflag">1</Col>
  485. <Col id="trsmflag">A</Col>
  486. <Col id="cond1">D</Col>
  487. </Row>
  488. </Rows>
  489. </Dataset>
  490. <Dataset id="ds_send_deptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  491. <ColumnInfo>
  492. <Column id="deptflag" type="STRING" size="256"/>
  493. </ColumnInfo>
  494. <Rows>
  495. <Row/>
  496. </Rows>
  497. </Dataset>
  498. <Dataset id="ds_init_deptlist_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  499. <ColumnInfo>
  500. <Column id="deptcd" type="STRING" size="256"/>
  501. <Column id="deptnm" type="STRING" size="256"/>
  502. </ColumnInfo>
  503. <Rows>
  504. <Row/>
  505. </Rows>
  506. </Dataset>
  507. <Dataset id="ds_send_selflist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  508. <ColumnInfo>
  509. <Column id="pid" type="STRING" size="256"/>
  510. <Column id="prcpno" type="STRING" size="256"/>
  511. <Column id="prcphistno" type="STRING" size="256"/>
  512. <Column id="execprcpno" type="STRING" size="256"/>
  513. <Column id="prcpcd" type="STRING" size="256"/>
  514. <Column id="prcpdd" type="STRING" size="256"/>
  515. </ColumnInfo>
  516. <Rows>
  517. <Row/>
  518. </Rows>
  519. </Dataset>
  520. <Dataset id="ds_send_prcplist_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  521. <ColumnInfo>
  522. <Column id="trsmflag" type="STRING"/>
  523. <Column id="hngnm" type="STRING"/>
  524. <Column id="pid" type="STRING"/>
  525. <Column id="ioflagname" type="STRING"/>
  526. <Column id="dschdclrtyn" type="STRING"/>
  527. <Column id="prcpno" type="STRING"/>
  528. <Column id="wardnm" type="STRING"/>
  529. <Column id="roomnm" type="STRING"/>
  530. <Column id="drugno" type="STRING"/>
  531. <Column id="company" type="STRING"/>
  532. <Column id="prcpcd" type="STRING"/>
  533. <Column id="prcpnm" type="STRING"/>
  534. <Column id="totqty" type="STRING"/>
  535. <Column id="getqty" type="STRING"/>
  536. <Column id="shipqty" type="STRING"/>
  537. <Column id="prcpdayno" type="STRING"/>
  538. <Column id="prcpdd" type="STRING"/>
  539. <Column id="dcdd" type="STRING"/>
  540. <Column id="dcyn" type="STRING"/>
  541. <Column id="rem" type="STRING"/>
  542. <Column id="telno" type="STRING"/>
  543. <Column id="addr" type="STRING"/>
  544. <Column id="instcd" type="STRING"/>
  545. <Column id="ioflag" type="STRING"/>
  546. <Column id="orddd" type="STRING"/>
  547. <Column id="prcphistno" type="STRING"/>
  548. <Column id="execprcpno" type="STRING"/>
  549. <Column id="updtflag" type="STRING"/>
  550. </ColumnInfo>
  551. </Dataset>
  552. <Dataset id="ds_send_prcplist_prcpinfo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  553. <ColumnInfo>
  554. <Column id="trsmflag" type="STRING"/>
  555. <Column id="hngnm" type="STRING"/>
  556. <Column id="pid" type="STRING"/>
  557. <Column id="ioflagname" type="STRING"/>
  558. <Column id="dschdclrtyn" type="STRING"/>
  559. <Column id="prcpno" type="STRING"/>
  560. <Column id="wardnm" type="STRING"/>
  561. <Column id="roomnm" type="STRING"/>
  562. <Column id="drugno" type="STRING"/>
  563. <Column id="company" type="STRING"/>
  564. <Column id="prcpcd" type="STRING"/>
  565. <Column id="prcpnm" type="STRING"/>
  566. <Column id="totqty" type="STRING"/>
  567. <Column id="getqty" type="STRING"/>
  568. <Column id="shipqty" type="STRING"/>
  569. <Column id="prcpdayno" type="STRING"/>
  570. <Column id="prcpdd" type="STRING"/>
  571. <Column id="dcdd" type="STRING"/>
  572. <Column id="dcyn" type="STRING"/>
  573. <Column id="rem" type="STRING"/>
  574. <Column id="telno" type="STRING"/>
  575. <Column id="addr" type="STRING"/>
  576. <Column id="instcd" type="STRING"/>
  577. <Column id="ioflag" type="STRING"/>
  578. <Column id="orddd" type="STRING"/>
  579. <Column id="prcphistno" type="STRING"/>
  580. <Column id="execprcpno" type="STRING"/>
  581. <Column id="updtflag" type="STRING"/>
  582. </ColumnInfo>
  583. </Dataset>
  584. <Dataset id="ds_send_req_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  585. <ColumnInfo>
  586. <Column id="m" type="STRING"/>
  587. <Column id="trsmflag" type="STRING"/>
  588. <Column id="hngnm" type="STRING"/>
  589. <Column id="pid" type="STRING"/>
  590. <Column id="ioflagname" type="STRING"/>
  591. <Column id="dschdclrtyn" type="STRING"/>
  592. <Column id="prcpno" type="STRING"/>
  593. <Column id="wardnm" type="STRING"/>
  594. <Column id="roomnm" type="STRING"/>
  595. <Column id="drugno" type="STRING"/>
  596. <Column id="company" type="STRING"/>
  597. <Column id="prcpcd" type="STRING"/>
  598. <Column id="prcpnm" type="STRING"/>
  599. <Column id="totqty" type="STRING"/>
  600. <Column id="getqty" type="STRING"/>
  601. <Column id="shipqty" type="STRING"/>
  602. <Column id="prcpdayno" type="STRING"/>
  603. <Column id="prcpdd" type="STRING"/>
  604. <Column id="dcdd" type="STRING"/>
  605. <Column id="dcyn" type="STRING"/>
  606. <Column id="rem" type="STRING"/>
  607. <Column id="telno" type="STRING"/>
  608. <Column id="addr" type="STRING"/>
  609. <Column id="instcd" type="STRING"/>
  610. <Column id="ioflag" type="STRING"/>
  611. <Column id="orddd" type="STRING"/>
  612. <Column id="prcphistno" type="STRING"/>
  613. <Column id="execprcpno" type="STRING"/>
  614. <Column id="updtflag" type="STRING"/>
  615. </ColumnInfo>
  616. </Dataset>
  617. <Dataset id="ds_hidden_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  618. <ColumnInfo>
  619. <Column id="count" type="STRING" size="256"/>
  620. </ColumnInfo>
  621. <Rows>
  622. <Row/>
  623. </Rows>
  624. </Dataset>
  625. </Objects>
  626. <Bind>
  627. <BindItem id="item0" compid="group3.group2.input5" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
  628. <BindItem id="item1" compid="group3.group2.input2" propid="value" datasetid="ds_send" columnid="srchtodd"/>
  629. <BindItem id="item2" compid="group3.group2.combo1" propid="value" datasetid="ds_send" columnid="srchwardcd"/>
  630. <BindItem id="item3" compid="group3.group2.radio7" propid="value" datasetid="ds_send" columnid="srchioflag"/>
  631. <BindItem id="item4" compid="group3.group2.radio8" propid="value" datasetid="ds_send" columnid="srchioflag"/>
  632. <BindItem id="item5" compid="group3.group2.radio9" propid="value" datasetid="ds_send" columnid="srchioflag"/>
  633. <BindItem id="item6" compid="group3.group2.input1" propid="value" datasetid="ds_send" columnid="srchpid"/>
  634. <BindItem id="item8" compid="group3.group2.radio4" propid="value" datasetid="ds_send" columnid="cond1"/>
  635. <BindItem id="item7" compid="group3.group2.radio6" propid="value" datasetid="ds_send" columnid="cond1"/>
  636. <BindItem id="item9" compid="group3.group2.radio5" propid="value" datasetid="ds_send" columnid="cond1"/>
  637. <BindItem id="item10" compid="group3.group2.radio3" propid="value" datasetid="ds_send" columnid="trsmflag"/>
  638. <BindItem id="item11" compid="group3.group2.radio1" propid="value" datasetid="ds_send" columnid="sortflag"/>
  639. <BindItem id="item12" compid="group3.group2.radio2" propid="value" datasetid="ds_send" columnid="srchioflag"/>
  640. </Bind>
  641. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  642. * System Name :
  643. * Job Name :
  644. * Creator :
  645. * Make Date : 2015-11-13
  646. * Description :
  647. *---------------------------------------------------------------------------------------
  648. * Modify Date Modifier Modify Description
  649. *---------------------------------------------------------------------------------------
  650. * 2015-11-13 Live Converter TF->XP
  651. *
  652. *---------------------------------------------------------------------------------------
  653. ****************************************************************************************/
  654. //=======================================================================================
  655. // Lib Include
  656. //---------------------------------------------------------------------------------------
  657. include "com_commonxp::comm_main.xjs"
  658. include "ast_pharmacyxp::SMADT01100.xjs";
  659. include "emr_prcpmngtxp::MMOCommon.xjs";
  660. include "ast_commonxp::AST.xjs";
  661. include "com_basiccodexp::ZBC001.xjs";
  662. //=======================================================================================
  663. // Global Form Variable
  664. //---------------------------------------------------------------------------------------
  665. var arErrorCode = new HashArray();
  666. //=======================================================================================
  667. // Event
  668. //---------------------------------------------------------------------------------------
  669. /****************************************************************************************
  670. * Components :
  671. * Components ID : SMADT10700
  672. * Event : oninit
  673. * Argument : 01.obj : Object Event has occurred
  674. * : 02.e : Event Object
  675. * Description : oninit
  676. ****************************************************************************************/
  677. function SMADT10700_oninit(obj:Form, e:InitEventInfo)
  678. {
  679. frmf_initForm(obj); // 폼 초기화
  680. }
  681. /****************************************************************************************
  682. * Components :
  683. * Components ID : SMADT10700
  684. * Event : onload
  685. * Argument : 01.obj : Object Event has occurred
  686. * : 02.e : Event Object
  687. * Description : onload 이벤트
  688. ****************************************************************************************/
  689. function SMADT10700_onload(obj:Form, e:LoadEventInfo)
  690. {
  691. grdf_setRowTypeIcon(group3.grd_prcp, 0);
  692. var currdd = utlf_getCurrentDate();
  693. var fromdd = ((currdd.toDate()).getAddDate(-1, "D")).getDateFormat("YYYYMMDD");
  694. ds_main_prcplist_prcpinfo.clearData();
  695. ds_send.setColumn(0,"srchfromdd" , fromdd);
  696. ds_send.setColumn(0,"srchtodd" , utlf_getCurrentDate());
  697. // 2009.09.15 pymi
  698. //병동 Combo 조회
  699. ds_send_deptinfo.setColumn(0,"deptflag" , "W");
  700. var oParam = {};
  701. oParam.id = "TRADT10203";
  702. oParam.service = "pharmacyprescriptionapp.DrugPrint";
  703. oParam.method = "reqGetDeptList";
  704. oParam.inds = "req=ds_send_deptinfo";
  705. oParam.outds = "ds_init_deptlist_ward=ward";
  706. oParam.async = false;
  707. oParam.callback = "cf_TRADT10203";
  708. tranf_submit(oParam);
  709. //astfAddCombo("/root/init/deptlist","ward","wardcd,wardnm",",전체");
  710. // if(!utlf_isNull(this.objects["ds_init_deptlist_ward"])){
  711. // frmf_addComboItem( "group3.group2.combo1", "전체", "", "above" );
  712. // }
  713. if (ds_send.getColumn(0,"cond1") == "D" ) {
  714. ds_send.setColumn(0,"srchioflag" , "A");
  715. group3.group2.radio7.enable = true;
  716. }
  717. //group3.grd_prcp.setCellProperty("Head", 1, "text",true); // group3.grd_prcp.fixedcellcheckbox(0,1)=true;
  718. }
  719. function group3_group2_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  720. {
  721. ds_main_prcplist_prcpinfo.clearData();
  722. //ds_main_prcplist_exelinfo.clearData(); // 필요가 없어보여 주석 처리.
  723. var oParam = {};
  724. oParam.id = "TRADT10701";
  725. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  726. oParam.method = "reqGetHDRList";
  727. oParam.inds = "req=ds_send";
  728. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  729. oParam.async = false;
  730. //oParam.callback = "cf_TRADT10701";
  731. tranf_submit(oParam);
  732. }
  733. function group3_group2_radio7_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  734. {
  735. ds_main_prcplist_prcpinfo.clearData();
  736. var oParam = {};
  737. oParam.id = "TRADT10701";
  738. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  739. oParam.method = "reqGetHDRList";
  740. oParam.inds = "req=ds_send";
  741. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  742. oParam.async = false;
  743. //oParam.callback = "cf_TRADT10701";
  744. tranf_submit(oParam);
  745. }
  746. function group3_group2_radio8_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  747. {
  748. ds_main_prcplist_prcpinfo.clearData();
  749. var oParam = {};
  750. oParam.id = "TRADT10701";
  751. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  752. oParam.method = "reqGetHDRList";
  753. oParam.inds = "req=ds_send";
  754. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  755. oParam.async = false;
  756. //oParam.callback = "cf_TRADT10701";
  757. tranf_submit(oParam);
  758. }
  759. function group3_group2_radio9_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  760. {
  761. ds_main_prcplist_prcpinfo.clearData();
  762. var oParam = {};
  763. oParam.id = "TRADT10701";
  764. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  765. oParam.method = "reqGetHDRList";
  766. oParam.inds = "req=ds_send";
  767. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  768. oParam.async = false;
  769. //oParam.callback = "cf_TRADT10701";
  770. tranf_submit(oParam);
  771. }
  772. function group4_btn_excsave_onclick(obj:Button, e:ClickEventInfo)
  773. {
  774. // 20110108 wify 경북대병원 항목수정을 위해 grd_exel, grd_exel1에 데이터 set.
  775. //for (var i =1; i < grd_prcp.rows; i++) {
  776. // 20110906_laboru_복막투석액 자가주사 처방일 때 엑셀 저장 시 실시되게 수정
  777. // if(cond1 == "D") { // 퇴원_외래선처치외. 즉 외래 자가 주사일 때만.
  778. // model.makeValue("/root/send/selflist["+ i + "]/pid", model.getValue("/root/main/prcplist/prcpinfo["+ i + "]/pid"));
  779. // model.makeValue("/root/send/selflist["+ i + "]/prcpno", model.getValue("/root/main/prcplist/prcpinfo["+ i + "]/prcpno"));
  780. // model.makeValue("/root/send/selflist["+ i + "]/prcphistno", model.getValue("/root/main/prcplist/prcpinfo["+ i + "]/prcphistno"));
  781. // model.makeValue("/root/send/selflist["+ i + "]/execprcpno", model.getValue("/root/main/prcplist/prcpinfo["+ i + "]/execprcpno"));
  782. // model.makeValue("/root/send/selflist["+ i + "]/prcpcd", model.getValue("/root/main/prcplist/prcpinfo["+ i + "]/prcpcd"));
  783. // model.makeValue("/root/send/selflist["+ i + "]/prcpdd", model.getValue("/root/main/prcplist/prcpinfo["+ i + "]/prcpdd"));
  784. // }
  785. //
  786. // astfCopyNodeSet("/root/send/prcplist/prcpinfo", "/root/main/prcplist/prcpinfo["+i+"]");
  787. // astfCopyNodeSet("/root/send/prcplist/prcpinfo1", "/root/main/prcplist/prcpinfo["+i+"]");
  788. //}
  789. // 20110108 wify 경북대병원 항목수정을 위해 grd_exel, grd_exel1에 데이터 set.
  790. ds_send_selflist.clearData();
  791. var cond1 = ds_send.getColumn(0,"cond1");
  792. for (var i =0; i < ds_main_prcplist_prcpinfo.rowcount; i++) {
  793. if(cond1 == "D") { // 퇴원_외래선처치외. 즉 외래 자가 주사일 때만.
  794. ds_send_selflist.addRow();
  795. currow = ds_send_selflist.rowposition;
  796. ds_send_selflist.setColumn(currow, "pid", ds_main_prcplist_prcpinfo.getColumn(i,"pid"));
  797. ds_send_selflist.setColumn(currow, "prcpno", ds_main_prcplist_prcpinfo.getColumn(i,"prcpno"));
  798. ds_send_selflist.setColumn(currow, "prcphistno", ds_main_prcplist_prcpinfo.getColumn(i,"prcphistno"));
  799. ds_send_selflist.setColumn(currow, "execprcpno", ds_main_prcplist_prcpinfo.getColumn(i,"execprcpno"));
  800. ds_send_selflist.setColumn(currow, "prcpcd", ds_main_prcplist_prcpinfo.getColumn(i,"prcpcd"));
  801. ds_send_selflist.setColumn(currow, "prcpdd", ds_main_prcplist_prcpinfo.getColumn(i,"prcpdd"));
  802. }
  803. ds_send_prcplist_prcpinfo.addRow();
  804. currow1 = ds_send_prcplist_prcpinfo.rowposition;
  805. //alert(currow1) ;
  806. ds_send_prcplist_prcpinfo.copyRow(currow1,ds_main_prcplist_prcpinfo,i);
  807. ds_send_prcplist_prcpinfo1.addRow();
  808. currow2 = ds_send_prcplist_prcpinfo1.rowposition;
  809. ds_send_prcplist_prcpinfo1.copyRow(currow2,ds_main_prcplist_prcpinfo,i);
  810. }
  811. if(cond1 == "D") {
  812. //submit("TRADT10702");
  813. var oParam = {};
  814. oParam.id = "TRADT10702";
  815. oParam.service = "pharmacydrugsumapp.BeforeCure";
  816. oParam.method = "reqSetExec";
  817. oParam.inds = "req=ds_send_selflist";
  818. oParam.outds = "";
  819. oParam.async = false;
  820. //oParam.callback = "cf_TRADT10702";
  821. tranf_submit(oParam);
  822. }
  823. //model.refresh();
  824. //var file = window.fileDialog("save","","false","","xls","Excel Files(*.xls)|*.xls");
  825. //if (file != ""){
  826. // grd_prcp.saveExcel(file);
  827. // 20110108 wify 경북대병원 엑셀로 저장되는 항목 수정.
  828. if (group3.group2.radio6.value == 'I' || group3.group2.radio5.value == 'P') {
  829. //grd_exel1.saveExcel(file);\
  830. grdf_exportExcel(group3.grd_exel1, "", "sheet1"); //파일 다이얼로그로 저장위치 저장
  831. } else {
  832. // 퇴원+외래선처치외
  833. //grd_exel.saveExcel(file);
  834. grdf_exportExcel(group3.grd_exel, "", "sheet1"); //파일 다이얼로그로 저장위치 저장
  835. }
  836. //}
  837. //model.removeNodeset("/root/send/prcplist/prcpinfo")
  838. //model.removeNodeset("/root/send/prcplist/prcpinfo1")
  839. ds_send_prcplist_prcpinfo.clearData();
  840. ds_send_prcplist_prcpinfo1.clearData();
  841. }
  842. function group3_group2_radio2_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  843. {
  844. ds_main_prcplist_prcpinfo.clearData(); //model.removeNodeset("/root/main/prcplist/prcpinfo");
  845. //submit("TRADT10701");
  846. var oParam = {};
  847. oParam.id = "TRADT10701";
  848. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  849. oParam.method = "reqGetHDRList";
  850. oParam.inds = "req=ds_send";
  851. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  852. oParam.async = false;
  853. //oParam.callback = "cf_TRADT10701";
  854. tranf_submit(oParam);
  855. }
  856. function group3_group2_radio5_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  857. {
  858. //if(model.getValue("/root/send/cond1") == "P") {
  859. // model.setValue("/root/send/srchioflag", "A");
  860. // radio7.disabled = false;
  861. // radio9.disabled = false;
  862. //}
  863. //group2.refresh();
  864. ds_send.setColumn(0,"cond1", "P");
  865. if( ds_send.getColumn(0,"cond1") == "P") {
  866. ds_send.setColumn(0,"srchioflag", "A");
  867. group3.group2.radio7.enable = true;
  868. group3.group2.radio9.enable = true;
  869. }
  870. }
  871. function group3_group2_radio6_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  872. {
  873. ds_send.setColumn(0,"cond1", "I");
  874. if( ds_send.getColumn(0,"cond1") == "I") {
  875. ds_send.setColumn(0,"srchioflag", "I");
  876. group3.group2.radio8.enable = true;
  877. group3.group2.radio7.enable = false;
  878. group3.group2.radio9.enable = false;
  879. } else {
  880. group3.group2.radio7.enable = true;
  881. group3.group2.radio9.enable = true;
  882. }
  883. }
  884. function group3_group2_radio4_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  885. {
  886. ds_send.setColumn(0,"cond1", "D");
  887. ds_send.setColumn(0,"cond1", "D");
  888. ds_send.setColumn(0,"cond1", "D");
  889. if( ds_send.getColumn(0,"cond1") == "D") {
  890. ds_send.setColumn(0,"srchioflag", "A");
  891. group3.group2.radio7.enable = true; //radio7.disabled = false;
  892. group3.group2.radio9.enable = true; //radio9.disabled = false;
  893. }
  894. }
  895. function group3_group2_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  896. {
  897. ds_main_prcplist_prcpinfo.clearData();
  898. var oParam = {};
  899. oParam.id = "TRADT10701";
  900. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  901. oParam.method = "reqGetHDRList";
  902. oParam.inds = "req=ds_send";
  903. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  904. oParam.async = false;
  905. //oParam.callback = "cf_TRADT10701";
  906. tranf_submit(oParam);
  907. }
  908. function group3_group2_radio3_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  909. {
  910. if( ds_send.getColumn(0,"trsmflag") != "A") {
  911. group3.group2.radio5.enable = false;
  912. } else {
  913. group3.group2.radio5.enable = true;
  914. }
  915. ds_main_prcplist_prcpinfo.clearData();
  916. var oParam = {};
  917. oParam.id = "TRADT10701";
  918. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  919. oParam.method = "reqGetHDRList";
  920. oParam.inds = "req=ds_send";
  921. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  922. oParam.async = false;
  923. //oParam.callback = "cf_TRADT10701";
  924. tranf_submit(oParam);
  925. }
  926. function group4_btn_save_onclick(obj:Button, e:ClickEventInfo)
  927. {
  928. //var update = getGridUpdateData(grd_prcp);
  929. //if(update == ""){
  930. // messageBox("업데이트 정보가 없습니다.", "I");
  931. // return 0;
  932. //}
  933. //model.setValue("/root/send/req/list", grd_prcp.getUpdateData());
  934. //submit("TXADT10701");
  935. //model.removeNodeset("/root/main/prcplist/prcpinfo");
  936. //model.refresh();
  937. //submit("TRADT10701");
  938. var oDsUpdate = grdf_getGridUpdateData(group3.grd_prcp, "all");
  939. grdf_setStatusColumn(oDsUpdate, "m");
  940. if(oDsUpdate.rowcount == 0){
  941. sysf_messageBox("업데이트 정보가 없습니다.", "I");
  942. return 0;
  943. }
  944. ds_send_req_list.clear();
  945. ds_send_req_list.copyData(oDsUpdate, true);
  946. var oParam = {};
  947. oParam.id = "TXADT10701";
  948. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  949. oParam.method = "reqExeHDRList";
  950. oParam.inds = "req=ds_send_req_list";
  951. oParam.outds = "ds_hidden_item=item";
  952. oParam.async = false;
  953. // oParam.callback = "cf_TXADT10701";
  954. tranf_submit(oParam);
  955. ds_main_prcplist_prcpinfo.clear();
  956. var oParam = {};
  957. oParam.id = "TRADT10701";
  958. oParam.service = "pharmacyprescriptionapp.BeforeCure";
  959. oParam.method = "reqGetHDRList";
  960. oParam.inds = "req=ds_send";
  961. oParam.outds = "ds_main_prcplist_prcpinfo=prcpinfo";
  962. oParam.async = false;
  963. //oParam.callback = "cf_TRADT10701";
  964. tranf_submit(oParam);
  965. }
  966. function group3_group2_input1_onkeydown(obj:Edit, e:KeyEventInfo)
  967. {
  968. //if(event.keyCode == 13) {
  969. // btn_sea.dispatch("DOMActivate");
  970. //}
  971. if(e.keycode == 13) {
  972. var ev = new ClickEventInfo;
  973. frmf_inputEnterKey("group3.group2.btn_search", "onclick", ev );
  974. }
  975. }
  976. function group4_button1_onclick(obj:Button, e:ClickEventInfo)
  977. {
  978. //exeReportPreview("RPADT10701", "XMLSTR", "", "", "false","","","","","false");
  979. var objDOM = rptf_createDOM(); // DOM 객체 설정
  980. rptf_setNodeListToDOM(objDOM, "/root/main/prcplist/prcpinfo" , ds_main_prcplist_prcpinfo); // 데이터셋 1
  981. rptf_setNodeListToDOM(objDOM, "/root/send" , ds_send); // 데이터셋 2
  982. var objParam = new Object();
  983. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  984. var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
  985. rptf_exeReportPreview30(["RPADT10701"],[objParam], option);
  986. }
  987. function isReadonly_trsmflag(currow){
  988. var result = false;
  989. if(ds_send.getColumn(0, "cond1") == "P"){
  990. result = true;
  991. }
  992. return result;
  993. }
  994. function cf_TRADT10203(sSvcId, nErrorCode, sErrorMsg) {
  995. if(nErrorCode < 0) return;
  996. if(!utlf_isNull(this.objects["ds_init_deptlist_ward"])){
  997. frmf_addComboItem( "group3.group2.combo1", "전체", "", "above" );
  998. group3.group2.combo1.index = 0;
  999. }
  1000. }
  1001. function group3_grd_prcp_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo)
  1002. {
  1003. obj.updateToDataset();
  1004. var getqty = group3.grd_prcp.getBindCellIndex("body", "getqty");
  1005. if ( e.cell == getqty){ //if ( grd_prcp.col== grd_prcp.colRef("getqty")) {
  1006. if ((parseFloat(ds_main_prcplist_prcpinfo.getColumn(ds_main_prcplist_prcpinfo.rowposition,"totqty")) < parseFloat(ds_main_prcplist_prcpinfo.getColumn(ds_main_prcplist_prcpinfo.rowposition,"getqty"))) || (parseFloat(ds_main_prcplist_prcpinfo.getColumn(ds_main_prcplist_prcpinfo.rowposition,"getqty")) < 0) ) {
  1007. sysf_messageBox("수령량을 확인하십시요.","I999");
  1008. ds_main_prcplist_prcpinfo.setColumn(ds_main_prcplist_prcpinfo.rowposition,"getqty", ds_main_prcplist_prcpinfo.getColumn(ds_main_prcplist_prcpinfo.rowposition,"totqty"));
  1009. return;
  1010. }
  1011. ds_main_prcplist_prcpinfo.setColumn(ds_main_prcplist_prcpinfo.rowposition,"shipqty", parseFloat(ds_main_prcplist_prcpinfo.getColumn(ds_main_prcplist_prcpinfo.rowposition,"totqty")) - parseFloat(ds_main_prcplist_prcpinfo.getColumn(ds_main_prcplist_prcpinfo.rowposition,"getqty")) );
  1012. }
  1013. }
  1014. ]]></Script>
  1015. </Form>
  1016. </FDL>