SMARH01000_병의원의사병합관리.xfdl 55 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMARH01000" position="absolute 0 0 1200 774" titletext="병의원의사정보병합관리" oninit="SMARH01000_oninit" onload="SMARH01000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="Div01" anchor="left right bottom" taborder="19" style="background:ghostwhite;border:1 solid cornflowerblue ;" position="absolute 0 726 1195 766">
  8. <Layouts>
  9. <Layout width="1195" height="40"/>
  10. </Layouts>
  11. </Div>
  12. <Div id="Div00" taborder="18" position="absolute 0 358 1195 398" style="background:ghostwhite;border:1 solid cornflowerblue ;" anchor="left top right">
  13. <Layouts>
  14. <Layout width="1195" height="40"/>
  15. </Layouts>
  16. </Div>
  17. <Static id="caption6" text="병의원의사정보병합관리" class="tit_1" position="absolute 0 0 184 24"/>
  18. <Shape id="line12" linetype="horizontal" class="line_10" position="absolute 0 91 1195 105" anchor="left top right"/>
  19. <Static id="caption32" text="병원 정보" class="tit_2" position="absolute 0 37 140 58"/>
  20. <Div id="group1" taborder="1" class="div_SA2" position="absolute 0 54 1195 94" anchor="left top right">
  21. <Layouts>
  22. <Layout>
  23. <Button id="button6" taborder="5" text="조회" class="btn1" position="absolute 1047 9 1103 31" anchor="top right" onclick="group1_button6_onclick"/>
  24. <Static id="cap_fromdd" text="병원명:" class="search_name" position="absolute 10 12 130 29"/>
  25. <Edit id="ipt_telno" taborder="6" class="input_search" position="absolute 800 10 905 29" autoselect="true" onkeyup="group1_ipt_telno_onkeyup"/>
  26. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1034 9 1040 31" anchor="top right"/>
  27. <Edit id="ipt_coophospnm" taborder="7" class="input_search" position="absolute 77 10 212 29" autoselect="true" onkeyup="group1_ipt_coophospnm_onkeyup" imemode="hangul"/>
  28. <Static id="cap_vacflag" text="병원장명 :" class="search_name" position="absolute 255 11 345 28"/>
  29. <Static id="cap_name" text="전화번호 :" class="search_name" position="absolute 714 11 801 28"/>
  30. <Static id="cap_svcflag" text="주소1 :" class="search_name" position="absolute 461 11 561 28"/>
  31. <Edit id="ipt_addr1" taborder="8" class="input_search" position="absolute 528 10 683 29" autoselect="true" onkeyup="group1_ipt_addr1_onkeyup"/>
  32. <Edit id="ipt_dirofhospnm" taborder="9" class="input_search" position="absolute 337 10 432 29" autoselect="true" onkeyup="group1_ipt_dirofhospnm_onkeyup" imemode="hangul"/>
  33. </Layout>
  34. </Layouts>
  35. </Div>
  36. <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 462 1195 468" anchor="left top right"/>
  37. <Grid id="grd_coopdrinfo" taborder="2" binddataset="ds_main_coopdrlist_coopdrinfo" useinputpanel="false" position="absolute 0 467 1195 722" autoenter="select" cellsizingtype="col" anchor="all" cellclickbound="cell" oncelldblclick="grd_coopdrinfo_oncelldblclick">
  38. <Formats>
  39. <Format id="default">
  40. <Columns>
  41. <Column size="25"/>
  42. <Column size="45"/>
  43. <Column size="60"/>
  44. <Column size="96"/>
  45. <Column size="74"/>
  46. <Column size="84"/>
  47. <Column size="60"/>
  48. <Column size="96"/>
  49. <Column size="107"/>
  50. <Column size="82"/>
  51. <Column size="81"/>
  52. <Column size="48"/>
  53. <Column size="70"/>
  54. <Column size="119"/>
  55. <Column size="162"/>
  56. <Column size="68"/>
  57. <Column size="0"/>
  58. <Column size="0"/>
  59. <Column size="0"/>
  60. <Column size="0"/>
  61. <Column size="0"/>
  62. <Column size="0"/>
  63. <Column size="0"/>
  64. <Column size="0"/>
  65. </Columns>
  66. <Rows>
  67. <Row size="24" band="head"/>
  68. <Row size="24"/>
  69. </Rows>
  70. <Band id="head">
  71. <Cell/>
  72. <Cell col="1" text="선택"/>
  73. <Cell col="2" text="등록구분"/>
  74. <Cell col="3" text="의사코드"/>
  75. <Cell col="4" text="의사명"/>
  76. <Cell col="5" text="면허번호"/>
  77. <Cell col="6" text="의뢰건수"/>
  78. <Cell col="7" text="전화번호"/>
  79. <Cell col="8" text="휴대폰번호"/>
  80. <Cell col="9" text="주민번호"/>
  81. <Cell col="10" text="주민번호2"/>
  82. <Cell col="11" text="동문"/>
  83. <Cell col="12" text="졸업년도"/>
  84. <Cell col="13" text="졸업학교"/>
  85. <Cell col="14" text="수련병원"/>
  86. <Cell col="15" text="의사구분"/>
  87. <Cell col="16" text="coophospcd"/>
  88. <Cell col="17" text="fromdd"/>
  89. <Cell col="18" text="caption1"/>
  90. <Cell col="19" text="caption2"/>
  91. <Cell col="20" text="caption3"/>
  92. <Cell col="21" text="caption4"/>
  93. <Cell col="22" text="caption5"/>
  94. <Cell col="23" text="caption6"/>
  95. </Band>
  96. <Band id="body">
  97. <Cell celltype="head" expr="currow+1"/>
  98. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr:chk == 'Y' || chk == '1' ? 1 : 0"/>
  99. <Cell col="2" displaytype="combo" style="align:center middle;" text="bind:rgstflag" combodataset="ds_cmb_rgstflag" combocodecol="value" combodatacol="label" enable="false"/>
  100. <Cell col="3" text="bind:coopdrcd"/>
  101. <Cell col="4" text="bind:drnm"/>
  102. <Cell col="5" text="bind:licnsno"/>
  103. <Cell col="6" text="bind:reqcnt"/>
  104. <Cell col="7" text="bind:telno"/>
  105. <Cell col="8" text="bind:mpphontel"/>
  106. <Cell col="9" text="bind:rrgstno1"/>
  107. <Cell col="10" text="bind:rrgstno2"/>
  108. <Cell col="11" text="bind:clsmatyn"/>
  109. <Cell col="12" text="bind:gradyear"/>
  110. <Cell col="13" displaytype="text" text="bind:gradsch"/>
  111. <Cell col="14" displaytype="text" text="bind:tradehosp"/>
  112. <Cell col="15" displaytype="combo" style="align:center middle;" text="bind:drflag" combodataset="ds_hidden_init_comcd_A0428" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  113. <Cell col="16" text="bind:coophospcd"/>
  114. <Cell col="17" text="bind:fromdd"/>
  115. <Cell col="18" text="bind:epid"/>
  116. <Cell col="19" text="bind:eprgstdd"/>
  117. <Cell col="20" text="bind:aprvrid"/>
  118. <Cell col="21" text="bind:aprvdd"/>
  119. <Cell col="22" text="bind:secssdd"/>
  120. <Cell col="23" text="bind:secssresn"/>
  121. </Band>
  122. </Format>
  123. </Formats>
  124. </Grid>
  125. <Static id="caption1" text="의사 정보" class="tit_2" position="absolute 0 404 196 425"/>
  126. <Grid id="grd_coophospinfo" taborder="3" binddataset="ds_main_coophosplist_coophospinfo" useinputpanel="false" position="absolute 0 100 1195 355" autoenter="select" cellsizingtype="both" anchor="left top right" autosizingtype="row" extendsizetype="row" oncelldblclick="grd_coophospinfo_oncelldblclick" cellclickbound="cell">
  127. <Formats>
  128. <Format id="default">
  129. <Columns>
  130. <Column size="24" band="left"/>
  131. <Column size="39" band="left"/>
  132. <Column size="60" band="left"/>
  133. <Column size="70" band="left"/>
  134. <Column size="70"/>
  135. <Column size="160"/>
  136. <Column size="61"/>
  137. <Column size="195"/>
  138. <Column size="174"/>
  139. <Column size="58"/>
  140. <Column size="60"/>
  141. <Column size="92"/>
  142. <Column size="41"/>
  143. <Column size="59"/>
  144. <Column size="78"/>
  145. <Column size="73"/>
  146. <Column size="200"/>
  147. </Columns>
  148. <Rows>
  149. <Row size="24" band="head"/>
  150. <Row size="24"/>
  151. </Rows>
  152. <Band id="head">
  153. <Cell/>
  154. <Cell col="1" text="선택"/>
  155. <Cell col="2" text="등록구분"/>
  156. <Cell col="3" text="병원코드"/>
  157. <Cell col="4" text="요양코드"/>
  158. <Cell col="5" text="병원명"/>
  159. <Cell col="6" text="우편번호"/>
  160. <Cell col="7" text="주소1"/>
  161. <Cell col="8" text="주소2"/>
  162. <Cell col="9" text="병원장명"/>
  163. <Cell col="10" text="의뢰건수"/>
  164. <Cell col="11" text="전화번호"/>
  165. <Cell col="12" text="동문"/>
  166. <Cell col="13" text="병원구분"/>
  167. <Cell col="14" text="지역구분"/>
  168. <Cell col="15" text="협력체결일"/>
  169. <Cell col="16" text="비고"/>
  170. </Band>
  171. <Band id="body">
  172. <Cell celltype="head" expr="currow+1"/>
  173. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="expr:chk == 'Y' || chk == '1' ? 1 : 0"/>
  174. <Cell col="2" displaytype="combo" style="align:center middle;" text="bind:rgstflag" combodataset="ds_cmb_rgstflag" combocodecol="value" combodatacol="label" enable="false"/>
  175. <Cell col="3" text="bind:coophospcd"/>
  176. <Cell col="4" style="align:center middle;" text="bind:corpno"/>
  177. <Cell col="5" displaytype="text" style="padding:3 3 3 3;" text="bind:coophospnm" wordwrap="word" autosizerow="limitmin"/>
  178. <Cell col="6" text="bind:zipcd"/>
  179. <Cell col="7" displaytype="text" style="padding:3 3 3 3;" text="bind:addr1" wordwrap="word" autosizerow="limitmin"/>
  180. <Cell col="8" displaytype="text" style="padding:3 3 3 3;" text="bind:addr2" wordwrap="word" autosizerow="limitmin"/>
  181. <Cell col="9" text="bind:dirofhospnm"/>
  182. <Cell col="10" displaytype="text" style="align:right middle;" text="bind:reqcnt"/>
  183. <Cell col="11" text="bind:telno"/>
  184. <Cell col="12" text="bind:clsmatyn"/>
  185. <Cell col="13" displaytype="combo" style="align:center middle;" text="bind:hospgrade" combodataset="ds_hidden_init_comcd_A0429" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  186. <Cell col="14" displaytype="combo" style="align:center middle;" text="bind:areacd" combodataset="ds_hidden_init_comcd3_A0014A0426" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  187. <Cell col="15" displaytype="date" text="bind:coopconcltdd" calendardisplaynulltype="nulltext"/>
  188. <Cell col="16" displaytype="text" text="bind:rem" wordwrap="word"/>
  189. </Band>
  190. </Format>
  191. </Formats>
  192. </Grid>
  193. <Div id="group2" taborder="4" position="absolute 0 422 1195 462" class="div_SA2" anchor="left top right">
  194. <Layouts>
  195. <Layout>
  196. <Edit id="ipt_drnm" taborder="14" position="absolute 95 10 195 29" onkeyup="group2_ipt_drnm_onkeyup" imemode="hangul" autoselect="true"/>
  197. <Static id="caption2" text="의사명 :" class="search_name" position="absolute 13 11 89 28"/>
  198. <Static id="caption3" text="면허번호 :" class="search_name" position="absolute 245 11 327 28"/>
  199. <Edit id="ipt_licnsno" taborder="15" position="absolute 335 10 435 29" onkeyup="group2_ipt_licnsno_onkeyup" autoselect="true"/>
  200. <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1031 9 1037 31" anchor="top right"/>
  201. <Button id="button2" taborder="16" text="조회" class="btn1" position="absolute 1044 9 1100 31" anchor="top right" onclick="group2_button2_onclick"/>
  202. <Static id="caption10" text="병원명 :" class="search_name" position="absolute 470 12 552 29"/>
  203. <Edit id="opt_coophospcddt" taborder="17" position="absolute 873 11 958 30" autoselect="true" class="output" readonly="true" onkeyup="group2_opt_coophospcddt_onkeyup"/>
  204. <Edit id="output2" taborder="18" readonly="true" position="absolute 547 10 752 29" imemode="hangul"/>
  205. <Static id="caption11" text="병원코드 :" class="search_name" position="absolute 783 12 865 29"/>
  206. </Layout>
  207. </Layouts>
  208. </Div>
  209. <Static id="caption4" text="병합할 병원명 :" class="cell_1" position="absolute 510 368 619 387" style="font:Dotum,9,bold;"/>
  210. <Static id="cpt_voluntrflag" text="병합할 병원코드 :" class="cell_1" position="absolute 6 368 132 387" style="font:Dotum,9,bold;"/>
  211. <Edit id="ipt_coophospcd" taborder="5" position="absolute 134 368 244 387" style="font:Dotum,9,bold;" onkillfocus="ipt_coophospcd_onkillfocus"/>
  212. <Button id="button42" taborder="6" text="병합" class="btn4" position="absolute 1058 366 1114 388" anchor="top right" onclick="button42_onclick"/>
  213. <Static id="caption5" text="병합할 의사명 :" class="cell_1" position="absolute 524 736 633 755" style="font:Dotum,9,bold;"/>
  214. <Static id="caption7" text="병합할 의사코드:" class="cell_1" position="absolute 6 736 132 755" style="font:Dotum,9,bold;"/>
  215. <Edit id="ipt_coopdrcd" taborder="7" position="absolute 133 736 251 755" style="font:Dotum,9,bold;" onkillfocus="ipt_coopdrcd_onkillfocus" autoselect="true"/>
  216. <Button id="btn_excel" taborder="8" text="엑셀저장" class="btn7" position="absolute 1107 63 1187 85" anchor="top right" onclick="btn_excel_onclick"/>
  217. <Button id="button3" taborder="9" text="병합" class="btn4" position="absolute 1058 734 1114 756" anchor="right bottom" onclick="button3_onclick"/>
  218. <Button id="button4" taborder="10" text="엑셀저장" class="btn7" position="absolute 1102 431 1182 453" anchor="top right" onclick="button4_onclick"/>
  219. <Edit id="opt_coophospnm" taborder="11" readonly="true" position="absolute 621 368 800 387" style="font:Dotum,9,bold;"/>
  220. <Edit id="opt_drnm" taborder="12" readonly="true" position="absolute 634 736 729 755" style="font:Dotum,9,bold;"/>
  221. <Static id="caption8" text="병합 처리자 :" class="cell_1" position="absolute 738 736 835 755" style="font:Dotum,9,bold;"/>
  222. <Static id="caption9" text="병합 처리자 :" class="cell_1" position="absolute 818 368 913 387" style="font:Dotum,9,bold;"/>
  223. <Edit id="output1" taborder="13" readonly="true" position="absolute 915 368 997 387" style="font:Dotum,9,bold;"/>
  224. <Edit id="opt_usernm" taborder="14" readonly="true" position="absolute 836 736 918 755" style="font:Dotum,9,bold;"/>
  225. <Button id="button1" taborder="15" text="초기화" class="btn4" position="absolute 1120 366 1188 388" anchor="top right" onclick="button1_onclick"/>
  226. <Button id="button5" taborder="16" text="초기화" class="btn4" position="absolute 1120 734 1188 756" anchor="right bottom" onclick="button5_onclick"/>
  227. <Static id="cpt_corpno" text="병합할 요양코드 :" class="cell_1" position="absolute 254 368 380 387" style="font:Dotum,9,bold;"/>
  228. <Edit id="ipt_corpno" taborder="20" position="absolute 382 368 492 387" style="font:Dotum,9,bold;"/>
  229. <Static id="caption00" text="병합할 의사면허번호 :" class="cell_1" position="absolute 260 736 417 755" style="font:Dotum,9,bold;"/>
  230. <Edit id="opt_licnsno" taborder="21" position="absolute 418 736 513 755" style="font:Dotum,9,bold;" autoselect="true"/>
  231. </Layout>
  232. </Layouts>
  233. <Objects>
  234. <Dataset id="ds_main_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  235. <ColumnInfo>
  236. <Column id="coophospnm" type="STRING" size="256"/>
  237. <Column id="dirofhospnm" type="STRING" size="256"/>
  238. <Column id="addr1" type="STRING" size="256"/>
  239. <Column id="telno" type="STRING" size="256"/>
  240. <Column id="drnm" type="STRING" size="256"/>
  241. <Column id="licnsno" type="STRING" size="256"/>
  242. <Column id="coophospcd" type="STRING" size="256"/>
  243. <Column id="coopdrcd" type="STRING" size="256"/>
  244. <Column id="coophospnmdt" type="STRING" size="256"/>
  245. <Column id="coophospcddt" type="STRING" size="256"/>
  246. </ColumnInfo>
  247. <Rows>
  248. <Row>
  249. <Col id="coophospnm"/>
  250. <Col id="dirofhospnm"/>
  251. <Col id="addr1"/>
  252. <Col id="telno"/>
  253. <Col id="drnm"/>
  254. <Col id="licnsno"/>
  255. <Col id="coophospcd"/>
  256. <Col id="coopdrcd"/>
  257. <Col id="coophospnmdt"/>
  258. <Col id="coophospcddt"/>
  259. </Row>
  260. </Rows>
  261. </Dataset>
  262. <Dataset id="ds_main_coophosplist_coophospinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_coophosplist_coophospinfo_oncolumnchanged">
  263. <ColumnInfo>
  264. <Column id="chk" type="STRING" size="256" sumtext="체크값"/>
  265. <Column id="rgstflag" type="STRING" size="256" sumtext="등록구분"/>
  266. <Column id="coophospcd" type="STRING" size="256" sumtext="병원코드"/>
  267. <Column id="coophospnm" type="STRING" size="256" sumtext="병원명"/>
  268. <Column id="zipcd" type="STRING" size="256" sumtext="우편번호"/>
  269. <Column id="addr1" type="STRING" size="256" sumtext="주소1"/>
  270. <Column id="addr2" type="STRING" size="256" sumtext="주소2"/>
  271. <Column id="dirofhospnm" type="STRING" size="256" sumtext="병원장명"/>
  272. <Column id="telno" type="STRING" size="256" sumtext="전화번호"/>
  273. <Column id="clsmatyn" type="STRING" size="256" sumtext="동문"/>
  274. <Column id="hospgrade" type="STRING" size="256" sumtext="병원구분"/>
  275. <Column id="areacd" type="STRING" size="256" sumtext="지역구분"/>
  276. <Column id="coopconcltdd" type="STRING" size="256" sumtext="협력체결일"/>
  277. <Column id="rem" type="STRING" size="256" sumtext="비고"/>
  278. <Column id="reqcnt" type="STRING" size="256" sumtext="의뢰건수"/>
  279. <Column id="corpno" type="STRING" size="256"/>
  280. </ColumnInfo>
  281. </Dataset>
  282. <Dataset id="ds_main_drnmlist_drnminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  283. <ColumnInfo>
  284. <Column id="drnm" type="STRING" size="256"/>
  285. <Column id="coopdrcd" type="STRING" size="256"/>
  286. <Column id="fromdd" type="STRING" size="256"/>
  287. <Column id="coophospcd" type="STRING" size="256"/>
  288. <Column id="epid" type="STRING" size="256"/>
  289. <Column id="eprgstdd" type="STRING" size="256"/>
  290. <Column id="aprvrid" type="STRING" size="256"/>
  291. <Column id="aprvdd" type="STRING" size="256"/>
  292. <Column id="secssdd" type="STRING" size="256"/>
  293. <Column id="secssresn" type="STRING" size="256"/>
  294. <Column id="usernm" type="STRING" size="256"/>
  295. <Column id="licnsno" type="STRING" size="256"/>
  296. </ColumnInfo>
  297. <Rows>
  298. <Row>
  299. <Col id="drnm"/>
  300. <Col id="coopdrcd"/>
  301. <Col id="fromdd"/>
  302. <Col id="coophospcd"/>
  303. <Col id="epid"/>
  304. <Col id="eprgstdd"/>
  305. <Col id="aprvrid"/>
  306. <Col id="aprvdd"/>
  307. <Col id="secssdd"/>
  308. <Col id="secssresn"/>
  309. <Col id="usernm"/>
  310. </Row>
  311. </Rows>
  312. </Dataset>
  313. <Dataset id="ds_main_userlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  314. <Dataset id="ds_main_coopdrlist_coopdrinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_coopdrlist_coopdrinfo_oncolumnchanged">
  315. <ColumnInfo>
  316. <Column id="chk" type="STRING" size="256" sumtext="체크값"/>
  317. <Column id="rgstflag" type="STRING" size="256" sumtext="등록구분"/>
  318. <Column id="coopdrcd" type="STRING" size="256" sumtext="의사코드"/>
  319. <Column id="drnm" type="STRING" size="256" sumtext="의사명"/>
  320. <Column id="telno" type="STRING" size="256" sumtext="전화번호"/>
  321. <Column id="mpphontel" type="STRING" size="256" sumtext="휴대폰번호"/>
  322. <Column id="licnsno" type="STRING" size="256" sumtext="면허번호"/>
  323. <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호"/>
  324. <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호"/>
  325. <Column id="clsmatyn" type="STRING" size="256" sumtext="동문"/>
  326. <Column id="gradyear" type="STRING" size="256" sumtext="졸업년도"/>
  327. <Column id="gradsch" type="STRING" size="256" sumtext="졸업학교"/>
  328. <Column id="tradehosp" type="STRING" size="256" sumtext="수련병원"/>
  329. <Column id="drflag" type="STRING" size="256" sumtext="의사구분"/>
  330. <Column id="coophospcd" type="STRING" size="256" sumtext="협력병의원코드"/>
  331. <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
  332. <Column id="reqcnt" type="STRING" size="256" sumtext="의뢰건수"/>
  333. <Column id="epid" type="STRING" size="256" sumtext="epid"/>
  334. <Column id="eprgstdd" type="STRING" size="256" sumtext="ep등록일자"/>
  335. <Column id="aprvrid" type="STRING" size="256" sumtext="승인자ID"/>
  336. <Column id="aprvdd" type="STRING" size="256" sumtext="승인일자"/>
  337. <Column id="secssdd" type="STRING" size="256" sumtext="탈퇴일자"/>
  338. <Column id="secssresn" type="STRING" size="256" sumtext="탈퇴사유"/>
  339. </ColumnInfo>
  340. </Dataset>
  341. <Dataset id="ds_cmb_rgstflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  342. <ColumnInfo>
  343. <Column id="label" type="STRING" size="256"/>
  344. <Column id="value" type="STRING" size="256"/>
  345. </ColumnInfo>
  346. <Rows>
  347. <Row>
  348. <Col id="label">EP</Col>
  349. <Col id="value">E</Col>
  350. </Row>
  351. <Row>
  352. <Col id="label">EMR</Col>
  353. <Col id="value">L</Col>
  354. </Row>
  355. </Rows>
  356. </Dataset>
  357. <Dataset id="ds_hidden_init_comcd_A0429" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  358. <ColumnInfo>
  359. <Column id="cdid" type="STRING" size="256"/>
  360. <Column id="cdnm" type="STRING" size="256"/>
  361. </ColumnInfo>
  362. </Dataset>
  363. <Dataset id="ds_hidden_init_comcd3_A0014A0426" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  364. <ColumnInfo>
  365. <Column id="cdid" type="STRING" size="256"/>
  366. <Column id="cdnm" type="STRING" size="256"/>
  367. </ColumnInfo>
  368. </Dataset>
  369. <Dataset id="ds_hidden_init_comcd_A0428" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  370. <ColumnInfo>
  371. <Column id="cdnm" type="STRING" size="256"/>
  372. <Column id="cdid" type="STRING" size="256"/>
  373. </ColumnInfo>
  374. </Dataset>
  375. <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  376. <Dataset id="ds_main_returnsts_statusinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  377. <Dataset id="ds_main_coophospnmlist_coophospnminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  378. <ColumnInfo>
  379. <Column id="coophospnm" type="STRING" size="256" sumtext="병원명"/>
  380. <Column id="coophospcd" type="STRING" size="256" sumtext="병원코드"/>
  381. <Column id="corpno" type="STRING" size="256"/>
  382. </ColumnInfo>
  383. <Rows>
  384. <Row/>
  385. </Rows>
  386. </Dataset>
  387. <Dataset id="ds_main_merge_mergedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  388. <Dataset id="ds_main_merge_basedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  389. </Objects>
  390. <Bind>
  391. <BindItem id="item0" compid="group1.ipt_coophospnm" propid="value" datasetid="ds_main_search" columnid="coophospnm"/>
  392. <BindItem id="item1" compid="group1.ipt_dirofhospnm" propid="value" datasetid="ds_main_search" columnid="dirofhospnm"/>
  393. <BindItem id="item2" compid="group1.ipt_addr1" propid="value" datasetid="ds_main_search" columnid="addr1"/>
  394. <BindItem id="item3" compid="group1.ipt_telno" propid="value" datasetid="ds_main_search" columnid=""/>
  395. <BindItem id="item4" compid="ipt_coophospcd" propid="value" datasetid="ds_main_search" columnid="coophospcd"/>
  396. <BindItem id="item5" compid="opt_coophospnm" propid="value" datasetid="ds_main_coophospnmlist_coophospnminfo" columnid="coophospnm"/>
  397. <BindItem id="item6" compid="output1" propid="value" datasetid="ds_main_userlist" columnid="usernm"/>
  398. <BindItem id="item7" compid="group2.opt_coophospcddt" propid="value" datasetid="ds_main_search" columnid="coophospcddt"/>
  399. <BindItem id="item8" compid="group2.ipt_drnm" propid="value" datasetid="ds_main_search" columnid="drnm"/>
  400. <BindItem id="item9" compid="group2.ipt_licnsno" propid="value" datasetid="ds_main_search" columnid="licnsno"/>
  401. <BindItem id="item10" compid="group2.output2" propid="value" datasetid="ds_main_search" columnid="coophospnmdt"/>
  402. <BindItem id="item11" compid="ipt_coopdrcd" propid="value" datasetid="ds_main_search" columnid="coopdrcd"/>
  403. <BindItem id="item12" compid="opt_drnm" propid="value" datasetid="ds_main_drnmlist_drnminfo" columnid="drnm"/>
  404. <BindItem id="item13" compid="opt_usernm" propid="value" datasetid="ds_main_userlist" columnid="usernmdr"/>
  405. <BindItem id="item14" compid="ipt_corpno" propid="value" datasetid="ds_main_coophospnmlist_coophospnminfo" columnid="corpno"/>
  406. <BindItem id="item15" compid="opt_licnsno" propid="value" datasetid="ds_main_drnmlist_drnminfo" columnid="licnsno"/>
  407. </Bind>
  408. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  409. * System Name :
  410. * Job Name :
  411. * Creator :
  412. * Make Date : 2015-11-13
  413. * Description :
  414. *---------------------------------------------------------------------------------------
  415. * Modify Date Modifier Modify Description
  416. *---------------------------------------------------------------------------------------
  417. * 2015-11-13 Live Converter TF->XP
  418. *
  419. *---------------------------------------------------------------------------------------
  420. ****************************************************************************************/
  421. include "com_commonxp::comm_main.xjs";
  422. var arErrorCode = new HashArray();
  423. function SMARH01000_oninit(obj:Form, e:InitEventInfo)
  424. {
  425. frmf_initForm(obj);
  426. }
  427. function SMARH01000_onload(obj:Form, e:LoadEventInfo)
  428. {
  429. grdf_initGrid(grd_coopdrinfo);
  430. grdf_initGrid(grd_coophospinfo);
  431. fInit();
  432. }
  433. function fInit()
  434. {
  435. ds_main_coopdrlist_coopdrinfo.clearData();
  436. ds_main_coophosplist_coophospinfo.clearData();
  437. var arrParam = [{dsNm: "ds_hidden_init_comcd_A0429", cdGrpId: "A0429"}
  438. ,{dsNm: "ds_hidden_init_comcd_A0428", cdGrpId: "A0428" }];
  439. appf_getCodeList(arrParam, true); // 관계코드 설정
  440. appf_getKindCodeList([{ bizId: "A0014", cdGrpId: "A0426", dsNm: "ds_hidden_init_comcd3_A0014A0426", sortField: "cdnm", sortMehotd: "asc"}]);
  441. var usernm = sysf_getUserInfo("usernm");
  442. dsf_makeValue(ds_main_userlist, "usernm", "string", usernm);
  443. dsf_makeValue(ds_main_userlist, "usernmdr", "string", usernm);
  444. }
  445. function group1_ipt_coophospnm_onkeyup(obj:Edit, e:KeyEventInfo)
  446. {
  447. if(e.keycode == 13)
  448. {
  449. obj.updateToDataset();
  450. fCoophospListReq();
  451. }
  452. }
  453. function group1_ipt_dirofhospnm_onkeyup(obj:Edit, e:KeyEventInfo)
  454. {
  455. if(e.keycode == 13)
  456. {
  457. obj.updateToDataset();
  458. fCoophospListReq();
  459. }
  460. }
  461. function group1_ipt_addr1_onkeyup(obj:Edit, e:KeyEventInfo)
  462. {
  463. if(e.keycode == 13)
  464. {
  465. obj.updateToDataset();
  466. fCoophospListReq();
  467. }
  468. }
  469. function group1_ipt_telno_onkeyup(obj:Edit, e:KeyEventInfo)
  470. {
  471. if(e.keycode == 13)
  472. {
  473. obj.updateToDataset();
  474. fCoophospListReq();
  475. }
  476. }
  477. function group1_button6_onclick(obj:Button, e:ClickEventInfo)
  478. {
  479. fCoophospListReq();
  480. }
  481. function fCoophospListReq()
  482. {
  483. ds_send_reqdata.clearData();
  484. var coophospnm = group1.ipt_coophospnm.text;
  485. var dirofhospnm = group1.ipt_dirofhospnm.text;
  486. var addr1 = group1.ipt_addr1.text;
  487. var telno = group1.ipt_telno.text;
  488. if(utlf_isNull(coophospnm))
  489. {
  490. dsf_makeValue(ds_send_reqdata, "coophospnm", "string","%");
  491. ds_main_search.setColumn(0, "coophospnm", "");
  492. }
  493. else
  494. {
  495. if(String(group1.ipt_coophospnm.text).length >= 2)
  496. {
  497. dsf_makeValue(ds_send_reqdata, "coophospnm", "string", coophospnm);
  498. dsf_makeValue(ds_main_search, "coophospnm", "string",coophospnm);
  499. }
  500. else
  501. {
  502. sysf_messageBox("병원명을 2자리 이상 입력하세요.","I");
  503. group1.ipt_coophospnm.setFocus();
  504. return;
  505. }
  506. }
  507. if(utlf_isNull(dirofhospnm))
  508. {
  509. dsf_makeValue(ds_send_reqdata, "dirofhospnm", "string","%");
  510. ds_main_search.setColumn(0, "dirofhospnm", "");
  511. }
  512. else
  513. {
  514. dsf_makeValue(ds_send_reqdata, "dirofhospnm", "string", dirofhospnm);
  515. dsf_makeValue(ds_main_search, "dirofhospnm", "string",dirofhospnm);
  516. }
  517. if(utlf_isNull(addr1))
  518. {
  519. dsf_makeValue(ds_send_reqdata, "addr1", "string","%");
  520. ds_main_search.setColumn(0, "addr1", "");
  521. }
  522. else
  523. {
  524. if(String(group1.ipt_addr1.text).length >= 2)
  525. {
  526. dsf_makeValue(ds_send_reqdata, "addr1", "string", addr1);
  527. dsf_makeValue(ds_main_search, "addr1", "string",addr1);
  528. }
  529. else
  530. {
  531. sysf_messageBox("주소를 2자리 이상 입력하세요.","I");
  532. group1.ipt_addr1.setFocus();
  533. return;
  534. }
  535. }
  536. if(utlf_isNull(telno))
  537. {
  538. dsf_makeValue(ds_send_reqdata, "telno", "string","%");
  539. ds_main_search.setColumn(0, "telno", "");
  540. }
  541. else
  542. {
  543. if(String(group1.ipt_telno.text).length >= 3)
  544. {
  545. dsf_makeValue(ds_send_reqdata, "telno", "string", telno);
  546. dsf_makeValue(ds_main_search, "telno", "string",telno);
  547. }
  548. else
  549. {
  550. sysf_messageBox("전화번호를 3자리 이상 입력하세요.","I");
  551. group1.ipt_telno.setFocus();
  552. return;
  553. }
  554. }
  555. if(utlf_isNull(coophospnm) && utlf_isNull(dirofhospnm) && utlf_isNull(addr1) && utlf_isNull(telno))
  556. {
  557. sysf_messageBox("조회조건을 입력하십시요.","I");
  558. group1.ipt_coophospnm.setFocus();
  559. return;
  560. }
  561. var oParam = {};
  562. oParam.id = "TRARH01001";
  563. oParam.service = "healcarecoopapp.CoopHospMngt";
  564. oParam.method = "reqGetCoopHospList";
  565. oParam.inds = "req=ds_send_reqdata";
  566. oParam.outds = "ds_main_coophosplist_coophospinfo=coophospinfo";
  567. oParam.async = false;
  568. //oParam.callback = "cf_TRARH01001";
  569. tranf_submit(oParam);
  570. ds_main_coophosplist_coophospinfo.addColumn("chk", "stirng");
  571. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  572. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "corpno", "");
  573. ds_main_search.setColumn(0, "coophospcd", "");
  574. ds_main_search.setColumn(0, "drnm", "");
  575. ds_main_search.setColumn(0, "licnsno", "");
  576. ds_main_search.setColumn(0, "coophospnmdt", "");
  577. ds_main_search.setColumn(0, "coophospcddt", "");
  578. ds_main_coopdrlist_coopdrinfo.clearData();
  579. ds_main_search.setColumn(0, "coopdrcd", "");
  580. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  581. }
  582. function btn_excel_onclick(obj:Button, e:ClickEventInfo)
  583. {
  584. if(ds_main_coophosplist_coophospinfo.rowcount == 0) return;
  585. grdf_exportExcel(grd_coophospinfo, "병원정보리스트", "SheetName", "true", "", "");
  586. }
  587. function grd_coophospinfo_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  588. {
  589. if(ds_main_coophosplist_coophospinfo.rowposition >= 0)// 01클릭하는 위치가 그리드 안에 있을 때만 함수 실행
  590. {
  591. var idxRow = ds_main_coophosplist_coophospinfo.rowposition;
  592. var coophospcd = ds_main_coophosplist_coophospinfo.getColumn(idxRow, "coophospcd");
  593. var coophospnm = ds_main_coophosplist_coophospinfo.getColumn(idxRow, "coophospnm");
  594. var corpno = ds_main_coophosplist_coophospinfo.getColumn(idxRow, "corpno");
  595. dsf_makeValue(ds_main_search, "coophospnmdt", "string", coophospnm); // 의사정보 조회창에 병원명 저장
  596. dsf_makeValue(ds_main_search, "coophospcddt", "string", coophospcd); // 의사정보 조회창에 병원코드 저장
  597. ds_send_reqdata.clear();
  598. dsf_makeValue(ds_send_reqdata, "coophospcd", "string", coophospcd);
  599. dsf_makeValue(ds_send_reqdata, "drnm", "string", "%");
  600. dsf_makeValue(ds_send_reqdata, "licnsno", "string", "%");
  601. dsf_makeValue(ds_main_returnsts_statusinfo, "restatus", "string", "D");//더블클릭했다는 의미인 D 저장
  602. dsf_makeValue(ds_main_returnsts_statusinfo, "coophospcd", "string", coophospcd);
  603. var oParam = {};
  604. oParam.id = "TRARH01002";
  605. oParam.service = "healcarecoopapp.CoopHospMngt";
  606. oParam.method = "reqGetCoopDrList";
  607. oParam.inds = "req=ds_send_reqdata";
  608. oParam.outds = "ds_main_coopdrlist_coopdrinfo=coopdrinfo";
  609. oParam.async = false;
  610. //oParam.callback = "cf_TRARH01002";
  611. tranf_submit(oParam);
  612. ds_main_coopdrlist_coopdrinfo.addColumn("chk", "stirng");
  613. ds_main_search.setColumn(0, "coopdrcd", "");
  614. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  615. //병원코드/요양코드/병원명 셀 더블 클릭 시 자동 입력되도록
  616. if(e.cell >= 3 && e.cell <= 5)
  617. {
  618. ds_main_search.setColumn(0, "coophospcd", coophospcd);
  619. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", coophospnm);
  620. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospcd", coophospcd);
  621. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "corpno", corpno);
  622. }
  623. else
  624. {
  625. //다른 셀 클릭 시 초기화
  626. ds_main_search.setColumn(0, "coophospcd", "");
  627. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  628. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospcd", "");
  629. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "corpno", "");
  630. }
  631. }
  632. }
  633. function ipt_coophospcd_onkillfocus(obj:Edit, e:KillFocusEventInfo)
  634. {
  635. ds_send_reqdata.clear();
  636. var currentcoophospcd = ipt_coophospcd.text;
  637. if(utlf_isNull(currentcoophospcd))
  638. {
  639. return;
  640. }
  641. else
  642. {
  643. var idxRow = ds_main_coophosplist_coophospinfo.rowcount;
  644. var k = 0;
  645. for(var i = 0; i < idxRow; i++)
  646. {
  647. var chk = ds_main_coophosplist_coophospinfo.getColumn(i, "chk");
  648. if(chk == "Y")
  649. {
  650. var coophospcd = ds_main_coophosplist_coophospinfo.getColumn(i, "coophospcd");
  651. var mergecoophospcd = ipt_coophospcd.text;
  652. if(mergecoophospcd == coophospcd)
  653. {
  654. k = k+1;
  655. }
  656. }
  657. }
  658. if(k == "0")
  659. {
  660. sysf_messageBox("선택한 병원에 대해서만 병합이 가능합니다. 병원정보와 병원코드를 확인하세요.","I");
  661. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  662. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "corpno", "");
  663. ds_main_search.setColumn(0, "coophospcd", "");
  664. return;
  665. }
  666. dsf_makeValue(ds_main_search, "coophospcd", "string", currentcoophospcd);
  667. dsf_makeValue(ds_send_reqdata, "coophospcd", "string", currentcoophospcd);
  668. var oParam = {};
  669. oParam.id = "TRARH01003";
  670. oParam.service = "healcarecoopapp.CoopHospMngt";
  671. oParam.method = "reqGetCoopNmList";
  672. oParam.inds = "req=ds_send_reqdata";
  673. oParam.outds = "ds_main_coophospnmlist_coophospnminfo=coophospnminfo";
  674. oParam.async = false;
  675. //oParam.callback = "cf_TRARH01003";
  676. tranf_submit(oParam);
  677. if(ds_main_coophospnmlist_coophospnminfo.rowcount == 0)
  678. {
  679. ds_main_coophospnmlist_coophospnminfo.addRow();
  680. }
  681. }
  682. }
  683. function button42_onclick(obj:Button, e:ClickEventInfo)
  684. {
  685. fHospCoopMerge();
  686. }
  687. function fHospCoopMerge()
  688. {
  689. var coophospcd = ipt_coophospcd.text;
  690. var coophospnm = ds_main_coophospnmlist_coophospnminfo.getColumn(0, "coophospnm");
  691. var corpno = ds_main_coophospnmlist_coophospnminfo.getColumn(0, "corpno");
  692. if(utlf_isNull(coophospcd) || utlf_isNull(coophospnm))
  693. {
  694. sysf_messageBox("선택한 병원에 대해서만 병합이 가능합니다. 병원정보와 병원코드를 확인하세요.","I");
  695. ds_main_search.setColumn(0, "coophospcd", "");
  696. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  697. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "corpno", "");
  698. return;
  699. }
  700. var idxRow = ds_main_coophosplist_coophospinfo.rowcount;
  701. var k = 0;
  702. // 협력병원 병합할 파리채 생성 -> coophospcd 병원코드가 mergecoophospcd 병원코드로 병합됨.
  703. var mergedata= 'coophospcd'
  704. + '▦corpno'
  705. + '▦mergecorpno'
  706. + '▦mergecoophospcd'
  707. + '▦mergecoophospnm'
  708. + '▦bindflag'
  709. + '▩';
  710. var chkdata = 0; // 체크여부 확인하는 변수 선언
  711. for(var i = 0; i < idxRow; i++)
  712. {
  713. var chk = ds_main_coophosplist_coophospinfo.getColumn(i, "chk");
  714. if(chk == "Y")
  715. {
  716. var coophospcd = utlf_transNullToEmpty(ds_main_coophosplist_coophospinfo.getColumn(i, "coophospcd"));
  717. var corpno = utlf_transNullToEmpty(ds_main_coophosplist_coophospinfo.getColumn(i, "corpno"));
  718. var mergecorpno = utlf_transNullToEmpty(ds_main_coophospnmlist_coophospnminfo.getColumn(0, "corpno"));
  719. var mergecoophospcd = utlf_transNullToEmpty(ds_main_coophospnmlist_coophospnminfo.getColumn(0, "coophospcd"));
  720. if(mergecoophospcd == coophospcd)
  721. {
  722. k = k+1;
  723. }
  724. mergedata += coophospcd
  725. + '▦'+ corpno
  726. + '▦'+ mergecorpno
  727. + '▦'+ mergecoophospcd
  728. + '▦'+ utlf_transNullToEmpty(ds_main_coophospnmlist_coophospnminfo.getColumn(0, "coophospnm"))
  729. + '▦'+ '1'
  730. + '▩';
  731. chkdata = chkdata+1; // 체크된 수만큼 누적 된 양을 판별
  732. }
  733. }
  734. if(k == 0)
  735. {
  736. sysf_messageBox("선택한 병원에 대해서만 병합이 가능합니다. 병원정보와 병원코드를 확인하세요.","I");
  737. ds_main_search.setColumn(0, "coophospcd", "");
  738. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  739. return;
  740. }
  741. if(k == 1 && chkdata == 1)
  742. {
  743. sysf_messageBox("선택한 병원에 대해서만 병합이 가능합니다. 병원정보와 병원코드를 확인하세요.","I");
  744. ds_main_search.setColumn(0, "coophospcd", "");
  745. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  746. return;
  747. }
  748. var btn = sysf_messageBox("확인부탁드립니다. 데이터 복구가 힘듭니다. 병의원 정보 병합을","Q004");
  749. if(btn == "6")
  750. {
  751. ds_main_merge_mergedata.clearData();
  752. dsf_setCSVToDs("ds_main_merge_mergedata", mergedata);
  753. var oParam = {};
  754. oParam.id = "TXARH01001";
  755. oParam.service = "healcarecoopapp.CoopHospMngt";
  756. oParam.method = "reqExeCoopHospmergeList";
  757. oParam.inds = "req=ds_main_merge_mergedata";
  758. oParam.outds = "";
  759. oParam.async = false;
  760. oParam.callback = "cf_TXARH01001";
  761. tranf_submit(oParam);
  762. if(arErrorCode.pop("TXARH01001") > -1)
  763. {
  764. sysf_messageBox("병의원 정보 병합이","I002");
  765. var oParam = {};
  766. oParam.id = "TXARH01003";
  767. oParam.service = "healcarecoopapp.CoopHospMngt";
  768. oParam.method = "reqExeCoopHospDrSeq";
  769. oParam.inds = "req=ds_main_merge_mergedata";
  770. oParam.outds = "";
  771. oParam.async = false;
  772. //oParam.callback = "cf_TXARH01003";
  773. tranf_submit(oParam);// 병합 이력 insert
  774. fCoophospListReq();
  775. }
  776. }
  777. else
  778. {
  779. return;
  780. }
  781. }
  782. function cf_TXARH01001(sSvcId, nErrorCode, sErrorMsg) {
  783. arErrorCode.push(sSvcId, nErrorCode);
  784. }
  785. function button1_onclick(obj:Button, e:ClickEventInfo)
  786. {
  787. fHospCoopMergeReset();
  788. }
  789. function fHospCoopMergeReset()
  790. {
  791. var btn = sysf_messageBox("초기화를","Q004");
  792. if(btn == "6")
  793. {
  794. ds_main_search.setColumn(0, "coophospnm", "");
  795. ds_main_search.setColumn(0, "dirofhospnm", "");
  796. ds_main_search.setColumn(0, "addr1", "");
  797. ds_main_search.setColumn(0, "telno", "");
  798. ds_main_coophosplist_coophospinfo.clearData();
  799. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "coophospnm", "");
  800. ds_main_coophospnmlist_coophospnminfo.setColumn(0, "corpno", "");
  801. ds_main_search.setColumn(0, "coophospcd", "");
  802. ds_main_coopdrlist_coopdrinfo.clearData();
  803. ds_main_search.setColumn(0, "drnm", "");
  804. ds_main_search.setColumn(0, "licnsno", "");
  805. ds_main_search.setColumn(0, "coopdrcd", "");
  806. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  807. ds_main_drnmlist_drnminfo.setColumn(0, "licnsno", "");
  808. ds_main_search.setColumn(0, "coophospnmdt", "");
  809. ds_main_search.setColumn(0, "coophospcddt", "");
  810. }
  811. else
  812. {
  813. return;
  814. }
  815. }
  816. function group2_ipt_drnm_onkeyup(obj:Edit, e:KeyEventInfo)
  817. {
  818. if(e.keycode == 13)
  819. {
  820. obj.updateToDataset();
  821. fCoophospDrListReq();
  822. }
  823. }
  824. function group2_ipt_licnsno_onkeyup(obj:Edit, e:KeyEventInfo)
  825. {
  826. if(e.keycode == 13)
  827. {
  828. obj.updateToDataset();
  829. fCoophospDrListReq();
  830. }
  831. }
  832. function group2_opt_coophospcddt_onkeyup(obj:Edit, e:KeyEventInfo)
  833. {
  834. if(e.keycode == 13)
  835. {
  836. obj.updateToDataset();
  837. fCoophospDrListReq();
  838. }
  839. }
  840. function group2_button2_onclick(obj:Button, e:ClickEventInfo)
  841. {
  842. fCoophospDrListReq();
  843. }
  844. function fCoophospDrListReq()
  845. {
  846. ds_send_reqdata.clear();
  847. var drnm = group2.ipt_drnm.text;
  848. var licnsno = group2.ipt_licnsno.text;
  849. var coophospnmdt = ds_main_search.getColumn(0, "coophospnmdt");
  850. var coophospcddt = ds_main_search.getColumn(0, "coophospcddt");
  851. dsf_makeValue(ds_send_reqdata, "coophospcd", "string", "%");
  852. if(utlf_isNull(coophospnmdt))
  853. {
  854. sysf_messageBox("병원정보를 선택하세요.","I");
  855. return;
  856. }
  857. else
  858. {
  859. dsf_makeValue(ds_send_reqdata, "coophospcd", "string", coophospcddt);
  860. // 병원정보 선택되었을 때 조회할 병원코드 저장
  861. }
  862. if(utlf_isNull(drnm))
  863. {
  864. dsf_makeValue(ds_send_reqdata, "drnm", "string", "%");
  865. ds_main_search.setColumn(0, "drnm", "");
  866. }
  867. else
  868. {
  869. if(String(group2.ipt_drnm.text).length >= 2)
  870. {
  871. dsf_makeValue(ds_main_search, "drnm", "string", drnm);
  872. dsf_makeValue(ds_send_reqdata, "drnm", "string", drnm);
  873. }
  874. else
  875. {
  876. sysf_messageBox("의사명을 2자리 이상 입력하세요.","I");
  877. group2.ipt_drnm.setFocus();
  878. return;
  879. }
  880. }
  881. if(utlf_isNull(licnsno))
  882. {
  883. dsf_makeValue(ds_send_reqdata, "licnsno", "string", "%");
  884. ds_main_search.setColumn(0, "licnsno", "");
  885. }
  886. else
  887. {
  888. dsf_makeValue(ds_main_search, "licnsno", "string", licnsno);
  889. dsf_makeValue(ds_send_reqdata, "licnsno", "string", licnsno);
  890. }
  891. var oParam = {};
  892. oParam.id = "TRARH01002";
  893. oParam.service = "healcarecoopapp.CoopHospMngt";
  894. oParam.method = "reqGetCoopDrList";
  895. oParam.inds = "req=ds_send_reqdata";
  896. oParam.outds = "ds_main_coopdrlist_coopdrinfo=coopdrinfo";
  897. oParam.async = false;
  898. //oParam.callback = "cf_TRARH01002";
  899. tranf_submit(oParam);
  900. ds_main_coopdrlist_coopdrinfo.addColumn("chk", "stirng");
  901. dsf_makeValue(ds_main_search, "coopdrcd", "string", "");
  902. dsf_makeValue(ds_main_drnmlist_drnminfo, "drnm", "string", "");
  903. }
  904. function button4_onclick(obj:Button, e:ClickEventInfo)
  905. {
  906. if(ds_main_coopdrlist_coopdrinfo.rowcount == 0) return;
  907. grdf_exportExcel(grd_coopdrinfo, "의사정보리스트", "SheetName", "true", "", "");
  908. }
  909. function ipt_coopdrcd_onkillfocus(obj:Edit, e:KillFocusEventInfo)
  910. {
  911. ds_send_reqdata.clear();
  912. var currentcoopdrcd = ipt_coopdrcd.text;
  913. if(utlf_isNull(currentcoopdrcd))
  914. {
  915. return;
  916. }
  917. else
  918. {
  919. var idxRow = ds_main_coopdrlist_coopdrinfo.rowcount;
  920. var k = 0; // 병합 체크여부 확인 변수
  921. for(var i = 0; i < idxRow; i++)
  922. {
  923. var chk = ds_main_coopdrlist_coopdrinfo.getColumn(i, "chk");
  924. if(chk == "Y")
  925. {
  926. var coopdrcd = ds_main_coopdrlist_coopdrinfo.getColumn(i, "coopdrcd");
  927. var mergecoopdrcd = ipt_coopdrcd.text;
  928. if(mergecoopdrcd == coopdrcd)
  929. {
  930. k=k+1;
  931. }
  932. }
  933. }
  934. if(k == '0')
  935. {
  936. sysf_messageBox("선택한 의사에 대해서만 병합이 가능합니다. 의사정보와 의사코드를 확인하세요.","I");
  937. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  938. return;
  939. }
  940. dsf_makeValue(ds_send_reqdata, "coopdrcd", "string", currentcoopdrcd);
  941. dsf_makeValue(ds_send_reqdata, "coophospcd", "string", ds_main_search.getColumn(0, "coophospcddt"));
  942. var oParam = {};
  943. oParam.id = "TRARH01004";
  944. oParam.service = "healcarecoopapp.CoopHospMngt";
  945. oParam.method = "reqGetDrNmList";
  946. oParam.inds = "req=ds_send_reqdata";
  947. oParam.outds = "ds_main_drnmlist_drnminfo=drnminfo";
  948. oParam.async = false;
  949. //oParam.callback = "cf_TRARH01004";
  950. tranf_submit(oParam);
  951. dsf_makeValue(ds_main_search, "coopdrcd", "string", currentcoopdrcd);
  952. }
  953. }
  954. function button3_onclick(obj:Button, e:ClickEventInfo)
  955. {
  956. fHospDrnmMerge();
  957. }
  958. function fHospDrnmMerge()
  959. {
  960. var coopdrcd = ipt_coopdrcd.text;
  961. var licnsno = ds_main_drnmlist_drnminfo.getColumn(0, "licnsno");
  962. var drnm = ds_main_drnmlist_drnminfo.getColumn(0, "drnm");
  963. var fromdd = ds_main_drnmlist_drnminfo.getColumn(0, "fromdd");
  964. var coophospcd = ds_main_drnmlist_drnminfo.getColumn(0, "coophospcd");
  965. if(utlf_isNull(coopdrcd) || utlf_isNull(drnm))
  966. {
  967. sysf_messageBox("선택한 의사에 대해서만 병합이 가능합니다. 의사정보와 의사코드를 확인하세요.","I");
  968. return;
  969. }
  970. var idxRow = ds_main_coopdrlist_coopdrinfo.rowcount;
  971. // 의사정보 병합할 파리채 생성
  972. var mergedata= 'coopdrcd'
  973. + '▦licnsno'
  974. + '▦mergecoopdrcd'
  975. + '▦mergecoopdrnm'
  976. + '▦mergelicnsno'
  977. + '▦fromdd'
  978. + '▦mergefromdd'
  979. + '▦coophospcd'
  980. + '▦mergecoophospcd'
  981. + '▦bindflag'
  982. + '▩';
  983. var chkdata = 0; // 체크여부 확인하는 변수 선언
  984. var k = 0; // 병합 체크여부 확인 변수
  985. for(var i = 0; i < idxRow; i++)
  986. {
  987. var chk = ds_main_coopdrlist_coopdrinfo.getColumn(i, "chk");
  988. if(chk == "Y")
  989. {
  990. var mergecoopdrcd = utlf_transNullToEmpty(ds_main_drnmlist_drnminfo.getColumn(0, "coopdrcd"));
  991. var coopdrcd = utlf_transNullToEmpty(ds_main_coopdrlist_coopdrinfo.getColumn(i, "coopdrcd"));
  992. var licnsno = utlf_transNullToEmpty(ds_main_coopdrlist_coopdrinfo.getColumn(i, "licnsno"));
  993. if(mergecoopdrcd == coopdrcd)
  994. {
  995. k = k+1;
  996. }
  997. mergedata += coopdrcd
  998. + '▦'+ licnsno
  999. + '▦'+ mergecoopdrcd
  1000. + '▦'+ utlf_transNullToEmpty(ds_main_drnmlist_drnminfo.getColumn(0, "drnm"))
  1001. + '▦'+ utlf_transNullToEmpty(ds_main_drnmlist_drnminfo.getColumn(0, "licnsno"))
  1002. + '▦'+ utlf_transNullToEmpty(ds_main_coopdrlist_coopdrinfo.getColumn(i, "fromdd"))
  1003. + '▦'+ utlf_transNullToEmpty(ds_main_drnmlist_drnminfo.getColumn(0, "fromdd"))
  1004. + '▦'+ utlf_transNullToEmpty(ds_main_coopdrlist_coopdrinfo.getColumn(i, "coophospcd"))
  1005. + '▦'+ utlf_transNullToEmpty(ds_main_drnmlist_drnminfo.getColumn(0, "coophospcd"))
  1006. + '▦'+ '2'
  1007. + '▩';
  1008. chkdata = chkdata + 1; // 체크된 수만큼 누적 된 양을 판별
  1009. // 기준의사코드와 대상코드가 틀릴경우만
  1010. var upepid = "";
  1011. if(mergecoopdrcd != coopdrcd)
  1012. {
  1013. // epid를 update하기 위한것
  1014. var upepid = ds_main_coopdrlist_coopdrinfo.getColumn(i, "epid");
  1015. var secssdd = ds_main_coopdrlist_coopdrinfo.getColumn(i, "secssdd");
  1016. if (!utlf_isNull(upepid) && secssdd == "00000000")
  1017. {
  1018. var eprgstdd = ds_main_coopdrlist_coopdrinfo.getColumn(i, "eprgstdd");
  1019. var aprvrid = ds_main_coopdrlist_coopdrinfo.getColumn(i, "aprvrid");
  1020. var aprvdd = ds_main_coopdrlist_coopdrinfo.getColumn(i, "aprvdd");
  1021. var secssresn = ds_main_coopdrlist_coopdrinfo.getColumn(i, "secssresn");
  1022. }
  1023. }
  1024. }
  1025. }
  1026. if(k == 0)
  1027. {
  1028. sysf_messageBox("선택한 의사에 대해서만 병합이 가능합니다. 의사정보와 의사코드를 확인하세요.","I");
  1029. return;
  1030. }
  1031. if(chkdata == 0) //체크된 데이터가 존재 하지 않을 때
  1032. {
  1033. sysf_messageBox("병합할 의사정보를 선택하십시요.","I");
  1034. return;
  1035. }
  1036. if(k == 1 && chkdata == 1)
  1037. {
  1038. sysf_messageBox("선택한 의사에 대해서만 병합이 가능합니다. 의사정보와 의사코드를 확인하세요.","I");
  1039. return;
  1040. }
  1041. ds_main_merge_mergedata.clearData();
  1042. dsf_setCSVToDs("ds_main_merge_mergedata", mergedata);
  1043. // 기준병원
  1044. ds_main_merge_basedata.copyData(ds_main_drnmlist_drnminfo);
  1045. var epid = ds_main_drnmlist_drnminfo.getColumn(0, "epid");
  1046. //epid가 없는 경우만 update
  1047. if (utlf_isNull(epid) && !utlf_isNull(upepid))
  1048. {
  1049. dsf_makeValue(ds_main_merge_basedata, "upflag", "string", "Y");
  1050. dsf_makeValue(ds_main_merge_basedata, "epid", "string", upepid);
  1051. dsf_makeValue(ds_main_merge_basedata, "eprgstdd", "string", eprgstdd);
  1052. dsf_makeValue(ds_main_merge_basedata, "aprvrid", "string", aprvrid);
  1053. dsf_makeValue(ds_main_merge_basedata, "aprvdd", "string", aprvdd);
  1054. dsf_makeValue(ds_main_merge_basedata, "secssdd", "string", secssdd);
  1055. dsf_makeValue(ds_main_merge_basedata, "secssresn", "string", secssresn);
  1056. }
  1057. else
  1058. {
  1059. dsf_makeValue(ds_main_merge_basedata, "upflag", "string", "N");
  1060. }
  1061. var btn = sysf_messageBox("확인부탁드립니다. 데이터 복구가 힘듭니다. 의사 정보 병합을","Q004");
  1062. if(btn == "6")
  1063. {
  1064. var oParam = {};
  1065. oParam.id = "TXARH01002";
  1066. oParam.service = "healcarecoopapp.CoopHospMngt";
  1067. oParam.method = "reqExeCoopDrmergeList";
  1068. oParam.inds = "req=ds_main_merge_mergedata reqbase=ds_main_merge_basedata";
  1069. oParam.outds = "";
  1070. oParam.async = false;
  1071. oParam.callback = "cf_TXARH01002";
  1072. tranf_submit(oParam);
  1073. if(arErrorCode.pop("TXARH01002") > -1)
  1074. {
  1075. sysf_messageBox("병의원 의사 정보 병합이","I002");
  1076. var oParam = {};
  1077. oParam.id = "TXARH01003";
  1078. oParam.service = "healcarecoopapp.CoopHospMngt";
  1079. oParam.method = "reqExeCoopHospDrSeq";
  1080. oParam.inds = "req=ds_main_merge_mergedata";
  1081. oParam.outds = "";
  1082. oParam.async = false;
  1083. oParam.callback = "cf_TXARH01003";
  1084. tranf_submit(oParam);
  1085. if(arErrorCode.pop("TXARH01003") > -1)
  1086. {
  1087. var idxRow = ds_main_coophosplist_coophospinfo.rowposition;
  1088. var drnm = group2.ipt_drnm.text;
  1089. var licnsno = group2.ipt_licnsno.text;
  1090. var restatus = ds_main_returnsts_statusinfo.getColumn(0, "restatus");
  1091. var coophospcd = ds_main_returnsts_statusinfo.getColumn(0, "coophospcd");
  1092. if(utlf_isNull(drnm) && utlf_isNull(licnsno))
  1093. {
  1094. if(utlf_isNull(coophospcd))
  1095. {
  1096. sysf_messageBox("의사명이나 면허번호를 입력하십시요.","I");
  1097. return;
  1098. }
  1099. else
  1100. {
  1101. // 병원정보 더블클릭후 의사 병합 한 후 조회
  1102. var coophospcd = ds_main_returnsts_statusinfo.getColumn(0, "coophospcd");
  1103. ds_send_reqdata.clear();
  1104. dsf_makeValue(ds_send_reqdata, "coophospcd", "string", coophospcd);
  1105. dsf_makeValue(ds_send_reqdata, "drnm", "string", "%");
  1106. dsf_makeValue(ds_send_reqdata, "licnsno", "string", "%");
  1107. var oParam = {};
  1108. oParam.id = "TRARH01002";
  1109. oParam.service = "healcarecoopapp.CoopHospMngt";
  1110. oParam.method = "reqGetCoopDrList";
  1111. oParam.inds = "req=ds_send_reqdata";
  1112. oParam.outds = "ds_main_coopdrlist_coopdrinfo=coopdrinfo";
  1113. oParam.async = false;
  1114. //oParam.callback = "cf_TRARH01002";
  1115. tranf_submit(oParam);
  1116. ds_main_search.setColumn(0, "coopdrcd", "");
  1117. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  1118. ds_main_drnmlist_drnminfo.setColumn(0, "licnsno", "");
  1119. }
  1120. }
  1121. else
  1122. {
  1123. // 의사명 또는 면허명으로 찾은 후 조회
  1124. fCoophospDrListReq();
  1125. }
  1126. }
  1127. }
  1128. }
  1129. else
  1130. {
  1131. return;
  1132. }
  1133. }
  1134. function cf_TXARH01002(sSvcId, nErrorCode, sErrorMsg) {
  1135. arErrorCode.push(sSvcId, nErrorCode);
  1136. }
  1137. function cf_TXARH01003(sSvcId, nErrorCode, sErrorMsg) {
  1138. arErrorCode.push(sSvcId, nErrorCode);
  1139. }
  1140. function button5_onclick(obj:Button, e:ClickEventInfo)
  1141. {
  1142. fHospCoopMergeReset2();
  1143. }
  1144. function fHospCoopMergeReset2()
  1145. {
  1146. var btn = sysf_messageBox("초기화를","Q004");
  1147. if(btn == '6')
  1148. {
  1149. ds_main_coopdrlist_coopdrinfo.clearData();
  1150. ds_main_search.setColumn(0, "drnm", "");
  1151. ds_main_search.setColumn(0, "licnsno", "");
  1152. ds_main_search.setColumn(0, "coopdrcd", "");
  1153. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  1154. ds_main_drnmlist_drnminfo.setColumn(0, "licnsno", "");
  1155. ds_main_search.setColumn(0, "coophospnmdt", "");
  1156. ds_main_search.setColumn(0, "coophospcddt", "");
  1157. }
  1158. else
  1159. {
  1160. return;
  1161. }
  1162. }
  1163. function ds_main_coophosplist_coophospinfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1164. {
  1165. if(e.columnid == "chk")
  1166. {
  1167. obj.setColumn(e.row, "chk", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
  1168. }
  1169. }
  1170. function ds_main_coopdrlist_coopdrinfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1171. {
  1172. if(e.columnid == "chk")
  1173. {
  1174. obj.setColumn(e.row, "chk", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
  1175. }
  1176. }
  1177. function grd_coopdrinfo_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  1178. {
  1179. var row = ds_main_coopdrlist_coopdrinfo.rowposition;
  1180. var coopdrcd = ds_main_coopdrlist_coopdrinfo.getColumn(row, "coopdrcd");
  1181. var drnm = ds_main_coopdrlist_coopdrinfo.getColumn(row, "drnm");
  1182. var licnsno = ds_main_coopdrlist_coopdrinfo.getColumn(row, "licnsno");
  1183. var fromdd = ds_main_coopdrlist_coopdrinfo.getColumn(row, "fromdd");
  1184. var coophospcd = ds_main_search.getColumn(0, "coophospcddt");
  1185. //병원코드/요양코드/병원명 셀 더블 클릭 시 자동 입력되도록
  1186. if(e.cell >= 3 && e.cell <= 5)
  1187. {
  1188. ds_main_search.setColumn(0, "coopdrcd", coopdrcd);
  1189. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", drnm);
  1190. ds_main_drnmlist_drnminfo.setColumn(0, "coopdrcd", coopdrcd);
  1191. ds_main_drnmlist_drnminfo.setColumn(0, "licnsno", licnsno);
  1192. ds_main_drnmlist_drnminfo.setColumn(0, "coophospcd", coophospcd);
  1193. ds_main_drnmlist_drnminfo.setColumn(0, "fromdd", fromdd);
  1194. }
  1195. else
  1196. {
  1197. //다른 셀 클릭 시 초기화
  1198. ds_main_search.setColumn(0, "coopdrcd", "");
  1199. ds_main_drnmlist_drnminfo.setColumn(0, "drnm", "");
  1200. ds_main_drnmlist_drnminfo.setColumn(0, "licnsno", "");
  1201. ds_main_drnmlist_drnminfo.setColumn(0, "fromdd", "");
  1202. ds_main_drnmlist_drnminfo.setColumn(0, "coophospcd", "");
  1203. ds_main_drnmlist_drnminfo.setColumn(0, "coopdrcd", "");
  1204. }
  1205. }
  1206. ]]></Script>
  1207. </Form>
  1208. </FDL>