SPAEA01201_재활일괄반환.xfdl 63 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPAEA01201" position="absolute 0 0 1170 809" titletext="재활일괄반환" onload="SPAEA01201_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid id="grd_subordlist4" taborder="2" useinputpanel="false" position="absolute 0 373 1169 782" anchor="left right bottom" binddataset="ds_grid_subordlist4" positiontype="position" oncellclick="grd_subordlist4_oncellclick" cellsizingtype="both" onheadclick="grd_subordlist4_onheadclick" autofittype="col" extendsizetype="row" cellclickbound="cell" selecttype="multirow">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="40" band="left"/>
  12. <Column size="30" band="left"/>
  13. <Column size="76"/>
  14. <Column size="0"/>
  15. <Column size="0"/>
  16. <Column size="85"/>
  17. <Column size="450"/>
  18. <Column size="62"/>
  19. <Column size="103"/>
  20. <Column size="107"/>
  21. <Column size="111"/>
  22. </Columns>
  23. <Rows>
  24. <Row size="24" band="head"/>
  25. <Row size="24"/>
  26. </Rows>
  27. <Band id="head">
  28. <Cell text="No"/>
  29. <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
  30. <Cell col="2" text="처방일자"/>
  31. <Cell col="3" text="처방코드"/>
  32. <Cell col="4" text="진료과"/>
  33. <Cell col="5" text="처방코드"/>
  34. <Cell col="6" text="처방명"/>
  35. <Cell col="7" text="상태"/>
  36. <Cell col="8" text="예약일시"/>
  37. <Cell col="9" text="접수일시"/>
  38. <Cell col="10" text="치료실"/>
  39. </Band>
  40. <Band id="body">
  41. <Cell celltype="head" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" expr="expr:currow + 1"/>
  42. <Cell col="1" displaytype="checkbox" edittype="checkbox" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:check" expr="expr:(check==&quot;Y&quot;||check==1)?1:0"/>
  43. <Cell col="2" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:prcpdd" mask="####-##-##"/>
  44. <Cell col="3" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:calcscorcd"/>
  45. <Cell col="4" text="bind:orddeptcd"/>
  46. <Cell col="5" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:calcscorcd"/>
  47. <Cell col="6" displaytype="text" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:prcpnm"/>
  48. <Cell col="7" displaytype="combo" edittype="combo" style="align:center;background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:execprcpstatcd" combodataset="ds_init_Z_M0011" combocodecol="cdid" combodatacol="cdnm"/>
  49. <Cell col="8" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:rsrvdt" mask="expr:utlf_isNull(rsrvdt)?'':'####-##-## ##:##'"/>
  50. <Cell col="9" style="align:center middle;background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:acptdt" mask="expr:utlf_isNull(acptdt)?'':'####-##-## ##:##'"/>
  51. <Cell col="10" displaytype="combo" edittype="combo" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:excuroomcd" combodataset="ds_initexcuroom" combocodecol="basecd" combodatacol="basecdflagdesc"/>
  52. <Cell col="11"/>
  53. </Band>
  54. </Format>
  55. </Formats>
  56. </Grid>
  57. <Button id="btn_can" taborder="3" text="처방반환" class="btn4" position="absolute 1088 785 1168 805" anchor="right bottom" positiontype="position" onclick="btn_can_onclick"/>
  58. <Grid id="grd_subordlist3" taborder="4" useinputpanel="false" position="absolute 0 81 1169 343" anchor="all" binddataset="ds_grid_subordlist3" positiontype="position" oncellclick="grd_subordlist3_oncellclick" cellsizingtype="both" onheadclick="grd_subordlist3_onheadclick" autofittype="col" extendsizetype="row" cellclickbound="cell" selecttype="multirow">
  59. <Formats>
  60. <Format id="default">
  61. <Columns>
  62. <Column size="40" band="left"/>
  63. <Column size="30" band="left"/>
  64. <Column size="76"/>
  65. <Column size="0"/>
  66. <Column size="84"/>
  67. <Column size="435"/>
  68. <Column size="94"/>
  69. <Column size="157"/>
  70. <Column size="74"/>
  71. <Column size="69"/>
  72. </Columns>
  73. <Rows>
  74. <Row size="24" band="head"/>
  75. <Row size="24"/>
  76. </Rows>
  77. <Band id="head">
  78. <Cell text="No"/>
  79. <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
  80. <Cell col="2" text="처방일자"/>
  81. <Cell col="3" text="진료과"/>
  82. <Cell col="4" text="처방코드"/>
  83. <Cell col="5" text="처방명"/>
  84. <Cell col="6" text="상태"/>
  85. <Cell col="7" text="치료실"/>
  86. <Cell col="8" text="처방횟수"/>
  87. <Cell col="9" text="남은횟수"/>
  88. </Band>
  89. <Band id="body">
  90. <Cell celltype="head" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" expr="expr:currow + 1"/>
  91. <Cell col="1" displaytype="checkbox" edittype="checkbox" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:check" expr="expr:check == 'Y'||check == '1'?1:0"/>
  92. <Cell col="2" displaytype="date" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:prcpdd" calendardisplaynulltype="nulltext"/>
  93. <Cell col="3" text="bind:orddeptcd"/>
  94. <Cell col="4" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:prcpcd"/>
  95. <Cell col="5" displaytype="text" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:prcpnm"/>
  96. <Cell col="6" displaytype="combo" edittype="combo" style="align:center;background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:execprcpstatcd" combodataset="ds_init_Z_M0011" combocodecol="cdid" combodatacol="cdnm"/>
  97. <Cell col="7" displaytype="combo" edittype="combo" style="background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:excuroomcd" combodataset="ds_initexcuroom" combocodecol="basecd" combodatacol="basecdflagdesc"/>
  98. <Cell col="8" style="align:center middle;background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:prcptims"/>
  99. <Cell col="9" style="align:center middle;background:EXPR(colorflag);background2:EXPR(colorflag);selectbackground:EXPR(colorflag);" text="bind:rmnddayno"/>
  100. <Cell col="10"/>
  101. </Band>
  102. </Format>
  103. </Formats>
  104. </Grid>
  105. <Button id="button1" taborder="6" text="부분반환" class="btn4" visible="false" position="absolute 898 785 978 805" anchor="right bottom" positiontype="position" onclick="button1_onclick"/>
  106. <Button id="button2" taborder="7" text="처방반환출력" class="btn4" position="absolute 981 785 1085 805" anchor="right bottom" positiontype="position" onclick="button2_onclick"/>
  107. <Static id="caption8" text="처방내역" class="tit_2" position="absolute 0 61 121 81" positiontype="position"/>
  108. <Static id="caption1" text="처방상세내역" class="tit_2" position="absolute 0 353 121 373" anchor="left bottom" positiontype="position"/>
  109. <Static id="caption6" text="처방일괄반환" class="tit_1" position="absolute 0 0 120 25" positiontype="position"/>
  110. <Static id="Static02" class="sta_DA_box" position="absolute 0 25 1169 51"/>
  111. <Static id="caption17" text="등록번호" class="cell_1" position="absolute 1 26 105 50" style="align:center middle;" positiontype="position"/>
  112. <Edit id="input2" taborder="10" readonly="true" position="absolute 109 28 233 48" positiontype="position" style="color:#444444ff;font:arial,10,bold;" class="output"/>
  113. <Static id="caption22" text="환자명" class="cell_1" position="absolute 236 26 340 50" style="align:center middle;" positiontype="position"/>
  114. <Edit id="input3" taborder="11" readonly="true" position="absolute 343 28 467 48" positiontype="position" style="color:#444444ff;font:arial,10,bold;" class="output"/>
  115. <Static id="caption23" text="S/A" class="cell_1" position="absolute 470 26 574 50" style="align:center middle;" positiontype="position"/>
  116. <Edit id="input7" taborder="12" readonly="true" position="absolute 577 28 701 48" style="color:#444444ff;align:center middle;font:arial,10,bold;" positiontype="position" class="output"/>
  117. <Static id="caption25" text="주민번호" class="cell_1" position="absolute 704 26 808 50" style="align:center middle;" positiontype="position"/>
  118. <MaskEdit id="input9" taborder="15" position="absolute 811 28 1167 48" readonly="true" style="color:#444444ff;align:center middle;font:arial,10,bold;" mask="######-#{######}" type="string" displaynulltext=" "/>
  119. <CheckBox id="CheckBox00" taborder="16" position="absolute 47 83 63 103" onclick="CheckBox00_onclick" truevalue="1" falsevalue="0"/>
  120. <CheckBox id="CheckBox01" taborder="17" value="0" truevalue="1" falsevalue="0" position="absolute 47 375 63 395" onclick="CheckBox01_onclick"/>
  121. </Layout>
  122. </Layouts>
  123. <Objects>
  124. <Dataset id="ds_grid_subordlist4" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grid_subordlist4_oncolumnchanged">
  125. <ColumnInfo>
  126. <Column id="check" type="STRING" size="255"/>
  127. <Column id="pid" type="STRING" size="255"/>
  128. <Column id="hngnm" type="STRING" size="255"/>
  129. <Column id="sexage" type="STRING" size="255"/>
  130. <Column id="rrgstno" type="STRING" size="255"/>
  131. <Column id="prcpdd" type="STRING" size="255"/>
  132. <Column id="execprcpuniqno" type="BIGDECIMAL" size="255"/>
  133. <Column id="calcscorcd" type="STRING" size="255"/>
  134. <Column id="prcpcd" type="STRING" size="255"/>
  135. <Column id="prcpnm" type="STRING" size="255"/>
  136. <Column id="execprcpstatcd" type="STRING" size="255"/>
  137. <Column id="rsrvdt" type="STRING" size="255"/>
  138. <Column id="acptdt" type="STRING" size="255"/>
  139. <Column id="excuroomcd" type="STRING" size="255"/>
  140. <Column id="execdeptcd" type="STRING" size="255"/>
  141. <Column id="prcpexecdeptcd" type="STRING" size="255"/>
  142. <Column id="gb" type="STRING" size="255"/>
  143. <Column id="execbaseflag" type="STRING" size="255"/>
  144. <Column id="lrgcd" type="STRING" size="255"/>
  145. <Column id="mdlcd" type="STRING" size="255"/>
  146. <Column id="excupartcd" type="STRING" size="255"/>
  147. <Column id="modality" type="STRING" size="255"/>
  148. <Column id="eqmtifyn" type="STRING" size="255"/>
  149. <Column id="ioflag" type="STRING" size="255"/>
  150. <Column id="orddeptcd" type="STRING" size="255"/>
  151. <Column id="orddd" type="STRING" size="255"/>
  152. <Column id="cretno" type="BIGDECIMAL" size="255"/>
  153. <Column id="rcptdd" type="STRING" size="255"/>
  154. <Column id="carecnfmdd" type="STRING" size="255"/>
  155. <Column id="prcphistno" type="BIGDECIMAL" size="255"/>
  156. <Column id="prcpgenrflag" type="STRING" size="255"/>
  157. <Column id="prcpno" type="BIGDECIMAL" size="255"/>
  158. <Column id="indd" type="STRING" size="255"/>
  159. <Column id="actorddd" type="STRING" size="255"/>
  160. <Column id="actcretno" type="BIGDECIMAL" size="255"/>
  161. <Column id="execprcpno" type="BIGDECIMAL" size="255"/>
  162. <Column id="clamdd" type="STRING" size="255"/>
  163. <Column id="basesuppdeptcd" type="STRING" size="255"/>
  164. <Column id="colorflag" type="STRING" size="256"/>
  165. <Column id="checkflag" type="STRING" size="256"/>
  166. <Column id="cnclresncd" type="STRING" size="256"/>
  167. <Column id="acptrem" type="STRING" size="256"/>
  168. <Column id="execrem" type="STRING" size="256"/>
  169. <Column id="contprcpspec" type="STRING" size="256"/>
  170. </ColumnInfo>
  171. </Dataset>
  172. <Dataset id="ds_grid_subordlist3" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grid_subordlist3_oncolumnchanged">
  173. <ColumnInfo>
  174. <Column id="check" type="STRING" size="255"/>
  175. <Column id="prcpdd" type="STRING" size="255"/>
  176. <Column id="prcpcd" type="STRING" size="255"/>
  177. <Column id="prcpnm" type="STRING" size="255"/>
  178. <Column id="prcpno" type="BIGDECIMAL" size="255"/>
  179. <Column id="prcpgenrflag" type="STRING" size="255"/>
  180. <Column id="orddeptcd" type="STRING" size="255"/>
  181. <Column id="orddd" type="STRING" size="255"/>
  182. <Column id="cretno" type="BIGDECIMAL" size="255"/>
  183. <Column id="prcphistno" type="BIGDECIMAL" size="255"/>
  184. <Column id="indd" type="STRING" size="255"/>
  185. <Column id="prcpdayno" type="BIGDECIMAL" size="255"/>
  186. <Column id="prcptims" type="BIGDECIMAL" size="255"/>
  187. <Column id="execprcpstatcd" type="STRING" size="255"/>
  188. <Column id="excuroomcd" type="STRING" size="255"/>
  189. <Column id="ioflag" type="STRING" size="255"/>
  190. <Column id="pid" type="STRING" size="255"/>
  191. <Column id="rmnddayno" type="BIGDECIMAL" size="255"/>
  192. <Column id="colorflag" type="STRING" size="256"/>
  193. <Column id="cnclresncd" type="STRING" size="256"/>
  194. <Column id="acptrem" type="STRING" size="256"/>
  195. <Column id="execrem" type="STRING" size="256"/>
  196. <Column id="contprcpspec" type="STRING" size="256"/>
  197. </ColumnInfo>
  198. </Dataset>
  199. <Dataset id="ds_temp_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  200. <ColumnInfo>
  201. <Column id="pid" type="STRING" size="256"/>
  202. <Column id="hngnm" type="STRING" size="256"/>
  203. <Column id="sexage" type="STRING" size="256"/>
  204. <Column id="dschdclrdt" type="STRING" size="256"/>
  205. <Column id="rrgstno" type="STRING" size="256"/>
  206. </ColumnInfo>
  207. <Rows>
  208. <Row>
  209. <Col id="pid">000953834</Col>
  210. <Col id="hngnm">물리쳇</Col>
  211. <Col id="sexage">M/53</Col>
  212. <Col id="rrgstno">600910 /1221111</Col>
  213. </Row>
  214. </Rows>
  215. </Dataset>
  216. <Dataset id="ds_cond_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  217. <ColumnInfo>
  218. <Column id="pid" type="STRING" size="256"/>
  219. <Column id="hngnm" type="STRING" size="256"/>
  220. <Column id="sexage" type="STRING" size="256"/>
  221. <Column id="dschdclrdt" type="STRING" size="256"/>
  222. <Column id="rrgstno" type="STRING" size="256"/>
  223. <Column id="basesuppdeptcd" type="STRING" size="256"/>
  224. </ColumnInfo>
  225. <Rows>
  226. <Row>
  227. <Col id="pid"/>
  228. <Col id="hngnm"/>
  229. <Col id="sexage"/>
  230. <Col id="dschdclrdt"/>
  231. <Col id="rrgstno"/>
  232. <Col id="basesuppdeptcd"/>
  233. </Row>
  234. </Rows>
  235. </Dataset>
  236. <Dataset id="ds_hide_savedata_data1" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  237. <ColumnInfo>
  238. <Column id="prcpdd" type="STRING" size="255"/>
  239. <Column id="execprcpuniqno" type="BIGDECIMAL" size="255"/>
  240. <Column id="acptrem" type="STRING" size="255"/>
  241. <Column id="execrem" type="STRING" size="255"/>
  242. <Column id="basesuppdeptcd" type="STRING" size="255"/>
  243. <Column id="prcpexecdeptcd" type="STRING" size="255"/>
  244. <Column id="pid" type="STRING" size="255"/>
  245. <Column id="rcptdd" type="STRING" size="255"/>
  246. <Column id="carecnfmdd" type="STRING" size="255"/>
  247. <Column id="ioflag" type="STRING" size="255"/>
  248. <Column id="prcpno" type="BIGDECIMAL" size="255"/>
  249. <Column id="excuroomcd" type="STRING" size="255"/>
  250. <Column id="orddeptcd" type="STRING" size="255"/>
  251. <Column id="orddd" type="STRING" size="255"/>
  252. <Column id="cretno" type="BIGDECIMAL" size="255"/>
  253. <Column id="gb" type="STRING" size="255"/>
  254. <Column id="rcptdd" type="STRING" size="255"/>
  255. <Column id="carecnfmdd" type="STRING" size="255"/>
  256. <Column id="ioflag" type="STRING" size="255"/>
  257. <Column id="prcphistno" type="BIGDECIMAL" size="255"/>
  258. <Column id="prcpgenrflag" type="STRING" size="255"/>
  259. <Column id="indd" type="STRING" size="255"/>
  260. <Column id="contprcpspec" type="STRING" size="256"/>
  261. <Column id="cnclresncd" type="STRING" size="256"/>
  262. </ColumnInfo>
  263. </Dataset>
  264. <Dataset id="ds_grid_subordlist4_save" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  265. <ColumnInfo>
  266. <Column id="check" type="STRING" size="255"/>
  267. <Column id="pid" type="STRING" size="255"/>
  268. <Column id="hngnm" type="STRING" size="255"/>
  269. <Column id="sexage" type="STRING" size="255"/>
  270. <Column id="rrgstno" type="STRING" size="255"/>
  271. <Column id="prcpdd" type="STRING" size="255"/>
  272. <Column id="execprcpuniqno" type="BIGDECIMAL" size="255"/>
  273. <Column id="calcscorcd" type="STRING" size="255"/>
  274. <Column id="prcpcd" type="STRING" size="255"/>
  275. <Column id="prcpnm" type="STRING" size="255"/>
  276. <Column id="execprcpstatcd" type="STRING" size="255"/>
  277. <Column id="rsrvdt" type="STRING" size="255"/>
  278. <Column id="acptdt" type="STRING" size="255"/>
  279. <Column id="excuroomcd" type="STRING" size="255"/>
  280. <Column id="execdeptcd" type="STRING" size="255"/>
  281. <Column id="prcpexecdeptcd" type="STRING" size="255"/>
  282. <Column id="gb" type="STRING" size="255"/>
  283. <Column id="execbaseflag" type="STRING" size="255"/>
  284. <Column id="lrgcd" type="STRING" size="255"/>
  285. <Column id="mdlcd" type="STRING" size="255"/>
  286. <Column id="excupartcd" type="STRING" size="255"/>
  287. <Column id="modality" type="STRING" size="255"/>
  288. <Column id="eqmtifyn" type="STRING" size="255"/>
  289. <Column id="ioflag" type="STRING" size="255"/>
  290. <Column id="orddeptcd" type="STRING" size="255"/>
  291. <Column id="orddd" type="STRING" size="255"/>
  292. <Column id="cretno" type="BIGDECIMAL" size="255"/>
  293. <Column id="rcptdd" type="STRING" size="255"/>
  294. <Column id="carecnfmdd" type="STRING" size="255"/>
  295. <Column id="prcphistno" type="BIGDECIMAL" size="255"/>
  296. <Column id="prcpgenrflag" type="STRING" size="255"/>
  297. <Column id="prcpno" type="STRING" size="255"/>
  298. <Column id="indd" type="STRING" size="255"/>
  299. <Column id="actorddd" type="STRING" size="255"/>
  300. <Column id="actcretno" type="BIGDECIMAL" size="255"/>
  301. <Column id="execprcpno" type="BIGDECIMAL" size="255"/>
  302. <Column id="clamdd" type="STRING" size="255"/>
  303. <Column id="basesuppdeptcd" type="STRING" size="255"/>
  304. <Column id="colorflag" type="STRING" size="256"/>
  305. <Column id="checkflag" type="STRING" size="256"/>
  306. <Column id="cnclresncd" type="STRING" size="256"/>
  307. <Column id="acptrem" type="STRING" size="256"/>
  308. <Column id="execrem" type="STRING" size="256"/>
  309. <Column id="contprcpspec" type="STRING" size="256"/>
  310. </ColumnInfo>
  311. </Dataset>
  312. <Dataset id="ds_grid_subordlist4_save1" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  313. <ColumnInfo>
  314. <Column id="check" type="STRING" size="255"/>
  315. <Column id="pid" type="STRING" size="255"/>
  316. <Column id="hngnm" type="STRING" size="255"/>
  317. <Column id="sexage" type="STRING" size="255"/>
  318. <Column id="rrgstno" type="STRING" size="255"/>
  319. <Column id="prcpdd" type="STRING" size="255"/>
  320. <Column id="execprcpuniqno" type="BIGDECIMAL" size="255"/>
  321. <Column id="calcscorcd" type="STRING" size="255"/>
  322. <Column id="prcpcd" type="STRING" size="255"/>
  323. <Column id="prcpnm" type="STRING" size="255"/>
  324. <Column id="execprcpstatcd" type="STRING" size="255"/>
  325. <Column id="rsrvdt" type="STRING" size="255"/>
  326. <Column id="acptdt" type="STRING" size="255"/>
  327. <Column id="excuroomcd" type="STRING" size="255"/>
  328. <Column id="execdeptcd" type="STRING" size="255"/>
  329. <Column id="prcpexecdeptcd" type="STRING" size="255"/>
  330. <Column id="gb" type="STRING" size="255"/>
  331. <Column id="execbaseflag" type="STRING" size="255"/>
  332. <Column id="lrgcd" type="STRING" size="255"/>
  333. <Column id="mdlcd" type="STRING" size="255"/>
  334. <Column id="excupartcd" type="STRING" size="255"/>
  335. <Column id="modality" type="STRING" size="255"/>
  336. <Column id="eqmtifyn" type="STRING" size="255"/>
  337. <Column id="ioflag" type="STRING" size="255"/>
  338. <Column id="orddeptcd" type="STRING" size="255"/>
  339. <Column id="orddd" type="STRING" size="255"/>
  340. <Column id="cretno" type="BIGDECIMAL" size="255"/>
  341. <Column id="rcptdd" type="STRING" size="255"/>
  342. <Column id="carecnfmdd" type="STRING" size="255"/>
  343. <Column id="prcphistno" type="BIGDECIMAL" size="255"/>
  344. <Column id="prcpgenrflag" type="STRING" size="255"/>
  345. <Column id="prcpno" type="STRING" size="255"/>
  346. <Column id="indd" type="STRING" size="255"/>
  347. <Column id="actorddd" type="STRING" size="255"/>
  348. <Column id="actcretno" type="BIGDECIMAL" size="255"/>
  349. <Column id="execprcpno" type="BIGDECIMAL" size="255"/>
  350. <Column id="clamdd" type="STRING" size="255"/>
  351. <Column id="basesuppdeptcd" type="STRING" size="255"/>
  352. <Column id="colorflag" type="STRING" size="256"/>
  353. <Column id="checkflag" type="STRING" size="256"/>
  354. <Column id="cnclresncd" type="STRING" size="256"/>
  355. <Column id="acptrem" type="STRING" size="256"/>
  356. <Column id="execrem" type="STRING" size="256"/>
  357. <Column id="contprcpspec" type="STRING" size="256"/>
  358. </ColumnInfo>
  359. </Dataset>
  360. <Dataset id="ds_data_result" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  361. <Dataset id="ds_tmp_printdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  362. <ColumnInfo>
  363. <Column id="pid" type="STRING" size="256"/>
  364. <Column id="hngnm" type="STRING" size="256"/>
  365. <Column id="sexage" type="STRING" size="256"/>
  366. <Column id="rrgstno" type="STRING" size="256"/>
  367. <Column id="logoimg" type="STRING" size="256"/>
  368. <Column id="prcpdd" type="STRING" size="256"/>
  369. <Column id="calcscorcd" type="STRING" size="256"/>
  370. <Column id="prcpnm" type="STRING" size="256"/>
  371. <Column id="execprcpstatcd" type="STRING" size="256"/>
  372. <Column id="rsrvdt" type="STRING" size="256"/>
  373. <Column id="excuroomcd" type="STRING" size="256"/>
  374. </ColumnInfo>
  375. </Dataset>
  376. <Dataset id="ds_init_Z_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  377. <ColumnInfo>
  378. <Column id="cdid" type="STRING" size="256"/>
  379. <Column id="cdnm" type="STRING" size="256"/>
  380. </ColumnInfo>
  381. </Dataset>
  382. <Dataset id="ds_initexcuroom" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  383. <ColumnInfo>
  384. <Column id="basecd" type="STRING" size="256" sumtext="검사실코드"/>
  385. <Column id="basecdflagdesc" type="STRING" size="256" sumtext="검사실코드"/>
  386. </ColumnInfo>
  387. </Dataset>
  388. <Dataset id="ds_initexcuward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  389. <ColumnInfo>
  390. <Column id="wardroomcdid" type="STRING" size="256" sumtext="병동코드"/>
  391. <Column id="wardroomcdnm" type="STRING" size="256" sumtext="병동코드명"/>
  392. </ColumnInfo>
  393. </Dataset>
  394. </Objects>
  395. <Bind>
  396. <BindItem id="item0" compid="input2" propid="value" datasetid="ds_cond_data" columnid="pid"/>
  397. <BindItem id="item1" compid="input3" propid="value" datasetid="ds_cond_data" columnid="hngnm"/>
  398. <BindItem id="item2" compid="input7" propid="value" datasetid="ds_cond_data" columnid="sexage"/>
  399. <BindItem id="item5" compid="input9" propid="value" datasetid="ds_grid_subordlist4" columnid="rrgstno"/>
  400. </Bind>
  401. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  402. * System Name : KU2.0
  403. * Job Name :
  404. * File Name : SPAEA01201_재활일괄반환.xfdl
  405. * Creator :
  406. * Make Date : 2016-06-28
  407. *
  408. * Description :
  409. *---------------------------------------------------------------------------------------
  410. * Modify Date Modifier Modify Description
  411. *---------------------------------------------------------------------------------------
  412. *
  413. *---------------------------------------------------------------------------------------
  414. ****************************************************************************************/
  415. include "com_commonxp::comm_main.xjs";
  416. include "com_basiccodexp::ZBC001.xjs";
  417. include "ast_examcurexp::AEZ0001.xjs";
  418. var lgv_suppdeptcd = "";
  419. //=======================================================================================
  420. // Function
  421. //---------------------------------------------------------------------------------------
  422. /* @group : 재활일괄반환
  423. * @ver : 2010.06.21
  424. * @by : 김건기
  425. * @-----------------------------------
  426. * @type : function
  427. * @access : public
  428. * @desc : 재활 일괄반환을 위한 Function
  429. */
  430. function exePrcpRtn(str)
  431. {
  432. var contprcpspec = "";
  433. var dccnt = 0;
  434. var dcrow = 0;
  435. var pid = ds_cond_data.getColumn(0, "pid");
  436. var hngnm = ds_cond_data.getColumn(0, "hngnm");
  437. var sexage = ds_cond_data.getColumn(0, "sexage");
  438. var rrgstno = ds_cond_data.getColumn(0, "rrgstno");
  439. var prtrow = -1;
  440. // 출력 데이터 초기화
  441. ds_tmp_printdata.clearData();
  442. ds_hide_savedata_data1.clearData();
  443. for ( var r = 0; r < ds_grid_subordlist3.rowcount; r++ )
  444. {
  445. var maincheck = ds_grid_subordlist3.getColumn(r, "check" );
  446. var sprcpdd = ds_grid_subordlist3.getColumn(r, "prcpdd");
  447. var sprcpno = ds_grid_subordlist3.getColumn(r, "prcpno");
  448. var sprcphistno = ds_grid_subordlist3.getColumn(r, "prcphistno");
  449. if (maincheck == "Y")
  450. {
  451. dcrow = ds_hide_savedata_data1.addRow();
  452. contprcpspec = "status|actorddd|actcretno|execprcpstatcd|prcpdd|execprcpno|execprcpuniqno|rcptdd|keyval|prcpno|prcphistno|clamdd";
  453. dccnt = 0;
  454. for ( var i = 0; i < ds_grid_subordlist4.rowcount; i++ )
  455. {
  456. var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  457. var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  458. var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  459. var check = ds_grid_subordlist4.getColumn(i, "check" );
  460. if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  461. {
  462. if ( check == "Y" )
  463. {
  464. dccnt++;
  465. }
  466. if ( dccnt == 1 || check == "Y" )
  467. {
  468. ds_hide_savedata_data1.setColumn(dcrow, "prcpdd" , ds_grid_subordlist4.getColumn(i, "prcpdd")); // 처방일자
  469. ds_hide_savedata_data1.setColumn(dcrow, "execprcpuniqno", ds_grid_subordlist4.getColumn(i, "execprcpuniqno")); // 실시처방번호
  470. // if(!utlf_isNull(ds_grid_subordlist4.getColumn(i, "cnclresncd"))) {
  471. // ds_hide_savedata_data1.setColumn(dcrow, "cnclresncd" , ds_grid_subordlist4.getColumn(i, "cnclresncd")); // 취소사유코드-코드관리요함
  472. // } else {
  473. // ds_hide_savedata_data1.setColumn(dcrow, "cnclresncd", "null");
  474. // trace("2222");
  475. // }
  476. ds_hide_savedata_data1.setColumn(dcrow, "acptrem" , ds_grid_subordlist4.getColumn(i, "acptrem")); // 접수참고사항
  477. ds_hide_savedata_data1.setColumn(dcrow, "execrem" , ds_grid_subordlist4.getColumn(i, "execrem")); // 접수and실시시행코드의참고사항
  478. ds_hide_savedata_data1.setColumn(dcrow, "basesuppdeptcd", suppdeptcd); // 부서코드
  479. ds_hide_savedata_data1.setColumn(dcrow, "prcpexecdeptcd", ds_grid_subordlist4.getColumn(i, "prcpexecdeptcd")); // 처방실시부서코드
  480. ds_hide_savedata_data1.setColumn(dcrow, "pid" , ds_grid_subordlist4.getColumn(i, "pid")); // 등록번호
  481. //ds_hide_savedata_data1.setColumn(dcrow, "execbaseflag" , ds_grid_subordlist4.getColumn(i, "execbaseflag")); // 실시기준여부
  482. //ds_hide_savedata_data1.setColumn(dcrow, "lrgcd" , ds_grid_subordlist4.getColumn(i, "lrgcd")); // 검사그룹코드(AEBMECCD)
  483. //ds_hide_savedata_data1.setColumn(dcrow, "mdlcd" , ds_grid_subordlist4.getColumn(i, "mdlcd")); // 부위코드(AEBMECCD)
  484. //ds_hide_savedata_data1.setColumn(dcrow, "modality" , ds_grid_subordlist4.getColumn(i, "modality")); // Modality(AEBMECCD)
  485. //ds_hide_savedata_data1.setColumn(dcrow, "eqmtifyn" , ds_grid_subordlist4.getColumn(i, "eqmtifyn")); // CDIS 연동여부
  486. ds_hide_savedata_data1.setColumn(dcrow, "rcptdd" , ds_grid_subordlist4.getColumn(i, "rcptdd")); // 수납일자
  487. ds_hide_savedata_data1.setColumn(dcrow, "carecnfmdd" , ds_grid_subordlist4.getColumn(i, "carecnfmdd")); // 간호확인일자
  488. ds_hide_savedata_data1.setColumn(dcrow, "ioflag" , ds_grid_subordlist4.getColumn(i, "ioflag")); // 입원외래구분
  489. ds_hide_savedata_data1.setColumn(dcrow, "prcpno" , ds_grid_subordlist4.getColumn(i, "prcpno")); // 처방일련번호
  490. ds_hide_savedata_data1.setColumn(dcrow, "excuroomcd" , ds_grid_subordlist4.getColumn(i, "excuroomcd")); // 치료실
  491. ds_hide_savedata_data1.setColumn(dcrow, "orddeptcd" , ds_grid_subordlist4.getColumn(i, "orddeptcd")); // 진료과
  492. ds_hide_savedata_data1.setColumn(dcrow, "orddd" , ds_grid_subordlist4.getColumn(i, "orddd")); // 진료일자
  493. ds_hide_savedata_data1.setColumn(dcrow, "cretno" , ds_grid_subordlist4.getColumn(i, "cretno")); // 원무생성번호
  494. ds_hide_savedata_data1.setColumn(dcrow, "gb" , ds_grid_subordlist4.getColumn(i, "gb")); // 처방일련번호
  495. ds_hide_savedata_data1.setColumn(dcrow, "rcptdd" , ds_grid_subordlist4.getColumn(i, "rcptdd")); // 수납일자
  496. ds_hide_savedata_data1.setColumn(dcrow, "carecnfmdd" , ds_grid_subordlist4.getColumn(i, "carecnfmdd")); // 간호확인일자
  497. ds_hide_savedata_data1.setColumn(dcrow, "ioflag" , ds_grid_subordlist4.getColumn(i, "ioflag")); // 입원외래구분
  498. ds_hide_savedata_data1.setColumn(dcrow, "prcphistno" , ds_grid_subordlist4.getColumn(i, "prcphistno")); // 처방이력번호
  499. ds_hide_savedata_data1.setColumn(dcrow, "prcpgenrflag" , ds_grid_subordlist4.getColumn(i, "prcpgenrflag")); // 처방발생구분
  500. ds_hide_savedata_data1.setColumn(dcrow, "indd" , ds_grid_subordlist4.getColumn(i, "indd")); // 입원일자
  501. }
  502. if (check == "Y")
  503. {
  504. contprcpspec = contprcpspec + "^C|";
  505. }
  506. else
  507. {
  508. contprcpspec = contprcpspec + "^-|";
  509. }
  510. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "actorddd") + "|";
  511. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "actcretno") + "|";
  512. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "execprcpstatcd") + "|";
  513. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "prcpdd") + "|";
  514. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "execprcpno") + "|";
  515. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "execprcpuniqno") + "|";
  516. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "rcptdd") + "|";
  517. contprcpspec = contprcpspec + "0|";
  518. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "prcpno") + "|";
  519. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "prcphistno") + "|";
  520. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "clamdd");
  521. if ( dccnt > 0 )
  522. {
  523. ds_hide_savedata_data1.setColumn(dcrow, "contprcpspec", contprcpspec); //연속처방상세
  524. }
  525. }
  526. }
  527. }
  528. }
  529. if ( dccnt == 0 )
  530. {
  531. alert( "선택된 D/C 처방이 없습니다." );
  532. return;
  533. }
  534. var strFilter = "check=='Y'";
  535. ds_grid_subordlist4.filter(strFilter);
  536. ds_grid_subordlist4_save.clearData();
  537. ds_grid_subordlist4_save.copyData(ds_grid_subordlist4, true);
  538. ds_grid_subordlist4.filter("");
  539. // ds_grid_subordlist4_save.addConstColumn("flag", "cncl");
  540. ds_grid_subordlist4_save1.clearData();
  541. ds_grid_subordlist4_save1.copyData(ds_hide_savedata_data1);
  542. // 출력데이타 초기화
  543. ds_tmp_printdata.clearData();
  544. // 처방 반환 후 출력일 경우
  545. if (str == "P")
  546. {
  547. for ( var i = 0; i < ds_grid_subordlist4.rowcount; i++ )
  548. {
  549. var check = ds_grid_subordlist4.getColumn(i, "check" );
  550. var rcptdd = ds_grid_subordlist4.getColumn(i, "rcptdd" );
  551. var ioflag = ds_grid_subordlist4.getColumn(i, "ioflag" );
  552. // 출력데이타 생성
  553. if (check == "Y" && rcptdd != "00000000" && ioflag == "O")
  554. {
  555. prtrow = ds_tmp_printdata.addRow();
  556. ds_tmp_printdata.setColumn(prtrow, "pid" , pid); // 등록번호
  557. ds_tmp_printdata.setColumn(prtrow, "hngnm" , hngnm); // 환자명
  558. ds_tmp_printdata.setColumn(prtrow, "sexage" , sexage); // S/A
  559. ds_tmp_printdata.setColumn(prtrow, "rrgstno" , rrgstno); // 주민등록번호
  560. ds_tmp_printdata.setColumn(prtrow, "logoimg" , rptf_getImageURL("biglogo" + sysf_getUserInfo("dutplceinstcd"), "jpg"));
  561. ds_tmp_printdata.setColumn(prtrow, "prcpdd" , grd_subordlist4.getCellText(i, 2)); // 처방일자
  562. ds_tmp_printdata.setColumn(prtrow, "calcscorcd" , grd_subordlist4.getCellText(i, 3)); // 처방코드
  563. ds_tmp_printdata.setColumn(prtrow, "prcpnm" , grd_subordlist4.getCellText(i, 5)); // 처방명
  564. ds_tmp_printdata.setColumn(prtrow, "execprcpstatcd" , grd_subordlist4.getCellText(i, 6)); // 상태
  565. ds_tmp_printdata.setColumn(prtrow, "rsrvdt" , grd_subordlist4.getCellText(i, 7)); // 예약일시
  566. ds_tmp_printdata.setColumn(prtrow, "excuroomcd" , grd_subordlist4.getCellText(i, 9)); // 치료실
  567. }
  568. }
  569. if (ds_tmp_printdata.rowcount != 0)
  570. {
  571. var objDOM = rptf_createDOM(); // DOM 객체 설정
  572. var objParam = new Object();
  573. rptf_setNodeListToDOM(objDOM, "root/tmp/printdata/data", ds_tmp_printdata);
  574. objParam.xml_data_XML1 = objDOM.documentElement.source;
  575. var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0";
  576. rptf_exeReportPreview30(["RPAEA05300"],[objParam], option);
  577. } else {
  578. sysf_messageBox("처방 반환 출력 내역이 없습니다.", "E999");
  579. }
  580. }
  581. dsf_setFixVal(ds_grid_subordlist4_save, "transactiongubn:3,execprcpstatXcd:X,execprcpstat440cd:440,execprcpstat610cd:610,execprcpstat230cd:230"
  582. +",execprcpstat100cd:100,execprcpstat000cd:000,execprcpstatYcd:Y,tretflagcd:440,largeclass:M2,allexecflag:Y,status:C");
  583. // trace(ds_grid_subordlist4_save.saveXML());
  584. // trace(ds_grid_subordlist4_save1.saveXML());
  585. var oParam = new Object();
  586. oParam.id = "TXAEA01207";
  587. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  588. oParam.method = "reqExeAcptRsrvAllReturnList";
  589. oParam.inds = "reqparam=ds_grid_subordlist4_save data1=ds_grid_subordlist4_save1";
  590. oParam.outds = "ds_data_result=item";
  591. oParam.callback = "cf_TXAEA01207";
  592. tranf_submit(oParam);
  593. }
  594. /****************************************************************************************
  595. * Components :
  596. * Components ID : SPAEA01201
  597. * Event : onload
  598. * Argument : 01.obj : Object Event has occurred
  599. * : 02.e : Event Object
  600. * Description :
  601. ****************************************************************************************/
  602. function SPAEA01201_onload(obj:Form, e:LoadEventInfo)
  603. {
  604. frmf_initForm(obj); // 화면공통
  605. try{
  606. ds_cond_data.copyData(arg_ds_temp_patinfolist);
  607. }catch(e){}
  608. grdf_setGridSort(grd_subordlist3);
  609. grdf_setGridSort(grd_subordlist4);
  610. if((utlf_transNullToEmpty(ds_cond_data.getColumn(0,"sex"))+utlf_transNullToEmpty(ds_cond_data.getColumn(0,"age"))) != "" )
  611. dsf_makeValue(ds_cond_data,"sexage","string",utlf_transNullToEmpty(ds_cond_data.getColumn(0,"sex"))+"/"+utlf_transNullToEmpty(ds_cond_data.getColumn(0,"age")));
  612. lf_aezfSetSuppDeptcd();
  613. lgv_suppdeptcd = suppdeptcd;
  614. dsf_createDsRow("ds_send"
  615. , [{col: "basesuppdeptcd", val: suppdeptcd}
  616. , {col: "rbasecdflag", val: "R"}
  617. , {col: "initflag", val: "1"}
  618. , {col: "alladdyn", val: "Y"}]);
  619. var oParam = {};
  620. oParam.id = "TRAEA01201";
  621. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  622. oParam.method = "reqGetInitExamCureRoomGrpCodeList";
  623. oParam.inds = "reqparam=ds_send";
  624. oParam.outds = "ds_initexcuroom=initexcuroom ds_initexcuward=initexcuward";
  625. oParam.async = false;
  626. //oParam.callback = "cf_TRAEA01201";
  627. tranf_submit(oParam);
  628. appf_getCodeList([{dsNm: "ds_init_Z_M0011", cdGrpId: "M0011"}
  629. ], true);
  630. ds_cond_data.addColumn("basesuppdeptcd","string");
  631. ds_cond_data.setColumn(0, "basesuppdeptcd" , lgv_suppdeptcd);
  632. ds_grid_subordlist4.clearData();
  633. // 반환리스트
  634. var oParam = new Object();
  635. oParam.id = "TRAEA01209";
  636. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  637. oParam.method = "reqGetExamCureReturnList";
  638. oParam.inds = "reqparam=ds_cond_data";
  639. oParam.outds ="ds_grid_subordlist4=subordlist4 ds_grid_subordlist3=subordlist3";
  640. oParam.callback = "cf_TRAEA01209";
  641. tranf_submit(oParam);
  642. }
  643. function cf_TRAEA01209(strSvcID, nErrorCode, strErrorMsg){
  644. //에러 처리
  645. if(nErrorCode == 0){
  646. // var execprcpstatcd = "";
  647. //
  648. // for (var i = 0; i < ds_grid_subordlist4.rowcount; i++)
  649. // {
  650. // execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  651. // if (execprcpstatcd > "600")
  652. // {
  653. // ds_grid_subordlist4.setColumn(i, "checkflag", "none");
  654. // }
  655. // else
  656. // {
  657. // ds_grid_subordlist4.setColumn(i, "checkflag", "checkbox");
  658. // }
  659. // }
  660. lf_setGrdCheckboxDisable("execprcpstatcd>'600'",1);
  661. ds_grid_subordlist3.rowposition = -1;
  662. ds_grid_subordlist4.rowposition = -1;
  663. }else{
  664. }
  665. }
  666. function lf_setGrdCheckboxDisable(sCond,nCol) { //sCond:조건 / nCol:적용컬럼
  667. var sExpr1 ="background:EXPR("+sCond+"?'url('theme://images/tab_hide_blue.gif') repeat-x':'')"
  668. +";background2:EXPR("+sCond+"?'url('theme://images/tab_hide_blue.gif') repeat-x':'')"
  669. //+";line:'0 none #808080ff'"
  670. +";controlbackground:EXPR("+sCond+"?'silver':'default')"
  671. +";controlborder:EXPR("+sCond+"?'1 solid #708090cc':'default')"
  672. ;
  673. grd_subordlist4.setCellProperty("body", nCol, "edittype", "EXPR:"+sCond+"?'none':'checkbox'");
  674. grd_subordlist4.setCellProperty("body", nCol, "style", sExpr1);
  675. }
  676. /****************************************************************************************
  677. * Components :
  678. * Components ID : grd_subordlist4
  679. * Event : oncellclick
  680. * Argument : 01.obj : Object Event has occurred
  681. * : 02.e : Event Object
  682. * Description :
  683. ****************************************************************************************/
  684. function grd_subordlist4_oncellclick(obj:Grid, e:GridClickEventInfo)
  685. {
  686. if(e.col != obj.getBindCellIndex("body","check")) return;
  687. var sprcpdd = ds_grid_subordlist4.getColumn(e.row, "prcpdd");
  688. var sprcpno = ds_grid_subordlist4.getColumn(e.row, "prcpno");
  689. var sprcphistno = ds_grid_subordlist4.getColumn(e.row, "prcphistno");
  690. var check = ds_grid_subordlist4.getColumn(e.row, "check");
  691. if (check == "Y")
  692. {
  693. for (var i = 0; i < ds_grid_subordlist3.rowcount; i++)
  694. {
  695. var sprcpdd1 = ds_grid_subordlist3.getColumn(i, "prcpdd");
  696. var sprcpno1 = ds_grid_subordlist3.getColumn(i, "prcpno");
  697. var sprcphistno1 = ds_grid_subordlist3.getColumn(i, "prcphistno");
  698. if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  699. {
  700. ds_grid_subordlist3.setColumn(i, "check", "Y");
  701. ds_grid_subordlist3.setColumn(i, "colorflag", "#f4d2fc");
  702. }
  703. }
  704. }
  705. // else {
  706. // for (var i = 0; i < ds_grid_subordlist3.rowcount; i++)
  707. // {
  708. // var sprcpdd1 = ds_grid_subordlist3.getColumn(i, "prcpdd");
  709. // var sprcpno1 = ds_grid_subordlist3.getColumn(i, "prcpno");
  710. // var sprcphistno1 = ds_grid_subordlist3.getColumn(i, "prcphistno");
  711. //
  712. // if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  713. // {
  714. // ds_grid_subordlist3.setColumn(i, "check", "N");
  715. // ds_grid_subordlist3.setColumn(i, "colorflag", "");
  716. // }
  717. // }
  718. // }
  719. }
  720. /****************************************************************************************
  721. * Components :
  722. * Components ID : grd_subordlist4
  723. * Event : onheadclick
  724. * Argument : 01.obj : Object Event has occurred
  725. * : 02.e : Event Object
  726. * Description :
  727. ****************************************************************************************/
  728. function grd_subordlist4_onheadclick(obj:Grid, e:GridClickEventInfo)
  729. {
  730. // // 그리드 헤더 체크 컬럼 클릭에 따른 값 변경 셋팅
  731. // if(obj.getCellProperty("Head", 1, "text") == "1")
  732. // {
  733. // obj.setCellProperty("Head", 1, "text", "0");
  734. // }
  735. // else
  736. // {
  737. // obj.setCellProperty("Head", 1, "text", "1");
  738. // }
  739. //
  740. // // 변경된 체크 컬럼 값에 따른 처방상세내역 check/color 셋팅
  741. // if(obj.getCellProperty("Head", 1, "text") == "1")
  742. // {
  743. // for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  744. // {
  745. // var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  746. // if ( execprcpstatcd < "610")
  747. // {
  748. // ds_grid_subordlist4.setColumn(i, "check", "Y");
  749. // }
  750. // }
  751. // }
  752. // else
  753. // {
  754. // for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  755. // {
  756. // var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  757. // if ( execprcpstatcd < "610")
  758. // {
  759. // ds_grid_subordlist4.setColumn(i, "check", "N");
  760. // }
  761. // }
  762. // }
  763. }
  764. /****************************************************************************************
  765. * Components :
  766. * Components ID : btn_can
  767. * Event : onclick
  768. * Argument : 01.obj : Object Event has occurred
  769. * : 02.e : Event Object
  770. * Description :
  771. ****************************************************************************************/
  772. function btn_can_onclick(obj:Button, e:ClickEventInfo)
  773. {
  774. //2011.03.24 취소시 메세지 처리
  775. var message = sysf_messageBox("처방반환을","Q004");
  776. if ( message == 6 )
  777. {
  778. // 처방반환
  779. exePrcpRtn("N");
  780. for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  781. {
  782. //ds_grid_subordlist4.setColumn(i, "colorfalg", "");
  783. }
  784. }
  785. }
  786. /****************************************************************************************
  787. * Components :
  788. * Components ID : grd_subordlist3
  789. * Event : oncellclick
  790. * Argument : 01.obj : Object Event has occurred
  791. * : 02.e : Event Object
  792. * Description :
  793. ****************************************************************************************/
  794. function grd_subordlist3_oncellclick(obj:Grid, e:GridClickEventInfo)
  795. {
  796. var sprcpdd = ds_grid_subordlist3.getColumn(e.row, "prcpdd");
  797. var sprcpno = ds_grid_subordlist3.getColumn(e.row, "prcpno");
  798. var sprcphistno = ds_grid_subordlist3.getColumn(e.row, "prcphistno");
  799. var prcpgenrflag = ds_grid_subordlist3.getColumn(e.row, "prcpgenrflag");
  800. for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  801. {
  802. var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  803. var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  804. var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  805. var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  806. if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  807. {
  808. if (ds_grid_subordlist3.getColumn(e.row, "check") == "Y")
  809. {
  810. if ( execprcpstatcd < "610")
  811. {
  812. ds_grid_subordlist4.setColumn(i, "check", "Y");
  813. ds_grid_subordlist4.setColumn(i, "colorflag", "#f4d2fc");
  814. if (prcpgenrflag == "I")
  815. {
  816. ds_grid_subordlist4.setColumn(i, "checkflag", "none");
  817. }
  818. }
  819. }
  820. else
  821. {
  822. ds_grid_subordlist4.setColumn(i, "check", "N");
  823. ds_grid_subordlist4.setColumn(i, "colorflag", "");
  824. }
  825. }
  826. }
  827. }
  828. /****************************************************************************************
  829. * Components :
  830. * Components ID : grd_subordlist3
  831. * Event : oncellclick
  832. * Argument : 01.obj : Object Event has occurred
  833. * : 02.e : Event Object
  834. * Description :
  835. ****************************************************************************************/
  836. function grd_subordlist3_onheadclick(obj:Grid, e:GridClickEventInfo)
  837. {
  838. // // 그리드 헤더 체크 컬럼 클릭에 따른 값 변경 셋팅
  839. // if(obj.getCellProperty("Head", 1, "text").substr(0,1) == "1")
  840. // {
  841. // obj.setCellProperty("Head", 1, "text", 0);
  842. // }
  843. // else
  844. // {
  845. // obj.setCellProperty("Head", 1, "text", 1);
  846. // }
  847. //
  848. // // 변경된 체크 컬럼 값에 따른 처방상세내역 check/color 셋팅
  849. // if(obj.getCellProperty("Head", 1, "text").substr(0,1) == "1")
  850. // {
  851. // for (var i = 0; i < ds_grid_subordlist3.getRowCount(); i ++)
  852. // {
  853. // ds_grid_subordlist3.setColumn(i, "check", "Y");
  854. // }
  855. //
  856. // for (var j = 0; j < ds_grid_subordlist3.getRowCount(); j ++)
  857. // {
  858. // var sprcpdd = ds_grid_subordlist3.getColumn(j, "prcpdd");
  859. // var sprcpno = ds_grid_subordlist3.getColumn(j, "prcpno");
  860. // var sprcphistno = ds_grid_subordlist3.getColumn(j, "prcphistno");
  861. // var prcpgenrflag = ds_grid_subordlist3.getColumn(ds_grid_subordlist3.rowposition, "prcpgenrflag");
  862. //
  863. // for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  864. // {
  865. // var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  866. // var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  867. // var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  868. // var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  869. //
  870. // if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  871. // {
  872. // if (ds_grid_subordlist3.getColumn(j, "check") == "Y")
  873. // {
  874. // if ( execprcpstatcd < "610")
  875. // {
  876. // ds_grid_subordlist4.setColumn(i, "check", "Y");
  877. // ds_grid_subordlist4.setColumn(i, "colorflag", "#f4d2fc");
  878. //
  879. // if (prcpgenrflag == "I")
  880. // {
  881. // ds_grid_subordlist4.setColumn(i, "checkflag", "none");
  882. // }
  883. // }
  884. // }
  885. // else
  886. // {
  887. // ds_grid_subordlist4.setColumn(i, "check", "N");
  888. // ds_grid_subordlist4.setColumn(i, "colorflag", "");
  889. // }
  890. // }
  891. // }
  892. // }
  893. // }
  894. // else
  895. // {
  896. // for (var i = 0; i < ds_grid_subordlist3.getRowCount(); i ++)
  897. // {
  898. // ds_grid_subordlist3.setColumn(i, "check", "N");
  899. // }
  900. //
  901. // for (var j = 0; j < ds_grid_subordlist3.getRowCount(); j ++)
  902. // {
  903. // var sprcpdd = ds_grid_subordlist3.getColumn(j, "prcpdd");
  904. // var sprcpno = ds_grid_subordlist3.getColumn(j, "prcpno");
  905. // var sprcphistno = ds_grid_subordlist3.getColumn(j, "prcphistno");
  906. //
  907. // for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  908. // {
  909. // var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  910. // var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  911. // var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  912. //
  913. // if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  914. // {
  915. // if (ds_grid_subordlist3.getColumn(j, "check") == "Y")
  916. // {
  917. // ds_grid_subordlist4.setColumn(i, "check", "Y");
  918. // ds_grid_subordlist4.setColumn(i, "colorflag", "#f4d2fc");
  919. // }
  920. // else
  921. // {
  922. // ds_grid_subordlist4.setColumn(i, "check", "N");
  923. // ds_grid_subordlist4.setColumn(i, "colorflag", "");
  924. // }
  925. // }
  926. // }
  927. // }
  928. // }
  929. }
  930. /****************************************************************************************
  931. * Components :
  932. * Components ID : button1
  933. * Event : onclick
  934. * Argument : 01.obj : Object Event has occurred
  935. * : 02.e : Event Object
  936. * Description :
  937. ****************************************************************************************/
  938. function button1_onclick(obj:Button, e:ClickEventInfo)
  939. {
  940. var contprcpspec = "";
  941. var dccnt = 0;
  942. var dcrow = 0;
  943. ds_hide_savedata_data1.clearData();
  944. for ( var r = 0; r < ds_grid_subordlist3.getRowCount(); r++ )
  945. {
  946. var maincheck = ds_grid_subordlist3.getColumn(r, "check" );
  947. var sprcpdd = ds_grid_subordlist3.getColumn(r, "prcpdd");
  948. var sprcpno = ds_grid_subordlist3.getColumn(r, "prcpno");
  949. var sprcphistno = ds_grid_subordlist3.getColumn(r, "prcphistno");
  950. if (maincheck == "Y")
  951. {
  952. dcrow = ds_hide_savedata_data1.addRow();
  953. contprcpspec = "status|actorddd|actcretno|execprcpstatcd|prcpdd|execprcpno|execprcpuniqno|rcptdd|keyval|prcpno|prcphistno|clamdd";
  954. dccnt = 0;
  955. for ( var i = o; i < ds_grid_subordlist4.getRowCount(); i++ )
  956. {
  957. var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  958. var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  959. var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  960. if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  961. {
  962. var check = ds_grid_subordlist4.getColumn(i, "check" );
  963. if ( check == "1" )
  964. {
  965. dccnt++;
  966. }
  967. if ( dccnt == 1 || check == "1" )
  968. {
  969. ds_hide_savedata_data1.setColumn(dcrow, "prcpdd" , ds_grid_subordlist4.getColumn(i, "prcpdd")); // 처방일자
  970. ds_hide_savedata_data1.setColumn(dcrow, "execprcpuniqno", ds_grid_subordlist4.getColumn(i, "execprcpuniqno")); // 실시처방번호
  971. // if(!utlf_isNull(ds_grid_subordlist4.getColumn(i, "cnclresncd"))) {
  972. // ds_hide_savedata_data1.setColumn(dcrow, "cnclresncd" , ds_grid_subordlist4.getColumn(i, "cnclresncd")); // 취소사유코드-코드관리요함
  973. // } else {
  974. // ds_hide_savedata_data1.setColumn(dcrow, "cnclresncd", null);
  975. // }
  976. ds_hide_savedata_data1.setColumn(dcrow, "acptrem" , ds_grid_subordlist4.getColumn(i, "acptrem")); // 접수참고사항
  977. ds_hide_savedata_data1.setColumn(dcrow, "execrem" , ds_grid_subordlist4.getColumn(i, "execrem")); // 접수and실시시행코드의참고사항
  978. ds_hide_savedata_data1.setColumn(dcrow, "basesuppdeptcd", ds_grid_subordlist4.getColumn(i, "basesuppdeptcd")); // 부서코드
  979. ds_hide_savedata_data1.setColumn(dcrow, "prcpexecdeptcd", ds_grid_subordlist4.getColumn(i, "prcpexecdeptcd")); // 처방실시부서코드
  980. ds_hide_savedata_data1.setColumn(dcrow, "pid" , ds_grid_subordlist4.getColumn(i, "pid")); // 등록번호
  981. //ds_hide_savedata_data1.setColumn(dcrow, "execbaseflag" , ds_grid_subordlist4.getColumn(i, "execbaseflag")); // 실시기준여부
  982. //ds_hide_savedata_data1.setColumn(dcrow, "lrgcd" , ds_grid_subordlist4.getColumn(i, "lrgcd")); // 검사그룹코드(AEBMECCD)
  983. //ds_hide_savedata_data1.setColumn(dcrow, "mdlcd" , ds_grid_subordlist4.getColumn(i, "mdlcd")); // 부위코드(AEBMECCD)
  984. //ds_hide_savedata_data1.setColumn(dcrow, "modality" , ds_grid_subordlist4.getColumn(i, "modality")); // Modality(AEBMECCD)
  985. //ds_hide_savedata_data1.setColumn(dcrow, "eqmtifyn" , ds_grid_subordlist4.getColumn(i, "eqmtifyn")); // CDIS 연동여부
  986. ds_hide_savedata_data1.setColumn(dcrow, "rcptdd" , ds_grid_subordlist4.getColumn(i, "rcptdd")); // 수납일자
  987. ds_hide_savedata_data1.setColumn(dcrow, "carecnfmdd" , ds_grid_subordlist4.getColumn(i, "carecnfmdd")); // 간호확인일자
  988. ds_hide_savedata_data1.setColumn(dcrow, "ioflag" , ds_grid_subordlist4.getColumn(i, "ioflag")); // 입원외래구분
  989. ds_hide_savedata_data1.setColumn(dcrow, "prcpno" , ds_grid_subordlist4.getColumn(i, "prcpno")); // 처방일련번호
  990. ds_hide_savedata_data1.setColumn(dcrow, "excuroomcd" , ds_grid_subordlist4.getColumn(i, "excuroomcd")); // 치료실
  991. ds_hide_savedata_data1.setColumn(dcrow, "orddeptcd" , ds_grid_subordlist4.getColumn(i, "orddeptcd")); // 진료과
  992. ds_hide_savedata_data1.setColumn(dcrow, "orddd" , ds_grid_subordlist4.getColumn(i, "orddd")); // 진료일자
  993. ds_hide_savedata_data1.setColumn(dcrow, "cretno" , ds_grid_subordlist4.getColumn(i, "cretno")); // 원무생성번호
  994. ds_hide_savedata_data1.setColumn(dcrow, "gb" , ds_grid_subordlist4.getColumn(i, "gb")); // 처방일련번호
  995. ds_hide_savedata_data1.setColumn(dcrow, "rcptdd" , ds_grid_subordlist4.getColumn(i, "rcptdd")); // 수납일자
  996. ds_hide_savedata_data1.setColumn(dcrow, "carecnfmdd" , ds_grid_subordlist4.getColumn(i, "carecnfmdd")); // 간호확인일자
  997. ds_hide_savedata_data1.setColumn(dcrow, "ioflag" , ds_grid_subordlist4.getColumn(i, "ioflag")); // 입원외래구분
  998. ds_hide_savedata_data1.setColumn(dcrow, "prcphistno" , ds_grid_subordlist4.getColumn(i, "prcphistno")); // 처방이력번호
  999. ds_hide_savedata_data1.setColumn(dcrow, "prcpgenrflag" , ds_grid_subordlist4.getColumn(i, "prcpgenrflag")); // 처방발생구분
  1000. ds_hide_savedata_data1.setColumn(dcrow, "indd" , ds_grid_subordlist4.getColumn(i, "indd")); // 입원일자
  1001. //ds_hide_savedata_data1.setColumn(dcrow, "flag" , "cncl");
  1002. }
  1003. if (check == "1")
  1004. {
  1005. contprcpspec = contprcpspec + "^C|";
  1006. }
  1007. else
  1008. {
  1009. contprcpspec = contprcpspec + "^-|";
  1010. }
  1011. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "actorddd") + "|";
  1012. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "actcretno") + "|";
  1013. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "execprcpstatcd") + "|";
  1014. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "prcpdd") + "|";
  1015. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "execprcpno") + "|";
  1016. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "execprcpuniqno") + "|";
  1017. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "rcptdd") + "|";
  1018. contprcpspec = contprcpspec + "0|";
  1019. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "prcpno") + "|";
  1020. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "prcphistno") + "|";
  1021. contprcpspec = contprcpspec + ds_grid_subordlist4.getColumn(i, "clamdd");
  1022. if ( dccnt > 0 )
  1023. {
  1024. ds_hide_savedata_data1.setColumn(dcrow, "contprcpspec", contprcpspec); //연속처방상세
  1025. }
  1026. }
  1027. }
  1028. }
  1029. }
  1030. if ( dccnt == 0 )
  1031. {
  1032. alert("선택된 D/C 처방이 없습니다.");
  1033. return;
  1034. }
  1035. sysf_trace(ds_hide_savedata_data1.saveXML());
  1036. var strFilter = "check=='Y'";
  1037. ds_grid_subordlist4.filter(strFilter);
  1038. ds_grid_subordlist4_save.clearData();
  1039. ds_grid_subordlist4_save.copyData(ds_grid_subordlist4, true);
  1040. ds_grid_subordlist4.filter("");
  1041. ds_grid_subordlist4_save1.clearData();
  1042. ds_grid_subordlist4_save1.copyData(ds_hide_savedata_data1);
  1043. dsf_setFixVal(ds_grid_subordlist4_save, "transactiongubn:3,execprcpstatXcd:X,execprcpstat440cd:440,execprcpstat610cd:610,execprcpstat230cd:230"
  1044. +",execprcpstat100cd:100,execprcpstat000cd:000,execprcpstatYcd:Y,tretflagcd:440,largeclass:M2,allexecflag:Y,status:C");
  1045. var oParam = new Object();
  1046. oParam.id = "TXAEA01207";
  1047. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  1048. oParam.method = "reqExeAcptRsrvAllReturnList";
  1049. oParam.inds = "reqparam=ds_grid_subordlist4_save data1=ds_grid_subordlist4_save1";
  1050. oParam.outds = "ds_data_result=item";
  1051. oParam.callback = "cf_TXAEA01207";
  1052. tranf_submit(oParam);
  1053. }
  1054. function cf_TXAEA01207(strSvcID, nErrorCode, strErrorMsg){
  1055. //에러 처리
  1056. if(nErrorCode == 0){
  1057. var idx = ds_grid_subordlist4.rowposition;
  1058. ds_grid_subordlist4.clearData();
  1059. // 반환리스트
  1060. var oParam = new Object();
  1061. oParam.id = "TRAEA01209";
  1062. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  1063. oParam.method = "reqGetExamCureReturnList";
  1064. oParam.inds = "reqparam=ds_cond_data";
  1065. oParam.outds ="ds_grid_subordlist4=subordlist4 ds_grid_subordlist3=subordlist3";
  1066. oParam.callback = "cf_TRAEA01209";
  1067. tranf_submit(oParam);
  1068. grd_subordlist4.vscrollbar.pos = idx;
  1069. }else{
  1070. }
  1071. }
  1072. /****************************************************************************************
  1073. * Components :
  1074. * Components ID : button2
  1075. * Event : onclick
  1076. * Argument : 01.obj : Object Event has occurred
  1077. * : 02.e : Event Object
  1078. * Description :
  1079. ****************************************************************************************/
  1080. function button2_onclick(obj:Button, e:ClickEventInfo)
  1081. {
  1082. // 처방반환 후 출력
  1083. exePrcpRtn("P");
  1084. }
  1085. function ds_grid_subordlist3_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1086. {
  1087. if(e.columnid=="check") {
  1088. obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
  1089. }
  1090. }
  1091. function ds_grid_subordlist4_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1092. {
  1093. if(e.columnid=="check") {
  1094. obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
  1095. }
  1096. }
  1097. function CheckBox00_onclick(obj:CheckBox, e:ClickEventInfo)
  1098. {
  1099. // 변경된 체크 컬럼 값에 따른 처방상세내역 check/color 셋팅
  1100. if(obj.value == "1")
  1101. {
  1102. for (var i = 0; i < ds_grid_subordlist3.rowcount; i ++)
  1103. {
  1104. ds_grid_subordlist3.setColumn(i, "check", "Y");
  1105. }
  1106. for (var j = 0; j < ds_grid_subordlist3.getRowCount(); j ++)
  1107. {
  1108. var sprcpdd = ds_grid_subordlist3.getColumn(j, "prcpdd");
  1109. var sprcpno = ds_grid_subordlist3.getColumn(j, "prcpno");
  1110. var sprcphistno = ds_grid_subordlist3.getColumn(j, "prcphistno");
  1111. var prcpgenrflag = ds_grid_subordlist3.getColumn(ds_grid_subordlist3.rowposition, "prcpgenrflag");
  1112. for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  1113. {
  1114. var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  1115. var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  1116. var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  1117. var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  1118. if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  1119. {
  1120. if (ds_grid_subordlist3.getColumn(j, "check") == "Y")
  1121. {
  1122. if ( execprcpstatcd < "610")
  1123. {
  1124. ds_grid_subordlist4.setColumn(i, "check", "Y");
  1125. ds_grid_subordlist4.setColumn(i, "colorflag", "#f4d2fc");
  1126. if (prcpgenrflag == "I")
  1127. {
  1128. ds_grid_subordlist4.setColumn(i, "checkflag", "none");
  1129. }
  1130. }
  1131. }
  1132. else
  1133. {
  1134. ds_grid_subordlist4.setColumn(i, "check", "N");
  1135. ds_grid_subordlist4.setColumn(i, "colorflag", "");
  1136. }
  1137. }
  1138. }
  1139. }
  1140. }
  1141. else
  1142. {
  1143. for (var i = 0; i < ds_grid_subordlist3.getRowCount(); i ++)
  1144. {
  1145. ds_grid_subordlist3.setColumn(i, "check", "N");
  1146. }
  1147. for (var j = 0; j < ds_grid_subordlist3.getRowCount(); j ++)
  1148. {
  1149. var sprcpdd = ds_grid_subordlist3.getColumn(j, "prcpdd");
  1150. var sprcpno = ds_grid_subordlist3.getColumn(j, "prcpno");
  1151. var sprcphistno = ds_grid_subordlist3.getColumn(j, "prcphistno");
  1152. for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  1153. {
  1154. var sprcpdd1 = ds_grid_subordlist4.getColumn(i, "prcpdd");
  1155. var sprcpno1 = ds_grid_subordlist4.getColumn(i, "prcpno");
  1156. var sprcphistno1 = ds_grid_subordlist4.getColumn(i, "prcphistno");
  1157. if (sprcpdd == sprcpdd1 && sprcpno == sprcpno1 && sprcphistno == sprcphistno1)
  1158. {
  1159. if (ds_grid_subordlist3.getColumn(j, "check") == "Y")
  1160. {
  1161. ds_grid_subordlist4.setColumn(i, "check", "Y");
  1162. ds_grid_subordlist4.setColumn(i, "colorflag", "#f4d2fc");
  1163. }
  1164. else
  1165. {
  1166. ds_grid_subordlist4.setColumn(i, "check", "N");
  1167. ds_grid_subordlist4.setColumn(i, "colorflag", "");
  1168. }
  1169. }
  1170. }
  1171. }
  1172. }
  1173. }
  1174. function CheckBox01_onclick(obj:CheckBox, e:ClickEventInfo)
  1175. {
  1176. // 변경된 체크 컬럼 값에 따른 처방상세내역 check/color 셋팅
  1177. if(obj.value == "1")
  1178. {
  1179. for (var i = 0; i < ds_grid_subordlist4.rowcount; i++)
  1180. {
  1181. var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  1182. if ( execprcpstatcd < "610")
  1183. {
  1184. ds_grid_subordlist4.setColumn(i, "check", "Y");
  1185. }
  1186. }
  1187. }
  1188. else
  1189. {
  1190. for (var i = 0; i < ds_grid_subordlist4.getRowCount(); i++)
  1191. {
  1192. var execprcpstatcd = ds_grid_subordlist4.getColumn(i, "execprcpstatcd");
  1193. if ( execprcpstatcd < "610")
  1194. {
  1195. ds_grid_subordlist4.setColumn(i, "check", "N");
  1196. }
  1197. }
  1198. }
  1199. }
  1200. ]]></Script>
  1201. </Form>
  1202. </FDL>