SMADB01300_TPN처방조회.xfdl 70 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADB01300" position="absolute 0 0 932 804" titletext="TPN처방" onload="SMADB01300_onload" oninit="SMADB01300_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 21 932 789" id="group3" scrollbars="autoboth">
  8. <Layouts>
  9. <Layout>
  10. <Shape position="absolute 0 50 932 56" linetype="horizontal" id="line8" class="line_2" anchor="default"/>
  11. <Calendar position="absolute 740 54 840 76" id="input8" class="input_essential" enable="false" visible="false" onchanged="group3_input8_onchanged" anchor="default"/>
  12. <Static text="처방적용일자" position="absolute 620 54 735 76" align="align:center middle;" id="caption126" class="cell_1" visible="false" anchor="default"/>
  13. <Div position="absolute 0 79 932 654" id="iviewer1" url="ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl" anchor="default" asyncmode="false"/>
  14. <Static text="TPN 처방 리스트" position="absolute 0 652 144 666" id="caption1" class="tit_2" visible="false" anchor="default"/>
  15. <Static text="전처방" position="absolute 480 4 530 26" align="align:center middle;" id="caption11" class="cell_1" anchor="default"/>
  16. <Static text="자문의뢰" position="absolute 465 54 530 76" align="align:center middle;" id="caption12" class="cell_1" visible="false" anchor="default"/>
  17. <Static text="수량" position="absolute 230 54 295 76" align="align:center middle;" id="caption3" class="cell_1" visible="true" anchor="default"/>
  18. <Static text="자문의뢰" position="absolute 565 -320 605 -297" align="align:center middle;" id="caption13" class="cell_1" anchor="default"/>
  19. <Static text="횟수" position="absolute 350 54 415 76" align="align:center middle;" id="caption4" class="cell_1" visible="true" anchor="default"/>
  20. <Shape position="absolute 0 755 932 761" id="line1" class="line_3" anchor="default"/>
  21. <Static text="경로" position="absolute 0 54 62 76" align="align:center middle;" id="caption5" class="cell_1" anchor="default"/>
  22. <Radio position="absolute 65 54 228 76" id="radio2" enable="false" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
  23. <Dataset id="innerdataset">
  24. <ColumnInfo>
  25. <Column id="codecolumn"/>
  26. <Column id="datacolumn"/>
  27. </ColumnInfo>
  28. <Rows>
  29. <Row>
  30. <Col id="codecolumn">1</Col>
  31. <Col id="datacolumn">Central</Col>
  32. </Row>
  33. <Row>
  34. <Col id="codecolumn">2</Col>
  35. <Col id="datacolumn">Peripheral</Col>
  36. </Row>
  37. </Rows>
  38. </Dataset>
  39. </Radio>
  40. <Edit readonly="true" position="absolute 420 54 460 76" align="align:right middle;" id="input1" class="edt_transbg" visible="true" anchor="default" style="align:right middle;"/>
  41. <Shape position="absolute 0 0 925 1" linetype="vertical" id="line4" class="line_1" anchor="default"/>
  42. <Edit readonly="true" position="absolute 300 54 345 76" align="align:right middle;" id="input3" class="edt_transbg" visible="true" anchor="default" style="align:right middle;"/>
  43. <Radio position="absolute 535 54 620 76" id="radio7" visible="false" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_radio7_onitemchanged" 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">Y</Col>
  52. <Col id="datacolumn">Yes</Col>
  53. </Row>
  54. <Row>
  55. <Col id="codecolumn">N</Col>
  56. <Col id="datacolumn">No</Col>
  57. </Row>
  58. </Rows>
  59. </Dataset>
  60. </Radio>
  61. <Shape position="absolute 0 75 932 81" linetype="horizontal" id="line7" class="line_2" anchor="default"/>
  62. <Combo position="absolute 532 4 932 26" id="cmb_preorder" class="combo_default" innerdataset="@ds_main_preordinfo_item" datacolumn="prenm" codecolumn="precd" onitemchanged="group3_cmb_preorder_onitemchanged" anchor="default"/>
  63. <Grid position="absolute 401 65 931 110" align="align:center middle;" id="grd_diaglist" visible="false" binddataset="ds_grd_diaglist" anchor="default" autofittype="col">
  64. <Formats>
  65. <Format id="default">
  66. <Columns>
  67. <Column size="35"/>
  68. <Column size="35"/>
  69. <Column size="0"/>
  70. <Column size="65"/>
  71. <Column size="324"/>
  72. <Column size="0"/>
  73. <Column size="35"/>
  74. </Columns>
  75. <Rows>
  76. <Row size="24" band="head"/>
  77. <Row size="24"/>
  78. </Rows>
  79. <Band id="head">
  80. <Cell/>
  81. <Cell col="1" text="R/O"/>
  82. <Cell col="2" text="주"/>
  83. <Cell col="3" text="진단코드"/>
  84. <Cell col="4" text="진단명"/>
  85. <Cell col="5" text="참고"/>
  86. <Cell col="6" text="특례"/>
  87. </Band>
  88. <Band id="body">
  89. <Cell enable="false" text="bind:status" edittype="combo" displaytype="combo"/>
  90. <Cell col="1" text="bind:diagkindcd" edittype="checkbox" displaytype="checkbox"/>
  91. <Cell col="2" text="bind:diagkindcdflag" edittype="checkbox" displaytype="checkbox"/>
  92. <Cell col="3" text="bind:icd10cd" edittype="text" displaytype="text"/>
  93. <Cell col="4" text="bind:diagengnm" edittype="text" displaytype="text"/>
  94. <Cell col="5" text="bind:diagremfact"/>
  95. <Cell col="6" text="bind:spclinfo"/>
  96. </Band>
  97. </Format>
  98. </Formats>
  99. </Grid>
  100. <Grid position="absolute 0 671 931 756" id="grd_prcplist" visible="false" binddataset="ds_main_prcplist" onenteredit="group3_grd_prcplist_onenteredit" onselectchanged="group3_grd_prcplist_onselectchanged" ontextchanged="group3_grd_prcplist_ontextchanged" oncelldblclick="group3_grd_prcplist_oncelldblclick" oncellclick="group3_grd_prcplist_oncellclick" anchor="default">
  101. <Formats>
  102. <Format id="default">
  103. <Columns>
  104. <Column size="260"/>
  105. <Column size="45"/>
  106. <Column size="24"/>
  107. <Column size="43"/>
  108. <Column size="24"/>
  109. <Column size="39"/>
  110. <Column size="40"/>
  111. <Column size="316"/>
  112. <Column size="316"/>
  113. <Column size="0"/>
  114. <Column size="0"/>
  115. <Column size="0"/>
  116. <Column size="0"/>
  117. <Column size="0"/>
  118. <Column size="0"/>
  119. </Columns>
  120. <Rows>
  121. <Row size="24" band="head"/>
  122. <Row size="24"/>
  123. </Rows>
  124. <Band id="head">
  125. <Cell text="TPN"/>
  126. <Cell col="1" colspan="2" text="총용량" taborder="undefined"/>
  127. <Cell col="3" colspan="2" text="수량" taborder="undefined"/>
  128. <Cell col="5" text="횟수"/>
  129. <Cell col="6" text="일수"/>
  130. <Cell col="7" text="용법/검체"/>
  131. <Cell col="8" text="추가사유"/>
  132. <Cell col="9"/>
  133. <Cell col="10"/>
  134. <Cell col="11"/>
  135. <Cell col="12"/>
  136. <Cell col="13"/>
  137. <Cell col="14"/>
  138. </Band>
  139. <Band id="body">
  140. <Cell text="bind:prcpnm"/>
  141. <Cell col="1" text="bind:prcpvol" mask="#.#"/>
  142. <Cell col="2" displaytype="none" edittype="none" text="bind:prcpvolunitnm"/>
  143. <Cell col="3" text="bind:prcpqty" mask="#.#"/>
  144. <Cell col="4" text="bind:prcpqtyunitnm"/>
  145. <Cell col="5" text="bind:prcptims" mask="#"/>
  146. <Cell col="6" text="bind:prcpdayno" mask="#"/>
  147. <Cell col="7" displaytype="none" edittype="none" text="bind:drugmthdspccdnm"/>
  148. <Cell col="8" displaytype="text" edittype="text" text="bind:rem"/>
  149. <Cell col="9" text="bind:drugmthdspccd"/>
  150. <Cell col="10" text="bind:prcpvolunitflag"/>
  151. <Cell col="11" text="bind:prcpqtyunitflag"/>
  152. <Cell col="12" text="bind:prcpvolunitnm"/>
  153. <Cell col="13" text="bind:prcpqtyunitnm"/>
  154. <Cell col="14" text="bind:prcpcd"/>
  155. </Band>
  156. </Format>
  157. </Formats>
  158. </Grid>
  159. <Edit readonly="true" position="absolute 191 29 288 51" id="opt_hngnm" class="output" anchor="default"/>
  160. <Static text="나이/성별" position="absolute 291 29 358 51" align="align:center middle;" id="caption6" class="cell_1" anchor="default"/>
  161. <Edit readonly="true" position="absolute 64 29 137 51" id="opt_pid" class="output" anchor="default"/>
  162. <Static text="환자명" position="absolute 140 29 189 51" align="align:center middle;" id="caption15" class="cell_1" anchor="default"/>
  163. <Edit readonly="true" position="absolute 360 29 415 51" id="opt_age" class="output" anchor="default"/>
  164. <Static text="등록번호" position="absolute 0 29 62 51" align="align:center middle;" id="caption9" class="cell_1" anchor="default"/>
  165. <Static text="병실" position="absolute 418 29 460 51" align="align:center middle;" id="caption7" class="cell_1" anchor="default"/>
  166. <Edit readonly="true" position="absolute 462 29 527 51" id="output1" class="output" anchor="default"/>
  167. <Static position="absolute 790 155 915 205" align="align:center middle;" id="caption2" class="cell_1" visible="false" anchor="default" style="shadow:outer 3,3 3 gray;"/>
  168. <Static position="absolute 0 4 320 26" align="align:center middle;" id="caption25" class="cell_1" visible="true" anchor="default"/>
  169. <Radio position="absolute 5 7 318 23" id="radio1" visible="true" columncount="-1" rowcount="-1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group3_radio1_onitemchanged" style="textpadding:0 3 0 3;" anchor="default">
  170. <Dataset id="innerdataset">
  171. <ColumnInfo>
  172. <Column id="codecolumn"/>
  173. <Column id="datacolumn"/>
  174. </ColumnInfo>
  175. <Rows>
  176. <Row>
  177. <Col id="codecolumn">S</Col>
  178. <Col id="datacolumn">소아TPN(소아과)</Col>
  179. </Row>
  180. <Row>
  181. <Col id="codecolumn">C</Col>
  182. <Col id="datacolumn">소아TPN(소아외과)</Col>
  183. </Row>
  184. <Row>
  185. <Col id="codecolumn">A</Col>
  186. <Col id="datacolumn">성인TPN</Col>
  187. </Row>
  188. </Rows>
  189. </Dataset>
  190. </Radio>
  191. <Static id="caption8" text="투약번호" class="cell_1" position="absolute 530 29 595 51" anchor="default"/>
  192. <Edit id="output2" taborder="1" readonly="true" position="absolute 597 29 662 51" class="output" anchor="default"/>
  193. <Shape id="line03" class="line_10" visible="false" position="absolute 0 668 931 671" anchor="default"/>
  194. </Layout>
  195. </Layouts>
  196. </Div>
  197. <Div position="absolute 0 784 932 804" id="group4" scrollbars="autoboth">
  198. <Layouts>
  199. <Layout>
  200. <Button position="absolute 139 0 255 20" id="button19" class="btn3" visible="false" text="열량요구량계산" onclick="group4_button19_onclick" anchor="default"/>
  201. <Button position="absolute 645 0 701 20" id="btn_save" class="btn4" enable="false" visible="false" text="저장" onclick="group4_btn_save_onclick" anchor="default"/>
  202. <Button position="absolute 876 0 932 20" id="btn_cle" class="btn4" text="닫기" onclick="group4_btn_cle_onclick" anchor="default"/>
  203. <Button position="absolute 760 0 816 20" id="btn_calc" class="btn4" visible="false" text="계산" onclick="group4_btn_calc_onclick" anchor="default"/>
  204. <Button position="absolute 818 0 874 20" id="btn_con" class="btn4" visible="false" text="확인" onclick="group4_btn_con_onclick" anchor="default"/>
  205. <Button position="absolute 0 0 56 20" id="button1" class="btn6" enable="true" visible="true" text="출력" onclick="group4_button1_onclick" anchor="default"/>
  206. <Button position="absolute 58 0 137 20" id="button2" class="btn3" visible="true" text="이력조회" onclick="group4_button2_onclick" anchor="default"/>
  207. </Layout>
  208. </Layouts>
  209. </Div>
  210. <Static id="caption19" text="TPN처방" class="tit_1" position="absolute 0 0 100 25"/>
  211. </Layout>
  212. </Layouts>
  213. <Objects>
  214. <Dataset id="ds_init_cmb_preorder" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  215. <ColumnInfo>
  216. <Column id="prenm" type="STRING"/>
  217. <Column id="precd" type="STRING"/>
  218. </ColumnInfo>
  219. </Dataset>
  220. <Dataset id="ds_grd_diaglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  221. <ColumnInfo>
  222. <Column id="status" type="STRING"/>
  223. <Column id="diagkindcd" type="STRING"/>
  224. <Column id="diagkindcdflag" type="STRING"/>
  225. <Column id="icd10cd" type="STRING"/>
  226. <Column id="diagengnm" type="STRING"/>
  227. <Column id="diagremfact" type="STRING"/>
  228. <Column id="spclinfo" type="STRING"/>
  229. </ColumnInfo>
  230. </Dataset>
  231. <Dataset id="ds_main_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  232. <ColumnInfo>
  233. <Column id="prcpnm" type="STRING"/>
  234. <Column id="prcpvol" type="STRING"/>
  235. <Column id="prcpvolunitnm" type="STRING"/>
  236. <Column id="prcpqty" type="STRING"/>
  237. <Column id="prcpqtyunitnm" type="STRING"/>
  238. <Column id="prcptims" type="STRING"/>
  239. <Column id="prcpdayno" type="STRING"/>
  240. <Column id="drugmthdspccdnm" type="STRING"/>
  241. <Column id="rem" type="STRING"/>
  242. <Column id="drugmthdspccd" type="STRING"/>
  243. <Column id="prcpvolunitflag" type="STRING"/>
  244. <Column id="prcpqtyunitflag" type="STRING"/>
  245. <Column id="prcpvolunitnm" type="STRING"/>
  246. <Column id="prcpqtyunitnm" type="STRING"/>
  247. <Column id="prcpcd" type="STRING"/>
  248. </ColumnInfo>
  249. <Rows>
  250. <Row/>
  251. </Rows>
  252. </Dataset>
  253. <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  254. <ColumnInfo>
  255. <Column id="pid" type="STRING" size="256"/>
  256. <Column id="orddd" type="STRING" size="256"/>
  257. <Column id="prcpdd" type="STRING" size="256"/>
  258. <Column id="orddeptcd" type="STRING" size="256"/>
  259. <Column id="orddrid" type="STRING" size="256"/>
  260. <Column id="ioflag" type="STRING" size="256"/>
  261. <Column id="tpnseqno" type="STRING" size="256"/>
  262. <Column id="hngnm" type="STRING" size="256"/>
  263. <Column id="agesex" type="STRING" size="256"/>
  264. <Column id="roomcd" type="STRING" size="256"/>
  265. </ColumnInfo>
  266. <Rows>
  267. <Row/>
  268. </Rows>
  269. </Dataset>
  270. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  271. <ColumnInfo>
  272. <Column id="tpnkind" type="STRING" size="256"/>
  273. </ColumnInfo>
  274. <Rows>
  275. <Row>
  276. <Col id="tpnkind">C</Col>
  277. </Row>
  278. </Rows>
  279. </Dataset>
  280. <Dataset id="ds_main_tpninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  281. <ColumnInfo>
  282. <Column id="tpnseqno" type="STRING" size="256" sumtext="TPN처방일련번호"/>
  283. <Column id="cnstreqyn" type="STRING" size="256" sumtext="자문의뢰유무"/>
  284. <Column id="prcpqty" type="STRING" size="256" sumtext="수량"/>
  285. <Column id="prcptims" type="STRING" size="256" sumtext="횟수"/>
  286. <Column id="drugpath" type="STRING" size="256" sumtext="경로구분"/>
  287. <Column id="testordspec" type="STRING" size="256" sumtext="검사처방내역"/>
  288. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  289. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
  290. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  291. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  292. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  293. <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
  294. <Column id="tpnkind" type="STRING" size="256" sumtext=""/>
  295. </ColumnInfo>
  296. </Dataset>
  297. <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  298. <ColumnInfo>
  299. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  300. <Column id="orddd" type="STRING" size="256" sumtext="처방일자"/>
  301. <Column id="prcpdd" type="STRING" size="256" sumtext="적용일자"/>
  302. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
  303. <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
  304. <Column id="tpnstat" type="STRING" size="256" sumtext="TPN상태"/>
  305. <Column id="tpnkind" type="STRING" size="256" sumtext="성인소아구분"/>
  306. <Column id="precd" type="STRING" size="256" sumtext="Key"/>
  307. </ColumnInfo>
  308. <Rows>
  309. <Row/>
  310. </Rows>
  311. </Dataset>
  312. <Dataset id="ds_tpncpdeinfo_tpncdlist_sellinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  313. <ColumnInfo>
  314. <Column id="drugcd" type="STRING" size="256" sumtext="약품코드"/>
  315. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  316. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  317. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  318. <Column id="tpnflag" type="STRING" size="256" sumtext="성인소아구분"/>
  319. <Column id="tpnkind" type="STRING" size="256" sumtext="TPN구분"/>
  320. <Column id="marketflag" type="STRING" size="256" sumtext="조제시판구분"/>
  321. <Column id="dexbfmixrate" type="STRING" size="256" sumtext="Dextrose혼합전비율"/>
  322. <Column id="dexbfmixvol" type="STRING" size="256" sumtext="Dextrose혼합전비량"/>
  323. <Column id="aminobfmixrate" type="STRING" size="256" sumtext="AminoAcid혼합전비율"/>
  324. <Column id="aminobfmixvol" type="STRING" size="256" sumtext="AminoAcid혼합전량"/>
  325. <Column id="lipidbfmixrate" type="STRING" size="256" sumtext="Lipid혼합전비율"/>
  326. <Column id="lipidbfmixvol" type="STRING" size="256" sumtext="Lipid혼합전량"/>
  327. <Column id="dexrate" type="STRING" size="256" sumtext="Dextrose비율"/>
  328. <Column id="dexvol" type="STRING" size="256" sumtext="Dextrose량"/>
  329. <Column id="aminorate" type="STRING" size="256" sumtext="AminoAcid비율"/>
  330. <Column id="aminovol" type="STRING" size="256" sumtext="AminoAcid량"/>
  331. <Column id="lipidrate" type="STRING" size="256" sumtext="Lipid비율"/>
  332. <Column id="lipidvol" type="STRING" size="256" sumtext="Lipid량"/>
  333. <Column id="navol" type="STRING" size="256" sumtext="Na량"/>
  334. <Column id="kvol" type="STRING" size="256" sumtext="K량"/>
  335. <Column id="clvol" type="STRING" size="256" sumtext="Cl량"/>
  336. <Column id="phosphatevol" type="STRING" size="256" sumtext="Phosphate량"/>
  337. <Column id="cavol" type="STRING" size="256" sumtext="Ca량"/>
  338. <Column id="mgvol" type="STRING" size="256" sumtext="Mg량"/>
  339. <Column id="heparinvol" type="STRING" size="256" sumtext="Heparin량"/>
  340. <Column id="multivitavol" type="STRING" size="256" sumtext="MultiVitamine량"/>
  341. <Column id="traceelevol" type="STRING" size="256" sumtext="미량원소량"/>
  342. <Column id="npccalr" type="STRING" size="256" sumtext="NPC열량"/>
  343. <Column id="npcncalr" type="STRING" size="256" sumtext="NPCN열량"/>
  344. <Column id="totcalr" type="STRING" size="256" sumtext="총열량"/>
  345. <Column id="dextotrate" type="STRING" size="256" sumtext="Dextrose총비율"/>
  346. <Column id="prottotrate" type="STRING" size="256" sumtext="Protein총비율"/>
  347. <Column id="lipidtotrate" type="STRING" size="256" sumtext="Lipid총비율"/>
  348. <Column id="adminpathflag" type="STRING" size="256" sumtext="투여경로구분"/>
  349. <Column id="scrtflag" type="STRING" size="256" sumtext="안정성구분"/>
  350. <Column id="goodtype" type="STRING" size="256" sumtext="제품성상"/>
  351. <Column id="remark" type="STRING" size="256" sumtext="비고"/>
  352. <Column id="drugcost" type="STRING" size="256" sumtext="약가"/>
  353. <Column id="packunit" type="STRING" size="256" sumtext="포장단위"/>
  354. <Column id="ordnm" type="STRING" size="256" sumtext="처방명칭"/>
  355. <Column id="m" type="STRING" size="256" sumtext="수정플래그"/>
  356. </ColumnInfo>
  357. </Dataset>
  358. <Dataset id="ds_tpncpdeinfo_tpncdlist_makeinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  359. <ColumnInfo>
  360. <Column id="drugcd" type="STRING" size="256" sumtext="약품코드"/>
  361. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  362. <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
  363. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  364. <Column id="tpnflag" type="STRING" size="256" sumtext="성인소아구분"/>
  365. <Column id="tpnkind" type="STRING" size="256" sumtext="TPN구분"/>
  366. <Column id="marketflag" type="STRING" size="256" sumtext="조제시판구분"/>
  367. <Column id="dexbfmixrate" type="STRING" size="256" sumtext="Dextrose혼합전비율"/>
  368. <Column id="dexbfmixvol" type="STRING" size="256" sumtext="Dextrose혼합전비량"/>
  369. <Column id="aminobfmixrate" type="STRING" size="256" sumtext="AminoAcid혼합전비율"/>
  370. <Column id="aminobfmixvol" type="STRING" size="256" sumtext="AminoAcid혼합전량"/>
  371. <Column id="lipidbfmixrate" type="STRING" size="256" sumtext="Lipid혼합전비율"/>
  372. <Column id="lipidbfmixvol" type="STRING" size="256" sumtext="Lipid혼합전량"/>
  373. <Column id="dexrate" type="STRING" size="256" sumtext="Dextrose비율"/>
  374. <Column id="dexvol" type="STRING" size="256" sumtext="Dextrose량"/>
  375. <Column id="aminorate" type="STRING" size="256" sumtext="AminoAcid비율"/>
  376. <Column id="aminovol" type="STRING" size="256" sumtext="AminoAcid량"/>
  377. <Column id="lipidrate" type="STRING" size="256" sumtext="Lipid비율"/>
  378. <Column id="lipidvol" type="STRING" size="256" sumtext="Lipid량"/>
  379. <Column id="navol" type="STRING" size="256" sumtext="Na량"/>
  380. <Column id="kvol" type="STRING" size="256" sumtext="K량"/>
  381. <Column id="clvol" type="STRING" size="256" sumtext="Cl량"/>
  382. <Column id="phosphatevol" type="STRING" size="256" sumtext="Phosphate량"/>
  383. <Column id="cavol" type="STRING" size="256" sumtext="Ca량"/>
  384. <Column id="mgvol" type="STRING" size="256" sumtext="Mg량"/>
  385. <Column id="heparinvol" type="STRING" size="256" sumtext="Heparin량"/>
  386. <Column id="multivitavol" type="STRING" size="256" sumtext="MultiVitamine량"/>
  387. <Column id="traceelevol" type="STRING" size="256" sumtext="미량원소량"/>
  388. <Column id="npccalr" type="STRING" size="256" sumtext="NPC열량"/>
  389. <Column id="npcncalr" type="STRING" size="256" sumtext="NPCN열량"/>
  390. <Column id="totcalr" type="STRING" size="256" sumtext="총열량"/>
  391. <Column id="dextotrate" type="STRING" size="256" sumtext="Dextrose총비율"/>
  392. <Column id="prottotrate" type="STRING" size="256" sumtext="Protein총비율"/>
  393. <Column id="lipidtotrate" type="STRING" size="256" sumtext="Lipid총비율"/>
  394. <Column id="adminpathflag" type="STRING" size="256" sumtext="투여경로구분"/>
  395. <Column id="scrtflag" type="STRING" size="256" sumtext="안정성구분"/>
  396. <Column id="goodtype" type="STRING" size="256" sumtext="제품성상"/>
  397. <Column id="remark" type="STRING" size="256" sumtext="비고"/>
  398. <Column id="drugcost" type="STRING" size="256" sumtext="약가"/>
  399. <Column id="packunit" type="STRING" size="256" sumtext="포장단위"/>
  400. <Column id="ordnm" type="STRING" size="256" sumtext="처방명칭"/>
  401. <Column id="m" type="STRING" size="256" sumtext="수정플래그"/>
  402. </ColumnInfo>
  403. </Dataset>
  404. <Dataset id="ds_send_data_tpndata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  405. <Dataset id="ds_main_tpninfo_ordinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  406. <ColumnInfo>
  407. <Column id="cnstreqyn" type="STRING" size="256"/>
  408. <Column id="prcpqty" type="STRING" size="256"/>
  409. <Column id="prcptims" type="STRING" size="256"/>
  410. <Column id="drugpath" type="STRING" size="256"/>
  411. <Column id="testordspec" type="STRING" size="256"/>
  412. <Column id="tpnseqno" type="STRING" size="256"/>
  413. <Column id="prcpcd" type="STRING" size="256"/>
  414. <Column id="pid" type="STRING" size="256"/>
  415. <Column id="prcpdd" type="STRING" size="256"/>
  416. <Column id="orddeptcd" type="STRING" size="256"/>
  417. <Column id="orddrid" type="STRING" size="256"/>
  418. </ColumnInfo>
  419. <Rows>
  420. <Row>
  421. <Col id="cnstreqyn"/>
  422. <Col id="prcpqty">1</Col>
  423. <Col id="prcptims">1</Col>
  424. <Col id="drugpath"/>
  425. <Col id="testordspec"/>
  426. <Col id="tpnseqno"/>
  427. <Col id="prcpcd"/>
  428. <Col id="pid"/>
  429. <Col id="prcpdd"/>
  430. <Col id="orddeptcd"/>
  431. <Col id="orddrid"/>
  432. </Row>
  433. </Rows>
  434. </Dataset>
  435. <Dataset id="ds_main_preordinfo_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  436. <ColumnInfo>
  437. <Column id="prenm" type="STRING" size="256"/>
  438. <Column id="precd" type="STRING" size="256"/>
  439. <Column id="drugno" type="STRING" size="256"/>
  440. </ColumnInfo>
  441. <Rows>
  442. <Row/>
  443. </Rows>
  444. </Dataset>
  445. <Dataset id="ds_temp_ret" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  446. <ColumnInfo>
  447. <Column id="tpnseqno" type="STRING" size="256"/>
  448. </ColumnInfo>
  449. <Rows>
  450. <Row/>
  451. </Rows>
  452. </Dataset>
  453. <Dataset id="ds_send_data_patdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  454. <Dataset id="ds_temp_patdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  455. <ColumnInfo>
  456. <Column id="pid" type="STRING" size="256"/>
  457. <Column id="orddd" type="STRING" size="256"/>
  458. <Column id="prcpdd" type="STRING" size="256"/>
  459. <Column id="orddeptcd" type="STRING" size="256"/>
  460. <Column id="orddrid" type="STRING" size="256"/>
  461. <Column id="ioflag" type="STRING" size="256"/>
  462. <Column id="tpnseqno" type="STRING" size="256"/>
  463. <Column id="drugno" type="STRING" size="256"/>
  464. </ColumnInfo>
  465. <Rows>
  466. <Row>
  467. <Col id="pid"/>
  468. <Col id="orddd"/>
  469. <Col id="prcpdd"/>
  470. <Col id="orddeptcd"/>
  471. <Col id="orddrid"/>
  472. <Col id="ioflag"/>
  473. <Col id="tpnseqno"/>
  474. <Col id="drugno"/>
  475. </Row>
  476. </Rows>
  477. </Dataset>
  478. <Dataset id="ds_main_tpninfo2_ordinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  479. <ColumnInfo>
  480. <Column id="drugspd" type="STRING" size="256"/>
  481. <Column id="drugspdetc" type="STRING" size="256"/>
  482. <Column id="traceeleyn" type="STRING" size="256"/>
  483. <Column id="traceelevol" type="STRING" size="256"/>
  484. <Column id="maturationflag" type="STRING" size="256"/>
  485. <Column id="wt" type="STRING" size="256"/>
  486. <Column id="ordvol" type="STRING" size="256"/>
  487. <Column id="flowrate" type="STRING" size="256"/>
  488. <Column id="orddexvol" type="STRING" size="256"/>
  489. <Column id="ordaminovol" type="STRING" size="256"/>
  490. <Column id="ordnavol" type="STRING" size="256"/>
  491. <Column id="ordkvol" type="STRING" size="256"/>
  492. <Column id="ordcavol" type="STRING" size="256"/>
  493. <Column id="ordpvol" type="STRING" size="256"/>
  494. <Column id="ordmgvol" type="STRING" size="256"/>
  495. <Column id="ordmultivitavol" type="STRING" size="256"/>
  496. <Column id="ordlipidvol" type="STRING" size="256"/>
  497. <Column id="ordheparinvol" type="STRING" size="256"/>
  498. <Column id="orddistvol" type="STRING" size="256"/>
  499. <Column id="flowvol" type="STRING" size="256"/>
  500. <Column id="calcdexvol" type="STRING" size="256"/>
  501. <Column id="calcaminovol" type="STRING" size="256"/>
  502. <Column id="calcnavol" type="STRING" size="256"/>
  503. <Column id="calckvol" type="STRING" size="256"/>
  504. <Column id="calccavol" type="STRING" size="256"/>
  505. <Column id="calcpvol" type="STRING" size="256"/>
  506. <Column id="calcmgvol" type="STRING" size="256"/>
  507. <Column id="calclipidvol" type="STRING" size="256"/>
  508. <Column id="ordcalr1" type="STRING" size="256"/>
  509. <Column id="ordcalr2" type="STRING" size="256"/>
  510. <Column id="ordtotcalr" type="STRING" size="256"/>
  511. <Column id="npcncalr" type="STRING" size="256"/>
  512. <Column id="prcprate" type="STRING" size="256"/>
  513. <Column id="prcpvol" type="STRING" size="256"/>
  514. <Column id="prcpdexvol" type="STRING" size="256"/>
  515. <Column id="prcpaminovol" type="STRING" size="256"/>
  516. <Column id="prcpnavol" type="STRING" size="256"/>
  517. <Column id="prcpkvol" type="STRING" size="256"/>
  518. <Column id="prcpcavol" type="STRING" size="256"/>
  519. <Column id="prcppvol" type="STRING" size="256"/>
  520. <Column id="prcpmgvol" type="STRING" size="256"/>
  521. <Column id="prcpmultivitavol" type="STRING" size="256"/>
  522. <Column id="prcplipidvol" type="STRING" size="256"/>
  523. <Column id="prcpheparinvol" type="STRING" size="256"/>
  524. <Column id="prcpdistvol" type="STRING" size="256"/>
  525. <Column id="prcpflowvol" type="STRING" size="256"/>
  526. <Column id="prcpcalcdexvol" type="STRING" size="256"/>
  527. <Column id="prcpcalcaminovol" type="STRING" size="256"/>
  528. <Column id="prcpcalcnavol" type="STRING" size="256"/>
  529. <Column id="prcpcalckvol" type="STRING" size="256"/>
  530. <Column id="prcpcalccavol" type="STRING" size="256"/>
  531. <Column id="prcpcalcpvol" type="STRING" size="256"/>
  532. <Column id="prcpcalcmgvol" type="STRING" size="256"/>
  533. <Column id="prcpcalclipidvol" type="STRING" size="256"/>
  534. <Column id="prcpcalr1" type="STRING" size="256"/>
  535. <Column id="prcpcalr2" type="STRING" size="256"/>
  536. <Column id="prcptotcalr" type="STRING" size="256"/>
  537. <Column id="spclprcprem" type="STRING" size="256"/>
  538. <Column id="nursrem" type="STRING" size="256"/>
  539. <Column id="znvol" type="STRING" size="256"/>
  540. <Column id="cuvol" type="STRING" size="256"/>
  541. <Column id="mnvol" type="STRING" size="256"/>
  542. <Column id="crvol" type="STRING" size="256"/>
  543. <Column id="lipiddrugcd" type="STRING" size="256"/>
  544. <Column id="aminodrugcd" type="STRING" size="256"/>
  545. </ColumnInfo>
  546. <Rows>
  547. <Row>
  548. <Col id="drugspd"/>
  549. <Col id="drugspdetc"/>
  550. <Col id="traceeleyn"/>
  551. <Col id="traceelevol"/>
  552. <Col id="maturationflag"/>
  553. <Col id="wt"/>
  554. <Col id="ordvol"/>
  555. <Col id="flowrate"/>
  556. <Col id="orddexvol"/>
  557. <Col id="ordaminovol"/>
  558. <Col id="ordnavol"/>
  559. <Col id="ordkvol"/>
  560. <Col id="ordcavol"/>
  561. <Col id="ordpvol"/>
  562. <Col id="ordmgvol"/>
  563. <Col id="ordmultivitavol"/>
  564. <Col id="ordlipidvol"/>
  565. <Col id="ordheparinvol"/>
  566. <Col id="orddistvol"/>
  567. <Col id="flowvol"/>
  568. <Col id="calcdexvol"/>
  569. <Col id="calcaminovol"/>
  570. <Col id="calcnavol"/>
  571. <Col id="calckvol"/>
  572. <Col id="calccavol"/>
  573. <Col id="calcpvol"/>
  574. <Col id="calcmgvol"/>
  575. <Col id="calclipidvol"/>
  576. <Col id="ordcalr1"/>
  577. <Col id="ordcalr2"/>
  578. <Col id="ordtotcalr"/>
  579. <Col id="npcncalr"/>
  580. <Col id="prcprate">1.2</Col>
  581. <Col id="prcpvol"/>
  582. <Col id="prcpdexvol"/>
  583. <Col id="prcpaminovol"/>
  584. <Col id="prcpnavol"/>
  585. <Col id="prcpkvol"/>
  586. <Col id="prcpcavol"/>
  587. <Col id="prcppvol"/>
  588. <Col id="prcpmgvol"/>
  589. <Col id="prcpmultivitavol"/>
  590. <Col id="prcplipidvol"/>
  591. <Col id="prcpheparinvol"/>
  592. <Col id="prcpdistvol"/>
  593. <Col id="prcpflowvol"/>
  594. <Col id="prcpcalcdexvol"/>
  595. <Col id="prcpcalcaminovol"/>
  596. <Col id="prcpcalcnavol"/>
  597. <Col id="prcpcalckvol"/>
  598. <Col id="prcpcalccavol"/>
  599. <Col id="prcpcalcpvol"/>
  600. <Col id="prcpcalcmgvol"/>
  601. <Col id="prcpcalclipidvol"/>
  602. <Col id="prcpcalr1"/>
  603. <Col id="prcpcalr2"/>
  604. <Col id="prcptotcalr"/>
  605. <Col id="spclprcprem"/>
  606. <Col id="nursrem"/>
  607. <Col id="znvol"/>
  608. <Col id="cuvol"/>
  609. <Col id="mnvol"/>
  610. <Col id="crvol"/>
  611. <Col id="lipiddrugcd"/>
  612. <Col id="aminodrugcd"/>
  613. </Row>
  614. </Rows>
  615. </Dataset>
  616. <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  617. <ColumnInfo>
  618. <Column id="pid" type="STRING" size="256"/>
  619. <Column id="hngnm" type="STRING" size="256"/>
  620. <Column id="agesex" type="STRING" size="256"/>
  621. <Column id="roomcd" type="STRING" size="256"/>
  622. <Column id="drugno" type="STRING" size="256"/>
  623. </ColumnInfo>
  624. <Rows>
  625. <Row>
  626. <Col id="pid"/>
  627. <Col id="hngnm"/>
  628. <Col id="agesex"/>
  629. <Col id="roomcd"/>
  630. <Col id="drugno"/>
  631. </Row>
  632. </Rows>
  633. </Dataset>
  634. <Dataset id="ds_prcpsrch_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  635. <Dataset id="ds_main_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  636. <Dataset id="ds_init_A0090" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  637. </Objects>
  638. <Bind>
  639. <BindItem id="item0" compid="group3.opt_pid" propid="value" datasetid="ds_main_patinfo" columnid="pid"/>
  640. <BindItem id="item1" compid="group3.opt_hngnm" propid="value" datasetid="ds_main_patinfo" columnid="hngnm"/>
  641. <BindItem id="item2" compid="group3.opt_age" propid="value" datasetid="ds_main_patinfo" columnid="agesex"/>
  642. <BindItem id="item3" compid="group3.output1" propid="value" datasetid="ds_main_patinfo" columnid="roomcd"/>
  643. <BindItem id="item4" compid="group3.cmb_preorder" propid="value" datasetid="ds_send_data" columnid="precd"/>
  644. <BindItem id="item5" compid="group3.output2" propid="value" datasetid="ds_main_patinfo" columnid="drugno"/>
  645. <BindItem id="item6" compid="group3.radio2" propid="value" datasetid="ds_main_tpninfo_ordinfo" columnid="drugpath"/>
  646. <BindItem id="item7" compid="group3.input8" propid="value" datasetid="ds_temp_patdata" columnid="prcpdd"/>
  647. <BindItem id="item8" compid="group3.input3" propid="value" datasetid="ds_main_tpninfo_ordinfo" columnid="prcpqty"/>
  648. <BindItem id="item9" compid="group3.input1" propid="value" datasetid="ds_main_tpninfo_ordinfo" columnid="prcptims"/>
  649. <BindItem id="item10" compid="group3.radio7" propid="value" datasetid="ds_main_tpninfo_ordinfo" columnid="cnstreqyn"/>
  650. <BindItem id="item11" compid="group3.radio1" propid="value" datasetid="ds_main" columnid="tpnkind"/>
  651. </Bind>
  652. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  653. * System Name :
  654. * Job Name :
  655. * Creator :
  656. * Make Date : 2015-11-13
  657. * Description :
  658. *---------------------------------------------------------------------------------------
  659. * Modify Date Modifier Modify Description
  660. *---------------------------------------------------------------------------------------
  661. * 2015-11-13 Live Converter TF->XP
  662. *
  663. *---------------------------------------------------------------------------------------
  664. ****************************************************************************************/
  665. //=======================================================================================
  666. // Lib Include
  667. //---------------------------------------------------------------------------------------
  668. include "com_commonxp::comm_main.xjs"
  669. // include "com_basiccodexp::ZBC001.xjs";
  670. // include "com_departmentcodexp::ZSD001.xjs";
  671. include "emr_prcpmngtxp::MMOCommon.xjs";
  672. include "emr_prcpmngtxp::MMO001.xjs";
  673. include "emr_prcpmngtxp::SMMMO00100.xjs";
  674. include "emr_prcpmngtxp::SMMMO00110.xjs";
  675. include "emr_commonxp::EMRCommon.xjs";
  676. //<script type="javascript" src="../../../com/signweb/js/ZES001.js"/>
  677. //=======================================================================================
  678. var arErrorCode = new HashArray();
  679. function call_TRADB01101() {
  680. dsf_createDsRow("ds_req", [
  681. {col:"pid", type:"STRING", size:256, val:ds_send_data_patdata.getColumn(0,"pid")}
  682. , {col:"orddd", type:"STRING", size:256, val:ds_send_data_patdata.getColumn(0,"orddd")}
  683. , {col:"prcpdd", type:"STRING", size:256, val:ds_send_data_patdata.getColumn(0,"prcpdd")}
  684. , {col:"orddeptcd", type:"STRING", size:256, val:ds_send_data_patdata.getColumn(0,"orddeptcd")}
  685. , {col:"orddrid", type:"STRING", size:256, val:ds_send_data_patdata.getColumn(0,"orddrid")}
  686. , {col:"tpnstat", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnstat")}
  687. , {col:"tpnkind", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnkind")}
  688. , {col:"precd", type:"STRING", size:256, val:ds_send_data.getColumn(0,"precd")}
  689. ]);
  690. var oParam = {};
  691. oParam.id = "TRADB01101";
  692. oParam.service = "pharmacybaseapp.TpnMngt";
  693. oParam.method = "reqGetTPNOrder";
  694. oParam.inds = "req=ds_req";
  695. oParam.outds = "ds_main_tpninfo_ordinfo=ordinfo";
  696. oParam.async = false;
  697. // oParam.callback = "cf_TRADB01101";
  698. tranf_submit(oParam);
  699. }
  700. function call_TRADB01103() {
  701. dsf_createDsRow("ds_req", [
  702. {col:"pid", type:"STRING", size:256, val:ds_send_data_patdata.getColumn(0,"pid")}
  703. , {col:"orddd", type:"STRING", size:256, val:ds_send_data.getColumn(0,"orddd")}
  704. , {col:"prcpdd", type:"STRING", size:256, val:ds_send_data_tpndata.getColumn(0,"prcpdd")}
  705. , {col:"orddeptcd", type:"STRING", size:256, val:ds_send_data_tpndata.getColumn(0,"orddeptcd")}
  706. , {col:"orddrid", type:"STRING", size:256, val:ds_send_data_tpndata.getColumn(0,"orddrid")}
  707. , {col:"tpnstat", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnstat")}
  708. , {col:"tpnkind", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnkind")}
  709. ]);
  710. var oParam = {};
  711. oParam.id = "TRADB01103";
  712. oParam.service = "pharmacybaseapp.TpnMngt";
  713. oParam.method = "reqGetTPNPreOrder";
  714. oParam.inds = "req=ds_req";
  715. oParam.outds = "ds_main_preordinfo_item=item";
  716. oParam.async = false;
  717. //oParam.callback = "cf_TRADB01103";
  718. tranf_submit(oParam);
  719. }
  720. function SMADB01300_onload(obj:Form, e:LoadEventInfo)
  721. {
  722. frmf_initForm(obj); // 폼 초기화
  723. try{
  724. ds_temp_patdata.copyData(arg_ds_temp_patdata);
  725. }catch(e){}
  726. var node = utlf_transNullToEmpty(sysf_getGlobalVariable("paminfo")); // 상단 프로그램에 따라 정보(paminfo) get
  727. if (!utlf_isNull(node)) {
  728. dsf_setCSVToDs("ds_paminfo", node);
  729. }
  730. if ( ds_temp_patdata.getColumn(0,"orddeptcd")=="2110000000" ){
  731. ds_main.setColumn(0,"tpnkind","S");
  732. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  733. group3.iviewer1.fSp();
  734. }else{
  735. //소아TPN 초기 화면 설정_17.02.06
  736. //zbcfGetCodeList( new Array("A0090"), new Array("/root/hidden/tpndeptcd"));
  737. var arrParam = [{dsNm: "ds_init_A0090", cdGrpId: "A0090"}
  738. ];
  739. appf_getCodeList(arrParam);
  740. for (var i = 0; i < ds_init_A0090.rowcount; i++){
  741. if (ds_paminfo.getColumn(0,"wardcd") == ds_init_A0090.getColumn(i,"cdid")) {
  742. ds_main.setColumn(0,"tpnkind","S");
  743. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  744. group3.iviewer1.fSp();
  745. break;
  746. }
  747. }
  748. }
  749. if ( !utlf_isNull(ds_temp_patdata.getColumn(0,"tpnseqno"))) {
  750. ds_send_data.setColumn(0,"precd",ds_temp_patdata.getColumn(0,"tpnseqno"));
  751. ds_send_data.setColumn(0,"pid" ,ds_temp_patdata.getColumn(0,"pid"));
  752. ds_send_data.setColumn(0,"orddd",ds_temp_patdata.getColumn(0,"orddd"));
  753. // call_TRADB01101();
  754. dsf_createDsRow("ds_req", [
  755. {col:"pid", type:"STRING", size:256, val:ds_send_data.getColumn(0,"pid")}
  756. , {col:"orddd", type:"STRING", size:256, val:ds_send_data.getColumn(0,"orddd")}
  757. , {col:"prcpdd", type:"STRING", size:256, val:ds_send_data.getColumn(0,"prcpdd")}
  758. , {col:"orddeptcd", type:"STRING", size:256, val:ds_send_data.getColumn(0,"orddeptcd")}
  759. , {col:"orddrid", type:"STRING", size:256, val:ds_send_data.getColumn(0,"orddrid")}
  760. , {col:"tpnstat", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnstat")}
  761. , {col:"tpnkind", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnkind")}
  762. , {col:"precd", type:"STRING", size:256, val:ds_send_data.getColumn(0,"precd")}
  763. ]);
  764. var oParam = {};
  765. oParam.id = "TRADB01101";
  766. oParam.service = "pharmacybaseapp.TpnMngt";
  767. oParam.method = "reqGetTPNOrder";
  768. oParam.inds = "req=ds_req";
  769. oParam.outds = "ds_main_tpninfo_ordinfo=ordinfo";
  770. oParam.async = false;
  771. // oParam.callback = "cf_TRADB01101";
  772. tranf_submit(oParam);
  773. ds_main.setColumn(0,"tpnkind" ,ds_main_tpninfo_ordinfo.getColumn(0,"tpnkind"));
  774. ds_main_patinfo.setColumn(0,"pid" ,ds_temp_patdata.getColumn(0,"pid"));
  775. ds_main_patinfo.setColumn(0,"hngnm" ,ds_temp_patdata.getColumn(0,"hngnm"));
  776. ds_main_patinfo.setColumn(0,"agesex",ds_temp_patdata.getColumn(0,"agesex"));
  777. ds_main_patinfo.setColumn(0,"roomcd",ds_temp_patdata.getColumn(0,"roomcd"));
  778. ds_main_patinfo.setColumn(0,"drugno",ds_temp_patdata.getColumn(0,"drugno"));
  779. if ( ds_main.getColumn(0,"tpnkind") == "A") {
  780. group3.iviewer1.url = "ast_pharmacyxp::SSADB70300_성인TPN조성조회.xfdl";
  781. group4.btn_calc.visible = false;
  782. group3.iviewer1.fDisable();
  783. }else if( ds_main.getColumn(0,"tpnkind") == "C") {
  784. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  785. group4.btn_calc.visible = false;
  786. group3.iviewer1.fDisable();
  787. }else {
  788. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  789. group3.iviewer1.fSp();
  790. }
  791. }
  792. fInit();
  793. if ( !utlf_isNull(ds_temp_patdata.getColumn(0,"tpnseqno"))) {
  794. ds_send_data.setColumn(0,"precd",ds_temp_patdata.getColumn(0,"tpnseqno"));
  795. fPreView();
  796. }
  797. }
  798. function fCalc(){
  799. group3.iviewer1.fCalc();
  800. group3.iviewer1.fPrcpCalc();
  801. ds_main_tpninfo_ordinfo.setColumn(0,"prcpcd", group3.iviewer1.fGetPrcpCd());
  802. group4.btn_save.enable = true;
  803. //처방으로 전송
  804. ds_main_prcplist.clearData();
  805. var prcpcd = ds_main_tpninfo_ordinfo.getColumn(0,"prcpcd") ;
  806. fAddPrcpList(prcpcd, 1);
  807. }
  808. function fCalc2(){
  809. group3.iviewer1.fCalc2();
  810. }
  811. function fAntibioDetailCopy(srcRow, destRow){
  812. if( destRow > 0 ){
  813. if (!utlf_isNull(ds_main_tpninfo_ordinfo.getColumn(0,"tpnseqno"))) {
  814. ds_main_prcplist.setColumn(destRow,"druglnkno",ds_main_tpninfo_ordinfo.getColumn(0,"tpnseqno"));
  815. }
  816. if (!utlf_isNull(ds_main_tpninfo_ordinfo.getColumn(0,"prcpqty"))) {
  817. if ( utlf_isNull(ds_main_tpninfo_ordinfo.getColumn(0,"prcpqty"))) {
  818. ds_main_tpninfo_ordinfo.setColumn(0,"prcpqty","1");
  819. }
  820. ds_main_prcplist.setColumn(destRow,"prcpqty",ds_main_tpninfo_ordinfo.getColumn(0,"prcpqty"));
  821. }
  822. if (!utlf_isNull(ds_main_tpninfo_ordinfo.getColumn(0,"prcptims"))) {
  823. if ( utlf_isNull(ds_main_tpninfo_ordinfo.getColumn(0,"prcptims"))) {
  824. ds_main_tpninfo_ordinfo.setColumn(0,"prcptims","1");
  825. }
  826. ds_main_prcplist.setColumn(destRow,"prcptims",ds_main_tpninfo_ordinfo.getColumn(0,"prcptims"));
  827. }
  828. if ( !utlf_isNull(group3.iviewer1.fGetDrugSpd())) { //투여속도
  829. ds_main_prcplist.setColumn(destRow,"drugspd", group3.iviewer1.fGetDrugSpd());
  830. ds_main_prcplist.setColumn(destRow,"drugspdunitflag", "1");
  831. }
  832. }
  833. }
  834. function fAddPrcpList(prcpcd, srcRow) {
  835. var prcpdd = ds_temp_patdata.getColumn(0,"prcpdd");
  836. if(!frmf_isPopup()){
  837. lf_prcpSrchCom( prcpcd, prcpdd, "00", "TRMMO00100", "-", false, "getPrcpCdSrchInfo" );
  838. }else{
  839. lf_prcpSrchCom( prcpcd, prcpdd, opener.ds_paminfo.getColumn(0,"insukind"), "TRMMO00100", "-", false, "getPrcpCdSrchInfo" );
  840. }
  841. lf_appendChildPrcp( "ds_prcpsrch_prcplist" , "ds_main_prcplist", "main", "I" );
  842. if( srcRow > 0 ){
  843. fAntibioDetailCopy(srcRow, grd_prcplist.rows- grd_prcplist.fixedRows);
  844. }
  845. ds_send_data.setColumn(0,"tpnstat", "S");
  846. }
  847. function fGetCodeList() {
  848. var instcd = sysf_getUserInfo("dutplceinstcd");
  849. var standard_yn = "orduseyn";
  850. var ord_deptflag = "D";
  851. var rslt_ref = "ds_init_orddeptlist";
  852. appf_getDeptCodeList(instcd,standard_yn,ord_deptflag,"depthngnm","","","","",rslt_ref,true,"");
  853. }
  854. function fInitializePamInfo(){
  855. // var pamInfoCvs = utlf_transNullToEmpty(sysf_getGlobalVariable("paminfo")); // 상단 프로그램에 따라 정보(paminfo) get
  856. //
  857. // if(!utlf_isNull(pamInfoCvs)){ //cvs가 null이 아닌 경우에만 처리함.
  858. // //model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
  859. // //setCSVToNode ( "/root/paminfo", pamInfoCvs );
  860. // ds_paminfo_list.clearData();
  861. // dsf_setCSVToDs("ds_paminfo", pamInfoCvs);
  862. //
  863. // //var vopt_patinfo = model.getValue ( "/root/paminfo/list/pid" );
  864. // //vopt_patinfo = vopt_patinfo + " " + model.getValue ( "/root/paminfo/list/hngnm" );
  865. // //vopt_patinfo = vopt_patinfo + " " + model.getValue ( "/root/paminfo/list/sex" ) + "/" + model.getValue ( "/root/paminfo/list/age" );
  866. // //if ( model.getValue ( "/root/paminfo/list/roomcd" ) != "" ){
  867. // // vopt_patinfo = vopt_patinfo + " " + model.getValue ( "/root/paminfo/list/wardnm") + "/" + model.getValue ( "/root/paminfo/list/roomcd" );
  868. // //}
  869. // //model.setValue ( "/root/init/patinfo", vopt_patinfo );
  870. //
  871. // var vopt_patinfo = ds_paminfo_list.getColumn(0,"pid");
  872. // vopt_patinfo = vopt_patinfo + " " + ds_paminfo_list.getColumn(0,"hngnm");
  873. // vopt_patinfo = vopt_patinfo + " " + ds_paminfo_list.getColumn(0,"sex") + "/" + ds_paminfo_list.getColumn(0,"age")
  874. // if (!utlf_isNull(ds_paminfo_list.getColumn(0,"roomcd"))) {
  875. // vopt_patinfo = vopt_patinfo + " " + ds_paminfo_list.getColumn(0,"wardnm") + "/" + ds_paminfo_list.getColumn(0,"roomcd")
  876. // }
  877. // ds_init.setColumn(0,"patinfo", vopt_patinfo);
  878. //
  879. // //var patFlagCvs = getGlobalVariable("patflag");
  880. // //if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
  881. // // model.removeNodeSet ( "/root/patflag/list" ); //상단화면 정보 초기화
  882. // // setCSVToNode ( "/root/patflag", patFlagCvs );
  883. // // prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" );
  884. // //}
  885. // var patFlagCvs = utlf_transNullToEmpty(sysf_getGlobalVariable("patflag")); // 상단 프로그램에 따라 정보(paminfo) get
  886. // if(patFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
  887. // ds_patflag_list.clearData();
  888. // dsf_setCSVToDs("ds_patflag", patFlagCvs);
  889. // prcpgenrflag = ds_patflag_list.getColumn(0,"prcpgenrflag")
  890. // }
  891. //
  892. // //var operationFlagCvs = getGlobalVariable("operation");
  893. // //if(operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
  894. // // model.removeNodeSet ( "/root/operation/list" ); //상단화면 정보 초기화
  895. // // setCSVToNode ( "/root/operation", operationFlagCvs );
  896. // //}
  897. // var operationFlagCvs = utlf_transNullToEmpty(sysf_getGlobalVariable("operation")); // 상단 프로그램에 따라 정보(paminfo) get
  898. // if(operationFlagCvs.length != 0 ){ //cvs가 null이 아닌 경우에만 처리함.
  899. // ds_operation_list.clearData(); //상단화면 정보 초기화
  900. // dsf_setCSVToDs("ds_operation", operationFlagCvs);
  901. // }
  902. //
  903. //
  904. // //if ( prcpgenrflag == "O" ){ //외래일때
  905. // // model.setValue ( "/root/init/hosinprcpresncd", model.getValue ( "/root/paminfo/list/hosoutexptresncd" ));
  906. // // model.setValue ( "/root/init/prcpkindcd", "20" ); //처방종류(추가)
  907. // // model.setValue ( "/root/init/prcpdd", model.getValue ( "/root/paminfo/list/orddd" ));
  908. // //} else { //입원, 응급일때
  909. // // model.setValue ( "/root/init/hosinprcpresncd", "00");
  910. // // model.setValue ( "/root/init/prcpdd", getCurrentDate());
  911. // //
  912. // // if ( model.getValue( "/root/paminfo/list/indd" ) == getCurrentDate()) {
  913. // // model.setValue ( "/root/init/prcpkindcd", "00" );
  914. // // } else if ( eval (getCurrentTime().substr (0,2)) <= 4 ) { //처방종류: 4시전이면 정규
  915. // // model.setValue ( "/root/init/prcpkindcd", "10" );
  916. // // } else if ( eval (getCurrentTime().substr (0,2)) >= 21 ) { //9시 이후면 정규, 날짜는 다음날짜
  917. // // model.setValue ( "/root/init/prcpkindcd", "10" );
  918. // // var nextDay = getCurrentDate().toDate().getAddDate(1,"D").getDateFormat(); //다음날을 찾는다.
  919. // // model.setValue ( "/root/init/prcpdd", nextDay );
  920. // // } else { //추가처방
  921. // // model.setValue ( "/root/init/prcpkindcd", "20" );
  922. // // }
  923. // //}
  924. //
  925. // if ( prcpgenrflag == "O" ){ //외래일때
  926. // ds_init.setColumn(0,"hosinprcpresncd", ds_paminfo_list.getColumn(0,"hosoutexptresncd"));
  927. // ds_init.setColumn(0,"prcpkindcd", "20");
  928. // ds_init.setColumn(0,"prcpdd", ds_paminfo_list.getColumn(0,"orddd"));
  929. // } else { //입원, 응급일때
  930. // ds_init.setColumn(0,"hosinprcpresncd", "00");
  931. // ds_init.setColumn(0,"prcpdd", utlf_getCurrentDate());
  932. // if ( ds_paminfo_list.getColumn(0,"indd") == utlf_getCurrentDate()) {
  933. // ds_init.setColumn(0,"prcpkindcd", "00");
  934. // } else if ( eval (utlf_getCurrentTime().substr (0,2)) <= 4 ) { //처방종류: 4시전이면 정규
  935. // ds_init.setColumn(0,"prcpkindcd", "10");
  936. // } else if ( eval (utlf_getCurrentTime().substr (0,2)) >= 21 ) { //9시 이후면 정규, 날짜는 다음날짜
  937. // ds_init.setColumn(0,"prcpkindcd", "10");
  938. // var nextDay = utlf_getCurrentDate().toDate().utlf_getAddDate(1,"D").utlf_getDateFormat(); //다음날을 찾는다.
  939. // ds_init.setColumn(0,"prcpdd", nextDay);
  940. // } else { //추가처방
  941. // ds_init.setColumn(0,"prcpkindcd", "20");
  942. // }
  943. // }
  944. // return true;
  945. // } else{
  946. // //var msg = messageBox("환자를 ", "C002");
  947. // var msg = sysf_messageBox("환자를 ", "C002");
  948. // return false;
  949. // }
  950. }
  951. function fInit(){
  952. ds_send_data.setColumn(0,"tpnkind", ds_main.getColumn(0,"tpnkind"));
  953. var oParam = {};
  954. oParam.id = "TRADB01102";
  955. oParam.service = "pharmacybaseapp.TpnMngt";
  956. oParam.method = "reqGetTPNCode";
  957. oParam.inds = "req=ds_send_data";
  958. oParam.outds = "ds_tpncpdeinfo_tpncdlist_sellinfo=sellinfo ds_tpncpdeinfo_tpncdlist_makeinfo=makeinfo";
  959. oParam.async = false;
  960. //oParam.callback = "cf_TRADB01102";
  961. tranf_submit(oParam);
  962. ds_send_data_patdata.copyData(ds_temp_patdata);
  963. fView();
  964. }
  965. function fView() {
  966. if ( !utlf_isNull(ds_send_data_patdata.getColumn(0,"pid"))) {
  967. group3.iviewer1.ds_temp_patdata.setColumn(0,"pid" , ds_send_data_patdata.getColumn(0,"pid"));
  968. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddd" , ds_send_data_patdata.getColumn(0,"orddd"));
  969. group3.iviewer1.ds_temp_patdata.setColumn(0,"prcpdd" , ds_send_data_patdata.getColumn(0,"prcpdd"));
  970. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddeptcd" , ds_send_data_patdata.getColumn(0,"orddeptcd"));
  971. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddrid" , ds_send_data_patdata.getColumn(0,"orddrid"));
  972. group3.iviewer1.ds_temp_patdata.setColumn(0,"ioflag" , ds_send_data_patdata.getColumn(0,"ioflag"));
  973. group3.iviewer1.ds_temp_patdata.setColumn(0,"tpnseqno" , ds_send_data.getColumn(0,"precd"));
  974. ds_send_data_tpndata.copyData(ds_main_tpninfo_ordinfo);
  975. ds_send_data.setColumn(0,"tpnkind", ds_main.getColumn(0,"tpnkind"));
  976. call_TRADB01103();
  977. // group3.iviewer1.ds_main_tpninfo_ordinfo.copyData(ds_main_tpninfo_ordinfo);
  978. group3.iviewer1.fView();
  979. } else {
  980. dsf_makeValue(ds_send_data_patdata,"pid","string",ds_paminfo.getColumn(0,"pid"));
  981. dsf_makeValue(group3.iviewer1.ds_temp_patdata,"pid","string",ds_paminfo.getColumn(0,"pid"));
  982. if ( ds_paminfo.getColumn(0,"orddeptcd") == "2110000000" ) {
  983. ds_main.setColumn(0,"tpnkind","S");
  984. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  985. //group3.iviewer1.fView();
  986. group3.iviewer1.fSp();
  987. }
  988. ds_send_data_tpndata.copyData(ds_main_tpninfo_ordinfo);
  989. ds_send_data.setColumn(0,"tpnkind", ds_main.getColumn(0,"tpnkind"));
  990. call_TRADB01103();
  991. group3.iviewer1.fView();
  992. ds_send_data.setColumn(0,"precd",ds_main_preordinfo_item.getColumn(0,"precd"));
  993. fPreView();
  994. }
  995. //이선경 수정 2008-08-27 start( 상단에 환자정보 추가)
  996. if ( !utlf_isNull(ds_paminfo.getColumn(0,"pid"))) {
  997. ds_main_patinfo.setColumn(0,"pid" ,ds_paminfo.getColumn(0,"pid"));
  998. ds_main_patinfo.setColumn(0,"hngnm" ,ds_paminfo.getColumn(0,"hngnm"));
  999. ds_main_patinfo.setColumn(0,"agesex",ds_paminfo.getColumn(0,"age")+ "/" + ds_paminfo.getColumn(0,"sex") );
  1000. ds_main_patinfo.setColumn(0,"roomcd",ds_paminfo.getColumn(0,"roomcd"));
  1001. }
  1002. }
  1003. function fPreView(){
  1004. if ( utlf_isNull(ds_send_data.getColumn(0,"precd"))) {
  1005. return;
  1006. }
  1007. call_TRADB01101();
  1008. // group3.iviewer1.ds_temp_patdata.copyData(ds_temp_patdata);
  1009. // group3.iviewer1.ds_temp_patdata.setColumn(0,"tpnseqno", ds_send_data.getColumn(0,"precd"));
  1010. dsf_makeValue(group3.iviewer1.ds_temp_patdata,"tpnseqno","string",ds_send_data.getColumn(0,"precd"));
  1011. dsf_makeValue(group3.iviewer1.ds_send_data,"tpnseqno","string",ds_send_data.getColumn(0,"precd"));
  1012. group3.iviewer1.fView();
  1013. ds_main_tpninfo2_ordinfo.copyData(group3.iviewer1.ds_main_tpninfo_ordinfo);
  1014. var instcd = sysf_getUserInfo("dutplceinstcd");
  1015. if(instcd == "032") {
  1016. group3.iviewer1.fCalc();
  1017. }
  1018. }
  1019. function group3_input8_onchanged(obj:Calendar, e:ChangeEventInfo)
  1020. {
  1021. ds_temp_patdata.setColumn(0,"orddd", ds_temp_patdata.getColumn(0,"prcpdd"));
  1022. ds_send_data_patdata.setColumn(0,"prcpdd", ds_temp_patdata.getColumn(0,"prcpdd"));
  1023. ds_send_data_patdata.setColumn(0,"orddd", ds_temp_patdata.getColumn(0,"prcpdd"));
  1024. group3.iviewer1.ds_temp_patdata.setColumn(0,"prcpdd", ds_send_data_patdata.getColumn(0,"prcpdd"));
  1025. group3.iviewer1.ds_temp_patdata.setColumn(0,"orddd", ds_send_data_patdata.getColumn(0,"prcpdd"));
  1026. }
  1027. function group3_radio7_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  1028. {
  1029. // if (ds_main_tpninfo_ordinfo.getColumn(0,"cnstreqyn") == "N"){
  1030. // // window.load("SPADC61200_TPN열량요구량계산.xrw","modal","code", "left:100px; top:150px; width:790px; height:295px;min:hidden;max:hidden;resize:false;");
  1031. // frmf_modal("SPADC61200","SPADC61200",null,null,0,100,150,null,null,null,null,null,"M");
  1032. // }
  1033. }
  1034. function group3_grd_prcplist_onenteredit(obj:Grid, e:GridEditEventInfo)
  1035. {
  1036. if (e.col == obj.getBindCellIndex("body", "prcpdayno")) {
  1037. fGridfBatIpt( "prcpdayno" );
  1038. }
  1039. }
  1040. function group3_grd_prcplist_onselectchanged(obj:Grid, e:GridSelectEventInfo)
  1041. {
  1042. if( e.col == obj.getBindCellIndex("body", "prcpvol")) {
  1043. DrugCalc ("prcpvol" , e.row , "ds_main_prcplist");
  1044. } else if ( e.col == obj.getBindCellIndex("body", "prcpqty")) {
  1045. DrugCalc ( "prcpqty" , e.row , "ds_main_prcplist");
  1046. } else if ( e.col == obj.getBindCellIndex("body", "prcptims")) {
  1047. if ( ds_main_prcplist.getColumn(e.row,"prcpclscd") == "A2" ) {
  1048. fBaseMthd(e.row, "ds_main_prcplist"); //MMO001
  1049. }
  1050. }
  1051. }
  1052. function group3_grd_prcplist_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo)
  1053. {
  1054. if ( e.col == obj.getBindCellIndex("body", "prcpvol")) {
  1055. bfDrugCalc ( "prcpvol", e.row ,"ds_main_prcplist");
  1056. } else if ( e.col == obj.getBindCellIndex("body", "prcpqty")) {
  1057. bfDrugCalc ( "prcpqty", e.row ,"ds_main_prcplist");
  1058. }
  1059. }
  1060. function group3_grd_prcplist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  1061. {
  1062. var prcpclscd = ds_main_prcplist.getColumn(e.row,"prcpclscd");
  1063. var status = ds_main_prcplist.getColumn(e.row,"status");
  1064. if( e.row > -1 ) {
  1065. if ( e.col == obj.getBindCellIndex("body", "drugmthdspccdnm") && status != "S" ) {
  1066. if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") {
  1067. lf_prcpModal("SPMMO01900", 500, 200); //MMMOCommon
  1068. } else if ( prcpclscd == "B2" || prcpclscd == "B4" || prcpclscd == "B6" ) {
  1069. fGetSpc(e.row); //SMMMO00100
  1070. }
  1071. } else if ( group3.grd_prcplist.currentcol == "15" && status != "S" ) {
  1072. fPrcpdelivefact( "M" ); //SMMMO00100
  1073. } else if ( status != "S" ) {
  1074. fPrcpDetl(); //SMMMO00100
  1075. }
  1076. }
  1077. }
  1078. function group3_grd_prcplist_oncellclick(obj:Grid, e:GridClickEventInfo)
  1079. {
  1080. var ref = "ds_main_antibiodetaillist_info";
  1081. var flag = true;
  1082. var idx = 0;
  1083. var curRow = e.row;
  1084. // var lastRow = obj.rowcount-1;
  1085. if( curRow > -1 ){
  1086. if ( e.col == obj.getBindCellIndex("body", "prcpdayno")
  1087. || e.col == obj.getBindCellIndex("body", "prcpvol")
  1088. || e.col == obj.getBindCellIndex("body", "prcpqty")
  1089. || e.col == obj.getBindCellIndex("body", "prcptims") ) {
  1090. // obj.setFocus();
  1091. // obj.setCellPos(e.col);
  1092. obj.showEditor(true);
  1093. // obj.setEditCaret(-1); // 편집모드시 기 입력된 텍스트 젤 뒤쪽에 커서 위치하기
  1094. }
  1095. if ( e.col == obj.getBindCellIndex("body", "rem")) {
  1096. var prcpcd = ds_main_prcplist.getColumn(e.row,"prcpcd");
  1097. if( !utlf_isNull(this.objects[ref]) && objects[ref].rowcount > 0 ){
  1098. //var node = instance1.selectSingleNode(ref + "[prcpcd = '" + prcpcd + "']/prcpnm");
  1099. var node = objects[ref].lookup("prcpcd", prcpcd, "prcpnm");
  1100. if( !utlf_isNull(node) && node.length > 0 ){
  1101. flag = false;//추천항생제에서 선택된 항생제처방
  1102. }
  1103. }
  1104. if(flag){
  1105. //for(var i = 0; i < obj.rowcount; i++)
  1106. obj.setCellProperty("body", e.col, "edittype", "masknumber");
  1107. obj.showEditor(true);
  1108. }else{
  1109. //for(var i = 0; i < obj.rowcount; i++)
  1110. obj.setCellProperty("body", e.col, "edittype", "none");
  1111. }
  1112. }
  1113. }
  1114. }
  1115. function group3_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  1116. {
  1117. obj.updateToDataset();
  1118. trace("group3_radio1_onitemchanged e.postvalue = " + e.postvalue);
  1119. if ( e.postvalue == "A")
  1120. {
  1121. trace("group3_radio1_onitemchanged A");
  1122. group3.iviewer1.url = "ast_pharmacyxp::SSADB70300_성인TPN조성조회.xfdl";
  1123. group4.btn_calc.visible = false;
  1124. group3.iviewer1.fDisable();
  1125. }
  1126. else if( e.postvalue == "C")
  1127. {
  1128. trace("group3_radio1_onitemchanged C");
  1129. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  1130. group4.btn_calc.visible = false;
  1131. group3.iviewer1.fDisable();
  1132. }
  1133. else
  1134. {
  1135. trace("group3_radio1_onitemchanged S");
  1136. group3.iviewer1.url = "ast_pharmacyxp::SSADB70400_소아TPN조성조회.xfdl";
  1137. group3.iviewer1.fSp();
  1138. }
  1139. fInit();
  1140. }
  1141. function group4_button19_onclick(obj:Button, e:ClickEventInfo)
  1142. {
  1143. //window.load("SPADC61200_TPN열량요구량계산.xrw","modal","code", "left:100px; top:150px; width:790px; height:295px;min:hidden;max:hidden;resize:false;");
  1144. frmf_modal("SPADC61200", "SPADC61200", null, null, 0, 0, 0, null, null, null, null, null, "M");
  1145. }
  1146. function group4_btn_save_onclick(obj:Button, e:ClickEventInfo)
  1147. {
  1148. // ds_send_data_patdata.copyData(ds_temp_patdata);
  1149. // ds_send_data_tpndata.copyData(ds_main_tpninfo_ordinfo);
  1150. call_TXADB01101();
  1151. call_TRADB01101();
  1152. group3.iviewer1.ds_send_data.setColumn(0,"tpnseqno", ds_main_tpninfo_ordinfo.getColumn(0,"tpnseqno"));
  1153. group3.iviewer1.fSave();
  1154. group4.btn_con.enable = true;
  1155. }
  1156. function call_TXADB01101() {
  1157. dsf_createDsRow("ds_req", [
  1158. {col:"pid", type:"STRING", size:256, val:ds_temp_patdata.getColumn(0,"pid")}
  1159. , {col:"orddd", type:"STRING", size:256, val:ds_temp_patdata.getColumn(0,"orddd")}
  1160. , {col:"prcpdd", type:"STRING", size:256, val:ds_temp_patdata.getColumn(0,"prcpdd")}
  1161. , {col:"orddeptcd", type:"STRING", size:256, val:ds_temp_patdata.getColumn(0,"orddeptcd")}
  1162. , {col:"orddrid", type:"STRING", size:256, val:ds_temp_patdata.getColumn(0,"orddrid")}
  1163. , {col:"tpnstat", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnstat")}
  1164. , {col:"tpnseqno", type:"INT", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"tpnseqno")}
  1165. , {col:"tpnkind", type:"STRING", size:256, val:ds_send_data.getColumn(0,"tpnkind")}
  1166. , {col:"cnstreqyn", type:"STRING", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"cnstreqyn")}
  1167. , {col:"prcpqty", type:"BIGDECIMAL", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"prcpqty")}
  1168. , {col:"prcptims", type:"INT", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"prcptims")}
  1169. , {col:"drugpath", type:"STRING", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"drugpath")}
  1170. , {col:"testordspec", type:"STRING", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"testordspec")}
  1171. , {col:"prcpcd", type:"STRING", size:256, val:ds_main_tpninfo_ordinfo.getColumn(0,"prcpcd")}
  1172. , {col:"execprcpuniqno", type:"INT", size:256, val:"0"}
  1173. ]);
  1174. dsf_setDefaultVal(ds_send_req, "tpnseqno:0");
  1175. var oParam = {};
  1176. oParam.id = "TXADB01101";
  1177. oParam.service = "pharmacybaseapp.TpnMngt";
  1178. oParam.method = "reqExeTPNOrder";
  1179. oParam.inds = "req=ds_req";
  1180. oParam.outds = "ds_temp_ret=item";
  1181. oParam.async = false;
  1182. //oParam.callback = "cf_TXADB01101";
  1183. tranf_submit(oParam);
  1184. }
  1185. function group4_btn_cle_onclick(obj:Button, e:ClickEventInfo)
  1186. {
  1187. this.close();
  1188. }
  1189. function group4_btn_calc_onclick(obj:Button, e:ClickEventInfo)
  1190. {
  1191. fCalc();
  1192. ds_send_data.setColumn(0,"tpnstat","S")
  1193. }
  1194. function group4_btn_con_onclick(obj:Button, e:ClickEventInfo)
  1195. {
  1196. if ( utlf_isNull(ds_main_tpninfo_ordinfo.getColumn(0,"drugpath")) ) {
  1197. sysf_messageBox("경로를 선택하십시오.", "C010");
  1198. return;
  1199. }
  1200. //저장
  1201. // ds_send_data_patdata.copyData(ds_temp_patdata);
  1202. // ds_send_data_tpndata.copyData(ds_main_tpninfo_ordinfo);
  1203. call_TXADB01101();
  1204. ds_main_tpninfo_ordinfo.setColumn(0,"tpnseqno",ds_temp_ret_item.getColumn(0,"tpnseqno"));
  1205. ds_main_prcplist.setColumn(0,"tpnseqno",ds_main_tpninfo_ordinfo.getColumn(0,"tpnseqno"));
  1206. group3.iviewer1.ds_send_data.setColumn(0,"tpnseqno",ds_main_tpninfo_ordinfo.getColumn(0,"tpnseqno"));
  1207. group3.iviewer1.fSave();
  1208. //확인
  1209. //if ( opener.model.getValue ( "/root/usge" ) == "prms" ) {
  1210. // var srcNodeList = model.instances(0).selectNodes("/root/main/prcp/prcplist");
  1211. // var destNode = opener.model.instances(0).selectSingleNode("/root/main/prcp");
  1212. // var cnt = 0;
  1213. // for ( i=0; i < srcNodeList.length; i++ ){
  1214. // cnt = i + 1;
  1215. // if ( model.getValue ( "/root/main/prcp/prcplist[" + cnt + "]/status") == "I" ) {
  1216. // destNode.appendChild(srcNodeList.item(i).cloneNode(true));
  1217. // }
  1218. // }
  1219. //} else {
  1220. // addPrcp ( "child", "/root/main/prcp/prcplist", "/root/main/prcp", "Y", "status", "I", grd_prcplist, "Y", "00");
  1221. //}
  1222. if ( opener.ds_root.getColumn(0,"usge") == "prms" ) {
  1223. // var srcNodeList = ds_main_prcplist;
  1224. // var destNode = ds_main_prcp.getColumn(0,"prcpnm")
  1225. var cnt = 0;
  1226. for ( var i = 0; i < srcNodeList.rowcount; i++ ){
  1227. // if ( srcNodeList.getColumn(cnt,"status") == "I" ) {
  1228. // destNode.lf_appendChildPrcp(srcNodeList.item(i).cloneNode(true));
  1229. // }
  1230. lf_appendChildPrcp ( "ds_main_prcplist" , "ds_main_prcplist", "child", "I" );
  1231. cnt = i + 1;
  1232. }
  1233. } else {
  1234. lf_addPrcp ( "child", "ds_main_prcplist", "ds_main_prcplist", "Y", "status", "I", group3.grd_prcplist, "Y", "00");
  1235. }
  1236. this.close();
  1237. }
  1238. function group4_button1_onclick(obj:Button, e:ClickEventInfo)
  1239. {
  1240. //exeReportPreview("RFADB01101", "XMLSTR", "", "", "true","","","","","true", "", "");
  1241. var objDOM = rptf_createDOM(); // DOM 객체 설정
  1242. var instcd = sysf_getUserInfo("dutplceinstcd");
  1243. ds_main_patinfo.addColumn("instcd", "string");
  1244. ds_main_patinfo.setColumn(0,"instcd", instcd);
  1245. rptf_setNodeListToDOM(objDOM, "/root/main/tpninfo2/ordinfo" , ds_main_tpninfo2_ordinfo); // 데이터셋 1
  1246. rptf_setNodeListToDOM(objDOM, "/root/main/patinfo" , ds_main_patinfo); // 데이터셋 2
  1247. rptf_setNodeListToDOM(objDOM, "/root/main/preordinfo/item" , ds_main_preordinfo_item); // 데이터셋 3
  1248. rptf_setNodeListToDOM(objDOM, "/root/main/tpninfo/ordinfo" , ds_main_tpninfo_ordinfo); // 데이터셋 4
  1249. rptf_setNodeListToDOM(objDOM, "/root/temp/patdata" , ds_temp_patdata); // 데이터셋 5
  1250. var objParam = new Object();
  1251. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  1252. var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1";
  1253. rptf_exeReportPreview30(["RFADB01101"],[objParam], option);
  1254. }
  1255. function group4_button2_onclick(obj:Button, e:ClickEventInfo)
  1256. {
  1257. //modal("SPADB62500",0,0,0,"SPADB62500","/root/send/data/patdata/pid","/root/send/srchdata/pid");
  1258. var objArg = new Object();
  1259. objArg.arg_ds_temp_patdata = ds_send_data_patdata;
  1260. frmf_modal("SPADB62500", "SPADB62500", objArg, null, 0, 0, 0, null, null, null, null, null, "M");
  1261. }
  1262. function group3_cmb_preorder_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1263. {
  1264. ///////2016.6.14 김치국 투약번호
  1265. var sel_str = e.posttext;
  1266. var lennum = sel_str.length;
  1267. var cut_str = sel_str.substr(lennum -7, 7);
  1268. ds_main_patinfo.setColumn(0,"drugno",cut_str);
  1269. fPreView();
  1270. }]]></Script>
  1271. </Form>
  1272. </FDL>