SMPMC04200_전자카드발급.xfdl 44 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083
  1. <?xml version="1.0" encoding="utf-8" standalone="no"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPMC04200" position="absolute 0 0 842 513" titletext="전자카드발급" onload="SMPMC04200_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="group1" scrollbars="autoboth" position="absolute 0 480 840 507" style="">
  8. <Layouts>
  9. <Layout>
  10. <Button id="btn_initialize" class="btn4" position="absolute 772 5 840 27" style="" text="초기화" onclick="group1_btn_initialize_onclick" anchor="right bottom"/>
  11. <Shape id="line32" class="line_6" linetype="horizontal" position="absolute 0 0 840 3" style="" anchor="default"/>
  12. </Layout>
  13. </Layouts>
  14. </Div>
  15. <Div id="group3" position="absolute 0 0 845 25" style="">
  16. <Layouts>
  17. <Layout>
  18. <Static id="caption22" class="tit_1" position="absolute 0 0 120 25" style="" text="전자카드발급"/>
  19. </Layout>
  20. </Layouts>
  21. </Div>
  22. <Div id="group2" position="absolute 0 19 841 486" style="" anchor="all">
  23. <Layouts>
  24. <Layout>
  25. <Div id="group4" position="absolute 0 25 840 460" style="" anchor="all" visible="false">
  26. <Layouts>
  27. <Layout>
  28. <MaskEdit id="ipt_rrgstno2" class="font_pid" visible="false" mask="9999999" position="absolute 528 167 835 232" style="align:left ;color:#000000;" anchor="default" onkeypress="group2_group4_ipt_rrgstno2_onkeypress" onkillfocus="group2_group4_ipt_rrgstno2_onkillfocus"/>
  29. <MaskEdit id="ipt_rrgstno1" class="font_pid" visible="false" mask="999999" position="absolute 225 167 524 232" style="align:left ;color:#000000;" anchor="default" onkeypress="group2_group4_ipt_rrgstno1_onkeypress" onkillfocus="group2_group4_ipt_rrgstno1_onkillfocus"/>
  30. <MaskEdit id="ipt_rrgstno" class="font_pid" taborder="3" mask="999999-9999999" position="absolute 225 167 835 232" style="align:left ;color:#000000;" anchor="left top right" onkeypress="group2_group4_ipt_rrgstno_onkeypress" onkillfocus="group2_group4_ipt_rrgstno_onkillfocus" onkeydown="group2_group4_ipt_rrgstno_onkeydown"/>
  31. <Edit id="ipt_hngnm" class="font_pid" taborder="2" position="absolute 225 99 835 164" style="align:left ;color:#000000;" anchor="left top right" onkeypress="group2_group4_ipt_hngnm_onkeypress" onkeydown="group2_group4_ipt_hngnm_onkeydown"/>
  32. <TextArea id="textarea1" taborder="4" position="absolute 225 235 835 398" style="font:,26,26pt;color:#000000;" anchor="all"/>
  33. <Static id="caption1" class="cell_1" position="absolute 0 234 223 400" style="font:,26,26pt;align: middle;" text="참고사항" anchor="left top bottom"/>
  34. <Static id="caption2" class="tit_2" position="absolute 0 9 126 26" style="" text="신환환자" anchor="default"/>
  35. <Shape id="line7" class="line_10" linetype="horizontal" position="absolute 0 26 836 30" style="" anchor="left top right"/>
  36. <Shape id="line8" class="line_2" linetype="horizontal" position="absolute 0 164 836 167" style="" anchor="default"/>
  37. <Static id="caption81" class="cell_1" position="absolute 0 166 223 233" style="font:,26,26pt;align: middle;" text="주민등록번호" anchor="default"/>
  38. <Static id="caption82" class="cell_1" position="absolute 0 30 223 97" style="font:,26,26pt;align: middle;" text="등록번호" anchor="default"/>
  39. <Static id="caption79" class="cell_1" position="absolute 0 98 223 165" style="font:,26,26pt;align: middle;" text="환자이름" anchor="default"/>
  40. <Shape id="line1" class="line_2" linetype="horizontal" position="absolute 0 96 836 99" style="" anchor="default"/>
  41. <Button id="button2" class="btn4" taborder="5" position="absolute 710 403 766 425" style="" text="발급" onclick="group2_group4_button2_onclick" anchor="right bottom"/>
  42. <Shape id="line9" class="line_3" linetype="horizontal" position="absolute 0 401 836 404" style="" anchor="left right bottom"/>
  43. <Button id="button4" class="btn4" position="absolute 768 403 836 425" style="" text="초기화" onclick="group2_group4_button4_onclick" anchor="right bottom"/>
  44. <Shape id="line4" class="line_2" linetype="horizontal" position="absolute 0 232 836 235" style="" anchor="default"/>
  45. <Edit id="ipt_pid" class="font_pid" taborder="1" position="absolute 226 31 836 96" style="align:left ;color:#000000;" anchor="left top right" onkeypress="group2_group4_ipt_pid_onkeypress" onkillfocus="group2_group4_ipt_pid_onkillfocus" onkeydown="group2_group4_ipt_pid_onkeydown"/>
  46. </Layout>
  47. </Layouts>
  48. </Div>
  49. <Div id="group5" position="absolute 0 27 840 460" anchor="all">
  50. <Layouts>
  51. <Layout>
  52. <Grid id="datagrid1" binddataset="ds_main_rsrvpat_rsrvpatlist" position="absolute 0 69 840 433" style="" anchor="all">
  53. <Formats>
  54. <Format id="default">
  55. <Columns>
  56. <Column size="24"/>
  57. <Column size="80"/>
  58. <Column size="70"/>
  59. <Column size="50"/>
  60. <Column size="55"/>
  61. <Column size="140"/>
  62. <Column size="70"/>
  63. <Column size="85"/>
  64. <Column size="85"/>
  65. <Column size="85"/>
  66. <Column size="70"/>
  67. </Columns>
  68. <Rows>
  69. <Row size="24" band="head"/>
  70. <Row size="24"/>
  71. </Rows>
  72. <Band id="head">
  73. <Cell/>
  74. <Cell col="1" text="등록번호"/>
  75. <Cell col="2" text="환자명"/>
  76. <Cell col="3" colspan="2" text="주민등록번호" taborder="undefined"/>
  77. <Cell col="5" text="진료과명"/>
  78. <Cell col="6" text="전문의명"/>
  79. <Cell col="7" text="진료예약일"/>
  80. <Cell col="8" text="생성일자"/>
  81. <Cell col="9" text="발급일자"/>
  82. <Cell col="10" text="발급시간"/>
  83. </Band>
  84. <Band id="body">
  85. <Cell expr="currow + 1"/>
  86. <Cell col="1" text="bind:pid"/>
  87. <Cell col="2" text="bind:hngnm"/>
  88. <Cell col="3" text="bind:rrgstno1"/>
  89. <Cell col="4" text="bind:rrgstno2"/>
  90. <Cell col="5" displaytype="combo" text="bind:orddeptcd" combodataset="ds_init_orddeptcd_orddeptcdlist" combocodecol="cd" combodatacol="nm"/>
  91. <Cell col="6" text="bind:orddrid" combodataset="ds_init_orddrid_orddridlist" combocodecol="cd" combodatacol="nm"/>
  92. <Cell col="7" displaytype="date" text="bind:orddd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  93. <Cell col="8" displaytype="date" text="bind:isscretdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  94. <Cell col="9" displaytype="date" text="bind:issdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  95. <Cell col="10" displaytype="date" text="bind:isstm" mask="HH:mm:ss" calendardisplaynulltype="nulltext"/>
  96. </Band>
  97. </Format>
  98. </Formats>
  99. </Grid>
  100. <Shape id="line2" class="line_10" linetype="horizontal" position="absolute 0 65 840 69" style="" anchor="left top right"/>
  101. <Static id="caption14" class="tit_2" position="absolute 1 48 145 65" style="" text="예약환자리스트" anchor="default"/>
  102. <Div id="group6" position="absolute 0 0 840 40" style="align: top;" anchor="left top right" class="div_SA2">
  103. <Layouts>
  104. <Layout>
  105. <Button id="btn_search" class="btn1" taborder="11" position="absolute 685 10 741 32" style="" text="조회" onclick="group2_group5_group6_btn_search_onclick" anchor="top right"/>
  106. <Shape id="line13" class="line_4" linetype="vertical" position="absolute 670 10 673 32" style="border: solid #ffe4bb #ffe4bb;" anchor="top right"/>
  107. <Combo innerdataset="@dsft_init_orddrid_orddridlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_orddrid" class="combo_s_essential" taborder="10" position="absolute 580 11 660 30" style="" onitemchanged="group2_group5_group6_cmb_orddrid_onitemchanged" anchor="default"/>
  108. <Edit id="ipt_orddeptdrabbr" class="input_s_essential" taborder="9" position="absolute 530 11 577 30" style="" anchor="default" onkillfocus="group2_group5_group6_ipt_orddeptdrabbr_onkillfocus" onkeypress="group2_group5_group6_ipt_orddeptdrabbr_onkeypress"/>
  109. <Static id="caption3" class="search_name" position="absolute 198 13 279 30" style="align: middle;" text="진료과 :" anchor="default"/>
  110. <Static id="caption4" class="search_name" position="absolute 7 13 80 30" style="align: middle;" text="진료일 :" anchor="default"/>
  111. <Static id="caption5" class="search_name" position="absolute 453 13 531 30" style="align: middle;" text="전문의 :" anchor="default"/>
  112. <Edit id="ipt_orddeptabbr" class="input_s_essential" taborder="7" position="absolute 273 11 320 30" style="" anchor="default" onkillfocus="group2_group5_group6_ipt_orddeptabbr_onkillfocus" onkeypress="group2_group5_group6_ipt_orddeptabbr_onkeypress"/>
  113. <Combo innerdataset="ds_init_orddeptcd_orddeptcdlist" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_orddeptcd" class="combo_s_essential" taborder="8" position="absolute 323 11 443 30" style="" onitemchanged="group2_group5_group6_cmb_orddeptcd_onitemchanged" anchor="default"/>
  114. <Calendar id="input3" class="input_s_essential" taborder="6" position="absolute 82 11 182 30" style="" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  115. <Shape id="line3" class="line_4" linetype="vertical" position="absolute 755 10 758 32" style="border: solid #ffe4bb #ffe4bb;" anchor="top right"/>
  116. <Button id="button1" class="btn4" taborder="12" position="absolute 770 10 826 32" style="" text="발급" onclick="group2_group5_group6_button1_onclick" anchor="top right"/>
  117. </Layout>
  118. </Layouts>
  119. </Div>
  120. <Button id="button3" class="btn7" position="absolute 764 42 839 64" style="" text="엑셀저장" onclick="group2_group5_button3_onclick" anchor="top right"/>
  121. </Layout>
  122. </Layouts>
  123. </Div>
  124. <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio1" class="radio_default" position="absolute 2 7 77 27" style="" onitemchanged="group2_radio1_onitemchanged" anchor="default">
  125. <Dataset id="innerdataset">
  126. <ColumnInfo>
  127. <Column id="codecolumn"/>
  128. <Column id="datacolumn"/>
  129. </ColumnInfo>
  130. <Rows>
  131. <Row>
  132. <Col id="codecolumn">N</Col>
  133. <Col id="datacolumn">신환환자</Col>
  134. </Row>
  135. </Rows>
  136. </Dataset>
  137. </Radio>
  138. <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="radio2" class="radio_default" position="absolute 78 7 153 27" style="" onitemchanged="group2_radio2_onitemchanged" anchor="default">
  139. <Dataset id="innerdataset">
  140. <ColumnInfo>
  141. <Column id="codecolumn"/>
  142. <Column id="datacolumn"/>
  143. </ColumnInfo>
  144. <Rows>
  145. <Row>
  146. <Col id="codecolumn">R</Col>
  147. <Col id="datacolumn">예약환자</Col>
  148. </Row>
  149. </Rows>
  150. </Dataset>
  151. </Radio>
  152. </Layout>
  153. </Layouts>
  154. </Div>
  155. </Layout>
  156. </Layouts>
  157. <Objects>
  158. <Dataset id="ds_main_rsrvpat_rsrvpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  159. <ColumnInfo>
  160. <Column id="pid" type="STRING" size="256"/>
  161. <Column id="hngnm" type="STRING" size="256"/>
  162. <Column id="rrgstno1" type="STRING" size="256"/>
  163. <Column id="rrgstno2" type="STRING" size="256"/>
  164. <Column id="orddeptcd" type="STRING" size="256"/>
  165. <Column id="orddrid" type="STRING" size="256"/>
  166. </ColumnInfo>
  167. <Rows>
  168. <Row>
  169. <Col id="pid"/>
  170. <Col id="hngnm"/>
  171. <Col id="rrgstno1"/>
  172. <Col id="rrgstno2"/>
  173. <Col id="orddeptcd"/>
  174. <Col id="orddrid"/>
  175. </Row>
  176. </Rows>
  177. </Dataset>
  178. <Dataset id="ds_main_rsrvpat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  179. <ColumnInfo/>
  180. </Dataset>
  181. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  182. <ColumnInfo>
  183. <Column id="checknewrsrvpat" type="STRING" size="256"/>
  184. </ColumnInfo>
  185. </Dataset>
  186. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  187. <ColumnInfo/>
  188. </Dataset>
  189. <Dataset id="ds_main_rsrvpatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  190. <ColumnInfo>
  191. <Column id="orddd" type="STRING" size="256"/>
  192. <Column id="orddeptcd" type="STRING" size="256"/>
  193. <Column id="orddeptabbr" type="STRING" size="256"/>
  194. <Column id="orddrid" type="STRING" size="256"/>
  195. <Column id="orddeptdrabbr" type="STRING" size="256"/>
  196. <Column id="issno" type="STRING" size="256"/>
  197. </ColumnInfo>
  198. <Rows>
  199. <Row>
  200. <Col id="orddd"/>
  201. <Col id="orddeptcd"/>
  202. <Col id="orddeptabbr"/>
  203. <Col id="orddrid"/>
  204. <Col id="orddeptdrabbr"/>
  205. <Col id="issno"/>
  206. </Row>
  207. </Rows>
  208. </Dataset>
  209. <Dataset id="ds_init_orddrid_orddridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  210. <ColumnInfo>
  211. <Column id="cd" type="STRING" size="256"/>
  212. <Column id="nm" type="STRING" size="256"/>
  213. <Column id="abbr" type="STRING" size="256"/>
  214. </ColumnInfo>
  215. <Rows>
  216. <Row>
  217. <Col id="cd"/>
  218. <Col id="nm"/>
  219. <Col id="abbr"/>
  220. </Row>
  221. </Rows>
  222. </Dataset>
  223. <Dataset id="ds_main_newpatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  224. <ColumnInfo>
  225. <Column id="pid" type="STRING" size="256"/>
  226. <Column id="hngnm" type="STRING" size="256"/>
  227. <Column id="rrgstno" type="STRING" size="256"/>
  228. <Column id="rrgstno1" type="STRING" size="256"/>
  229. <Column id="rrgstno2" type="STRING" size="256"/>
  230. <Column id="remfact" type="STRING" size="256"/>
  231. </ColumnInfo>
  232. <Rows>
  233. <Row>
  234. <Col id="pid"/>
  235. <Col id="hngnm"/>
  236. <Col id="rrgstno"/>
  237. <Col id="rrgstno1"/>
  238. <Col id="rrgstno2"/>
  239. <Col id="remfact"/>
  240. </Row>
  241. </Rows>
  242. </Dataset>
  243. <Dataset id="ds_init_orddridlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  244. <ColumnInfo/>
  245. </Dataset>
  246. <Dataset id="ds_init_orddeptcd_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  247. <ColumnInfo>
  248. <Column id="cd" type="STRING" size="256"/>
  249. <Column id="nm" type="STRING" size="256"/>
  250. <Column id="deptengabbr" type="STRING" size="256"/>
  251. </ColumnInfo>
  252. <Rows>
  253. <Row>
  254. <Col id="cd"/>
  255. <Col id="nm"/>
  256. <Col id="deptengabbr"/>
  257. </Row>
  258. </Rows>
  259. </Dataset>
  260. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  261. <ColumnInfo>
  262. <Column id="send" type="STRING" size="256"/>
  263. </ColumnInfo>
  264. <Rows>
  265. <Row>
  266. <Col id="send"/>
  267. </Row>
  268. </Rows>
  269. </Dataset>
  270. <Dataset id="ds_init_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  271. <ColumnInfo/>
  272. </Dataset>
  273. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  274. <ColumnInfo>
  275. <Column id="patcardissue" type="STRING" size="256"/>
  276. </ColumnInfo>
  277. </Dataset>
  278. <FilteredDataset id="dsft_init_orddrid_orddridlist" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_init_orddrid_orddridlist"/>
  279. <Dataset id="ds_hidden_patcardissue_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  280. <Dataset id="ds_hidden_patcardissue" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  281. </Objects>
  282. <Bind>
  283. <BindItem id="item0" compid="group2.group4.ipt_rrgstno2" propid="value" datasetid="ds_main_newpatinfo" columnid="rrgstno2"/>
  284. <BindItem id="item1" compid="group2.group4.ipt_rrgstno1" propid="value" datasetid="ds_main_newpatinfo" columnid="rrgstno1"/>
  285. <BindItem id="item2" compid="group2.group4.ipt_rrgstno" propid="value" datasetid="ds_main_newpatinfo" columnid="rrgstno"/>
  286. <BindItem id="item3" compid="group2.group4.ipt_hngnm" propid="value" datasetid="ds_main_newpatinfo" columnid="hngnm"/>
  287. <BindItem id="item4" compid="group2.group4.textarea1" propid="value" datasetid="ds_main_newpatinfo" columnid="remfact"/>
  288. <BindItem id="item5" compid="group2.group4.ipt_pid" propid="value" datasetid="ds_main_newpatinfo" columnid="pid"/>
  289. <BindItem id="item6" compid="group2.group5.group6.cmb_orddrid" propid="value" datasetid="ds_main_rsrvpatinfo" columnid="orddrid"/>
  290. <BindItem id="item7" compid="group2.group5.group6.ipt_orddeptdrabbr" propid="value" datasetid="ds_main_rsrvpatinfo" columnid="orddeptdrabbr"/>
  291. <BindItem id="item8" compid="group2.group5.group6.ipt_orddeptabbr" propid="value" datasetid="ds_main_rsrvpatinfo" columnid="orddeptabbr"/>
  292. <BindItem id="item9" compid="group2.group5.group6.cmb_orddeptcd" propid="value" datasetid="ds_main_rsrvpatinfo" columnid="orddeptcd"/>
  293. <BindItem id="item10" compid="group2.group5.group6.input3" propid="value" datasetid="ds_main_rsrvpatinfo" columnid="orddd"/>
  294. <BindItem id="item11" compid="group2.radio1" propid="value" datasetid="ds_main" columnid="checknewrsrvpat"/>
  295. <BindItem id="item12" compid="group2.radio2" propid="value" datasetid="ds_main" columnid="checknewrsrvpat"/>
  296. </Bind>
  297. <Script type="xscript4.0"><![CDATA[include 'com_commonxp::comm_main.xjs';
  298. include 'com_basiccodexp::ZBC001.xjs';
  299. include 'pam_pamcomnxp::PAM.xjs';
  300. function SMPMC04200_onload(obj:Form, e:LoadEventInfo) {
  301. frmf_initForm(obj);
  302. grdf_initGrid(group2.group5.datagrid1);
  303. //grdf_setGridSort(grd_XXX);
  304. //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값);
  305. //2007-10-04 이동식 추가 - 환자카드발급 PC정보를 읽어온다.
  306. fGetPCID();
  307. //alert(app.macAddress);
  308. //END..
  309. //초기화
  310. fInit();
  311. //진료과코드 진료의사ID 조회
  312. pamGetDeptCDDrIDList();
  313. ds_init_orddeptcd_orddeptcdlist.copyData(ds_init_orddeptcdlist);
  314. ds_init_orddrid_orddridlist.copyData(ds_init_orddridlist);
  315. var iRow = ds_init_orddeptcd_orddeptcdlist.insertRow(0);
  316. ds_init_orddeptcd_orddeptcdlist.setColumn(0, "cd", "");
  317. ds_init_orddeptcd_orddeptcdlist.setColumn(0, "nm", "");
  318. iRow = ds_init_orddrid_orddridlist.insertRow(0);
  319. ds_init_orddrid_orddridlist.setColumn(0, "cd", "");
  320. ds_init_orddrid_orddridlist.setColumn(0, "nm", "");
  321. //model.refresh();
  322. }
  323. var IssCard = null;
  324. //초기화
  325. function fInit(){
  326. //데이터 초기화
  327. ds_main_newpatinfo.clearData(); ds_main_newpatinfo.addRow();
  328. ds_main_rsrvpatinfo.clearData(); ds_main_rsrvpatinfo.addRow();
  329. ds_main_rsrvpat_rsrvpatlist.clearData();
  330. //오늘 날자 세팅
  331. ds_main_rsrvpatinfo.setColumn( 0, "orddd", utlf_getCurrentDate());
  332. //예약환자화면 디폴트처리
  333. ds_main.clearData();
  334. ds_main.addRow();
  335. ds_main.setColumn( 0, "checknewrsrvpat", 'R');
  336. group2.group4.visible = false;
  337. group2.group5.visible = true;
  338. //model.refresh();
  339. }
  340. //2007-10-04 이동식 추가 - 환자카드발급신청
  341. function fIssuePatientCard(){
  342. //노드생성
  343. dsf_makeValue( ds_hidden_patcardissue, "flag", "string", "" );
  344. dsf_makeValue( ds_hidden_patcardissue, "pid", "string", "" );
  345. dsf_makeValue( ds_hidden_patcardissue, "rrgstno1", "string", "" );
  346. dsf_makeValue( ds_hidden_patcardissue, "rrgstno2", "string", "" );
  347. dsf_makeValue( ds_hidden_patcardissue, "issflag", "string", "" );
  348. dsf_makeValue( ds_hidden_patcardissue, "issno", "string", "" );
  349. dsf_makeValue( ds_hidden_patcardissue, "hngnm", "string", "" );
  350. dsf_makeValue( ds_hidden_patcardissue, "remfact", "string", "" );
  351. dsf_makeValue( ds_hidden_patcardissue, "result", "string", "" );
  352. //데이터 체크
  353. var pid = ds_main_newpatinfo.getColumn(0, "pid");
  354. if( pid == '' || pid == ' ' || pid == '-' ){
  355. sysf_messageBox("등록번호를 찾을 수 없습니다.", "E999", "");
  356. return false;
  357. }
  358. var rrgstno1 = ds_main_newpatinfo.getColumn(0, "rrgstno1");
  359. if( rrgstno1 == '' || rrgstno1 == ' ' || rrgstno1 == '-' ){
  360. sysf_messageBox("주민등록번호 앞 6자리를 찾을 수 없습니다.", "E999", "");
  361. return false;
  362. }else{
  363. if( ! fRrgstNo1Veri() ){
  364. return false;
  365. }
  366. }
  367. var rrgstno2 = ds_main_newpatinfo.getColumn(0, "rrgstno2");
  368. if( rrgstno2 == '' || rrgstno2 == ' ' || rrgstno2 == '-' ){
  369. sysf_messageBox("주민등록번호 뒤 7자리를 찾을 수 없습니다.", "E999", "");
  370. return false;
  371. }else{
  372. if( ! fRrgstNo2Veri() ){
  373. return false;
  374. }
  375. }
  376. var hngnm = ds_main_newpatinfo.getColumn(0, "hngnm");
  377. if( hngnm == '' || hngnm == ' ' || hngnm == '-' ){
  378. sysf_messageBox("환자이름을 찾을 수 없습니다.", "E999", "");
  379. return false;
  380. }
  381. var issno = ds_hidden_patcardissue.getColumn(0, "pcinfo");
  382. if( issno == '' || issno == ' ' || issno == '-' ){
  383. sysf_messageBox("PC 고유번호 정보를 찾을 수 없습니다.", "E999", "");
  384. return false;
  385. }
  386. //노드값 세팅
  387. ds_hidden_patcardissue.setColumn( 0, "flag", "R"); //재발행 cf)최초발행은 'F'
  388. ds_hidden_patcardissue.setColumn( 0, "pid", pid);
  389. ds_hidden_patcardissue.setColumn( 0, "rrgstno1", rrgstno1);
  390. ds_hidden_patcardissue.setColumn( 0, "rrgstno2", rrgstno2);
  391. ds_hidden_patcardissue.setColumn( 0, "issflag", "7"); //환자 cf)직원은 '4"
  392. ds_hidden_patcardissue.setColumn( 0, "issno", issno);
  393. ds_hidden_patcardissue.setColumn( 0, "hngnm", hngnm);
  394. ds_hidden_patcardissue.setColumn( 0, "remfact", ds_main_newpatinfo.getColumn(0, "remfact"));
  395. //setForceOn();
  396. //if(submit("TXPAM00201")){
  397. var oParam = {};
  398. oParam.id = "TXPAM00201";
  399. oParam.service = "pamcomnapp.PamComn";
  400. oParam.method = "reqInsPatCardIssue";
  401. oParam.inds = "req=ds_hidden_patcardissue";
  402. oParam.outds = "";
  403. oParam.async = false;
  404. oParam.callback = "cf_TXPAM00201";
  405. tranf_submit(oParam);
  406. if(arErrorCode.pop("TXPAM00201") > -1) {
  407. sysf_messageBox("환자카드 발급신청을 정상적으로 완료했습니다. 카드발급 프린터에서 발급상황을 확인하세요.", "I999", "");
  408. ds_hidden_patcardissue.clearData();
  409. ds_hidden_patcardissue.addRow();
  410. ds_main_newpatinfo.clearData();
  411. ds_main_newpatinfo.addRow();
  412. //model.refresh();
  413. group2.group4.ipt_pid.setFocus();
  414. }
  415. }
  416. function cf_TXPAM00201(sSvcId, nErrorCode, sErrorMsg) {
  417. arErrorCode.push(sSvcId, nErrorCode);
  418. }
  419. //END..
  420. // 수정추가 : 2007.10.17 : 박재형 - 감면정보 조회시 주민번호 앞자리 조건 확인
  421. function fRrgstNo1Veri()
  422. {
  423. var rrgstno1 = ds_main_newpatinfo.getColumn(0, "rrgstno1");
  424. if (rrgstno1 != null && rrgstno1 != "" && rrgstno1 != " " && rrgstno1 != "-")
  425. {
  426. if (rrgstno1.length != 6)
  427. {
  428. sysf_messageBox("주민번호1은 6자리여야 합니다!","E999","");
  429. rrgstno1.setFocus();
  430. //model.refresh();
  431. return false;
  432. }
  433. if (rrgstno1.isNumber() != true)
  434. {
  435. sysf_messageBox("주민번호1은 숫자형태로 입력되어야 합니다!","E999","");
  436. rrgstno1.setFocus();
  437. //model.refresh();
  438. return false;
  439. }
  440. }
  441. else
  442. {
  443. sysf_messageBox("주민번호1은 6자리여야 합니다!","E999","");
  444. rrgstno1.setFocus();
  445. //model.refresh();
  446. return false;
  447. }
  448. return true;
  449. }
  450. // 수정추가 : 2007.10.17 : 박재형 - 감면정보 조회시 주민번호 뒷자리 조건 확인 및 앞자리 날짜입력양식 확인
  451. function fRrgstNo2Veri()
  452. {
  453. var brthdd;
  454. var rrgstno1 = ds_main_newpatinfo.getColumn(0, "rrgstno1");
  455. var rrgstno2 = ds_main_newpatinfo.getColumn(0, "rrgstno2");
  456. if (rrgstno1.length != 6)
  457. {
  458. sysf_messageBox("환자주민번호1은 6자리입니다!","E999","");
  459. rrgstno1.setFocus();
  460. return false;
  461. }
  462. if (rrgstno2.length != 7)
  463. {
  464. sysf_messageBox("환자주민번호2은 7자리입니다!","E999","");
  465. group2.group4.ipt_rrgstno2.setFocus();
  466. return false;
  467. }
  468. var gubn = rrgstno2.substr(0,1);
  469. switch(gubn){
  470. case '1' :
  471. case '2' :
  472. case '5' :
  473. case '6' :
  474. brthdd = '19'.concat(rrgstno1);
  475. break;
  476. case '3' :
  477. case '4' :
  478. case '7' :
  479. case '8' :
  480. brthdd = '20'.concat(rrgstno1);
  481. break;
  482. case '9' :
  483. case '0' :
  484. brthdd = '18'.concat(rrgstno1);
  485. break;
  486. default :
  487. brthdd = '19'.concat(rrgstno1);
  488. break;
  489. }
  490. //ds_main_ptbspatinfo.setColumn( 0, "brthdd",brthdd);
  491. if (utlf_isValidDateTime(brthdd, "YYYYMMDD") == false)
  492. {
  493. if( sysf_messageBox("주민번호 앞6자리 형식오류입니다. 계속 진행하시겠습니까?","Q999","") != 6 ){
  494. ds_main_newpatinfo.setColumn( 0, "rrgstno1","");
  495. ds_main_newpatinfo.setColumn( 0, "rrgstno2","");
  496. //ds_main_ptbspatinfo.setColumn( 0, "brthdd","");
  497. //model.refresh();
  498. return false;
  499. }
  500. }
  501. var rrgstno = rrgstno1.concat(rrgstno2);
  502. //var age = rrgstno1;
  503. //ds_main_patinfo_patinfolist.setColumn( 0, "age",getFullAge(ds_main_patinfo_patinfolist.getColumn(0, "brthdd")));
  504. //
  505. //model.refresh();
  506. if (isResidentNo(rrgstno) == false)
  507. {
  508. if( sysf_messageBox("유효하지 않은 주민번호입니다!, 계속 진행하시겠습니까?","Q999","") != 6 ){
  509. ds_main_newpatinfo.setColumn( 0, "rrgstno1","");
  510. ds_main_newpatinfo.setColumn( 0, "rrgstno2","");
  511. //model.refresh();
  512. return false;
  513. }else{
  514. return true;
  515. }
  516. }
  517. return true;
  518. }
  519. function group1_btn_initialize_onclick(obj:Button, e:ClickEventInfo) {
  520. //데이터 초기화
  521. ds_main_newpatinfo.clearData(); ds_main_newpatinfo.addRow();
  522. ds_main_rsrvpatinfo.clearData(); ds_main_rsrvpatinfo.addRow();
  523. ds_main_rsrvpat_rsrvpatlist.clearData();
  524. //오늘 날자 세팅
  525. ds_main_rsrvpatinfo.setColumn( 0, "orddd", utlf_getCurrentDate());
  526. //model.refresh();
  527. }
  528. function group2_group4_ipt_rrgstno2_onkeydown(obj:MaskEdit, e:KeyEventInfo) {
  529. if (e.keycode == 13)
  530. {
  531. group2.group4.textarea1.setFocus();
  532. }
  533. }
  534. function group2_group4_ipt_rrgstno2_onkillfocus(obj:MaskEdit, e:KillFocusEventInfo) {
  535. if( !utlf_isNull(group2.group4.ipt_rrgstno2.text) && !IsNumeric(group2.group4.ipt_rrgstno2.text) ){ // isNaN(group2.group4.ipt_rrgstno2.text)
  536. sysf_messageBox("주민번호2이 숫자형 데이터가 아닙니다!", "E999", "");
  537. ds_main_newpatinfo.setColumn( 0, "rrgstno2", "");
  538. //group2.group4.ipt_rrgstno2.refresh();
  539. group2.group4.ipt_rrgstno2.setFocus();
  540. return false;
  541. }
  542. }
  543. function group2_group4_ipt_rrgstno1_onkeydown(obj:MaskEdit, e:KeyEventInfo) {
  544. if (e.keycode == 13)
  545. {
  546. group2.group4.ipt_rrgstno2.setFocus();
  547. }
  548. }
  549. function group2_group4_ipt_rrgstno1_onkillfocus(obj:MaskEdit, e:KillFocusEventInfo) {
  550. if( !utlf_isNull(group2.group4.ipt_rrgstno1.text) && !IsNumeric(group2.group4.ipt_rrgstno1.text) ){ // isNaN(group2.group4.ipt_rrgstno1.text)
  551. sysf_messageBox("주민번호1이 숫자형 데이터가 아닙니다!", "E999", "");
  552. ds_main_newpatinfo.setColumn( 0, "rrgstno1", "");
  553. //group2.group4.ipt_rrgstno1.refresh();
  554. group2.group4.ipt_rrgstno1.setFocus();
  555. return false;
  556. }
  557. }
  558. function group2_group4_ipt_rrgstno_onkeydown(obj:MaskEdit, e:KeyEventInfo) {
  559. if (e.keycode == 13)
  560. {
  561. var rrgstno = group2.group4.ipt_rrgstno.text;
  562. if( rrgstno.length != 14 ){
  563. sysf_messageBox("주민번호를 정확히 입력하지 않았습니다.", "E999", "");
  564. //ds_main_newpatinfo.setColumn( 0, "rrgstno", "");
  565. ds_main_newpatinfo.setColumn( 0, "rrgstno1", "");
  566. ds_main_newpatinfo.setColumn( 0, "rrgstno2", "");
  567. //model.refresh();
  568. return false;
  569. }
  570. rrgstno = rrgstno.replace("-", "");
  571. if(!utlf_isNull(rrgstno) && !IsNumeric(rrgstno) ){
  572. sysf_messageBox("주민번호가 숫자형 데이터가 아닙니다!", "E999", "");
  573. ds_main_newpatinfo.setColumn( 0, "rrgstno", "");
  574. ds_main_newpatinfo.setColumn( 0, "rrgstno1", "");
  575. ds_main_newpatinfo.setColumn( 0, "rrgstno2", "");
  576. //model.refresh();
  577. return false;
  578. //group2.group4.ipt_rrgstno2.setFocus();
  579. }
  580. group2.group4.textarea1.setFocus();
  581. }
  582. }
  583. function group2_group4_ipt_rrgstno_onkillfocus(obj:MaskEdit, e:KillFocusEventInfo) {
  584. var rrgstno = group2.group4.ipt_rrgstno.text;
  585. if( rrgstno.length != 14 ){
  586. sysf_messageBox("주민번호를 정확히 입력하지 않았습니다.", "E999", "");
  587. //ds_main_newpatinfo.setColumn( 0, "rrgstno", "");
  588. ds_main_newpatinfo.setColumn( 0, "rrgstno1", "");
  589. ds_main_newpatinfo.setColumn( 0, "rrgstno2", "");
  590. //model.refresh();
  591. return false;
  592. }
  593. rrgstno = rrgstno.replace("-", "");
  594. if( !utlf_isNull(rrgstno) && !IsNumeric(rrgstno) ){ //isNaN(rrgstno)
  595. sysf_messageBox("주민번호가 숫자형 데이터가 아닙니다!", "E999", "");
  596. ds_main_newpatinfo.setColumn( 0, "rrgstno", "");
  597. ds_main_newpatinfo.setColumn( 0, "rrgstno1", "");
  598. ds_main_newpatinfo.setColumn( 0, "rrgstno2", "");
  599. //model.refresh();
  600. return false;
  601. //group2.group4.ipt_rrgstno2.setFocus();
  602. }
  603. ds_main_newpatinfo.setColumn( 0, "rrgstno1", rrgstno.substr(0,6));
  604. ds_main_newpatinfo.setColumn( 0, "rrgstno2", rrgstno.substr(6,7));
  605. //model.refresh();
  606. group2.group4.textarea1.setFocus();
  607. }
  608. function group2_group4_ipt_hngnm_onkeydown(obj:Edit, e:KeyEventInfo) {
  609. if (e.keycode == 13)
  610. {
  611. ds_main_newpatinfo.setColumn( 0, "hngnm", group2.group4.ipt_hngnm.text);
  612. //group2.group4.ipt_hngnm.refresh();
  613. group2.group4.ipt_rrgstno.setFocus();
  614. }
  615. }
  616. function group2_group4_button2_onclick(obj:Button, e:ClickEventInfo) {
  617. fIssuePatientCard();
  618. }
  619. function group2_group4_button4_onclick(obj:Button, e:ClickEventInfo) {
  620. //데이터 초기화
  621. ds_main_newpatinfo.clearData(); ds_main_newpatinfo.addRow();
  622. ds_main_rsrvpatinfo.clearData(); ds_main_rsrvpatinfo.addRow();
  623. ds_main_rsrvpat_rsrvpatlist.clearData();
  624. //오늘 날자 세팅
  625. ds_main_rsrvpatinfo.setColumn( 0, "orddd", utlf_getCurrentDate());
  626. //model.refresh();
  627. group2.group4.ipt_pid.setFocus();
  628. }
  629. function group2_group4_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo) {
  630. if (e.keycode == 13)
  631. {
  632. var tmp_pid = group2.group4.ipt_pid.text;
  633. if( !utlf_isNull(tmp_pid) && !IsNumeric(tmp_pid) ){
  634. sysf_messageBox("등록번호가 숫자형 데이터가 아닙니다!", "E999", "");
  635. ds_main_newpatinfo.setColumn( 0, "pid", "");
  636. //group2.group4.ipt_pid.refresh();
  637. group2.group4.ipt_pid.setFocus();
  638. return false;
  639. }
  640. ds_send.clearData();
  641. ds_send.addRow();
  642. dsf_makeValue( ds_send, "pid", "string", "" );
  643. ds_send.setColumn( 0, "pid", group2.group4.ipt_pid.text);
  644. ds_main_newpatinfo.setColumn( 0, "pid", group2.group4.ipt_pid.text);
  645. //model.refresh();
  646. //setForceOn();
  647. //if( submit("TRPMC04202") ){
  648. var oParam = {};
  649. oParam.id = "TRPMC04202";
  650. oParam.service = "pamcomnapp.PamComn";
  651. oParam.method = "reqGetNewPatInfo";
  652. oParam.inds = "req=ds_send";
  653. oParam.outds = "ds_temp_newpatinfo_newpatinfolist=newpatinfo";
  654. oParam.async = false;
  655. oParam.callback = "cf_TRPMC04202";
  656. tranf_submit(oParam);
  657. if(arErrorCode.pop("TRPMC04202") > -1) {
  658. if( ds_temp_newpatinfo_newpatinfolist.rowcount> 0 ){
  659. var issdd = ds_temp_newpatinfo_newpatinfolist.getColumn(0, "issdd");
  660. var msgdd = issdd.substr(0, 4) + "년 " + issdd.substr(4,2) + "월 " + issdd.substr(6,2) + "일에 ";
  661. var msg = sysf_messageBox( msgdd + "전자카드가 발급되었습니다. 재발급 하시겠습니까?", "Q999", "");
  662. if( msg == 6 ){
  663. ds_main_newpatinfo.setColumn( 0, "pid", ds_temp_newpatinfo_newpatinfolist.getColumn(0, "pid"));
  664. ds_main_newpatinfo.setColumn( 0, "hngnm", ds_temp_newpatinfo_newpatinfolist.getColumn(0, "hngnm"));
  665. ds_main_newpatinfo.setColumn( 0, "rrgstno1", ds_temp_newpatinfo_newpatinfolist.getColumn(0, "rrgstno1"));
  666. ds_main_newpatinfo.setColumn( 0, "rrgstno2", ds_temp_newpatinfo_newpatinfolist.getColumn(0, "rrgstno2"));
  667. ds_main_newpatinfo.setColumn( 0, "rrgstno", ds_temp_newpatinfo_newpatinfolist.getColumn(0, "rrgstno1") + ds_temp_newpatinfo_newpatinfolist.getColumn(0, "rrgstno2") );
  668. ds_main_newpatinfo.setColumn( 0, "remfact", '재발급');
  669. //model.refresh();
  670. group2.group4.button2.dispatch("DOMActivate"); //발급버튼 실행
  671. }else{
  672. group2.group4.button4.dispatch("DOMActivate"); //초기화버튼 실행
  673. return false;
  674. }
  675. }else{
  676. ds_main_newpatinfo.setColumn( 0, "pid", group2.group4.ipt_pid.text);
  677. //model.refresh();
  678. group2.group4.ipt_hngnm.setFocus();
  679. }
  680. }
  681. }
  682. }
  683. function cf_TRPMC04202(sSvcId, nErrorCode, sErrorMsg) {
  684. arErrorCode.push(sSvcId, nErrorCode);
  685. }
  686. function group2_group4_ipt_pid_onkillfocus(obj:Edit, e:KillFocusEventInfo) {
  687. if( isNaN(group2.group4.ipt_pid.text) ){
  688. sysf_messageBox("등록번호가 숫자형 데이터가 아닙니다!", "E999", "");
  689. ds_main_newpatinfo.setColumn( 0, "pid", "");
  690. //group2.group4.ipt_pid.refresh();
  691. group2.group4.ipt_pid.setFocus();
  692. return false;
  693. }
  694. }
  695. function group2_group5_group6_btn_search_onclick(obj:Button, e:ClickEventInfo) {
  696. var orddd = ds_main_rsrvpatinfo.getColumn(0, "orddd");
  697. var orddeptcd = ds_main_rsrvpatinfo.getColumn(0, "orddeptcd");
  698. if( orddd == '' || orddd == ' ' || utlf_isNull(orddd) || orddd == '-' ){
  699. sysf_messageBox("진료일자를 넣고, 조회해주세요.", "E999", "");
  700. return false;
  701. }else if( orddeptcd == '' || orddeptcd == ' ' || utlf_isNull(orddeptcd) || orddeptcd == '-' ){
  702. var msg = sysf_messageBox("해당 진료일에 예약환자가 있는 의사정보를 조회합니다. 조회하시겠습니까?", "Q999", "");
  703. if( msg != 6 ){
  704. return false;
  705. }
  706. }
  707. var issno = ds_hidden_patcardissue.getColumn(0, "pcinfo");
  708. if( utlf_isNull(issno) || issno == '-' ){
  709. sysf_messageBox("발급PC정보를 읽을 수 없습니다. \n전자카드발급을 위한 PC정보 파일이 있는지 확인하세요.(C:\WINDOWS\Device.ini)", "E999", "");
  710. return false;
  711. }else{
  712. ds_main_rsrvpatinfo.setColumn( 0, "issno", issno);
  713. }
  714. //setForceOn();
  715. //if( ! submit("TRPMC04201") ){
  716. var oParam = {};
  717. oParam.id = "TRPMC04201";
  718. oParam.service = "pamcomnapp.PamComn";
  719. oParam.method = "reqGetRsrvPatInfo";
  720. oParam.inds = "req=ds_main_rsrvpatinfo";
  721. oParam.outds = "ds_main_rsrvpat_rsrvpatlist=rsrvpatlist";
  722. oParam.async = false;
  723. //oParam.callback = "cf_TRPMC04201";
  724. tranf_submit(oParam);
  725. }
  726. function cf_TRPMC04201(sSvcId, nErrorCode, sErrorMsg) {
  727. arErrorCode.push(sSvcId, nErrorCode);
  728. }
  729. function group2_group5_group6_cmb_orddrid_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
  730. var orddrid = group2.group5.group6.cmb_orddrid.value;
  731. var drengabbr = dsft_init_orddrid_orddridlist.lookupExpr("cd == '" + group2.group5.group6.cmb_orddrid.value + "'", "drengabbr");
  732. var orddeptcd = dsft_init_orddrid_orddridlist.lookupExpr("cd == '" + group2.group5.group6.cmb_orddrid.value + "'", "dp");
  733. //진료과 세팅
  734. ds_main_rsrvpatinfo.setColumn( 0, "orddeptcd", orddeptcd );
  735. //group2.group5.group6.cmb_orddeptcd.refresh();
  736. //group2.group5.group6.cmb_orddeptcd.index = 0; //.dispatch("xforms-value-changed");
  737. //group2_group5_group6_cmb_orddeptcd_onitemchanged(null, null);
  738. //END..
  739. //2007-08-17 이동식 추가 - 진료의 선택시 영문약어표시
  740. ds_main_rsrvpatinfo.setColumn( 0, "orddrid", orddrid);
  741. ds_main_rsrvpatinfo.setColumn( 0, "orddeptdrabbr", drengabbr);
  742. //model.refresh();
  743. }
  744. function group2_group5_group6_ipt_orddeptdrabbr_onkillfocus(obj:Edit, e:KillFocusEventInfo) {
  745. //2007-12-14 최종수정 - 진료의약어 입력시 진료과 진료의 동시세팅!
  746. var orddrabbr = group2.group5.group6.ipt_orddeptdrabbr.value;
  747. if( orddrabbr == '' || orddrabbr.length < 2 || orddrabbr == ' '){
  748. return false;
  749. }
  750. var orddrid = ds_init_orddrid_orddridlist.lookupExpr("drengabbr == '" + String(orddrabbr).toUpperCase() + "'", "cd");
  751. var orddeptcd = ds_init_orddrid_orddridlist.lookupExpr("drengabbr == '" + String(orddrabbr).toUpperCase() + "'", "dp");
  752. //진료과 세팅
  753. ds_main_rsrvpatinfo.setColumn( 0, "orddeptcd", orddeptcd );
  754. //group2.group5.group6.cmb_orddeptcd.refresh();
  755. //group2.group5.group6.cmb_orddeptcd.index = 0; //.dispatch("xforms-value-changed");
  756. group2_group5_group6_cmb_orddeptcd_onitemchanged(null, null);
  757. //진료의 세팅
  758. ds_main_rsrvpatinfo.setColumn( 0, "orddrid", orddrid );
  759. //group2.group5.group6.cmb_orddrid.refresh();
  760. //group2.group5.group6.cmb_orddrid.indext = 0; //.dispatch("xforms-value-changed");
  761. group2_group5_group6_cmb_orddeptcd_onitemchanged(null, null);
  762. group2.group5.group6.btn_search.setFocus();
  763. }
  764. function group2_group5_group6_ipt_orddeptdrabbr_onkeydown(obj:Edit, e:KeyEventInfo) {
  765. if (event.keyCode == "13"){
  766. if( group2.group5.group6.ipt_orddeptdrabbr.value.length == 4 ){
  767. group2.group5.group6.btn_search.setFocus();
  768. }else{
  769. group2.group5.group6.cmb_orddrid.setFocus();
  770. }
  771. }
  772. }
  773. function group2_group5_group6_ipt_orddeptabbr_onkillfocus(obj:Edit, e:KillFocusEventInfo) {
  774. //var abbr = group2.group5.group6.ipt_orddeptabbr.value;
  775. var orddeptabbr = group2.group5.group6.ipt_orddeptabbr.value;
  776. //진료과 세팅
  777. var orddeptcd = ds_init_orddeptcd_orddeptcdlist.lookupExpr("deptengabbr == '" + String(orddeptabbr).toUpperCase() + "'", "cd");
  778. ds_main_rsrvpatinfo.setColumn( 0, "orddeptcd", orddeptcd );
  779. //group2.group5.group6.cmb_orddeptcd.refresh();
  780. //group2.group5.group6.cmb_orddeptcd.index = 0; //.dispatch("xforms-value-changed");
  781. group2_group5_group6_cmb_orddeptcd_onitemchanged(null, null);
  782. group2.group5.group6.ipt_orddeptdrabbr.setFocus();
  783. }
  784. function group2_group5_group6_ipt_orddeptabbr_onkeydown(obj:Edit, e:KeyEventInfo) {
  785. if (event.keyCode == "13"){
  786. if( group2.group5.group6.ipt_orddeptabbr.value.length >= 2 ){
  787. group2.group5.group6.ipt_orddeptdrabbr.setFocus();
  788. }else{
  789. group2.group5.group6.cmb_orddeptcd.setFocus();
  790. }
  791. }
  792. }
  793. function group2_group5_group6_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
  794. var otpt_orddeptcd = ds_main_rsrvpatinfo.getColumn(0, "orddeptcd");
  795. //2007-08-17 이동식 추가 - 진료과 선택시 영문약어표시
  796. var deptengabbr = ds_init_orddeptcd_orddeptcdlist.lookupExpr("cd == '" + group2.group5.group6.cmb_orddeptcd.value + "'", "deptengabbr");
  797. //model.makeNode("");
  798. ds_main_rsrvpatinfo.setColumn( 0, "orddeptabbr", deptengabbr );
  799. //END..
  800. //진료의 세팅
  801. dsft_init_orddrid_orddridlist.filterstr = "dp == '" + group2.group5.group6.cmb_orddeptcd.value + "'";
  802. ds_main_rsrvpatinfo.setColumn( 0, "orddrid", "");
  803. //dsf_makeValue( ds_main_otpt, "otpt_orddeptdrabbr", "string", "" );
  804. ds_main_rsrvpatinfo.setColumn( 0, "orddeptdrabbr","");
  805. //model.refresh();
  806. group2.group5.group6.cmb_orddrid.setFocus();
  807. }
  808. function group2_group5_group6_button1_onclick(obj:Button, e:ClickEventInfo) {
  809. if( ds_main_rsrvpat_rsrvpatlist.rowcount< 1 ){
  810. sysf_messageBox("전자카드 발급 할 예약환자 리스트가 없습니다!", "E999", "");
  811. return false;
  812. }
  813. ds_hidden_patcardissue_send.copyData(ds_main_rsrvpat);
  814. //setForceOn();
  815. //if(submit("TXPAM00201")){
  816. var oParam = {};
  817. oParam.id = "TXPAM00201";
  818. oParam.service = "pamcomnapp.PamComn";
  819. oParam.method = "reqInsPatCardIssue";
  820. oParam.inds = "req=ds_hidden_patcardissue_send";
  821. oParam.outds = "";
  822. oParam.async = false;
  823. oParam.callback = "cf_TXPAM00201";
  824. tranf_submit(oParam);
  825. if(arErrorCode.pop("TXPAM00201") > -1) {
  826. sysf_messageBox("환자카드 발급신청을 정상적으로 완료했습니다. 카드발급 프린터에서 발급상황을 확인하세요.", "I999", "");
  827. ds_hidden_patcardissue_send.clearData();
  828. ds_hidden_patcardissue_result.clearData();
  829. }
  830. }
  831. function cf_TXPAM00201(sSvcId, nErrorCode, sErrorMsg) {
  832. arErrorCode.push(sSvcId, nErrorCode);
  833. }
  834. function group2_group5_button3_onclick(obj:Button, e:ClickEventInfo) {
  835. // var fileName = window.fileDialog("save", ",", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
  836. //
  837. // if (fileName != "")
  838. // {
  839. grdf_exportExcel(group2.group5.datagrid1, "Sheet1", "전자카드발급", false, "" , 'user' , true);
  840. // }
  841. }
  842. function group2_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo) {
  843. var check = ds_main.getColumn(0, "checknewrsrvpat");
  844. if( check == 'N' ){
  845. group2.group4.visible = true; //신환환자 전자카드 발급 화면
  846. group2.group5.visible = false; //예약환자 전자카드 발급 화면
  847. group1.visible = false; //하단 초기화 버튼
  848. group2.group4.ipt_pid.setFocus();
  849. }else{
  850. group2.group4.visible = false; //신환환자 전자카드 발급 화면
  851. group2.group5.visible = true;; //예약환자 전자카드 발급 화면
  852. group1.visible = true; //하단 초기화 버튼
  853. group2.group5.group6.input3.setFocus();
  854. }
  855. }
  856. function group2_radio2_onitemchanged(obj:Radio, e:ItemChangeEventInfo) {
  857. var check = ds_main.getColumn(0, "checknewrsrvpat");
  858. if( check == 'N' ){
  859. group2.group4.visible = true; //신환환자 전자카드 발급 화면
  860. group2.group5.visible = false; //예약환자 전자카드 발급 화면
  861. group1.visible = false; //하단 초기화 버튼
  862. group2.group4.ipt_pid.setFocus();
  863. }else{
  864. group2.group4.visible = false; //신환환자 전자카드 발급 화면
  865. group2.group5.visible = true;; //예약환자 전자카드 발급 화면
  866. group1.visible = true; //하단 초기화 버튼
  867. group2.group5.group6.input3.setFocus();
  868. }
  869. }
  870. ]]></Script>
  871. </Form>
  872. </FDL>