SMADB01100_TPN처방.xfdl 60 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADB01100" position="absolute 0 0 1214 805" titletext="TPN처방" onload="SMADB01100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 0 1194 25" id="group1">
  8. <Layouts>
  9. <Layout>
  10. <Static text="TPN처방" position="absolute 0 0 185 25" id="caption19" class="tit_1"/>
  11. </Layout>
  12. </Layouts>
  13. </Div>
  14. <Div position="absolute 0 13 1195 755" id="group3" scrollbars="none">
  15. <Layouts>
  16. <Layout>
  17. <Static position="absolute 5 15 250 55" align="align:center middle;" id="caption25" class="cell_1" style="border:1 none #9ebed4ff ;"/>
  18. <Shape position="absolute 255 24 1100 30" linetype="vertical" id="line8" class="line_2"/>
  19. <Calendar position="absolute 1061 44 1161 63" id="input8" class="input_essential" visible="false" onchanged="group3_input8_onchanged"/>
  20. <Static text="처방적용일자" position="absolute 941 43 1056 66" align="align:center middle;" id="caption126" class="cell_1" visible="false"/>
  21. <Div position="absolute 255 67 1185 640" id="iviewer1" url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl" asyncmode="false" scrollbars="none" style="border:1 solid #808080ff ;"/>
  22. <Static text="검사처방" position="absolute 5 636 149 657" id="caption1" class="tit_2" visible="false"/>
  23. <Static text="전처방" position="absolute 830 17 880 40" align="align:center middle;" id="caption11" class="cell_1"/>
  24. <Static text="자문의뢰" position="absolute 786 42 851 65" align="align:center middle;" id="caption12" class="cell_1" visible="false"/>
  25. <Static text="수량" position="absolute 551 42 616 65" align="align:center middle;" id="caption3" class="cell_1" visible="true"/>
  26. <Static text="자문의뢰" position="absolute 565 -320 605 -297" align="align:center middle;" id="caption13" class="cell_1"/>
  27. <Static text="횟수" position="absolute 671 41 736 64" align="align:center middle;" id="caption4" class="cell_1" visible="true"/>
  28. <Shape position="absolute 0 737 1190 743" linetype="horizontal" id="line1" class="line_3"/>
  29. <Static text="경로" position="absolute 254 42 314 65" align="align:center middle;" id="caption5" class="cell_1"/>
  30. <Radio position="absolute 5 19 240 45" id="radio1" columncount="2" rowcount="2" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_radio1_onitemchanged">
  31. <Dataset id="innerdataset">
  32. <ColumnInfo>
  33. <Column id="codecolumn"/>
  34. <Column id="datacolumn"/>
  35. </ColumnInfo>
  36. <Rows>
  37. <Row>
  38. <Col id="codecolumn">S</Col>
  39. <Col id="datacolumn">소아TPN</Col>
  40. </Row>
  41. <Row>
  42. <Col id="codecolumn">A</Col>
  43. <Col id="datacolumn">성인TPN</Col>
  44. </Row>
  45. </Rows>
  46. </Dataset>
  47. </Radio>
  48. <Radio position="absolute 321 45 543 63" id="radio2" class="input_essential" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" value="1" index="0">
  49. <Dataset id="innerdataset">
  50. <ColumnInfo>
  51. <Column id="codecolumn"/>
  52. <Column id="datacolumn"/>
  53. </ColumnInfo>
  54. <Rows>
  55. <Row>
  56. <Col id="codecolumn">1</Col>
  57. <Col id="datacolumn">Central</Col>
  58. </Row>
  59. <Row>
  60. <Col id="codecolumn">2</Col>
  61. <Col id="datacolumn">Peripheral</Col>
  62. </Row>
  63. </Rows>
  64. </Dataset>
  65. </Radio>
  66. <Edit position="absolute 741 43 781 62" align="align:right middle;" id="input1" class="input_default" visible="true"/>
  67. <Shape position="absolute 5 652 1185 658" id="line2" class="line_10"/>
  68. <Shape position="absolute 0 10 1190 16" linetype="horizontal" id="line4" class="line_1" style="strokepen:2 solid #33bbbbff;"/>
  69. <Edit position="absolute 621 43 666 62" align="align:right middle;" id="input3" class="input_default" visible="true"/>
  70. <Radio position="absolute 856 47 941 62" id="radio7" visible="false" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_radio7_onitemchanged">
  71. <Dataset id="innerdataset">
  72. <ColumnInfo>
  73. <Column id="codecolumn"/>
  74. <Column id="datacolumn"/>
  75. </ColumnInfo>
  76. <Rows>
  77. <Row>
  78. <Col id="codecolumn">Y</Col>
  79. <Col id="datacolumn">Yes</Col>
  80. </Row>
  81. <Row>
  82. <Col id="codecolumn">N</Col>
  83. <Col id="datacolumn">No</Col>
  84. </Row>
  85. </Rows>
  86. </Dataset>
  87. </Radio>
  88. <Shape position="absolute 255 66 1100 72" linetype="horizontal" id="line7" class="line_2"/>
  89. <Combo position="absolute 885 18 1185 37" id="cmb_preorder" class="combo_default" innerdataset="ds_init_cmb_preorder" datacolumn="prenm" codecolumn="precd" onitemchanged="group3_cmb_preorder_onitemchanged"/>
  90. <Grid position="absolute 640 656 1185 740" id="grd_prcplist" binddataset="ds_main_prcplist" ontextchange="group3_grd_prcplist_ontextchange" ontextchanged="group3_grd_prcplist_ontextchanged" oncelldblclick="group3_grd_prcplist_oncelldblclick" oncellclick="group3_grd_prcplist_oncellclick">
  91. <Formats>
  92. <Format id="default">
  93. <Columns>
  94. <Column size="21"/>
  95. <Column size="260"/>
  96. <Column size="45"/>
  97. <Column size="24"/>
  98. <Column size="43"/>
  99. <Column size="24"/>
  100. <Column size="39"/>
  101. <Column size="40"/>
  102. <Column size="316"/>
  103. <Column size="316"/>
  104. <Column size="0"/>
  105. <Column size="0"/>
  106. <Column size="0"/>
  107. <Column size="0"/>
  108. <Column size="0"/>
  109. <Column size="0"/>
  110. </Columns>
  111. <Rows>
  112. <Row size="24" band="head"/>
  113. <Row size="24"/>
  114. </Rows>
  115. <Band id="head">
  116. <Cell/>
  117. <Cell col="1" text="TPN"/>
  118. <Cell col="2" colspan="2" text="총용량" taborder="undefined"/>
  119. <Cell col="4" colspan="2" text="수량" taborder="undefined"/>
  120. <Cell col="6" text="횟수"/>
  121. <Cell col="7" text="일수"/>
  122. <Cell col="8" text="용법/검체"/>
  123. <Cell col="9" text="추가사유"/>
  124. <Cell col="10"/>
  125. <Cell col="11"/>
  126. <Cell col="12"/>
  127. <Cell col="13"/>
  128. <Cell col="14"/>
  129. <Cell col="15"/>
  130. </Band>
  131. <Band id="body">
  132. <Cell displaytype="checkbox" edittype="checkbox" text="bind:status"/>
  133. <Cell col="1" style="align:left;" text="bind:prcpnm"/>
  134. <Cell col="2" displaytype="number" edittype="masknumber" text="bind:prcpvol" mask="9.9"/>
  135. <Cell col="3" edittype="none" text="bind:prcpvolunitnm"/>
  136. <Cell col="4" displaytype="number" edittype="masknumber" text="bind:prcpqty" mask="9.9"/>
  137. <Cell col="5" text="bind:prcpqtyunitnm" wordwrap="char"/>
  138. <Cell col="6" displaytype="number" edittype="masknumber" text="bind:prcptims" mask="9"/>
  139. <Cell col="7" displaytype="number" edittype="masknumber" text="bind:prcpdayno" mask="9"/>
  140. <Cell col="8" displaytype="text" edittype="none" text="bind:drugmthdspccdnm"/>
  141. <Cell col="9" displaytype="text" edittype="text" text="bind:rem"/>
  142. <Cell col="10" text="bind:drugmthdspccd"/>
  143. <Cell col="11" text="bind:prcpvolunitflag"/>
  144. <Cell col="12" text="bind:prcpqtyunitflag"/>
  145. <Cell col="13" text="bind:prcpvolunitnm"/>
  146. <Cell col="14" text="bind:prcpqtyunitnm"/>
  147. <Cell col="15" text="bind:prcpcd"/>
  148. </Band>
  149. </Format>
  150. </Formats>
  151. </Grid>
  152. <Grid position="absolute 5 355 250 635" id="grd_make" binddataset="ds_grd_make" oncellclick="group3_grd_make_oncellclick">
  153. <Formats>
  154. <Format id="default">
  155. <Columns>
  156. <Column size="40"/>
  157. <Column size="78"/>
  158. <Column size="100"/>
  159. </Columns>
  160. <Rows>
  161. <Row size="24" band="head"/>
  162. <Row size="24"/>
  163. </Rows>
  164. <Band id="head">
  165. <Cell colspan="3" text="TPN원내조제" taborder="undefined"/>
  166. </Band>
  167. <Band id="body">
  168. <Cell displaytype="combo" edittype="none" text="bind:tpnflag" combodataset="ds_init_tpnflag" combocodecol="value" combodatacol="label"/>
  169. <Cell col="1" text="bind:drugcd"/>
  170. <Cell col="2" text="bind:ordnm"/>
  171. </Band>
  172. </Format>
  173. </Formats>
  174. </Grid>
  175. <Grid position="absolute 5 60 250 350" id="grd_sell" binddataset="ds_grd_sell" oncellclick="group3_grd_sell_oncellclick">
  176. <Formats>
  177. <Format id="default">
  178. <Columns>
  179. <Column size="38"/>
  180. <Column size="79"/>
  181. <Column size="100"/>
  182. </Columns>
  183. <Rows>
  184. <Row size="24" band="head"/>
  185. <Row size="24"/>
  186. </Rows>
  187. <Band id="head">
  188. <Cell colspan="3" text="TPN시판품" taborder="undefined"/>
  189. </Band>
  190. <Band id="body">
  191. <Cell displaytype="combo" edittype="none" text="bind:tpnflag" combodataset="ds_init_tpnflag" combocodecol="value" combodatacol="label"/>
  192. <Cell col="1" text="bind:drugcd"/>
  193. <Cell col="2" text="bind:ordnm"/>
  194. </Band>
  195. </Format>
  196. </Formats>
  197. </Grid>
  198. <Edit readonly="true" position="absolute 450 18 547 37" id="opt_hngnm"/>
  199. <Static text="나이/성별" position="absolute 550 17 615 40" align="align:center middle;" id="caption6" class="cell_1"/>
  200. <Edit readonly="true" position="absolute 319 18 398 37" id="opt_pid"/>
  201. <Static text="환자명" position="absolute 400 17 447 40" align="align:center middle;" id="caption15" class="cell_1"/>
  202. <Edit readonly="true" position="absolute 620 18 697 37" id="opt_age"/>
  203. <Static text="등록번호" position="absolute 254 17 314 40" align="align:center middle;" id="caption9" class="cell_1"/>
  204. <Static text="병실" position="absolute 700 17 740 40" align="align:center middle;" id="caption7" class="cell_1"/>
  205. <Edit readonly="true" position="absolute 745 18 822 37" id="output1"/>
  206. </Layout>
  207. </Layouts>
  208. </Div>
  209. <Div position="absolute 0 757 1195 784" id="group4" scrollbars="autoboth">
  210. <Layouts>
  211. <Layout>
  212. <Button position="absolute 205 5 321 27" id="button19" class="btn3" visible="false" text="열량요구량계산" onclick="group4_button19_onclick"/>
  213. <Button position="absolute 900 5 956 27" id="btn_save" class="btn4" enable="false" visible="false" text="저장" onclick="group4_btn_save_onclick"/>
  214. <Button position="absolute 1125 5 1185 27" id="btn_cle" class="btn4" text="닫기" onclick="group4_btn_cle_onclick"/>
  215. <Button position="absolute 1009 5 1065 27" id="btn_calc" class="btn4" text="계산" onclick="group4_btn_calc_onclick"/>
  216. <Button position="absolute 1067 5 1123 27" id="btn_con" class="btn4" text="확인" onclick="group4_btn_con_onclick"/>
  217. <Button position="absolute 5 5 61 27" id="button1" class="btn6" enable="true" visible="true" text="출력" onclick="group4_button1_onclick"/>
  218. <Button position="absolute 65 5 152 27" id="button2" class="btn3" visible="true" text="이력조회" onclick="group4_button2_onclick"/>
  219. </Layout>
  220. </Layouts>
  221. </Div>
  222. </Layout>
  223. </Layouts>
  224. <Objects>
  225. <Dataset id="ds_init_cmb_preorder" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  226. <ColumnInfo>
  227. <Column id="prenm" type="STRING"/>
  228. <Column id="precd" type="STRING"/>
  229. </ColumnInfo>
  230. </Dataset>
  231. <Dataset id="ds_grd_diaglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  232. <ColumnInfo>
  233. <Column id="status" type="STRING"/>
  234. <Column id="diagkindcd" type="STRING"/>
  235. <Column id="diagkindcdflag" type="STRING"/>
  236. <Column id="icd10cd" type="STRING"/>
  237. <Column id="diagengnm" type="STRING"/>
  238. <Column id="diagremfact" type="STRING"/>
  239. <Column id="spclinfo" type="STRING"/>
  240. </ColumnInfo>
  241. </Dataset>
  242. <Dataset id="ds_grd_make" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  243. <ColumnInfo>
  244. <Column id="tpnflag" type="STRING"/>
  245. <Column id="drugcd" type="STRING"/>
  246. <Column id="ordnm" type="STRING"/>
  247. </ColumnInfo>
  248. </Dataset>
  249. <Dataset id="ds_grd_sell" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  250. <ColumnInfo>
  251. <Column id="tpnflag" type="STRING"/>
  252. <Column id="drugcd" type="STRING"/>
  253. <Column id="ordnm" type="STRING"/>
  254. </ColumnInfo>
  255. </Dataset>
  256. <Dataset id="ds_init_tpnflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  257. <ColumnInfo>
  258. <Column id="label" type="STRING" size="256"/>
  259. <Column id="value" type="STRING" size="256"/>
  260. </ColumnInfo>
  261. <Rows>
  262. <Row>
  263. <Col id="label">TPN</Col>
  264. <Col id="value">A</Col>
  265. </Row>
  266. <Row>
  267. <Col id="label">TNA</Col>
  268. <Col id="value">T</Col>
  269. </Row>
  270. <Row>
  271. <Col id="label">아미노산 수액</Col>
  272. <Col id="value">M</Col>
  273. </Row>
  274. </Rows>
  275. </Dataset>
  276. <Dataset id="ds_tpn_ordinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  277. <ColumnInfo>
  278. <Column id="cnstreqyn" type="STRING" size="256"/>
  279. <Column id="prcpqty" type="STRING" size="256"/>
  280. <Column id="prcptims" type="STRING" size="256"/>
  281. <Column id="drugpath" type="STRING" size="256"/>
  282. <Column id="testordspec" type="STRING" size="256"/>
  283. <Column id="tpnseqno" type="STRING" size="256"/>
  284. <Column id="prcpcd" type="STRING" size="256"/>
  285. <Column id="pid" type="STRING" size="256"/>
  286. <Column id="prcpdd" type="STRING" size="256"/>
  287. <Column id="orddeptcd" type="STRING" size="256"/>
  288. <Column id="orddrid" type="STRING" size="256"/>
  289. </ColumnInfo>
  290. <Rows>
  291. <Row>
  292. <Col id="cnstreqyn"/>
  293. <Col id="prcpqty">1</Col>
  294. <Col id="prcptims">1</Col>
  295. <Col id="drugpath"/>
  296. <Col id="testordspec"/>
  297. <Col id="tpnseqno"/>
  298. <Col id="prcpcd"/>
  299. <Col id="pid"/>
  300. <Col id="prcpdd"/>
  301. <Col id="orddeptcd"/>
  302. <Col id="orddrid"/>
  303. </Row>
  304. </Rows>
  305. </Dataset>
  306. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  307. <Dataset id="ds_temp_patdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  308. <ColumnInfo>
  309. <Column id="pid" type="STRING" size="256"/>
  310. <Column id="orddd" type="STRING" size="256"/>
  311. <Column id="prcpdd" type="STRING" size="256"/>
  312. <Column id="orddeptcd" type="STRING" size="256"/>
  313. <Column id="orddrid" type="STRING" size="256"/>
  314. <Column id="ioflag" type="STRING" size="256"/>
  315. <Column id="tpnseqno" type="STRING" size="256"/>
  316. </ColumnInfo>
  317. <Rows>
  318. <Row>
  319. <Col id="pid"/>
  320. <Col id="orddd"/>
  321. <Col id="prcpdd"/>
  322. <Col id="orddeptcd"/>
  323. <Col id="orddrid"/>
  324. <Col id="ioflag"/>
  325. <Col id="tpnseqno"/>
  326. </Row>
  327. </Rows>
  328. </Dataset>
  329. <Dataset id="ds_preorderinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  330. <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  331. <Dataset id="ds_tmp_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  332. <Dataset id="ds_TRMMO00151" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  333. <ColumnInfo>
  334. <Column id="instcd" type="STRING" size="256"/>
  335. <Column id="hardcdno" type="STRING" size="256"/>
  336. <Column id="prcpdd" type="STRING" size="256"/>
  337. </ColumnInfo>
  338. <Rows>
  339. <Row/>
  340. </Rows>
  341. </Dataset>
  342. <Dataset id="ds_main_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_main_prcplist_oncolumnchanged">
  343. <ColumnInfo>
  344. <Column id="status" type="STRING" size="256" sumtext="입력,수정,삭제,d/c"/>
  345. <Column id="prcpstatcd" type="STRING" size="256" sumtext="처방상태코드"/>
  346. <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
  347. <Column id="prcpkindcd" type="STRING" size="256" sumtext="처방종류코드"/>
  348. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  349. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  350. <Column id="prcpvol" type="BIGDECIMAL" size="256" sumtext="처방용량"/>
  351. <Column id="prcpvolunitnm" type="STRING" size="256" sumtext="처방용량단위명"/>
  352. <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
  353. <Column id="prcpqtyunitnm" type="STRING" size="256" sumtext="처방수량단위명"/>
  354. <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
  355. <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
  356. <Column id="drugmthdspccdnm" type="STRING" size="256" sumtext="투여방법검체코드명"/>
  357. <Column id="prcpmixno" type="STRING" size="256" sumtext="처방Mix번호"/>
  358. <Column id="payflagcd" type="STRING" size="256" sumtext="급여구분코드"/>
  359. <Column id="prcpdelivefact" type="STRING" size="256" sumtext="전달사항"/>
  360. <Column id="hosinhosoutflag" type="STRING" size="256" sumtext="원내/원외구분"/>
  361. <Column id="prcpexecdeptcd" type="STRING" size="256" sumtext="처방실시부서코드"/>
  362. <Column id="prcphopedd" type="STRING" size="256" sumtext="처방희망일시"/>
  363. <Column id="choiordflag" type="STRING" size="256" sumtext="선택진료구분"/>
  364. <Column id="rgstdt" type="STRING" size="256" sumtext="등록일시"/>
  365. <Column id="rgstridnm" type="STRING" size="256" sumtext="등록자명"/>
  366. <Column id="testrsltunit" type="STRING" size="256" sumtext="검사결과단위"/>
  367. <Column id="testrsltcnts" type="STRING" size="256" sumtext="검사결과"/>
  368. <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
  369. <Column id="prcphistcd" type="STRING" size="256" sumtext="처방이력코드"/>
  370. <Column id="tempprcpflag" type="STRING" size="256" sumtext="임시처방구분"/>
  371. <Column id="prcpsetcd" type="STRING" size="256" sumtext="처방SET코드"/>
  372. <Column id="prcpvolunitflag" type="STRING" size="256" sumtext="처방용량단위구분"/>
  373. <Column id="prcpqtyunitflag" type="STRING" size="256" sumtext="처방수량단위구분"/>
  374. <Column id="orgprcpqty" type="STRING" size="256" sumtext="실제처방수량"/>
  375. <Column id="drugspd" type="STRING" size="256" sumtext="투여속도"/>
  376. <Column id="drugspdunitflag" type="STRING" size="256" sumtext="투여속도단위구분"/>
  377. <Column id="powdflag" type="STRING" size="256" sumtext="파우더구분"/>
  378. <Column id="prnprcpflag" type="STRING" size="256" sumtext="PRN처방구분"/>
  379. <Column id="prepprcpflag" type="STRING" size="256" sumtext="Prep처방구분"/>
  380. <Column id="selfprcpflag" type="STRING" size="256" sumtext="자가처방구분"/>
  381. <Column id="selfdrugflag" type="STRING" size="256" sumtext="SELF약구분"/>
  382. <Column id="drugpackflag" type="STRING" size="256" sumtext="투약포장구분"/>
  383. <Column id="erprcpflag" type="STRING" size="256" sumtext="응급처방구분"/>
  384. <Column id="precureprcpflag" type="STRING" size="256" sumtext="선처치처방구분"/>
  385. <Column id="nigtprcpflag" type="STRING" size="256" sumtext="야간처방구분"/>
  386. <Column id="portprcpflag" type="STRING" size="256" sumtext="포터블처방구분"/>
  387. <Column id="fixprcpflag" type="STRING" size="256" sumtext="정액처방구분"/>
  388. <Column id="anamneflag" type="STRING" size="256" sumtext="기왕증(력)구분"/>
  389. <Column id="fastprcpflag" type="STRING" size="256" sumtext="금식처방구분"/>
  390. <Column id="erreadflag" type="STRING" size="256" sumtext="응급판독구분"/>
  391. <Column id="prcpdirecflag" type="STRING" size="256" sumtext="처방방향구분"/>
  392. <Column id="tnsuseflag" type="STRING" size="256" sumtext="수혈사용구분"/>
  393. <Column id="tnsfiltflag" type="STRING" size="256" sumtext="수혈필터구분"/>
  394. <Column id="trnptbftestflag" type="STRING" size="256" sumtext="이식전검사구분"/>
  395. <Column id="offictourhealexamflag" type="STRING" size="256" sumtext="출장건진구분"/>
  396. <Column id="stemcellflag" type="STRING" size="256" sumtext="조혈모(줄기)세포구분"/>
  397. <Column id="angioflagcd" type="STRING" size="256" sumtext="Angio구분"/>
  398. <Column id="opansflagcd" type="STRING" size="256" sumtext="수술마취구분"/>
  399. <Column id="ansttm" type="STRING" size="256" sumtext="마취시간"/>
  400. <Column id="mealcalrcnts" type="STRING" size="256" sumtext="식이열량함량"/>
  401. <Column id="mealprotcnts" type="STRING" size="256" sumtext="식이단백질함량"/>
  402. <Column id="mealupdtflag" type="STRING" size="256" sumtext="식이수정구분"/>
  403. <Column id="hosinprcpresncd" type="STRING" size="256" sumtext="원내처방사유코드"/>
  404. <Column id="etcprcpresncd" type="STRING" size="256" sumtext="기타처방사유코드"/>
  405. <Column id="drugmthdspccd" type="STRING" size="256" sumtext="투여방법검체코드"/>
  406. <Column id="issdeptcd" type="STRING" size="256" sumtext="발행부서코드"/>
  407. <Column id="prcpauthflag" type="STRING" size="256" sumtext="처방권한구분"/>
  408. <Column id="prcpinptflag" type="STRING" size="256" sumtext="처방입력구분"/>
  409. <Column id="prcpsignflag" type="STRING" size="256" sumtext="처방서명구분"/>
  410. <Column id="rateprcpflag" type="STRING" size="256" sumtext="비율처방구분"/>
  411. <Column id="prcprefseq" type="STRING" size="256" sumtext="처방조회순서"/>
  412. <Column id="ordreqlnkno" type="STRING" size="256" sumtext="진료의뢰연결번호"/>
  413. <Column id="testreqlnkno" type="STRING" size="256" sumtext="검사의뢰연결번호"/>
  414. <Column id="prcplnkdd" type="STRING" size="256" sumtext="처방연계일자"/>
  415. <Column id="prcplnkno" type="STRING" size="256" sumtext="처방연계번호"/>
  416. <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
  417. <Column id="tootfact" type="STRING" size="256" sumtext="치식사항"/>
  418. <Column id="clinccmtcnts" type="STRING" size="256" sumtext="임상소견내용"/>
  419. <Column id="prcpessninptflag" type="STRING" size="256" sumtext="처방필수입력구분"/>
  420. <Column id="grupsnglflag" type="STRING" size="256" sumtext="그룹싱글구분"/>
  421. <Column id="drugrateqty" type="STRING" size="256" sumtext="투약비율수랑"/>
  422. <Column id="asttestflag" type="STRING" size="256" sumtext="AST검사구분"/>
  423. <Column id="clincstdyflag" type="STRING" size="256" sumtext="임상연구구분"/>
  424. <Column id="prtlno" type="STRING" size="256" sumtext="프로토콜번호"/>
  425. <Column id="clincstdycd" type="STRING" size="256" sumtext="임상연구코드"/>
  426. <Column id="optermcd" type="STRING" size="256" sumtext="수술용어"/>
  427. <Column id="prcpflag" type="STRING" size="256" sumtext="처방구분"/>
  428. <Column id="hscttempprcpflag" type="STRING" size="256" sumtext="HSCT임시처방구분"/>
  429. <Column id="inclprcpcd" type="STRING" size="256" sumtext="종속처방코드"/>
  430. <Column id="inclprcpno" type="STRING" size="256" sumtext="종속처방번호"/>
  431. <Column id="pampkspec" type="STRING" size="256" sumtext="원무PK내역"/>
  432. <Column id="prcppkspec" type="STRING" size="256" sumtext="처방PK내역"/>
  433. <Column id="calcscormastspec" type="STRING" size="256" sumtext="수가마스터내역"/>
  434. <Column id="drugmastspec" type="STRING" size="256" sumtext="약품마스터내역"/>
  435. <Column id="rateprcpspec" type="STRING" size="256" sumtext="비율처방내역"/>
  436. <Column id="matrsetprcpspec" type="STRING" size="256" sumtext="재료SET처방내역"/>
  437. <Column id="suppdeptspec" type="STRING" size="256" sumtext="지원부서내역"/>
  438. <Column id="contprcpspec" type="STRING" size="256" sumtext="연속처방내역"/>
  439. <Column id="etclnkspec" type="STRING" size="256" sumtext="기타연계내역"/>
  440. <Column id="srchcondcnts" type="STRING" size="256" sumtext="검색조건내용"/>
  441. <Column id="orgprcpnm" type="STRING" size="256" sumtext="수가처방명"/>
  442. <Column id="chkcol" type="STRING" size="256" sumtext="전처방check표시"/>
  443. <Column id="hsctdelivepos" type="STRING" size="256" sumtext="hsct전달위치"/>
  444. <Column id="hsctlnkno" type="STRING" size="256" sumtext="hsct연계번호"/>
  445. <Column id="etcprcpflag" type="STRING" size="256" sumtext="기타처방구분"/>
  446. <Column id="aftcertflag" type="STRING" size="256" sumtext="후인증 구분"/>
  447. <Column id="aftcertdrid" type="STRING" size="256" sumtext="후인증 대상의사 ID"/>
  448. <Column id="prcpvalidd" type="STRING" size="256" sumtext="처방유효일자"/>
  449. <Column id="spynpy1" type="STRING" size="256" sumtext="환자급비유형"/>
  450. <Column id="specdrid" type="STRING" size="256" sumtext="선택진료의ID"/>
  451. <Column id="specdrnm" type="STRING" size="256"/>
  452. <Column id="anticncrprtlno" type="STRING" size="256" sumtext="항암프로토콜에 대한 코드로 일련번호 형태로 관리"/>
  453. <Column id="anticncrdayno" type="STRING" size="256" sumtext="항암프로토콜의 실시 차수"/>
  454. <Column id="druglnkno" type="STRING" size="256" sumtext="항암프로토콜,TPN처방의 처방번호"/>
  455. <Column id="rehbprcpcurefreqflag" type="STRING" size="256" sumtext="재활처방치료빈도"/>
  456. <Column id="dietprcpgenrflag" type="STRING" size="256" sumtext="식이처방발생구분"/>
  457. <Column id="irpayflag" type="STRING" size="256" sumtext="Irradiation급비구분"/>
  458. <Column id="irflag" type="STRING" size="256" sumtext="Irradiation구분"/>
  459. <Column id="procerdietflag" type="STRING" size="256" sumtext="보호자식이구분"/>
  460. <Column id="diagtestconttestintvlflag" type="STRING" size="256" sumtext="진단검사연속검사기본시간"/>
  461. <Column id="drugindependpackflag" type="STRING" size="256" sumtext="따로포장구분"/>
  462. <Column id="diagtestconttestbasetm" type="STRING" size="256" sumtext="진단검사연속검사기본시간"/>
  463. <Column id="diagtestconttestorgtims" type="STRING" size="256" sumtext="진단검사연속검사원횟수"/>
  464. <Column id="ermediscmngtresncd" type="STRING" size="256" sumtext="응급의학관리료사유코드"/>
  465. <Column id="rehbprcpenddd" type="STRING" size="256" sumtext="재활처방마감일자"/>
  466. <Column id="matrallsizespecid" type="STRING" size="256" sumtext="재료AllSize규격ID"/>
  467. <Column id="rehbprcpcurepartcd" type="STRING" size="256" sumtext="재활처방치료부위"/>
  468. <Column id="lowdrugresncd" type="STRING" size="256" sumtext="저함량배수사유코드"/>
  469. <Column id="tfdtlcd" type="STRING" size="256" sumtext="경장영양식세부코드"/>
  470. <Column id="dnorreqlnkno" type="STRING" size="256" sumtext="HLA검사의뢰지"/>
  471. <Column id="subcretno" type="STRING" size="256" sumtext="기왕증,임상연구보조유형"/>
  472. <Column id="exptmthdfact" type="STRING" size="256" sumtext="예외용법설명"/>
  473. <Column id="lowdrugresnetcfact" type="STRING" size="256" sumtext="기타저함량배수 상세사유"/>
  474. <Column id="diagtestconttestcdspec" type="STRING" size="256" sumtext="진단검사 연속검사코드내역"/>
  475. <Column id="drgacptflag" type="STRING" size="256" sumtext="DRG인정 Flag"/>
  476. <Column id="drprcpetc1" type="STRING" size="256" sumtext="의사처방기타1"/>
  477. <Column id="drprcpetc2" type="STRING" size="256" sumtext="의사처방기타2"/>
  478. <Column id="drprcpetc3" type="STRING" size="256" sumtext="의사처방기타3"/>
  479. <Column id="drprcpetc4" type="STRING" size="256" sumtext="의사처방기타4"/>
  480. <Column id="drprcpetc5" type="STRING" size="256" sumtext="의사처방기타5"/>
  481. <Column id="drprcpetc6" type="STRING" size="256" sumtext="의사처방기타6"/>
  482. <Column id="drprcpetc7" type="STRING" size="256" sumtext="의사처방기타7"/>
  483. <Column id="drprcpetc8" type="STRING" size="256" sumtext="의사처방기타8"/>
  484. <Column id="drprcpetc9" type="STRING" size="256" sumtext="의사처방기타9"/>
  485. <Column id="drprcpetc10" type="STRING" size="256" sumtext="의사처방기타10"/>
  486. <Column id="tempcol1" type="STRING" size="256" sumtext="임시컬럼1"/>
  487. <Column id="tempcol2" type="STRING" size="256" sumtext="임시컬럼2"/>
  488. <Column id="tempcol3" type="STRING" size="256" sumtext="임시컬럼3"/>
  489. <Column id="tempcol4" type="STRING" size="256" sumtext="임시컬럼4"/>
  490. <Column id="tempcol5" type="STRING" size="256" sumtext="임시컬럼5"/>
  491. <Column id="tempcol6" type="STRING" size="256" sumtext="임시컬럼6"/>
  492. <Column id="tempcol7" type="STRING" size="256" sumtext="임시컬럼7"/>
  493. <Column id="tempcol8" type="STRING" size="256" sumtext="임시컬럼8"/>
  494. <Column id="tempcol9" type="STRING" size="256" sumtext="임시컬럼9"/>
  495. <Column id="tempcol10" type="STRING" size="256" sumtext="임시컬럼10"/>
  496. <Column id="tempcol11" type="STRING" size="256" sumtext="임시컬럼11"/>
  497. <Column id="tempcol12" type="STRING" size="256" sumtext="임시컬럼12"/>
  498. <Column id="tempcol13" type="STRING" size="256" sumtext="임시컬럼13"/>
  499. <Column id="tempcol14" type="STRING" size="256" sumtext="임시컬럼14"/>
  500. <Column id="tempcol15" type="STRING" size="256" sumtext="임시컬럼15"/>
  501. <Column id="tempcol16" type="STRING" size="256" sumtext="임시컬럼16"/>
  502. <Column id="tempcol17" type="STRING" size="256" sumtext="임시컬럼17"/>
  503. <Column id="tempcol18" type="STRING" size="256" sumtext="임시컬럼18"/>
  504. <Column id="tempcol19" type="STRING" size="256" sumtext="임시컬럼19"/>
  505. <Column id="tempcol20" type="STRING" size="256" sumtext="임시컬럼20"/>
  506. <Column id="tempcol21" type="STRING" size="256" sumtext="임시컬럼21"/>
  507. <Column id="tempcol22" type="STRING" size="256" sumtext="임시컬럼22"/>
  508. <Column id="tempcol23" type="STRING" size="256" sumtext="임시컬럼23"/>
  509. <Column id="tempcol24" type="STRING" size="256" sumtext="임시컬럼24"/>
  510. <Column id="tempcol25" type="STRING" size="256" sumtext="임시컬럼25"/>
  511. <Column id="rgstdeptcd" type="STRING" size="256"/>
  512. <Column id="prcpclassnm" type="STRING" size="256"/>
  513. <Column id="rowkey" type="STRING" size="256" sumtext="rowid"/>
  514. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  515. </ColumnInfo>
  516. </Dataset>
  517. <Dataset id="ds_autosetprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  518. </Objects>
  519. <Bind>
  520. <BindItem id="item0" compid="group3.opt_pid" propid="value" datasetid="ds_temp_patdata" columnid="pid"/>
  521. <BindItem id="item1" compid="group3.opt_hngnm" propid="value" datasetid="ds_temp_patdata" columnid="hngnm"/>
  522. <BindItem id="item2" compid="group3.opt_age" propid="value" datasetid="ds_temp_patdata" columnid="agesex"/>
  523. <BindItem id="item3" compid="group3.output1" propid="value" datasetid="ds_temp_patdata" columnid="roomcd"/>
  524. <BindItem id="item4" compid="group3.radio2" propid="value" datasetid="ds_tpn_ordinfo" columnid="drugpath"/>
  525. <BindItem id="item5" compid="group3.input3" propid="value" datasetid="ds_tpn_ordinfo" columnid="prcpqty"/>
  526. <BindItem id="item6" compid="group3.input1" propid="value" datasetid="ds_tpn_ordinfo" columnid="prcptims"/>
  527. <BindItem id="item7" compid="group3.radio7" propid="value" datasetid="ds_tpn_ordinfo" columnid="cnstreqyn"/>
  528. <BindItem id="item8" compid="group3.input8" propid="value" datasetid="ds_temp_patdata" columnid="prcpdd"/>
  529. </Bind>
  530. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  531. * System Name :
  532. * Job Name :
  533. * Creator :
  534. * Make Date : 2015-05-19
  535. * Description :
  536. *---------------------------------------------------------------------------------------
  537. * Modify Date Modifier Modify Description
  538. *---------------------------------------------------------------------------------------
  539. * 2015-05-19 Live Converter TF->XP
  540. *
  541. *---------------------------------------------------------------------------------------
  542. ****************************************************************************************/
  543. include "com_commonxp::comm_main.xjs";
  544. include "emr_commonxp::EMRCommon.xjs";
  545. include "emr_prcpmngtxp::MMO001.xjs";
  546. include "emr_prcpmngtxp::SMMMO00100.xjs";
  547. function fCalc(){
  548. var ordvol = parseFloat(group3.iviewer1.ds_tpninfo_ordinfo.getColumn(0, "ordvol"));
  549. var prcprate = parseFloat(group3.iviewer1.ds_tpninfo_ordinfo.getColumn(0, "prcprate"));
  550. var calcordvol = ordvol * prcprate;
  551. if(calcordvol > 2000) {
  552. sysf_messageBox("실조제 Order Volume은 2000ml를 넘을 수 없습니다.", "I");
  553. group3.iviewer1.ipt_ordvol1.setFocus();
  554. return;
  555. }
  556. var instcd = sysf_getUserInfo("dutplceinstcd");
  557. if(instcd == "032") {
  558. group3.iviewer1.fCalc3();
  559. } else {
  560. group3.iviewer1.fCalc();
  561. }
  562. group3.iviewer1.lf_PrcpCalc();
  563. ds_tpn_ordinfo.setColumn(0,"prcpcd", group3.iviewer1.lf_GetPrcpCd());
  564. group4.btn_save.enable = true;
  565. //처방으로 전송
  566. ds_main_prcplist.clearData();
  567. var prcpcd = ds_tpn_ordinfo.getColumn(0,"prcpcd");
  568. fAddPrcpList(prcpcd, 1);
  569. }
  570. function fCalc2(){
  571. group3.iviewer1.fCalc2();
  572. }
  573. function fAntibioDetailCopy(srcRow, destRow){
  574. //var selCurRow = grd_prcplist.rows - grd_prcplist.fixedRows;
  575. if( destRow >= 0 ){
  576. if( !utlf_isNull(ds_tpn_ordinfo.getColumn(0,"tpnseqno"))){
  577. ds_main_prcplist.setColumn(destRow,"druglnkno" , ds_tpn_ordinfo.getColumn(0,"tpnseqno" ));
  578. }
  579. if( !utlf_isNull(ds_tpn_ordinfo.getColumn(0,"prcpqty" ))){
  580. ds_main_prcplist.setColumn(destRow,"prcpqty" , ds_tpn_ordinfo.getColumn(0,"prcpqty" ));
  581. }
  582. if( !utlf_isNull(ds_tpn_ordinfo.getColumn(0,"prcptims" ))){
  583. ds_main_prcplist.setColumn(destRow,"prcptims" , ds_tpn_ordinfo.getColumn(0,"prcptims" ));
  584. }
  585. if ( !utlf_isNull(group3.iviewer1.lf_GetDrugSpd())){ //투여속도
  586. ds_main_prcplist.setColumn(destRow,"drugspd" , iviewer1.lf_GetDrugSpd());
  587. ds_main_prcplist.setColumn(destRow,"drugspdunitflag" , "1");
  588. }
  589. }
  590. }
  591. function fAddPrcpList(prcpcd, srcRow){
  592. var prcpdd = "";
  593. prcpdd = group3.input8.value;
  594. ds_send.addColumn("cond1","string");
  595. ds_send.addColumn("cond2","string");
  596. ds_send.addColumn("cond3","string");
  597. ds_send.addColumn("cond4","string");
  598. ds_send.addColumn("cond5","string");
  599. ds_send.addColumn("cond6","string");
  600. ds_send.addColumn("cond99","string");
  601. ds_send.addColumn("prcpcd","string");
  602. if(!frmf_isPopup()){
  603. lf_prcpSrchCom ( prcpcd, prcpdd, "00", "TRMMO00100", "-", false, "getPrcpCdSrchInfo" );
  604. }else{
  605. lf_prcpSrchCom ( prcpcd, prcpdd, opener.ds_paminfo.getColumn(0,"insukind"), "TRMMO00100", "-", false, "getPrcpCdSrchInfo" );
  606. }
  607. lf_appendChildPrcp ( "ds_prcpsrch_prcplist" , "ds_main_prcplist", "main", "I" );
  608. if( srcRow >= 0 ){
  609. fAntibioDetailCopy(srcRow, ds_main_prcplist.rowcount);
  610. }
  611. }
  612. function cf_TRADB01102(sSvcId, nErrorCode, sErrorMsg) {
  613. if(nErrorCode < 0) return;
  614. }
  615. function lf_Init(){
  616. ds_send.clear();
  617. ds_send.addColumn("tpnkind","string");
  618. ds_send.addRow();
  619. ds_send.setColumn(0,"tpnkind",group3.radio1.value);
  620. var oParam = {};
  621. oParam.id = "TRADB01102";
  622. oParam.service = "pharmacybaseapp.TpnMngt";
  623. oParam.method = "reqGetTPNCode";
  624. oParam.inds = "req=ds_send";
  625. oParam.outds = "ds_grd_sell=sellinfo ds_grd_make=makeinfo";
  626. oParam.async = false;
  627. oParam.callback = "cf_TRADB01102";
  628. tranf_submit(oParam);
  629. //model.copyNode("/root/send/data/patdata","/root/temp/patdata");
  630. lf_View();
  631. }
  632. function lf_call_TRADB01103()
  633. {
  634. ds_send.copyData(ds_temp_patdata);
  635. ds_send.addColumn("tpnkind","string");
  636. ds_send.addColumn("tpnstat","string");
  637. ds_send.setColumn(0,"tpnkind",group3.radio1.value);
  638. ds_send.setColumn(0,"tpnstat","S");
  639. var oParam = {};
  640. oParam.id = "TRADB01103";
  641. oParam.service = "pharmacybaseapp.TpnMngt";
  642. oParam.method = "reqGetTPNPreOrder";
  643. oParam.inds = "req=ds_send";
  644. oParam.outds = "ds_init_cmb_preorder=item";
  645. oParam.async = false;
  646. oParam.callback = "cf_TRADB01102";
  647. tranf_submit(oParam);
  648. group3.iviewer1.lf_View();
  649. }
  650. function lf_View(){
  651. if ( !utlf_isNull(ds_temp_patdata.getColumn(0,"pid"))){
  652. group3.iviewer1.ds_temp_patdata.setColumn(0,"pid", ds_temp_patdata.getColumn(0,"pid"));
  653. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddd", ds_temp_patdata.getColumn(0,"orddd"));
  654. group3.iviewer1.ds_temp_patdata.setColumn(0,"prcpdd", ds_temp_patdata.getColumn(0,"prcpdd"));
  655. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddeptcd", ds_temp_patdata.getColumn(0,"orddeptcd"));
  656. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddrid", ds_temp_patdata.getColumn(0,"orddrid"));
  657. group3.iviewer1.ds_temp_patdata.setColumn(0,"ioflag", ds_temp_patdata.getColumn(0,"ioflag"));
  658. lf_call_TRADB01103();
  659. } else {
  660. ds_temp_patdata.setColumn(0,"pid", ds_paminfo.getColumn(0,"pid"));
  661. group3.iviewer1.ds_temp_patdata.setColumn(0,"pid", ds_paminfo.getColumn(0,"pid"));
  662. if ( ds_paminfo.getColumn(0,"orddeptcd") =="2110000000" ){
  663. group3.radio1.value = "S";
  664. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  665. btn_calc.visible=true;
  666. group3.iviewer1.lf_Sp();
  667. }
  668. lf_call_TRADB01103();
  669. ds_send.addColumn("precd","string");
  670. ds_send.setColumn(0,"precd",ds_init_cmb_preorder.getColumn(0,"precd"));
  671. lf_PreView();
  672. }
  673. //이선경 수정 2008-08-27 start( 상단에 환자정보 추가)
  674. if(!utlf_isNull(ds_paminfo.getColumn(0,"pid"))) {
  675. dsf_makeValue(ds_temp_patdata,"pid", "string", ds_paminfo.getColumn(0,"pid"));
  676. dsf_makeValue(ds_temp_patdata,"hngnm","string",ds_paminfo.getColumn(0,"hngnm"));
  677. dsf_makeValue(ds_temp_patdata,"agesex","string",ds_paminfo.getColumn(0,"age") + "/" + ds_paminfo.getColumn(0,"sex"));
  678. dsf_makeValue(ds_temp_patdata,"roomcd","string",ds_paminfo.getColumn(0,"roomcd"));
  679. }
  680. //이선경 수정 2008-08-27 end( 상단에 환자정보 추가)
  681. }
  682. function call_submit_TRADB01101()
  683. {
  684. dsf_makeValue(ds_send,"tpnstat","string","S");
  685. var oParam = {};
  686. oParam.id = "TRADB01101";
  687. oParam.service = "pharmacybaseapp.TpnMngt";
  688. oParam.method = "reqGetTPNOrder";
  689. oParam.inds = "req=ds_send";
  690. oParam.outds = "ds_tpn_ordinfo=ordinfo";
  691. oParam.async = false;
  692. oParam.callback = "cf_TRADB01102";
  693. tranf_submit(oParam);
  694. if(utlf_isNull(ds_tpn_ordinfo.getColumn(0,"drugpath")))
  695. {
  696. ds_tpn_ordinfo.setColumn(0,"drugpath","1")
  697. }
  698. }
  699. function lf_PreView(){
  700. if ( utlf_isNull(ds_send.getColumn(0,"precd"))){
  701. return;
  702. }
  703. call_submit_TRADB01101();
  704. ds_temp_patdata.setColumn(0,"tpnseqno", ds_send.getColumn(0,"precd"));
  705. group3.iviewer1.ds_temp_patdata.setColumn(0,"tpnseqno", ds_send.getColumn(0,"precd"));
  706. group3.iviewer1.lf_View();
  707. //model.copyNode( "/root/main/tpninfo2" , iviewer1.model.instances(0).selectSingleNode( "/root/main/tpninfo" ).cloneNode(true) );
  708. }
  709. function SMADB01100_onload(obj:Form, e:LoadEventInfo)
  710. {
  711. frmf_initForm(obj);
  712. ds_temp_patdata.copyData(arg_ds_temp_patdata);
  713. ds_temp_patdata.addColumn("tpnseqno","string");
  714. var paminfo = sysf_getGlobalVariable("paminfo");
  715. dsf_setCSVToDs("ds_paminfo",paminfo);
  716. if ( ds_temp_patdata.getColumn(0,"orddeptcd") =="2110000000" ){
  717. group3.radio1.value = "S";
  718. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  719. group4.btn_calc.visible=true;
  720. group3.iviewer1.lf_Sp();
  721. }
  722. // 20120705_소아TPN 이 최초로 조회 되게 수정
  723. group3.radio1.value = "S";
  724. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  725. group4.btn_calc.visible=true;
  726. group3.iviewer1.lf_Sp();
  727. ///
  728. if ( !utlf_isNull(ds_temp_patdata.getColumn(0,"tpnseqno"))){
  729. ds_send.setColumn(0,"precd",ds_temp_patdata.getColumn(0,"tpnseqno"));
  730. call_submit_TRADB01101();
  731. group3.radio1.value = ds_tpn_ordinfo.getColumn(0,"tpnkind");
  732. group3.opt_pid.value = ds_temp_patdata.getColumn(0,"pid");
  733. group3.opt_hngnm.value = ds_temp_patdata.getColumn(0,"hngnm");
  734. group3.opt_age.value = ds_temp_patdata.getColumn(0,"agesex");
  735. group3.output1.value = ds_temp_patdata.getColumn(0,"roomcd");
  736. if( group3.radio1.value == "A"){
  737. group3.iviewer1.url="ast_pharmacyxp::SSADB70100_성인TPN조성관리.xfdl";
  738. group4.btn_calc.visible=false;
  739. group3.iviewer1.lf_Disable();
  740. }else if( group3.radio1.value == "C"){
  741. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  742. group4.btn_calc.visible=false;
  743. group3.iviewer1.lf_Disable();
  744. }else {
  745. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  746. group4.btn_calc.visible=true;
  747. group3.iviewer1.lf_Sp();
  748. }
  749. }
  750. lf_Init();
  751. if ( !utlf_isNull(ds_temp_patdata.getColumn(0,"tpnseqno"))){
  752. ds_send.setColumn(0,"precd", ds_temp_patdata.getColumn(0,"tpnseqno"));
  753. lf_PreView();
  754. }
  755. }
  756. function group3_input8_onchanged(obj:Calendar, e:ChangeEventInfo)
  757. {
  758. ds_temp_patdata.setColumn(0,"orddd", ds_temp_patdata.getColumn(0,"prcpdd"));
  759. group3.iviewer1.ds_temp_patdata.setColumn(0,"prcpdd", ds_temp_patdata.getColumn(0,"prcpdd"));
  760. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddd", ds_temp_patdata.getColumn(0,"prcpdd"));
  761. }
  762. function group3_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  763. {
  764. if( group3.radio1.value == "A"){
  765. group3.iviewer1.url="ast_pharmacyxp::SSADB70100_성인TPN조성관리.xfdl";
  766. group4.btn_calc.visible=false;
  767. group3.iviewer1.lf_Disable();
  768. }else if( group3.radio1.value == "C"){
  769. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  770. group4.btn_calc.visible=false;
  771. group3.iviewer1.lf_Disable();
  772. }else {
  773. group3.iviewer1.url="ast_pharmacyxp::SSADB70200_소아TPN조성관리.xfdl";
  774. group4.btn_calc.visible=true;
  775. group3.iviewer1.lf_Sp();
  776. }
  777. lf_Init();
  778. }
  779. function group3_radio7_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  780. {
  781. if ( ds_tpn_ordinfo.getColumn(0,"cnstreqyn")=="N"){
  782. frmf_modal("SPADC61200","SPADC61200","","","",100,150,790,295,"","","","M");
  783. }
  784. }
  785. function group3_cmb_preorder_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  786. {
  787. dsf_makeValue(ds_send,"precd","string",e.postvalue);
  788. lf_PreView();
  789. var instcd = sysf_getUserInfo("dutplceinstcd");
  790. if(instcd == "032") {
  791. group3.iviewer1.fCalc3();
  792. } else {
  793. group3.iviewer1.fCalc();
  794. }
  795. }
  796. function ds_main_prcplist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  797. {
  798. if ( e.columnid == "prcpvol") {
  799. DrugCalc ("prcpvol" , e.row);
  800. } else if (e.columnid == "prcpqty") {
  801. DrugCalc ( "prcpqty" , e.row);
  802. } else if (e.columnid == "prcptims") {
  803. if ( ds_main_prcplist.getColumn(e.row,"prcpclscd") == "A2" ) {
  804. BaseMthd();
  805. }
  806. }
  807. }
  808. function group3_grd_prcplist_ontextchange(obj:Grid, e:GridEditTextChangeEventInfo)
  809. {
  810. if ( e.col == prcpVolCol) {
  811. bfDrugCalc ( "prcpvol", e.row );
  812. } else if ( grd_prcplist.col == prcpQtyCol) {
  813. bfDrugCalc ( "prcpqty", e.row );
  814. }
  815. }
  816. function group3_grd_prcplist_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo)
  817. {
  818. if ( e.col == obj.getBindCellIndex("body","prcpdayno")) {
  819. fGridfBatIpt( "prcpdayno" );
  820. }
  821. }
  822. function group3_grd_prcplist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  823. {
  824. var prcpclscd = ds_main_prcplist.getColumn(e.row,"prcpclscd");
  825. var status = ds_main_prcplist.getColumn(e.row,"status");
  826. if ( e.col == obj.getBindCellIndex("body","drugmthdspccdnm") && status != "S" ) {
  827. if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") {
  828. lf_PrcpModal ("SPMMO01900", 500, 200);
  829. } else if ( prcpclscd == "B2" || prcpclscd == "B4" || prcpclscd == "B6" ) {
  830. fGetSpc ();
  831. }
  832. } else if ( grd_prcplist.col == "15" && status != "S" ) {
  833. fPrcpdelivefact( "M" );
  834. } else if ( status != "S" ) {
  835. fPrcpDetl();
  836. }
  837. }
  838. function group3_grd_prcplist_oncellclick(obj:Grid, e:GridClickEventInfo)
  839. {
  840. var flag = true;
  841. var idx = 0;
  842. var curRow = e.row;
  843. var lastRow = ds_main_prcplist.rowcount;
  844. }
  845. function group3_grd_make_oncellclick(obj:Grid, e:GridClickEventInfo)
  846. {
  847. group3.iviewer1.fEnable();
  848. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"orddexvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"dexbfmixrate"));
  849. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcdexvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"dexbfmixvol"));
  850. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordaminovol", ds_grd_make.getColumn(ds_grd_make.rowposition,"aminobfmixvol"));
  851. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordlipidvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"lipidbfmixvol"));
  852. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcnavol", ds_grd_make.getColumn(ds_grd_make.rowposition,"navol"));
  853. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calckvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"kvol"));
  854. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcpvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"phosphatevol"));
  855. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calccavol", ds_grd_make.getColumn(ds_grd_make.rowposition,"cavol"));
  856. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcmgvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"mgvol"));
  857. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordheparinvol", ds_grd_make.getColumn(ds_grd_make.rowposition,"heparinvol"));
  858. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordmultivitavol", ds_grd_make.getColumn(ds_grd_make.rowposition,"multivitavol"));
  859. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordtotcalr", ds_grd_make.getColumn(ds_grd_make.rowposition,"totcalr"));
  860. if (parseFloat(ds_grd_make.getColumn(ds_grd_make.rowposition,"traceelevol"))>0) {
  861. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"traceeleyn","Y");
  862. } else {
  863. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"traceeleyn","N");
  864. }
  865. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"traceelevol", ds_grd_make.getColumn(ds_grd_make.rowposition,"traceelevol"));
  866. ds_send.setColumn(0,"prcpcd", ds_grd_make.getColumn(ds_grd_make.rowposition,"drugcd"));
  867. group4.btn_con.enable = true;
  868. fCalc2();
  869. //처방으로 전송
  870. ds_main_prcplist.clearData();
  871. var prcpcd = ds_send.getColumn(0,"prcpcd");
  872. fAddPrcpList(prcpcd, 1);
  873. }
  874. function group3_grd_sell_oncellclick(obj:Grid, e:GridClickEventInfo)
  875. {
  876. group3.iviewer1.lf_Disable();
  877. if(utlf_isNull(ds_tpn_ordinfo.getColumn(0,"drugpath")))
  878. {
  879. ds_tpn_ordinfo.setColumn(0,"drugpath","1")
  880. }
  881. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"orddexvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"dexbfmixrate"));
  882. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcdexvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"dexbfmixvol"));
  883. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordaminovol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"aminobfmixvol"));
  884. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordlipidvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"lipidbfmixvol"));
  885. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcnavol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"navol"));
  886. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calckvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"kvol"));
  887. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcpvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"phosphatevol"));
  888. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calccavol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"cavol"));
  889. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"calcmgvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"mgvol"));
  890. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordheparinvol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"heparinvol"));
  891. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordmultivitavol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"multivitavol"));
  892. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"ordtotcalr", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"totcalr"));
  893. if (parseFloat(ds_grd_sell.getColumn(ds_grd_sell.rowposition,"traceelevol"))>0) {
  894. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"traceeleyn","Y");
  895. } else {
  896. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"traceeleyn","N");
  897. }
  898. group3.iviewer1.ds_tpninfo_ordinfo.setColumn(0,"traceelevol", ds_grd_sell.getColumn(ds_grd_sell.rowposition,"traceelevol"));
  899. dsf_makeValue(ds_send,"prcpcd", "string",ds_grd_sell.getColumn(ds_grd_sell.rowposition,"drugcd"));
  900. group4.btn_con.enable = true;
  901. fCalc2();
  902. //처방으로 전송
  903. ds_main_prcplist.clearData();
  904. var prcpcd = ds_send.getColumn(0,"prcpcd");
  905. fAddPrcpList(prcpcd, 1);
  906. }
  907. function group4_button19_onclick(obj:Button, e:ClickEventInfo)
  908. {
  909. frmf_modal("SPADC61200","SPADC61200","","","",100,150,790,295,"","","","M");
  910. }
  911. function group4_btn_save_onclick(obj:Button, e:ClickEventInfo)
  912. {
  913. dsf_makeValue(ds_temp_patdata,"tpnkind","string", group3.radio1.value);
  914. dsf_makeValue(ds_temp_patdata,"cnstreqyn","string", group3.radio7.value);
  915. dsf_makeValue(ds_temp_patdata,"prcpqty","string", group3.input3.value);
  916. dsf_makeValue(ds_temp_patdata,"prcptims","string", group3.input1.value);
  917. dsf_makeValue(ds_temp_patdata,"drugpath","string", group3.radio2.value);
  918. dsf_makeValue(ds_temp_patdata,"testordspec","string", "");
  919. dsf_makeValue(ds_temp_patdata,"prcpcd","string", ds_send.getColumn(0,"prcpcd"));
  920. dsf_makeValue(ds_temp_patdata,"execprcpuniqno","string", "");
  921. dsf_makeValue(ds_send,"pid","string", ds_tpn_ordinfo.getColumn(0,"pid"));
  922. dsf_makeValue(ds_send,"prcpdd","string", ds_tpn_ordinfo.getColumn(0,"prcpdd"));
  923. dsf_makeValue(ds_send,"orddeptcd","string", ds_tpn_ordinfo.getColumn(0,"orddeptcd"));
  924. dsf_makeValue(ds_send,"orddrid","string", ds_tpn_ordinfo.getColumn(0,"orddrid"));
  925. //model.copyNode("/root/send/data/tpndata","/root/main/tpninfo/ordinfo");
  926. var oParam = {};
  927. oParam.id = "TXADB01101";
  928. oParam.service = "pharmacybaseapp.TpnMngt";
  929. oParam.method = "reqExeTPNOrder";
  930. oParam.inds = "req=ds_temp_patdata";
  931. oParam.outds = "ds_tmp_ret=item";
  932. oParam.async = false;
  933. oParam.callback = "cf_TRADB01102";
  934. tranf_submit(oParam);
  935. call_submit_TRADB01101();
  936. group3.iviewer1.ds_send.setColumn(0,"tpnseqno", ds_tpn_ordinfo.getColumn(0,"tpnseqno"));
  937. group3.iviewer1.lf_Save();
  938. group4.btn_con.enable = true;
  939. }
  940. function group4_btn_cle_onclick(obj:Button, e:ClickEventInfo)
  941. {
  942. close();
  943. }
  944. function group4_btn_calc_onclick(obj:Button, e:ClickEventInfo)
  945. {
  946. fCalc();
  947. }
  948. function group4_btn_con_onclick(obj:Button, e:ClickEventInfo)
  949. {
  950. if ( utlf_isNull(ds_tpn_ordinfo.getColumn(0,"drugpath")) ){
  951. sysf_messageBox("경로를 선택하십시오.", "C010");
  952. return;
  953. }
  954. //저장
  955. // dsf_makeValue(ds_temp_patdata,"tpnkind","string", group3.radio1.value);
  956. // dsf_makeValue(ds_temp_patdata,"cnstreqyn","string", group3.radio7.value);
  957. // dsf_makeValue(ds_temp_patdata,"prcpqty","string", group3.input3.value);
  958. // dsf_makeValue(ds_temp_patdata,"prcptims","string", group3.input1.value);
  959. // dsf_makeValue(ds_temp_patdata,"drugpath","string", group3.radio2.value);
  960. // dsf_makeValue(ds_temp_patdata,"testordspec","string", "");
  961. // dsf_makeValue(ds_temp_patdata,"prcpcd","string", ds_send.getColumn(0,"prcpcd"));
  962. // dsf_makeValue(ds_temp_patdata,"execprcpuniqno","INT", "");
  963. // dsf_makeValue(ds_temp_patdata,"tpnstat","string","S");
  964. dsf_createDsRow("ds_req", [
  965. {col:"pid" , type:"STRING" , size:256, val:ds_temp_patdata.getColumn(0,"pid")}
  966. , {col:"orddd" , type:"STRING" , size:256, val:ds_temp_patdata.getColumn(0,"orddd")}
  967. , {col:"prcpdd" , type:"STRING" , size:256, val:ds_temp_patdata.getColumn(0,"prcpdd")}
  968. , {col:"orddeptcd" , type:"STRING" , size:256, val:ds_temp_patdata.getColumn(0,"orddeptcd")}
  969. , {col:"orddrid" , type:"STRING" , size:256, val:ds_temp_patdata.getColumn(0,"orddrid")}
  970. , {col:"tpnstat" , type:"STRING" , size:256, val:"S"}
  971. , {col:"tpnseqno" , type:"INT" , size:256, val:utlf_transNullToEmpty(ds_tpn_ordinfo.getColumn(0,"tpnseqno"))}
  972. , {col:"tpnkind" , type:"STRING" , size:256, val:group3.radio1.value}
  973. , {col:"cnstreqyn" , type:"STRING" , size:256, val:group3.radio7.value}
  974. , {col:"prcpqty" , type:"BIGDECIMAL" , size:256, val:group3.input3.value}
  975. , {col:"prcptims" , type:"INT" , size:256, val:group3.input1.value}
  976. , {col:"drugpath" , type:"STRING" , size:256, val:group3.radio2.value}
  977. , {col:"testordspec" , type:"STRING" , size:256, val:utlf_transNullToEmpty(ds_tpn_ordinfo.getColumn(0,"testordspec"))}
  978. , {col:"prcpcd" , type:"STRING" , size:256, val:utlf_transNullToEmpty(ds_tpn_ordinfo.getColumn(0,"prcpcd"))}
  979. , {col:"execprcpuniqno" , type:"INT" , size:256, val:""}
  980. ]);
  981. dsf_setDefaultVal(ds_req, "tpnseqno:0,execprcpuniqno:0");
  982. dsf_setTypeFormat(ds_req, "tpnseqno:INT^prcpqty:FLOAT^prcptims:INT^execprcpuniqno:INT");
  983. var oParam = {};
  984. oParam.id = "TXADB01101";
  985. oParam.service = "pharmacybaseapp.TpnMngt";
  986. oParam.method = "reqExeTPNOrder";
  987. oParam.inds = "req=ds_req";
  988. oParam.outds = "ds_tmp_ret=item";
  989. oParam.async = false;
  990. oParam.callback = "cf_TRADB01102";
  991. tranf_submit(oParam);
  992. ds_tpn_ordinfo.setColumn(0,"tpnseqno",ds_tmp_ret.getColumn(0,"tpnseqno"));
  993. ds_main_prcplist.setColumn(0,"druglnkno" , ds_tpn_ordinfo.getColumn(0,"tpnseqno" ));
  994. // 20121220_처방화면에 소아 tpn 화면에서 수정한 그대로 1회 수량과 1회 용량 값이 내려가도록 수정
  995. dsf_makeValue(ds_main_prcplist,"drprcpetc8", "string",ds_main_prcplist.getColumn(0,"prcpqty"));
  996. dsf_makeValue(ds_main_prcplist,"drprcpetc7", "string",ds_main_prcplist.getColumn(0,"prcpvol"));
  997. dsf_makeValue(group3.iviewer1.ds_temp_patdata,"tpnseqno", "string",ds_tpn_ordinfo.getColumn(0,"tpnseqno"));
  998. group3.iviewer1.lf_Save();
  999. //확인
  1000. if ( opener.ds_root.getColumn(0,"usge" ) == "prms" ) {
  1001. var cnt = 0;
  1002. for ( i=0; i < ds_main_prcplist.rowcount; i++ ){
  1003. if ( ds_main_prcplist.getColumn(i,"status") == "I" ) {
  1004. var nRow = opener.ds_main_prcplist.addRow();
  1005. opener.ds_main_prcplist.copyRow(nRow, ds_main_prcplist, i);
  1006. }
  1007. }
  1008. }
  1009. else {
  1010. lf_addPrcp ( "child", "ds_main_prcplist", "ds_main_prcplist", "Y", "status", "I", group3.grd_prcplist, "Y", "00");
  1011. }
  1012. close();
  1013. }
  1014. function group4_button1_onclick(obj:Button, e:ClickEventInfo)
  1015. {
  1016. //exeReportPreview("RFADB01101", "XMLSTR", "", "", "true","","","","","true", "", "");
  1017. var objDOM = rptf_createDOM(); // DOM 객체 설정
  1018. rptf_setNodeListToDOM(objDOM, "/root/main/tpninfo/ordinfo" , ds_tpn_ordinfo); // 데이터셋 1
  1019. rptf_setNodeListToDOM(objDOM, "/root/main/patinfo" , ds_temp_patdata); // 데이터셋 2
  1020. rptf_setNodeListToDOM(objDOM, "/root/temp/patdata" , ds_temp_patdata); // 데이터셋 3
  1021. rptf_setNodeListToDOM(objDOM, "/root/main/tpninfo2/ordinfo" , group3.iviewer1.ds_tpninfo_ordinfo); // 데이터셋 4
  1022. var objParam = new Object();
  1023. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  1024. var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;show=0";
  1025. rptf_exeReportPreview30(["RFADB01101"],[objParam], option);
  1026. }
  1027. function group4_button2_onclick(obj:Button, e:ClickEventInfo)
  1028. {
  1029. var objArg = new Object();
  1030. objArg.arg_ds_temp_patdata = ds_temp_patdata;
  1031. frmf_modal("SPADB62500", "SPADB62500", objArg, false, "", "", "", null, null, null, null, null, "M");
  1032. }
  1033. ]]></Script>
  1034. </Form>
  1035. </FDL>