SPMMO12100_일괄입력약.xfdl 58 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPMMO12100" position="absolute 0 0 408 357" titletext="일괄입력[약]" oninit="SPMMO12100_oninit" onload="SPMMO12100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static position="absolute 0 307 100 330" id="caption16" class="cell_1"/>
  8. <Static position="absolute 0 255 100 278" id="caption14" class="cell_1"/>
  9. <Static position="absolute 205 229 306 252" id="caption13" class="cell_1"/>
  10. <Static position="absolute 0 203 100 226" id="caption10" class="cell_1"/>
  11. <Button position="absolute 292 337 348 357" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
  12. <Button position="absolute 352 337 408 357" id="button2" class="btn3" text="취소" onclick="button2_onclick"/>
  13. <Static position="absolute 205 22 305 45" id="caption8" class="cell_1"/>
  14. <Static position="absolute 205 177 305 200" id="caption7" class="cell_1"/>
  15. <Static position="absolute 205 151 305 174" id="caption6" class="cell_1"/>
  16. <Static position="absolute 0 74 100 124" id="caption3" class="cell_1"/>
  17. <Static position="absolute 0 177 100 200" id="caption2" class="cell_1"/>
  18. <Static position="absolute 0 151 100 174" id="caption5" class="cell_1"/>
  19. <Static position="absolute 205 48 305 71" id="caption4" class="cell_1"/>
  20. <Static position="absolute 0 22 100 45" id="caption1" class="cell_1"/>
  21. <CheckBox position="absolute 5 23 97 43" id="checkbox1" text="응급" truevalue="Y" falsevalue="N" onclick="checkbox1_onclick"/>
  22. <CheckBox position="absolute 210 49 302 69" id="checkbox2" text="PRN" falsevalue="N" truevalue="Y" onclick="checkbox2_onclick"/>
  23. <CheckBox position="absolute 5 152 97 172" id="checkbox3" falsevalue="N" truevalue="Y" text="Prep" onclick="checkbox3_onclick"/>
  24. <CheckBox position="absolute 5 178 97 198" id="checkbox4" falsevalue="N" text="pow" truevalue="Y" onclick="checkbox4_onclick"/>
  25. <Shape position="absolute 0 173 408 179" linetype="horizontal" id="line15" class="line_2" style="strokepen:1 solid #dedcdcff;"/>
  26. <CheckBox position="absolute 5 73 77 98" id="checkbox5" text="전달사항" falsevalue="N" truevalue="Y" onclick="checkbox5_onclick"/>
  27. <CheckBox position="absolute 210 152 302 172" id="checkbox6" text="선처치" falsevalue="N" truevalue="Y" onclick="checkbox6_onclick"/>
  28. <CheckBox position="absolute 210 178 302 198" id="checkbox7" text="임상연구" falsevalue="N" truevalue="Y" onclick="checkbox7_onclick"/>
  29. <Shape position="absolute 0 70 408 76" linetype="horizontal" id="line1" style="strokepen:1 solid #dedcdcff;"/>
  30. <Combo position="absolute 308 24 408 44" id="combo1" innerdataset="ds_M0029" datacolumn="cdnm" codecolumn="cdid"/>
  31. <CheckBox position="absolute 210 23 302 43" id="checkbox8" truevalue="Y" falsevalue="N" text="급여" onclick="checkbox8_onclick"/>
  32. <Shape position="absolute 0 199 408 205" linetype="horizontal" id="line2" style="strokepen:1 solid #dedcdcff;"/>
  33. <Shape position="absolute 0 225 408 231" linetype="horizontal" id="line3" style="strokepen:1 solid #dedcdcff;"/>
  34. <TextArea position="absolute 102 74 408 124" id="textarea1" acceptstab="true" wordwrap="word"/>
  35. <Static position="absolute 205 203 305 226" id="caption9" class="cell_1"/>
  36. <CheckBox position="absolute 210 204 302 224" id="checkbox9" text="시행부서" falsevalue="N" truevalue="Y" onclick="checkbox9_onclick"/>
  37. <CheckBox position="absolute 104 23 204 43" id="checkbox10" falsevalue="N" text="응급" truevalue="Y"/>
  38. <CheckBox position="absolute 309 49 401 69" id="checkbox11" text="PRN" falsevalue="N" truevalue="Y"/>
  39. <CheckBox position="absolute 104 152 204 172" id="checkbox12" falsevalue="N" truevalue="Y" text="Prep"/>
  40. <CheckBox position="absolute 104 178 204 198" id="checkbox13" text="pow" falsevalue="N" truevalue="Y"/>
  41. <CheckBox position="absolute 309 152 401 172" id="checkbox14" falsevalue="N" truevalue="Y" text="선처치"/>
  42. <CheckBox position="absolute 309 178 401 198" id="checkbox15" falsevalue="N" truevalue="Y" text="임상연구"/>
  43. <Shape position="absolute 0 329 408 335" id="line4" class="line_3"/>
  44. <CheckBox position="absolute 104 204 204 224" id="checkbox16" text="self" falsevalue="N" truevalue="Y"/>
  45. <CheckBox position="absolute 5 204 97 224" id="checkbox17" falsevalue="N" text="self" truevalue="Y" onclick="checkbox17_onclick"/>
  46. <Shape position="absolute 0 251 408 257" linetype="horizontal" id="line5" style="strokepen:1 solid #dedcdcff;"/>
  47. <Static position="absolute 0 229 100 252" id="caption12" class="cell_1"/>
  48. <CheckBox position="absolute 5 230 97 250" id="checkbox21" text="수량" falsevalue="N" truevalue="Y" onclick="checkbox21_onclick"/>
  49. <Edit position="absolute 102 231 201 251" id="input1" autoselect="true" imemode="hangul"/>
  50. <CheckBox position="absolute 210 230 302 250" id="checkbox20" text="일수" falsevalue="N" truevalue="Y" onclick="checkbox20_onclick"/>
  51. <Edit position="absolute 308 231 408 251" id="input2" autoselect="true" imemode="hangul"/>
  52. <CheckBox position="absolute 5 256 97 276" id="checkbox22" text="횟수" falsevalue="N" truevalue="Y" onclick="checkbox22_onclick"/>
  53. <Static position="absolute 0 281 100 304" id="caption15" class="cell_1"/>
  54. <CheckBox position="absolute 5 282 97 302" id="checkbox23" text="용법" falsevalue="N" truevalue="Y" onclick="checkbox23_onclick"/>
  55. <Edit position="absolute 102 256 201 276" id="input3" autoselect="true" onkeydown="input3_onkeydown" imemode="hangul"/>
  56. <Shape position="absolute 0 277 408 283" linetype="horizontal" id="line11" style="strokepen:1 solid #dedcdcff;"/>
  57. <Combo position="absolute 308 205 408 225" id="combo2" innerdataset="@ds_orddept" datacolumn="depthngnm" codecolumn="deptcd"/>
  58. <Edit readonly="true" position="absolute 308 283 408 303" id="output1" visible="false"/>
  59. <Edit readonly="true" position="absolute 102 283 408 303" id="output2" autoselect="true"/>
  60. <Grid position="absolute 0 335 20 349" id="grd_prcplist" visible="false">
  61. <Formats>
  62. <Format id="default">
  63. <Columns>
  64. <Column size="100"/>
  65. </Columns>
  66. <Rows>
  67. <Row size="24" band="head"/>
  68. <Row size="24"/>
  69. </Rows>
  70. <Band id="head">
  71. <Cell text="caption3"/>
  72. </Band>
  73. <Band id="body">
  74. <Cell/>
  75. </Band>
  76. </Format>
  77. </Formats>
  78. </Grid>
  79. <CheckBox position="absolute 5 308 97 328" id="checkbox24" text="원내/원외" falsevalue="N" truevalue="Y" onclick="checkbox24_onclick"/>
  80. <Shape position="absolute 0 303 408 309" linetype="horizontal" id="line12" style="strokepen:1 solid #dedcdcff;"/>
  81. <Radio position="absolute 103 308 188 328" id="radio1" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="radio1_onitemchanged">
  82. <Dataset id="innerdataset">
  83. <ColumnInfo>
  84. <Column id="codecolumn"/>
  85. <Column id="datacolumn"/>
  86. </ColumnInfo>
  87. <Rows>
  88. <Row>
  89. <Col id="codecolumn">I</Col>
  90. <Col id="datacolumn">원내</Col>
  91. </Row>
  92. <Row>
  93. <Col id="codecolumn">O</Col>
  94. <Col id="datacolumn">원외</Col>
  95. </Row>
  96. </Rows>
  97. </Dataset>
  98. </Radio>
  99. <Combo position="absolute 189 308 408 328" id="combo3" innerdataset="ds_P0323" datacolumn="cdnm" codecolumn="cdid" onitemchanged="combo3_onitemchanged"/>
  100. <Button position="absolute 20 332 35 352" id="button3" visible="false" text="button3" onclick="button3_onclick"/>
  101. <Static text="공통" position="absolute 0 0 121 20" id="caption18" class="tit_2"/>
  102. <Shape position="absolute 0 44 408 50" linetype="horizontal" id="line14" style="strokepen:1 solid #dedcdcff;"/>
  103. <Static text="약" position="absolute 0 129 121 149" id="caption17" class="tit_2"/>
  104. <Button position="absolute 78 75 98 95" id="button4" class="icon_search" text="" onclick="button4_onclick"/>
  105. <Static position="absolute 205 255 306 278" id="caption11" class="cell_1"/>
  106. <CheckBox position="absolute 210 256 302 276" id="bool1" text="기왕증" falsevalue="N" truevalue="Y" onclick="bool1_onclick"/>
  107. <Static position="absolute 0 48 100 71" id="caption20" class="cell_1"/>
  108. <CheckBox position="absolute 104 49 204 69" id="checkbox18" falsevalue="N" truevalue="Y" text="따로포장"/>
  109. <CheckBox position="absolute 5 49 97 69" id="checkbox19" text="따로포장" falsevalue="N" truevalue="Y" onclick="checkbox19_onclick"/>
  110. <Shape id="line13" type="rectangle" radiusy="0" position="absolute 0 18 408 21" style="strokepen:0 solid #33bbbbff;fillbrush:solid #33bbbbff true;"/>
  111. <Shape id="line7" type="rectangle" radiusy="0" position="absolute 0 147 408 150" style="strokepen:0 solid #33bbbbff;fillbrush:solid #33bbbbff true;"/>
  112. <Button id="Button00" taborder="1" position="absolute 102 283 408 303" style="background:transparent;border:1 solid #9ebed4ff #9ebed4ff;" ondblclick="Button00_ondblclick"/>
  113. </Layout>
  114. </Layouts>
  115. <Objects>
  116. <Dataset id="ds_main_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  117. <ColumnInfo>
  118. <Column id="status" type="STRING" size="256" sumtext="입력,수정,삭제,d/c"/>
  119. <Column id="prcpstatcd" type="STRING" size="256" sumtext="처방상태코드"/>
  120. <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
  121. <Column id="prcpkindcd" type="STRING" size="256" sumtext="처방종류코드"/>
  122. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  123. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  124. <Column id="prcpvol" type="STRING" size="256" sumtext="처방용량"/>
  125. <Column id="prcpvolunitnm" type="STRING" size="256" sumtext="처방용량단위명"/>
  126. <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
  127. <Column id="prcpqtyunitnm" type="STRING" size="256" sumtext="처방수량단위명"/>
  128. <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
  129. <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
  130. <Column id="drugmthdspccdnm" type="STRING" size="256" sumtext="투여방법검체코드명"/>
  131. <Column id="prcpmixno" type="STRING" size="256" sumtext="처방mix번호"/>
  132. <Column id="payflagcd" type="STRING" size="256" sumtext="급여구분코드"/>
  133. <Column id="prcpdelivefact" type="STRING" size="256" sumtext="전달사항"/>
  134. <Column id="hosinhosoutflag" type="STRING" size="256" sumtext="원내/원외구분"/>
  135. <Column id="prcpexecdeptcd" type="STRING" size="256" sumtext="처방실시부서코드"/>
  136. <Column id="prcphopedd" type="STRING" size="256" sumtext="처방희망일시"/>
  137. <Column id="choiordflag" type="STRING" size="256" sumtext="선택진료구분"/>
  138. <Column id="rgstdt" type="STRING" size="256" sumtext="등록일시"/>
  139. <Column id="rgstridnm" type="STRING" size="256" sumtext="등록자명"/>
  140. <Column id="testrsltunit" type="STRING" size="256" sumtext="검사결과단위"/>
  141. <Column id="testrsltcnts" type="STRING" size="256" sumtext="검사결과"/>
  142. <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
  143. <Column id="prcphistcd" type="STRING" size="256" sumtext="처방이력코드"/>
  144. <Column id="tempprcpflag" type="STRING" size="256" sumtext="임시처방구분"/>
  145. <Column id="prcpsetcd" type="STRING" size="256" sumtext="처방set코드"/>
  146. <Column id="prcpvolunitflag" type="STRING" size="256" sumtext="처방용량단위구분"/>
  147. <Column id="prcpqtyunitflag" type="STRING" size="256" sumtext="처방수량단위구분"/>
  148. <Column id="orgprcpqty" type="STRING" size="256" sumtext="실제처방수량"/>
  149. <Column id="drugspd" type="STRING" size="256" sumtext="투여속도"/>
  150. <Column id="drugspdunitflag" type="STRING" size="256" sumtext="투여속도단위구분"/>
  151. <Column id="powdflag" type="STRING" size="256" sumtext="파우더구분"/>
  152. <Column id="prnprcpflag" type="STRING" size="256" sumtext="prn처방구분"/>
  153. <Column id="prepprcpflag" type="STRING" size="256" sumtext="prep처방구분"/>
  154. <Column id="selfprcpflag" type="STRING" size="256" sumtext="자가처방구분"/>
  155. <Column id="selfdrugflag" type="STRING" size="256" sumtext="self약구분"/>
  156. <Column id="drugpackflag" type="STRING" size="256" sumtext="투약포장구분"/>
  157. <Column id="erprcpflag" type="STRING" size="256" sumtext="응급처방구분"/>
  158. <Column id="precureprcpflag" type="STRING" size="256" sumtext="선처치처방구분"/>
  159. <Column id="nigtprcpflag" type="STRING" size="256" sumtext="야간처방구분"/>
  160. <Column id="portprcpflag" type="STRING" size="256" sumtext="포터블처방구분"/>
  161. <Column id="fixprcpflag" type="STRING" size="256" sumtext="정액처방구분"/>
  162. <Column id="anamneflag" type="STRING" size="256" sumtext="기왕증(력)구분"/>
  163. <Column id="fastprcpflag" type="STRING" size="256" sumtext="금식처방구분"/>
  164. <Column id="erreadflag" type="STRING" size="256" sumtext="응급판독구분"/>
  165. <Column id="prcpdirecflag" type="STRING" size="256" sumtext="처방방향구분"/>
  166. <Column id="tnsuseflag" type="STRING" size="256" sumtext="수혈사용구분"/>
  167. <Column id="tnsfiltflag" type="STRING" size="256" sumtext="수혈필터구분"/>
  168. <Column id="trnptbftestflag" type="STRING" size="256" sumtext="이식전검사구분"/>
  169. <Column id="offictourhealexamflag" type="STRING" size="256" sumtext="출장건진구분"/>
  170. <Column id="stemcellflag" type="STRING" size="256" sumtext="조혈모(줄기)세포구분"/>
  171. <Column id="angioflagcd" type="STRING" size="256" sumtext="angio구분"/>
  172. <Column id="opansflagcd" type="STRING" size="256" sumtext="수술마취구분"/>
  173. <Column id="ansttm" type="STRING" size="256" sumtext="마취시간"/>
  174. <Column id="mealcalrcnts" type="STRING" size="256" sumtext="식이열량함량"/>
  175. <Column id="mealprotcnts" type="STRING" size="256" sumtext="식이단백질함량"/>
  176. <Column id="mealupdtflag" type="STRING" size="256" sumtext="식이수정구분"/>
  177. <Column id="hosinprcpresncd" type="STRING" size="256" sumtext="원내처방사유코드"/>
  178. <Column id="etcprcpresncd" type="STRING" size="256" sumtext="기타처방사유코드"/>
  179. <Column id="drugmthdspccd" type="STRING" size="256" sumtext="투여방법검체코드"/>
  180. <Column id="issdeptcd" type="STRING" size="256" sumtext="발행부서코드"/>
  181. <Column id="prcpauthflag" type="STRING" size="256" sumtext="처방권한구분"/>
  182. <Column id="prcpinptflag" type="STRING" size="256" sumtext="처방입력구분"/>
  183. <Column id="prcpsignflag" type="STRING" size="256" sumtext="처방서명구분"/>
  184. <Column id="rateprcpflag" type="STRING" size="256" sumtext="비율처방구분"/>
  185. <Column id="prcprefseq" type="STRING" size="256" sumtext="처방조회순서"/>
  186. <Column id="ordreqlnkno" type="STRING" size="256" sumtext="진료의뢰연결번호"/>
  187. <Column id="testreqlnkno" type="STRING" size="256" sumtext="검사의뢰연결번호"/>
  188. <Column id="prcplnkdd" type="STRING" size="256" sumtext="처방연계일자"/>
  189. <Column id="prcplnkno" type="STRING" size="256" sumtext="처방연계번호"/>
  190. <Column id="oprsrvno" type="STRING" size="256" sumtext="수술예약번호"/>
  191. <Column id="tootfact" type="STRING" size="256" sumtext="치식사항"/>
  192. <Column id="clinccmtcnts" type="STRING" size="256" sumtext="임상소견내용"/>
  193. <Column id="prcpessninptflag" type="STRING" size="256" sumtext="처방필수입력구분"/>
  194. <Column id="grupsnglflag" type="STRING" size="256" sumtext="그룹싱글구분"/>
  195. <Column id="drugrateqty" type="STRING" size="256" sumtext="투약비율수랑"/>
  196. <Column id="asttestflag" type="STRING" size="256" sumtext="ast검사구분"/>
  197. <Column id="clincstdyflag" type="STRING" size="256" sumtext="임상연구구분"/>
  198. <Column id="prtlno" type="STRING" size="256" sumtext="프로토콜번호"/>
  199. <Column id="clincstdycd" type="STRING" size="256" sumtext="임상연구코드"/>
  200. <Column id="optermcd" type="STRING" size="256" sumtext="수술용어"/>
  201. <Column id="prcpflag" type="STRING" size="256" sumtext="처방구분"/>
  202. <Column id="hscttempprcpflag" type="STRING" size="256" sumtext="hsct임시처방구분"/>
  203. <Column id="inclprcpcd" type="STRING" size="256" sumtext="종속처방코드"/>
  204. <Column id="inclprcpno" type="STRING" size="256" sumtext="종속처방번호"/>
  205. <Column id="pampkspec" type="STRING" size="256" sumtext="원무pk내역"/>
  206. <Column id="prcppkspec" type="STRING" size="256" sumtext="처방pk내역"/>
  207. <Column id="calcscormastspec" type="STRING" size="256" sumtext="수가마스터내역"/>
  208. <Column id="drugmastspec" type="STRING" size="256" sumtext="약품마스터내역"/>
  209. <Column id="rateprcpspec" type="STRING" size="256" sumtext="비율처방내역"/>
  210. <Column id="matrsetprcpspec" type="STRING" size="256" sumtext="재료set처방내역"/>
  211. <Column id="suppdeptspec" type="STRING" size="256" sumtext="지원부서내역"/>
  212. <Column id="contprcpspec" type="STRING" size="256" sumtext="연속처방내역"/>
  213. <Column id="etclnkspec" type="STRING" size="256" sumtext="기타연계내역"/>
  214. <Column id="srchcondcnts" type="STRING" size="256" sumtext="검색조건내용"/>
  215. <Column id="orgprcpnm" type="STRING" size="256" sumtext="수가처방명"/>
  216. <Column id="chkcol" type="STRING" size="256" sumtext="전처방check표시"/>
  217. <Column id="hsctdelivepos" type="STRING" size="256" sumtext="hsct전달위치"/>
  218. <Column id="hsctlnkno" type="STRING" size="256" sumtext="hsct연계번호"/>
  219. <Column id="etcprcpflag" type="STRING" size="256" sumtext="기타처방구분"/>
  220. <Column id="aftcertflag" type="STRING" size="256" sumtext="후인증구분"/>
  221. <Column id="aftcertdrid" type="STRING" size="256" sumtext="후인증대상의사id"/>
  222. <Column id="prcpvalidd" type="STRING" size="256" sumtext="처방유효일자"/>
  223. <Column id="spynpy1" type="STRING" size="256" sumtext="환자급비유형"/>
  224. <Column id="specdrid" type="STRING" size="256" sumtext="선택진료의id"/>
  225. <Column id="specdrnm" type="STRING" size="256" sumtext="선택진료의명"/>
  226. <Column id="anticncrprtlno" type="STRING" size="256" sumtext="항암프로토콜에대한코드로일련번호형태로관리"/>
  227. <Column id="anticncrdayno" type="STRING" size="256" sumtext="항암프로토콜의실시차수"/>
  228. <Column id="druglnkno" type="STRING" size="256" sumtext="항암프로토콜,tpn처방의처방번호"/>
  229. <Column id="rehbprcpcurefreqflag" type="STRING" size="256" sumtext="재활처방치료빈도"/>
  230. <Column id="dietprcpgenrflag" type="STRING" size="256" sumtext="식이처방발생구분"/>
  231. <Column id="irpayflag" type="STRING" size="256" sumtext="irradiation급비구분"/>
  232. <Column id="irflag" type="STRING" size="256" sumtext="irradiation구분"/>
  233. <Column id="procerdietflag" type="STRING" size="256" sumtext="보호자식이구분"/>
  234. <Column id="diagtestconttestintvlflag" type="STRING" size="256" sumtext="진단검사연속검사기본시간"/>
  235. <Column id="drugindependpackflag" type="STRING" size="256" sumtext="따로포장구분"/>
  236. <Column id="diagtestconttestbasetm" type="STRING" size="256" sumtext="진단검사연속검사기본시간"/>
  237. <Column id="diagtestconttestorgtims" type="STRING" size="256" sumtext="진단검사연속검사원횟수"/>
  238. <Column id="ermediscmngtresncd" type="STRING" size="256" sumtext="응급의학관리료사유코드"/>
  239. <Column id="rehbprcpenddd" type="STRING" size="256" sumtext="재활처방마감일자"/>
  240. <Column id="matrallsizespecid" type="STRING" size="256" sumtext="재료allsize규격id"/>
  241. <Column id="rehbprcpcurepartcd" type="STRING" size="256" sumtext="재활처방치료부위"/>
  242. <Column id="lowdrugresncd" type="STRING" size="256" sumtext="저함량배수사유코드"/>
  243. <Column id="tfdtlcd" type="STRING" size="256" sumtext="경장영양식세부코드"/>
  244. <Column id="dnorreqlnkno" type="STRING" size="256" sumtext="hla검사의뢰지"/>
  245. <Column id="subcretno" type="STRING" size="256" sumtext="기왕증,임상연구보조유형"/>
  246. <Column id="exptmthdfact" type="STRING" size="256" sumtext="예외용법설명"/>
  247. <Column id="lowdrugresnetcfact" type="STRING" size="256" sumtext="기타저함량배수상세사유"/>
  248. <Column id="diagtestconttestcdspec" type="STRING" size="256" sumtext="진단검사연속검사코드내역"/>
  249. <Column id="drgacptflag" type="STRING" size="256" sumtext="drg인정flag"/>
  250. <Column id="drprcpetc1" type="STRING" size="256" sumtext="의사처방기타1"/>
  251. <Column id="drprcpetc2" type="STRING" size="256" sumtext="의사처방기타2"/>
  252. <Column id="drprcpetc3" type="STRING" size="256" sumtext="의사처방기타3"/>
  253. <Column id="drprcpetc4" type="STRING" size="256" sumtext="의사처방기타4"/>
  254. <Column id="drprcpetc5" type="STRING" size="256" sumtext="의사처방기타5"/>
  255. <Column id="drprcpetc6" type="STRING" size="256" sumtext="의사처방기타6"/>
  256. <Column id="drprcpetc7" type="STRING" size="256" sumtext="의사처방기타7"/>
  257. <Column id="drprcpetc8" type="STRING" size="256" sumtext="의사처방기타8"/>
  258. <Column id="drprcpetc9" type="STRING" size="256" sumtext="의사처방기타9"/>
  259. <Column id="drprcpetc10" type="STRING" size="256" sumtext="의사처방기타10"/>
  260. <Column id="tempcol1" type="STRING" size="256" sumtext="임시컬럼1"/>
  261. <Column id="tempcol2" type="STRING" size="256" sumtext="임시컬럼2"/>
  262. <Column id="tempcol3" type="STRING" size="256" sumtext="임시컬럼3"/>
  263. <Column id="tempcol4" type="STRING" size="256" sumtext="임시컬럼4"/>
  264. <Column id="tempcol5" type="STRING" size="256" sumtext="임시컬럼5"/>
  265. <Column id="tempcol6" type="STRING" size="256" sumtext="임시컬럼6"/>
  266. <Column id="tempcol7" type="STRING" size="256" sumtext="임시컬럼7"/>
  267. <Column id="tempcol8" type="STRING" size="256" sumtext="임시컬럼8"/>
  268. <Column id="tempcol9" type="STRING" size="256" sumtext="임시컬럼9"/>
  269. <Column id="tempcol10" type="STRING" size="256" sumtext="임시컬럼10"/>
  270. <Column id="tempcol11" type="STRING" size="256" sumtext="임시컬럼11"/>
  271. <Column id="tempcol12" type="STRING" size="256" sumtext="임시컬럼12"/>
  272. <Column id="tempcol13" type="STRING" size="256" sumtext="임시컬럼13"/>
  273. <Column id="tempcol14" type="STRING" size="256" sumtext="임시컬럼14"/>
  274. <Column id="tempcol15" type="STRING" size="256" sumtext="임시컬럼15"/>
  275. <Column id="tempcol16" type="STRING" size="256" sumtext="임시컬럼16"/>
  276. <Column id="tempcol17" type="STRING" size="256" sumtext="임시컬럼17"/>
  277. <Column id="tempcol18" type="STRING" size="256" sumtext="임시컬럼18"/>
  278. <Column id="tempcol19" type="STRING" size="256" sumtext="임시컬럼19"/>
  279. <Column id="tempcol20" type="STRING" size="256" sumtext="임시컬럼20"/>
  280. <Column id="tempcol21" type="STRING" size="256" sumtext="임시컬럼21"/>
  281. <Column id="tempcol22" type="STRING" size="256" sumtext="임시컬럼22"/>
  282. <Column id="tempcol23" type="STRING" size="256" sumtext="임시컬럼23"/>
  283. <Column id="tempcol24" type="STRING" size="256" sumtext="임시컬럼24"/>
  284. <Column id="tempcol25" type="STRING" size="256" sumtext="임시컬럼25"/>
  285. <Column id="fasttrackflag" type="STRING" size="256" sumtext="Fast Track 처방 여부"/>
  286. <Column id="drprcpetc11" type="STRING" size="256" sumtext="50%감면적용 처치:제2시술, 영상:인접부위"/>
  287. <Column id="drprcpetc12" type="STRING" size="256" sumtext="의사처방기타12"/>
  288. <Column id="drprcpetc13" type="STRING" size="256" sumtext="의사처방기타13"/>
  289. <Column id="drprcpetc14" type="STRING" size="256" sumtext="의사처방기타14"/>
  290. <Column id="drprcpetc15" type="STRING" size="256" sumtext="의사처방기타15"/>
  291. <Column id="drprcpetc16" type="STRING" size="256" sumtext="의사처방기타16"/>
  292. <Column id="drprcpetc17" type="STRING" size="256" sumtext="의사처방기타17"/>
  293. <Column id="drprcpetc18" type="STRING" size="256" sumtext="의사처방기타18"/>
  294. <Column id="drprcpetc19" type="STRING" size="256" sumtext="의사처방기타19"/>
  295. <Column id="drprcpetc20" type="STRING" size="256" sumtext="의사처방기타20"/>
  296. <Column id="drprcpetc21" type="STRING" size="256" sumtext="의사처방기타21"/>
  297. <Column id="drprcpetc22" type="STRING" size="256" sumtext="의사처방기타22"/>
  298. <Column id="drprcpetc23" type="STRING" size="256" sumtext="의사처방기타23"/>
  299. <Column id="drprcpetc24" type="STRING" size="256" sumtext="의사처방기타24"/>
  300. <Column id="drprcpetc25" type="STRING" size="256" sumtext="의사처방기타25"/>
  301. <Column id="drprcpetc26" type="STRING" size="256" sumtext="의사처방기타26"/>
  302. <Column id="drprcpetc27" type="STRING" size="256" sumtext="의사처방기타27"/>
  303. <Column id="drprcpetc28" type="STRING" size="256" sumtext="의사처방기타28"/>
  304. <Column id="drprcpetc29" type="STRING" size="256" sumtext="의사처방기타29"/>
  305. <Column id="drprcpetc30" type="STRING" size="256" sumtext="의사처방기타30"/>
  306. <Column id="rgstdeptcd" type="STRING" size="256" sumtext="최초등록부서(insert)"/>
  307. <Column id="prcpclassnm" type="STRING" size="256" sumtext="처방분류명"/>
  308. <Column id="rowkey" type="STRING" size="256" sumtext="rowid"/>
  309. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  310. </ColumnInfo>
  311. <Rows>
  312. <Row/>
  313. </Rows>
  314. </Dataset>
  315. <Dataset id="ds_main_temp_prnuseyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  316. <ColumnInfo>
  317. <Column id="hardcdno" type="STRING" size="256"/>
  318. <Column id="hardcodenm" type="STRING" size="256"/>
  319. <Column id="hardcd" type="STRING" size="256"/>
  320. <Column id="hardcdnm" type="STRING" size="256"/>
  321. <Column id="cdseqno" type="STRING" size="256"/>
  322. </ColumnInfo>
  323. </Dataset>
  324. <Dataset id="ds_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  325. <Dataset id="ds_chkflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  326. <ColumnInfo>
  327. <Column id="erprcpflag" type="STRING" size="256"/>
  328. <Column id="prnprcpflag" type="STRING" size="256"/>
  329. <Column id="erreadflag" type="STRING" size="256"/>
  330. <Column id="portprcpflag" type="STRING" size="256"/>
  331. <Column id="precureprcpflag" type="STRING" size="256"/>
  332. <Column id="clincstdyflag" type="STRING" size="256"/>
  333. <Column id="payflagcd" type="STRING" size="256"/>
  334. <Column id="prcphopedd" type="STRING" size="256"/>
  335. <Column id="clinccmtcnts" type="STRING" size="256"/>
  336. <Column id="prcpdelivefact" type="STRING" size="256"/>
  337. <Column id="prepprcpflag" type="STRING" size="256"/>
  338. <Column id="powdflag" type="STRING" size="256"/>
  339. <Column id="selfdrugflag" type="STRING" size="256"/>
  340. <Column id="prcpqty" type="STRING" size="256"/>
  341. <Column id="prcpdayno" type="STRING" size="256"/>
  342. <Column id="asttestflag" type="STRING" size="256"/>
  343. <Column id="prcptims" type="STRING" size="256"/>
  344. <Column id="prcpexecdeptcd" type="STRING" size="256"/>
  345. <Column id="drugmthdspccd" type="STRING" size="256"/>
  346. <Column id="hosinhosoutflag" type="STRING" size="256"/>
  347. <Column id="anamneflag" type="STRING" size="256"/>
  348. <Column id="drugindependpackflag" type="STRING" size="256"/>
  349. </ColumnInfo>
  350. <Rows>
  351. <Row/>
  352. </Rows>
  353. </Dataset>
  354. <Dataset id="ds_M0029" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  355. <ColumnInfo>
  356. <Column id="cdid" type="STRING" size="256"/>
  357. <Column id="cdnm" type="STRING" size="256"/>
  358. </ColumnInfo>
  359. </Dataset>
  360. <Dataset id="ds_P0323" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  361. <ColumnInfo>
  362. <Column id="cdid" type="STRING" size="256"/>
  363. <Column id="cdnm" type="STRING" size="256"/>
  364. </ColumnInfo>
  365. </Dataset>
  366. </Objects>
  367. <Bind>
  368. <BindItem id="item0" compid="checkbox1" propid="value" datasetid="ds_chkflag" columnid="erprcpflag"/>
  369. <BindItem id="item1" compid="checkbox10" propid="value" datasetid="ds_main_prcplist" columnid="erprcpflag"/>
  370. <BindItem id="item2" compid="checkbox8" propid="value" datasetid="ds_chkflag" columnid="payflagcd"/>
  371. <BindItem id="item3" compid="checkbox19" propid="value" datasetid="ds_chkflag" columnid="drugindependpackflag"/>
  372. <BindItem id="item4" compid="checkbox5" propid="value" datasetid="ds_chkflag" columnid="prcpdelivefact"/>
  373. <BindItem id="item5" compid="checkbox2" propid="value" datasetid="ds_chkflag" columnid="prnprcpflag"/>
  374. <BindItem id="item6" compid="checkbox3" propid="value" datasetid="ds_chkflag" columnid="prepprcpflag"/>
  375. <BindItem id="item7" compid="checkbox4" propid="value" datasetid="ds_chkflag" columnid="powdflag"/>
  376. <BindItem id="item8" compid="checkbox17" propid="value" datasetid="ds_chkflag" columnid="selfdrugflag"/>
  377. <BindItem id="item9" compid="checkbox21" propid="value" datasetid="ds_chkflag" columnid="prcpqty"/>
  378. <BindItem id="item10" compid="checkbox22" propid="value" datasetid="ds_chkflag" columnid="prcptims"/>
  379. <BindItem id="item11" compid="checkbox23" propid="value" datasetid="ds_chkflag" columnid="drugmthdspccd"/>
  380. <BindItem id="item12" compid="checkbox24" propid="value" datasetid="ds_chkflag" columnid="hosinhosoutflag"/>
  381. <BindItem id="item13" compid="checkbox6" propid="value" datasetid="ds_chkflag" columnid="precureprcpflag"/>
  382. <BindItem id="item14" compid="checkbox7" propid="value" datasetid="ds_chkflag" columnid="clincstdyflag"/>
  383. <BindItem id="item15" compid="checkbox9" propid="value" datasetid="ds_chkflag" columnid="prcpexecdeptcd"/>
  384. <BindItem id="item16" compid="checkbox20" propid="value" datasetid="ds_chkflag" columnid="prcpdayno"/>
  385. <BindItem id="item17" compid="bool1" propid="value" datasetid="ds_chkflag" columnid="anamneflag"/>
  386. <BindItem id="item18" compid="checkbox18" propid="value" datasetid="ds_main_prcplist" columnid="drugindependpackflag"/>
  387. <BindItem id="item19" compid="combo1" propid="value" datasetid="ds_main_prcplist" columnid="payflagcd"/>
  388. <BindItem id="item20" compid="checkbox11" propid="value" datasetid="ds_main_prcplist" columnid="prnprcpflag"/>
  389. <BindItem id="item21" compid="textarea1" propid="value" datasetid="ds_main_prcplist" columnid="prcpdelivefact"/>
  390. <BindItem id="item22" compid="checkbox12" propid="value" datasetid="ds_main_prcplist" columnid="prepprcpflag"/>
  391. <BindItem id="item23" compid="checkbox13" propid="value" datasetid="ds_main_prcplist" columnid="powdflag"/>
  392. <BindItem id="item24" compid="checkbox16" propid="value" datasetid="ds_main_prcplist" columnid="selfdrugflag"/>
  393. <BindItem id="item25" compid="input1" propid="value" datasetid="ds_main_prcplist" columnid="prcpqty"/>
  394. <BindItem id="item26" compid="input3" propid="value" datasetid="ds_main_prcplist" columnid="prcptims"/>
  395. <BindItem id="item27" compid="output2" propid="value" datasetid="ds_main_prcplist" columnid="drugmthdspccdnm"/>
  396. <BindItem id="item28" compid="radio1" propid="value" datasetid="ds_main_prcplist" columnid="hosinhosoutflag"/>
  397. <BindItem id="item29" compid="checkbox14" propid="value" datasetid="ds_main_prcplist" columnid="precureprcpflag"/>
  398. <BindItem id="item30" compid="checkbox15" propid="value" datasetid="ds_main_prcplist" columnid="clincstdyflag"/>
  399. <BindItem id="item31" compid="combo2" propid="value" datasetid="ds_main_prcplist" columnid="prcpexecdeptcd"/>
  400. <BindItem id="item32" compid="input2" propid="value" datasetid="ds_main_prcplist" columnid="prcpdayno"/>
  401. <BindItem id="item33" compid="combo3" propid="value" datasetid="ds_main_prcplist" columnid="hosinprcpresncd"/>
  402. <BindItem id="item34" compid="output1" propid="value" datasetid="ds_main_prcplist" columnid="drugmthdspccd"/>
  403. </Bind>
  404. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  405. * System Name :
  406. * Job Name :
  407. * Creator :
  408. * Make Date : 2014-12-10
  409. * Description :
  410. *---------------------------------------------------------------------------------------
  411. * Modify Date Modifier Modify Description
  412. *---------------------------------------------------------------------------------------
  413. * 2014-12-10 Live Converter TF->XP
  414. *
  415. *---------------------------------------------------------------------------------------
  416. ****************************************************************************************/
  417. include "com_commonxp::comm_main.xjs";
  418. include "emr_prcpmngtxp::MMO001.xjs";
  419. include "emr_prcpmngtxp::SMMMO00100.xjs";
  420. function SPMMO12100_oninit(obj:Form, e:InitEventInfo)
  421. {
  422. frmf_initForm(obj);
  423. }
  424. function SPMMO12100_onload(obj:Form, e:LoadEventInfo)
  425. {
  426. appf_getCodeList([{dsNm: "ds_M0029", cdGrpId: "M0029"}
  427. , {dsNm: "ds_P0323", cdGrpId: "P0323"}], true);
  428. var prcpgenrflag = opener.ds_patflag.getColumn(0, "prcpgenrflag");
  429. var node01 = ds_P0323.findRow("cdid", '01');
  430. if(node01 > -1){
  431. ds_P0323.deleteRow(node01);
  432. ds_P0323.applyChange();
  433. }
  434. var selectedRows = grdf_getSelectedRows(opener.div_all.grd_prcplist);
  435. ds_main_prcplist.setColumn(0, "prcpclscd", opener.ds_main_prcplist.getColumn(selectedRows[0], "prcpclscd"));
  436. lf_reqHardCodeInfo(ds_main_temp_prnuseyn, "173");
  437. lf_prcpExecDeptSrch("all");
  438. if (opener.frmf_getParameter("SPMMO12100_prnchk") == "SMMMB00200" && ds_main_temp_prnuseyn.getColumn(0, "hardcd") == "N"){
  439. checkbox2.visible = false;
  440. checkbox11.visible = false;
  441. caption4.visible = false;
  442. }else if(ds_main_temp_prnuseyn.getColumn(0, "hardcd") == "Y"){
  443. checkbox2.visible = false;
  444. checkbox11.visible = false;
  445. caption4.visible = false;
  446. }
  447. checkbox10.enable = false;
  448. checkbox11.enable = false;
  449. checkbox12.enable = false;
  450. checkbox13.enable = false;
  451. checkbox14.enable = false;
  452. checkbox15.enable = false;
  453. checkbox16.enable = false;
  454. checkbox18.enable = false;
  455. var hosinprcpresncd = opener.ds_init.getColumn(0, "hosinprcpresncd");
  456. if ( prcpgenrflag == "O" ) { //외래일때
  457. if ( opener.ds_root.getColumn(0, "usge") == "prcp" ) {
  458. checkbox2.enable = false;
  459. }
  460. if ( hosinprcpresncd == "00" ) { //처방화면에 원내처방 사유가 없으면 원외
  461. ds_main_prcplist.setColumn(0, "hosinhosoutflag", "O");
  462. ds_main_prcplist.setColumn(0, "hosinprcpresncd", hosinprcpresncd);
  463. } else { //처방화면에 원내처방 사유가 있으면 원내
  464. ds_main_prcplist.setColumn(0, "hosinhosoutflag", "I");
  465. ds_main_prcplist.setColumn(0, "hosinprcpresncd", hosinprcpresncd);
  466. }
  467. } else {
  468. if ( prcpgenrflag == "I" ) { //입원이면 원내/원외 체크박스 disable
  469. checkbox24.enable = false;
  470. }
  471. ds_main_prcplist.setColumn(0, "hosinhosoutflag", "I");
  472. ds_main_prcplist.setColumn(0, "hosinprcpresncd", hosinprcpresncd);
  473. }
  474. combo1.enable = false;
  475. combo2.enable = false;
  476. combo3.enable = false;
  477. input1.enable = false;
  478. input2.enable = false;
  479. input3.enable = false;
  480. radio1.enable = false;
  481. textarea1.enable = false;
  482. opener.frmf_setParameter ( "batipt_rtn1", "" );
  483. opener.frmf_setParameter ( "batipt_rtn1_useyn", "N" );
  484. opener.frmf_setParameter ( "SPMMO12100_drugrateqty", "" );
  485. opener.frmf_setParameter ( "SPMMO12100_chgmthd", "" );
  486. }
  487. function button1_onclick(obj:Button, e:ClickEventInfo)
  488. {
  489. var erprcpflag_useyn = "";
  490. var erprcpflag = "";
  491. var drugindependpackflag_useyn = "";
  492. var drugindependpackflag = "";
  493. var prnprcpflag_useyn = "";
  494. var prnprcpflag = "";
  495. var prepprcpflag_useyn = "";
  496. var prepprcpflag = "";
  497. var powdflag_useyn = "";
  498. var powdflag = "";
  499. var selfdrugflag_useyn = "";
  500. var selfdrugflag = "";
  501. var prcpqty_useyn = "";
  502. var prcpqty = "";
  503. var prcptims_useyn = "";
  504. var prcptims = "";
  505. var drugmthdspccd_useyn = "";
  506. var drugmthdspccd = "";
  507. var drugmthdspccdnm_useyn = ""
  508. var drugmthdspccdnm = "";
  509. var rateprcpflag_useyn = "";
  510. var rateprcpflag = "";
  511. var drugrateqty_useyn = "";
  512. var drugrateqty = "";
  513. var precureprcpflag_useyn = "";
  514. var precureprcpflag = "";
  515. var clincstdyflag_useyn = "";
  516. var clincstdyflag = "";
  517. var payflagcd_useyn = "";
  518. var payflagcd = "";
  519. var prcpexecdeptcd_useyn = "";
  520. var prcpexecdeptcd = "";
  521. var prcpdayno_useyn = "";
  522. var prcpdayno = "";
  523. var hosinhosoutflag_useyn = "";
  524. var hosinhosoutflag = "";
  525. var hosinprcpresncd_useyn = "";
  526. var hosinprcpresncd = "";
  527. var prcpdelivefact_useyn = "";
  528. var prcpdelivefact = "";
  529. var useyn = "";
  530. var value = "";
  531. var anamneflag = "";
  532. var header = "erprcpflag|drugindependpackflag|prnprcpflag|prepprcpflag|powdflag|selfdrugflag|prcpqty|prcptims|drugmthdspccd|drugmthdspccdnm|rateprcpflag|drugrateqty|precureprcpflag|clincstdyflag|payflagcd|prcpexecdeptcd|prcpdayno|hosinhosoutflag|hosinprcpresncd|anamneflag|prcpdelivefact|subcretno^";
  533. if ( ds_chkflag.getColumn(0, "erprcpflag") == "Y" ) {
  534. erprcpflag_useyn = "Y" + "|";
  535. erprcpflag = ds_main_prcplist.getColumn(0, "erprcpflag") + "|";
  536. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "erprcpflag")) ) {
  537. erprcpflag = "N" + "|";
  538. }
  539. } else {
  540. erprcpflag_useyn = "N" + "|";
  541. erprcpflag = "" + "|";
  542. }
  543. useyn = useyn + erprcpflag_useyn;
  544. value = value + erprcpflag;
  545. if ( ds_chkflag.getColumn(0, "drugindependpackflag") == "Y" ) {
  546. drugindependpackflag_useyn = "Y" + "|";
  547. drugindependpackflag = ds_main_prcplist.getColumn(0, "drugindependpackflag") + "|";
  548. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "drugindependpackflag")) ) {
  549. drugindependpackflag = "N" + "|";
  550. }
  551. } else {
  552. drugindependpackflag_useyn = "N" + "|";
  553. drugindependpackflag = "" + "|";
  554. }
  555. useyn = useyn + drugindependpackflag_useyn;
  556. value = value + drugindependpackflag;
  557. if ( ds_chkflag.getColumn(0, "prnprcpflag") == "Y" ) {
  558. prnprcpflag_useyn = "Y" + "|";
  559. prnprcpflag = ds_main_prcplist.getColumn(0, "prnprcpflag") + "|";
  560. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prnprcpflag")) ) {
  561. prnprcpflag = "N" + "|";
  562. }
  563. } else {
  564. prnprcpflag_useyn = "N" + "|";
  565. prnprcpflag = "" + "|";
  566. }
  567. useyn = useyn + prnprcpflag_useyn;
  568. value = value + prnprcpflag;
  569. if ( ds_chkflag.getColumn(0, "prepprcpflag") == "Y" ) {
  570. prepprcpflag_useyn = "Y" + "|";
  571. prepprcpflag = ds_main_prcplist.getColumn(0, "prepprcpflag") + "|";
  572. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prepprcpflag")) ) {
  573. prepprcpflag = "N" + "|";
  574. }
  575. } else {
  576. prepprcpflag_useyn = "N" + "|";
  577. prepprcpflag = "" + "|";
  578. }
  579. useyn = useyn + prepprcpflag_useyn;
  580. value = value + prepprcpflag;
  581. if ( ds_chkflag.getColumn(0, "powdflag") == "Y" ) {
  582. powdflag_useyn = "Y" + "|";
  583. powdflag = ds_main_prcplist.getColumn(0, "powdflag") + "|";
  584. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "powdflag")) ) {
  585. powdflag = "N" + "|";
  586. }
  587. } else {
  588. powdflag_useyn = "N" + "|";
  589. powdflag = "" + "|";
  590. }
  591. useyn = useyn + powdflag_useyn;
  592. value = value + powdflag;
  593. if ( ds_chkflag.getColumn(0, "selfdrugflag") == "Y" ) {
  594. selfdrugflag_useyn = "Y" + "|";
  595. selfdrugflag = ds_main_prcplist.getColumn(0, "selfdrugflag") + "|";
  596. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "selfdrugflag")) ) {
  597. selfdrugflag = "N" + "|";
  598. }
  599. } else {
  600. selfdrugflag_useyn = "N" + "|";
  601. selfdrugflag = "" + "|";
  602. }
  603. useyn = useyn + selfdrugflag_useyn;
  604. value = value + selfdrugflag;
  605. if ( ds_chkflag.getColumn(0, "prcpqty") == "Y" ) {
  606. prcpqty_useyn = "Y" + "|";
  607. prcpqty = ds_main_prcplist.getColumn(0, "prcpqty") + "|";
  608. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcpqty")) ) {
  609. alert ( "입력된 수량이 없습니다." );
  610. return;
  611. }
  612. } else {
  613. prcpqty_useyn = "N" + "|";
  614. prcpqty = "" + "|";
  615. }
  616. useyn = useyn + prcpqty_useyn;
  617. value = value + prcpqty;
  618. if ( ds_chkflag.getColumn(0, "prcptims") == "Y" ) {
  619. prcptims_useyn = "Y" + "|";
  620. prcptims = ds_main_prcplist.getColumn(0, "prcptims" ) + "|";
  621. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcptims" ))) {
  622. alert ( "입력된 횟수가 없습니다." );
  623. return;
  624. } else {
  625. if ( ds_chkflag.getColumn(0, "drugmthdspccd") != "Y" ) {
  626. opener.frmf_setParameter ( "SPMMO12100_chgmthd" , "Y" );
  627. }
  628. }
  629. } else {
  630. prcptims_useyn = "N" + "|";
  631. prcptims = "" + "|";
  632. }
  633. useyn = useyn + prcptims_useyn ;
  634. value = value + prcptims;
  635. if ( ds_chkflag.getColumn(0, "drugmthdspccd") == "Y" ) {
  636. drugmthdspccd_useyn = "Y" + "|";
  637. drugmthdspccdnm_useyn = "Y" + "|";
  638. drugmthdspccd = ds_main_prcplist.getColumn(0, "drugmthdspccd") + "|";
  639. drugmthdspccdnm = ds_main_prcplist.getColumn(0, "drugmthdspccdnm") + "|";
  640. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "drugmthdspccd")) ) {
  641. alert ( "입력된 용법이 없습니다." );
  642. return;
  643. }
  644. } else {
  645. drugmthdspccd_useyn = "N" + "|";
  646. drugmthdspccd = "" + "|";
  647. drugmthdspccdnm_useyn = "N" + "|";
  648. drugmthdspccdnm = "" + "|";
  649. }
  650. useyn = useyn + drugmthdspccd_useyn + drugmthdspccdnm_useyn;
  651. value = value + drugmthdspccd + drugmthdspccdnm;
  652. if ( frmf_getParameter ( "SPMMO01900_rateprcpflag" ) == "Y" ) {
  653. rateprcpflag_useyn = "Y" + "|";
  654. drugrateqty_useyn = "Y" + "|";
  655. if ( ds_chkflag.getColumn(0, "prcpqty") != "Y" ) {
  656. alert ( "비율처방이 있으나 수량이 CHECK 되지 않았습니다." )
  657. return;
  658. }
  659. if ( ds_chkflag.getColumn(0, "prcptims") != "Y" ) {
  660. alert ( "비율처방이 있으나 횟수가 CHECK 되지 않았습니다." )
  661. return;
  662. }
  663. rateprcpflag = ds_main_prcplist.getColumn(0, "rateprcpflag") + "|";
  664. drugrateqty = "" + "|";
  665. opener.frmf_setParameter ( "SPMMO12100_drugrateqty", ds_main_prcplist.getColumn(0, "drugrateqty") );
  666. } else {
  667. rateprcpflag_useyn = "N" + "|";
  668. drugrateqty_useyn = "N" + "|";
  669. rateprcpflag = "" + "|";
  670. drugrateqty = "" + "|";
  671. }
  672. useyn = useyn + rateprcpflag_useyn + drugrateqty_useyn;
  673. value = value + rateprcpflag + drugrateqty;
  674. if ( ds_chkflag.getColumn(0, "precureprcpflag") == "Y" ) {
  675. precureprcpflag_useyn = "Y" + "|";
  676. precureprcpflag = ds_main_prcplist.getColumn(0, "precureprcpflag" ) + "|";
  677. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "precureprcpflag")) ) {
  678. precureprcpflag = "N" + "|";
  679. }
  680. } else {
  681. precureprcpflag_useyn = "N" + "|";
  682. precureprcpflag = "" + "|";
  683. }
  684. useyn = useyn + precureprcpflag_useyn;
  685. value = value + precureprcpflag;
  686. if ( ds_chkflag.getColumn(0, "clincstdyflag") == "Y" ) {
  687. clincstdyflag_useyn = "Y" + "|";
  688. clincstdyflag = ds_main_prcplist.getColumn(0, "clincstdyflag") + "|";
  689. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "clincstdyflag")) ) {
  690. clincstdyflag = "N" + "|";
  691. }
  692. } else {
  693. clincstdyflag_useyn = "N" + "|";
  694. clincstdyflag = "" + "|";
  695. }
  696. useyn = useyn + clincstdyflag_useyn;
  697. value = value + clincstdyflag;
  698. if ( ds_chkflag.getColumn(0, "payflagcd") == "Y" ) {
  699. payflagcd_useyn = "Y" + "|";
  700. payflagcd = ds_main_prcplist.getColumn(0, "payflagcd") + "|";
  701. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "payflagcd" )) ) {
  702. alert ( "입력된 급여구분이 없습니다." ) ;
  703. return;
  704. }
  705. } else {
  706. payflagcd_useyn = "N" + "|";
  707. payflagcd = "" + "|";
  708. }
  709. useyn = useyn + payflagcd_useyn;
  710. value = value + payflagcd;
  711. if ( ds_chkflag.getColumn(0, "prcpexecdeptcd") == "Y" ) {
  712. prcpexecdeptcd_useyn = "Y" + "|";
  713. prcpexecdeptcd = ds_main_prcplist.getColumn(0, "prcpexecdeptcd") + "|";
  714. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcpexecdeptcd")) ) {
  715. alert ( "입력된 시행부서가 없습니다." ) ;
  716. return;
  717. }
  718. } else {
  719. prcpexecdeptcd_useyn = "N" + "|";
  720. prcpexecdeptcd = "" + "|";
  721. }
  722. useyn = useyn + prcpexecdeptcd_useyn;
  723. value = value + prcpexecdeptcd;
  724. if ( ds_chkflag.getColumn(0, "prcpdayno") == "Y" ) {
  725. prcpdayno_useyn = "Y" + "|";
  726. prcpdayno = ds_main_prcplist.getColumn(0, "prcpdayno") + "|";
  727. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcpdayno")) ) {
  728. alert ( "입력된 일수가 없습니다." ) ;
  729. return;
  730. }
  731. } else {
  732. prcpdayno_useyn = "N" + "|";
  733. prcpdayno = "" + "|";
  734. }
  735. useyn = useyn + prcpdayno_useyn;
  736. value = value + prcpdayno;
  737. if ( ds_chkflag.getColumn(0, "hosinhosoutflag") == "Y" ) {
  738. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "hosinhosoutflag")) ) {
  739. alert ( "입력된 원내/원외구분이 없습니다." );
  740. return;
  741. }
  742. var prcpgenrflag = opener.ds_patflag.getColumn(0, "prcpgenrflag"); //환자리스트에서 준 외래, 입원, 응급 구분
  743. var hosinprcpresncd = opener.ds_init.getColumn(0, "hosinprcpresncd"); //원무에 있는 원내처방 사유 코드
  744. //마약 및 mset약제 원외불가 by sonjy 2008-09-15 start
  745. if( frmf_checkOpener() && (prcpgenrflag == "O" || prcpgenrflag == "E") ){
  746. if( ds_main_prcplist.getColumn(0, "hosinhosoutflag") == "O" ){
  747. var sTmp = "";
  748. var selectedRows = grdf_getSelectedRows(opener.div_all.grd_prcplist);
  749. for ( var i = 0; i < selectedRows.length; i++){
  750. sTmp = opener.ds_main_prcplist.getColumn(selectedRows[i], "drugmastspec");
  751. var prcpclscd = ds_main_prcplist.getColumn(0, "prcpclscd");
  752. // 마약중 경구약은 원외 처방 가능하도록 수정 ( 2010, 12. 03 han19)
  753. // if( getArrayData ( sTmp + "^", 0, 23, "^", "|" ) == "M" || //마약
  754. // opener.model.getValue( "/root/main/prcp/prcplist[" + opener.grd_prcplist.selectedRow(i) + "]/inclprcpno") != "0" ) {
  755. if (opener.ds_main_prcplist.getColumn(selectedRows[i], "inclprcpno") != "0" ||
  756. (prcpclscd=="A6" && lf_getArrayData ( sTmp + "^", 0, 23, "^", "|" ) == "M" ) ||
  757. (prcpclscd=="A6" && lf_getArrayData ( sTmp + "^", 0, 23, "^", "|" ) == "H" ) ||
  758. lf_getArrayData ( sTmp + "^", 0, 11, "^", "|" ) == "I" ) {
  759. sysf_messageBox("마약, 주사, 약제팀의 원내지정약 및 MSET코드내 묶인 약제는 원외로 처방을 낼 수 ", "I004");
  760. return ;
  761. }
  762. }
  763. ds_main_prcplist.setColumn(0, "hosinprcpresncd", "00");
  764. }
  765. }
  766. //외래이고, 원무의 원내사유가 없고, 원내선택하고, 원채처방사유가 없을 경우
  767. if ( (prcpgenrflag == "O" && hosinprcpresncd == "00" && ds_main_prcplist.getColumn(0, "hosinhosoutflag") == "I" )
  768. && (ds_main_prcplist.getColumn(0, "hosinprcpresncd") == "00" || utlf_isNull(ds_main_prcplist.getColumn(0, "hosinprcpresncd"))) ) {
  769. alert ( "원내처방 사유가 없습니다." );
  770. return;
  771. }
  772. // by sonjy 2008-09-15 end
  773. hosinhosoutflag_useyn = "Y" + "|";
  774. hosinprcpresncd_useyn = "Y" + "|";
  775. hosinhosoutflag = ds_main_prcplist.getColumn(0, "hosinhosoutflag") + "|";
  776. hosinprcpresncd = ds_main_prcplist.getColumn(0, "hosinprcpresncd") + "|";
  777. } else {
  778. hosinhosoutflag_useyn = "N" + "|";
  779. hosinhosoutflag = "" + "|";
  780. hosinprcpresncd_useyn = "N" + "|";
  781. hosinprcpresncd = "" + "|";
  782. }
  783. useyn = useyn + hosinhosoutflag_useyn + hosinprcpresncd_useyn;
  784. value = value + hosinhosoutflag + hosinprcpresncd;
  785. if( ds_chkflag.getColumn(0, "anamneflag") == "Y" ) {
  786. useyn = useyn + "Y" + "|";
  787. value = value + "Y" + "|";
  788. } else {
  789. useyn = useyn + "N" + "|";
  790. value = value + "N" + "|";
  791. }
  792. if ( ds_chkflag.getColumn(0, "prcpdelivefact") == "Y" ) {
  793. prcpdelivefact_useyn = "Y" + "|";
  794. prcpdelivefact = ds_main_prcplist.getColumn(0, "prcpdelivefact") + "|";
  795. if ( utlf_isNull(ds_main_prcplist.getColumn(0, "prcpdelivefact")) ) {
  796. alert ( "입력된 전달사항 값이 없습니다." );
  797. return;
  798. }
  799. } else {
  800. prcpdelivefact_useyn = "N" + "|";
  801. prcpdelivefact = "" + "|";
  802. }
  803. useyn = useyn + prcpdelivefact_useyn ;
  804. value = value + prcpdelivefact;
  805. //2008. 07. 01 기왕증 입력에 따른 subcretno설정
  806. var subcretno_useyn = "";
  807. var subcretno = 0;
  808. if ( bool1.value == "Y" || ds_chkflag.getColumn(0, "clincstdyflag") == "Y") {
  809. subcretno_useyn = "Y";
  810. subcretno = ds_main_prcplist.getColumn(0, "subcretno");
  811. }else{
  812. subcretno_useyn = "N";
  813. }
  814. useyn = useyn + subcretno_useyn + "^";
  815. value = value + subcretno + "^";
  816. var batipt_rtn1 = header + useyn + value;
  817. opener.frmf_setParameter ( "batipt_rtn1", batipt_rtn1 );
  818. opener.frmf_setParameter ( "batipt_rtn1_useyn", "Y" );
  819. close();
  820. }
  821. function button2_onclick(obj:Button, e:ClickEventInfo)
  822. {
  823. opener.frmf_setParameter ( "batipt_rtn1_useyn", "N" );
  824. close();
  825. }
  826. function checkbox1_onclick(obj:CheckBox, e:ClickEventInfo)
  827. {
  828. lf_setCheckboxProperty(obj, checkbox10);
  829. }
  830. function checkbox19_onclick(obj:CheckBox, e:ClickEventInfo)
  831. {
  832. lf_setCheckboxProperty(obj, checkbox18);
  833. }
  834. function checkbox8_onclick(obj:CheckBox, e:ClickEventInfo)
  835. {
  836. lf_setCheckboxProperty(obj, combo1, false);
  837. }
  838. function checkbox2_onclick(obj:CheckBox, e:ClickEventInfo)
  839. {
  840. lf_setCheckboxProperty(obj, checkbox11);
  841. }
  842. function checkbox5_onclick(obj:CheckBox, e:ClickEventInfo)
  843. {
  844. lf_setCheckboxProperty(obj, textarea1, false);
  845. }
  846. function button4_onclick(obj:Button, e:ClickEventInfo)
  847. {
  848. frmf_setParameter ( "SPMMB02200_cond2", "3" );
  849. lf_prcpModal ( "SPMMB02200", 50, 50 );
  850. var SPMMB02200_clinccmt = frmf_getParameter ( "SPMMB02200_clinccmt" );
  851. if(!utlf_isNull(SPMMB02200_clinccmt)) {
  852. ds_main_prcplist.setColumn(0, "prcpdelivefact", SPMMB02200_clinccmt);
  853. checkbox5.value = "Y";
  854. checkbox5.onclick.fireEvent(checkbox5, new ClickEventInfo());
  855. }
  856. }
  857. function checkbox3_onclick(obj:CheckBox, e:ClickEventInfo)
  858. {
  859. lf_setCheckboxProperty(obj, checkbox12);
  860. }
  861. function checkbox4_onclick(obj:CheckBox, e:ClickEventInfo)
  862. {
  863. lf_setCheckboxProperty(obj, checkbox13);
  864. }
  865. function checkbox17_onclick(obj:CheckBox, e:ClickEventInfo)
  866. {
  867. lf_setCheckboxProperty(obj, checkbox16);
  868. }
  869. function checkbox21_onclick(obj:CheckBox, e:ClickEventInfo)
  870. {
  871. lf_setCheckboxProperty(obj, input1, false);
  872. }
  873. function checkbox22_onclick(obj:CheckBox, e:ClickEventInfo)
  874. {
  875. lf_setCheckboxProperty(obj, input3, false);
  876. }
  877. function checkbox6_onclick(obj:CheckBox, e:ClickEventInfo)
  878. {
  879. lf_setCheckboxProperty(obj, checkbox14);
  880. }
  881. function checkbox7_onclick(obj:CheckBox, e:ClickEventInfo)
  882. {
  883. if( bool1.value == "Y" ){
  884. sysf_messageBox ( "임상연구는 기왕증과 동시에 선택 할 수", "I004" );
  885. obj.value = "N";
  886. return;
  887. }
  888. if (obj.value == "Y" ) {
  889. if ( lf_subcretnoSet("1", null) == -1 ) {
  890. obj.value = "N";
  891. obj.style.font = "Dotum,9";
  892. obj.enable = false;
  893. checkbox15.enable = false;
  894. checkbox15.value = "N";
  895. return;
  896. }
  897. obj.style.font = "Dotum,9,bold";
  898. obj.enable = true;
  899. checkbox15.enable = true;
  900. checkbox15.value = "Y";
  901. } else {
  902. lf_subcretnoSet("1", null);
  903. obj.style.font = "Dotum,9";
  904. checkbox15.enable = false;
  905. checkbox15.value = "N";
  906. }
  907. }
  908. function checkbox9_onclick(obj:CheckBox, e:ClickEventInfo)
  909. {
  910. lf_setCheckboxProperty(obj, combo2, false);
  911. }
  912. function checkbox20_onclick(obj:CheckBox, e:ClickEventInfo)
  913. {
  914. lf_setCheckboxProperty(obj, input2, false);
  915. }
  916. function bool1_onclick(obj:CheckBox, e:ClickEventInfo)
  917. {
  918. if( ds_chkflag.getColumn(0, "clincstdyflag") == "Y" ){
  919. sysf_messageBox ( "기왕증은 임상연구와 동시에 선택 할 수", "I004" );
  920. obj.value = "N";
  921. return;
  922. }
  923. if(obj.value == "Y"){
  924. var prcpgenrflag = opener.ds_patflag.getColumn(0, "prcpgenrflag");
  925. var pid = opener.ds_paminfo.getColumn(0, "pid");
  926. var indd = lf_getDsValue(opener.ds_paminfo, 0, "indd");
  927. if(prcpgenrflag == "I" || prcpgenrflag == "D" || prcpgenrflag == "E"){
  928. var subcretno = lf_getSubcretno(pid, indd, "anamneflag");
  929. ds_main_prcplist.setColumn(0, "subcretno", subcretno);
  930. if(subcretno == "0"){
  931. sysf_messageBox ( "환자의 부유형이 없거나 또는 선택되지 않았습니다.", "I999" );
  932. obj.value = "N";
  933. }
  934. } else {
  935. sysf_messageBox ( "외래 환자는 기왕증을 선택 할 수", "I004" );
  936. obj.value = "N";
  937. }
  938. }else{ //기왕증이 N로 처리된 경우에는 subcretno 0로 처리
  939. ds_main_prcplist.setColumn(0, "subcretno", "0");
  940. }
  941. }
  942. function checkbox23_onclick(obj:CheckBox, e:ClickEventInfo)
  943. {
  944. if ( obj.value == "Y" ) {
  945. obj.style.font = "Dotum,9,bold";
  946. lf_prcpModal ("SPMMO01900", 50, 10);
  947. if ( frmf_getParameter ( "SPMMO01900_prcptims" ) == "Y" ) {
  948. checkbox22.value = "Y";
  949. checkbox22.onclick.fireEvent(checkbox22, new ClickEventInfo());
  950. }
  951. if ( frmf_getParameter ( "SPMMO01900_rateprcpflag" ) == "Y" ) {
  952. checkbox21.value = "Y";
  953. checkbox21.onclick.fireEvent(checkbox21, new ClickEventInfo());
  954. }
  955. } else {
  956. obj.style.font = "Dotum,9";
  957. }
  958. }
  959. function checkbox24_onclick(obj:CheckBox, e:ClickEventInfo)
  960. {
  961. if ( obj.value == "Y" ) {
  962. obj.style.font = "Dotum,9,bold";
  963. radio1.enable = true;
  964. var hosinprcpresncd = opener.ds_init.getColumn(0, "hosinprcpresncd");
  965. if ( hosinprcpresncd != "00" ) {
  966. combo3.enable = true;
  967. } else {
  968. combo3.enable = false;
  969. }
  970. } else {
  971. obj.style.font = "Dotum,9";
  972. radio1.enable = false;
  973. combo3.enable = false;
  974. }
  975. }
  976. function input3_onkeydown(obj:Edit, e:KeyEventInfo)
  977. {
  978. if(e.keycode == 13) {
  979. button3.onclick.fireEvent(button3, new ClickEventInfo());
  980. }
  981. }
  982. function button3_onclick(obj:Button, e:ClickEventInfo)
  983. {
  984. if ( ds_chkflag.getColumn(0, "drugmthdspccd") == "Y" ) {
  985. ds_main_prcplist.rowposition = 0;
  986. //grd_prcplist.row = 1;
  987. fBaseMthd();
  988. }
  989. }
  990. function Button00_ondblclick(obj:Button, e:MouseEventInfo)
  991. {
  992. if ( ds_chkflag.getColumn(0, "drugmthdspccd") == "Y" ) {
  993. checkbox23.onclick.fireEvent(checkbox23, new ClickEventInfo());
  994. }
  995. }
  996. function radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  997. {
  998. var prcpgenrflag = opener.ds_patflag.getColumn(0, "prcpgenrflag"); //환자리스트에서 준 외래, 입원, 응급 구분
  999. var hosinprcpresncd = opener.ds_init.getColumn(0, "hosinprcpresncd"); //원무에 있는 원내처방 사유 코드
  1000. if ( ds_main_prcplist.getColumn(0, "hosinhosoutflag") == "I" ) {
  1001. if ( hosinprcpresncd != "00" ) { //원무에 있는 원내처방 사유 코드가 있다면
  1002. ds_main_prcplist.setColumn(0, "hosinprcpresncd", hosinprcpresncd);
  1003. }
  1004. combo3.enable = true;
  1005. } else if ( ds_main_prcplist.getColumn(0, "hosinhosoutflag") == "O" ) { //원외를 선택하면
  1006. ds_main_prcplist.setColumn(0, "hosinprcpresncd", "00");
  1007. combo3.enable = false; //원내처방 사유코드를 입력할 수는 없다.
  1008. }
  1009. }
  1010. function combo3_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1011. {
  1012. //원내처방 사유를 선택해서 처방화면의 원내처방 사유랑 같은 것이 있으면 모두 그것으로 바꿈
  1013. //약속처방, 지시처방에서는 되면 안됨
  1014. if ( opener.ds_root.getColumn(0, "usge" ) == "prcp" ) {
  1015. var hosinprcpresncd = ds_main_prcplist.getColumn(0, "hosinprcpresncd" );
  1016. var openerHosinprcpresncd = opener.ds_P0034.lookup("cdid", hosinprcpresncd, "cdid");
  1017. if ( !utlf_isNull(openerHosinprcpresncd) && hosinprcpresncd != "00" ) {
  1018. if ( sysf_messageBox ( "모든 약,주사 처방에 같은 원내처방 사유를", "Q009" ) == "6" ) {
  1019. opener.ds_init.setColumn(0, "hosinprcpresncd", openerHosinprcpresncd);
  1020. for ( var i = 0; i < opener.ds_main_prcplist.rowcount; i++ ) {
  1021. var prcpclscd = opener.ds_main_prcplist.getColumn(i, "prcpclscd");
  1022. if ( prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6" ) {
  1023. opener.ds_main_prcplist.setColumn(i, "hosinhosoutflag", "I"); //원내처방
  1024. opener.ds_main_prcplist.setColumn(i, "hosinprcpresncd", openerHosinprcpresncd );
  1025. }
  1026. }
  1027. }
  1028. }
  1029. }
  1030. }]]></Script>
  1031. </Form>
  1032. </FDL>