SPMRC01600_바코드출력.xfdl 56 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPMRC01600" position="absolute 0 0 674 280" titletext="Untitle" oninit="SPMRC01600_oninit" onload="SPMRC01600_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static text="바코드 출력" position="absolute 0 0 111 22" id="caption21" class="tit_2"/>
  8. <Tab position="absolute 0 34 670 275" id="swt_barcode" class="tab_Normal">
  9. <Tabpages>
  10. <Tabpage text="초진출력" id="case1">
  11. <Layouts>
  12. <Layout>
  13. <Grid position="absolute 0 23 670 221" id="datagrid1" binddataset="ds_main_fstexamprnt_list" autoenter="select" cellsizingtype="col">
  14. <Formats>
  15. <Format id="default">
  16. <Columns>
  17. <Column size="90"/>
  18. <Column size="60"/>
  19. <Column size="120"/>
  20. <Column size="100"/>
  21. <Column size="120"/>
  22. <Column size="100"/>
  23. <Column size="70"/>
  24. </Columns>
  25. <Rows>
  26. <Row size="24" band="head"/>
  27. <Row size="24"/>
  28. </Rows>
  29. <Band id="head">
  30. <Cell text="등록번호"/>
  31. <Cell col="1" text="환자성명"/>
  32. <Cell col="2" text="주민등록번호"/>
  33. <Cell col="3" text="진료과코드"/>
  34. <Cell col="4" text="진료과"/>
  35. <Cell col="5" text="초진일"/>
  36. <Cell col="6" text="과초/병초"/>
  37. </Band>
  38. <Band id="body">
  39. <Cell text="bind:pid"/>
  40. <Cell col="1" text="bind:patnm"/>
  41. <Cell col="2" text="bind:rrgstno" mask="######-#######" maskchar=" "/>
  42. <Cell col="3" text="bind:orddeptcd"/>
  43. <Cell col="4" text="bind:orddeptnm"/>
  44. <Cell col="5" displaytype="date" edittype="date" text="bind:fstexamdd" calendardisplaynulltype="nulltext"/>
  45. <Cell col="6" displaytype="combo" edittype="combo" text="bind:fsexamflag"/>
  46. </Band>
  47. </Format>
  48. </Formats>
  49. </Grid>
  50. <Button position="absolute 614 0 670 22" id="button6" class="btn6" text="출력" onclick="swt_barcode_case1_button6_onclick"/>
  51. <Static text="바코드 자동출력" position="absolute 0 6 162 28" id="caption8" class="tit_2"/>
  52. </Layout>
  53. </Layouts>
  54. </Tabpage>
  55. <Tabpage text="챠트생성" position="absolute 0 0 668 223" id="case2">
  56. <Layouts>
  57. <Layout>
  58. <ImageViewer position="absolute 145 60 510 170" id="img_progress" visible="false"/>
  59. <Static text="신규생성 및 바코드 출력" position="absolute 0 5 170 27" id="caption1" class="tit_2"/>
  60. <Static text="등록번호" position="absolute 0 33 63 56" align="align:center middle;" id="caption13" class="cell_1"/>
  61. <Edit position="absolute 65 35 171 54" id="ipt_cretpid" class="input_default" autoselect="true" onkeyup="swt_barcode_case2_ipt_cretpid_onkeyup"/>
  62. <Shape position="absolute 0 28 670 34" linetype="horizontal" id="line1" class="line_10"/>
  63. <Static text="성명" position="absolute 191 33 246 56" align="align:center middle;" id="caption2" class="cell_1"/>
  64. <Edit position="absolute 248 35 368 54" id="ipt_cretpatnm" class="input_default" autoselect="true" onkeyup="swt_barcode_case2_ipt_cretpatnm_onkeyup"/>
  65. <Edit position="absolute 423 35 493 54" id="ipt_cretabbr" class="input_default" onkeyup="swt_barcode_case2_ipt_cretabbr_onkeyup" autoselect="true"/>
  66. <Static text="차트과" position="absolute 370 33 421 56" align="align:center middle;" id="caption12" class="cell_1"/>
  67. <Combo position="absolute 495 35 670 54" id="cmb_cretchrtdept" class="combo_default" innerdataset="@ds_init_cretchart_deptinfo" datacolumn="chrtdeptnm" codecolumn="chrtdeptcd" onitemchanged="swt_barcode_case2_cmb_cretchrtdept_onitemchanged"/>
  68. <Button position="absolute 613 6 669 28" id="btn_cretPrnt" class="btn6" text="출력" onclick="swt_barcode_case2_btn_cretPrnt_onclick"/>
  69. <Shape position="absolute 0 55 670 61" linetype="horizontal" id="line6" class="line_3"/>
  70. <CheckBox position="absolute 173 36 193 53" id="checkbox1" truevalue="true" falsevalue="false" onclick="swt_barcode_case2_checkbox1_onclick"/>
  71. <Static id="opt_message" position="absolute 228 84 472 119" visible="false"/>
  72. </Layout>
  73. </Layouts>
  74. </Tabpage>
  75. <Tabpage text="재출력" id="case3">
  76. <Layouts>
  77. <Layout>
  78. <ImageViewer position="absolute 145 60 510 170" id="img1" visible="false"/>
  79. <Static text="성명" position="absolute 191 33 246 56" align="align:center middle;" id="caption3" class="cell_1"/>
  80. <Static text="차트과" position="absolute 370 33 421 56" align="align:center middle;" id="caption4" class="cell_1"/>
  81. <Static text="등록번호" position="absolute 0 33 63 56" align="align:center middle;" id="caption5" class="cell_1"/>
  82. <Combo position="absolute 495 35 670 54" id="cmb_rechrtdept" class="combo_default" innerdataset="@ds_init_reprntbarcode_deptinfo" datacolumn="chrtdeptnm" codecolumn="chrtdeptcd" onitemchanged="swt_barcode_case3_cmb_rechrtdept_onitemchanged"/>
  83. <Shape position="absolute 0 28 670 34" linetype="horizontal" id="line2" class="line_10"/>
  84. <Edit position="absolute 248 35 368 54" id="ipt_reprntpatnm" class="input_default" autoselect="true" onkeyup="swt_barcode_case3_ipt_reprntpatnm_onkeyup"/>
  85. <Edit position="absolute 423 35 493 54" id="ipt_reprntabbr" class="input_default" autoselect="true" onkeyup="swt_barcode_case3_ipt_reprntabbr_onkeyup"/>
  86. <Edit position="absolute 65 35 171 54" id="ipt_reprntpid" class="input_default" autoselect="true" onkeyup="swt_barcode_case3_ipt_reprntpid_onkeyup"/>
  87. <Shape position="absolute 0 55 670 61" linetype="horizontal" id="line3" class="line_3"/>
  88. <Static text="바코드 출력" position="absolute 0 5 95 26" id="caption6" class="tit_2"/>
  89. <Button position="absolute 613 6 669 28" id="btn_rePrnt" class="btn6" text="출력" onclick="swt_barcode_case3_btn_rePrnt_onclick"/>
  90. <CheckBox position="absolute 173 36 193 53" id="checkbox2" truevalue="true" falsevalue="false" onclick="swt_barcode_case3_checkbox2_onclick"/>
  91. <Static id="output1" position="absolute 247 94 471 132" visible="false"/>
  92. </Layout>
  93. </Layouts>
  94. </Tabpage>
  95. <Tabpage text="봉투바코드" position="absolute 0 0 668 223" id="case4">
  96. <Layouts>
  97. <Layout>
  98. <Static text="등록번호" position="absolute 158 32 221 55" align="align:center middle;" id="caption9" class="cell_1"/>
  99. <Shape position="absolute 0 27 670 33" linetype="horizontal" id="line4" class="line_10"/>
  100. <Static text="봉투 바코드 출력" position="absolute 0 11 126 33" id="caption10" class="tit_2"/>
  101. <Shape position="absolute 0 80 670 86" linetype="horizontal" id="line5" class="line_3"/>
  102. <Edit position="absolute 223 34 293 53" id="ipt_frompid" class="input_default" autoselect="true"/>
  103. <Button position="absolute 614 5 670 27" id="button5" class="btn6" text="출력" onclick="swt_barcode_case4_button5_onclick"/>
  104. <Edit position="absolute 313 34 383 53" id="ipt_topid" class="input_default" autoselect="true"/>
  105. <Static text="~" position="absolute 298 32 313 52" id="caption14"/>
  106. <Calendar position="absolute 65 60 200 79" id="ipt_stddate" class="input_default" enable="false" mask="yyyy-mm-dd hh:nn:ss"/>
  107. <Static text="출력구분" position="absolute 0 32 63 55" align="align:center middle;" id="caption7" class="cell_1"/>
  108. <Radio position="absolute 65 33 155 53" id="rdo_fsexamflag" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="swt_barcode_case4_rdo_fsexamflag_onitemchanged">
  109. <Dataset id="innerdataset">
  110. <ColumnInfo>
  111. <Column id="codecolumn"/>
  112. <Column id="datacolumn"/>
  113. </ColumnInfo>
  114. <Rows>
  115. <Row>
  116. <Col id="codecolumn">F</Col>
  117. <Col id="datacolumn">병초</Col>
  118. </Row>
  119. <Row>
  120. <Col id="codecolumn">D</Col>
  121. <Col id="datacolumn">과초</Col>
  122. </Row>
  123. </Rows>
  124. </Dataset>
  125. </Radio>
  126. <Static text="기준시간" position="absolute 0 58 63 81" align="align:center middle;" id="caption11" class="cell_1"/>
  127. <Shape position="absolute 0 54 670 60" linetype="horizontal" id="line7" class="line_2"/>
  128. <Button position="absolute 550 5 606 27" id="button23" class="btn3" text="검색" onclick="swt_barcode_case4_button23_onclick"/>
  129. <Grid position="absolute 0 84 670 222" id="datagrid2" binddataset="ds_main_envelopebarcode_info_list" autoenter="select" cellsizingtype="col">
  130. <Formats>
  131. <Format id="default">
  132. <Columns>
  133. <Column size="70"/>
  134. <Column size="0"/>
  135. <Column size="60"/>
  136. <Column size="100"/>
  137. <Column size="60"/>
  138. <Column size="0"/>
  139. <Column size="100"/>
  140. <Column size="0"/>
  141. <Column size="65"/>
  142. <Column size="100"/>
  143. <Column size="100"/>
  144. </Columns>
  145. <Rows>
  146. <Row size="24" band="head"/>
  147. <Row size="24"/>
  148. </Rows>
  149. <Band id="head">
  150. <Cell text="등록번호"/>
  151. <Cell col="1" text="생성번호"/>
  152. <Cell col="2" text="성명"/>
  153. <Cell col="3" text="주민번호"/>
  154. <Cell col="4" text="내원구분"/>
  155. <Cell col="5" text="진료과코드"/>
  156. <Cell col="6" text="진료일자"/>
  157. <Cell col="7" text="진료의ID"/>
  158. <Cell col="8" text="병초/과초"/>
  159. <Cell col="9" text="진료과"/>
  160. <Cell col="10" text="진료과영문약어"/>
  161. </Band>
  162. <Band id="body">
  163. <Cell text="bind:pid"/>
  164. <Cell col="1" text="bind:cretno"/>
  165. <Cell col="2" text="bind:hngnm"/>
  166. <Cell col="3" text="bind:rrgstno"/>
  167. <Cell col="4" displaytype="combo" text="bind:ordtype" combodataset="ds_cmb_ordtype" combocodecol="value" combodatacol="label" enable="false"/>
  168. <Cell col="5" text="bind:orddeptcd"/>
  169. <Cell col="6" displaytype="date" edittype="date" text="bind:orddd" calendardisplaynulltype="nulltext" enable="false"/>
  170. <Cell col="7" text="bind:orddrid"/>
  171. <Cell col="8" displaytype="combo" edittype="combo" text="bind:fsexamflag" combodataset="ds_cmb_fsexamflag" combocodecol="value" combodatacol="label"/>
  172. <Cell col="9" text="bind:depthngnm"/>
  173. <Cell col="10" text="bind:deptengabbr"/>
  174. </Band>
  175. </Format>
  176. </Formats>
  177. </Grid>
  178. </Layout>
  179. </Layouts>
  180. </Tabpage>
  181. </Tabpages>
  182. </Tab>
  183. <Button position="absolute 521 22 613 44" id="button26" class="btn3" text="프린터설정" onclick="button26_onclick"/>
  184. <Button position="absolute 614 22 670 44" id="button4" class="btn4" text="닫기" onclick="button4_onclick"/>
  185. <Button id="button66" taborder="1" text="차트생성" position="absolute 0 22 60 44" class="btn_tab_S" onclick="button66_onclick"/>
  186. <Button id="button2" taborder="2" text="재출력" class="btn_tab" position="absolute 61 22 121 44" onclick="button2_onclick"/>
  187. <Button id="button1" taborder="3" text="초진출력" class="btn_tab" position="absolute 122 22 182 44" visible="false" enable="false" onclick="button1_onclick"/>
  188. <Button id="button67" taborder="4" text="봉투바코드" class="btn_tab" position="absolute 183 22 255 44" visible="false" enable="false" onclick="button67_onclick"/>
  189. <Shape id="line10" class="line_10" position="absolute 0 45 670 50"/>
  190. </Layout>
  191. </Layouts>
  192. <Objects>
  193. <Dataset id="ds_main_fstexamprnt_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  194. <Dataset id="ds_main_cretchart" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  195. <ColumnInfo>
  196. <Column id="pid" type="STRING" size="256"/>
  197. <Column id="patnm" type="STRING" size="256"/>
  198. <Column id="contents" type="STRING" size="256"/>
  199. <Column id="orddeptcd" type="STRING" size="256"/>
  200. <Column id="deptengabbr" type="STRING" size="256"/>
  201. </ColumnInfo>
  202. <Rows>
  203. <Row>
  204. <Col id="pid"/>
  205. <Col id="patnm"/>
  206. <Col id="contents">챠트 생성 및 바코드 출력중입니다</Col>
  207. <Col id="orddeptcd"/>
  208. <Col id="deptengabbr"/>
  209. </Row>
  210. </Rows>
  211. </Dataset>
  212. <Dataset id="ds_main_cretchart_checknum" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  213. <ColumnInfo>
  214. <Column id="value" type="STRING" size="256"/>
  215. </ColumnInfo>
  216. <Rows>
  217. <Row>
  218. <Col id="value">true</Col>
  219. </Row>
  220. </Rows>
  221. </Dataset>
  222. <Dataset id="ds_init_cretchart_deptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  223. <Dataset id="ds_main_reprntbarcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  224. <ColumnInfo>
  225. <Column id="pid" type="STRING" size="256"/>
  226. <Column id="patnm" type="STRING" size="256"/>
  227. <Column id="contents" type="STRING" size="256"/>
  228. <Column id="orddeptcd" type="STRING" size="256"/>
  229. <Column id="deptengabbr" type="STRING" size="256"/>
  230. </ColumnInfo>
  231. <Rows>
  232. <Row>
  233. <Col id="pid"/>
  234. <Col id="patnm"/>
  235. <Col id="contents">바코드 출력중입니다</Col>
  236. <Col id="orddeptcd"/>
  237. <Col id="deptengabbr"/>
  238. </Row>
  239. </Rows>
  240. </Dataset>
  241. <Dataset id="ds_init_reprntbarcode_deptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  242. <Dataset id="ds_main_envelopebarcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  243. <ColumnInfo>
  244. <Column id="frompid" type="STRING" size="256"/>
  245. <Column id="topid" type="STRING" size="256"/>
  246. <Column id="stddate" type="STRING" size="256"/>
  247. <Column id="fsexamflag" type="STRING" size="256"/>
  248. </ColumnInfo>
  249. <Rows>
  250. <Row>
  251. <Col id="frompid"/>
  252. <Col id="topid">9999999999</Col>
  253. <Col id="stddate"/>
  254. <Col id="fsexamflag">F</Col>
  255. </Row>
  256. </Rows>
  257. </Dataset>
  258. <Dataset id="ds_main_envelopebarcode_info_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  259. <Dataset id="ds_cmb_ordtype" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  260. <ColumnInfo>
  261. <Column id="label" type="STRING" size="256"/>
  262. <Column id="value" type="STRING" size="256"/>
  263. </ColumnInfo>
  264. <Rows>
  265. <Row>
  266. <Col id="label">외래</Col>
  267. <Col id="value">O</Col>
  268. </Row>
  269. <Row>
  270. <Col id="label">응급</Col>
  271. <Col id="value">E</Col>
  272. </Row>
  273. <Row>
  274. <Col id="label">건진</Col>
  275. <Col id="value">S</Col>
  276. </Row>
  277. </Rows>
  278. </Dataset>
  279. <Dataset id="ds_cmb_fsexamflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  280. <item>
  281. <label>병초</label>
  282. <value>F</value>
  283. </item>
  284. <item>
  285. <label>과초</label>
  286. <value>D</value>
  287. </item>
  288. <ColumnInfo>
  289. <Column id="label" type="STRING" size="256"/>
  290. <Column id="value" type="STRING" size="256"/>
  291. </ColumnInfo>
  292. <Rows>
  293. <Row>
  294. <Col id="label">병초</Col>
  295. <Col id="value">F</Col>
  296. </Row>
  297. <Row>
  298. <Col id="label">과초</Col>
  299. <Col id="value">D</Col>
  300. </Row>
  301. </Rows>
  302. </Dataset>
  303. <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  304. <Dataset id="ds_main_common" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  305. <ColumnInfo>
  306. <Column id="chrtdeptcd" type="STRING" size="256" sumtext="차트과코드"/>
  307. <Column id="chrtdeptnm" type="STRING" size="256" sumtext="차트과"/>
  308. <Column id="chrtdeptabbr" type="STRING" size="256" sumtext="차트과영문약어"/>
  309. </ColumnInfo>
  310. </Dataset>
  311. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  312. <Dataset id="ds_hidden_barcode_barcodeinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  313. <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  314. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  315. <Dataset id="ds_main_exstchart" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  316. <ColumnInfo>
  317. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  318. <Column id="hngnm" type="STRING" size="256" sumtext="환자성명"/>
  319. <Column id="rrgstno" type="STRING" size="256" sumtext="주민번호"/>
  320. <Column id="ordtype" type="STRING" size="256" sumtext="내원구분"/>
  321. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  322. <Column id="depthngnm" type="STRING" size="256" sumtext="진료과"/>
  323. <Column id="deptengabbr" type="STRING" size="256" sumtext="진료과영문약어"/>
  324. <Column id="bcno" type="STRING" size="256" sumtext="바코드번호"/>
  325. </ColumnInfo>
  326. </Dataset>
  327. <Dataset id="ds_main_barcodeinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  328. <Dataset id="ds_temp_hardcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  329. <Dataset id="ds_main_reprntbarcode_checknum" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  330. <ColumnInfo>
  331. <Column id="value" type="STRING" size="256"/>
  332. </ColumnInfo>
  333. <Rows>
  334. <Row>
  335. <Col id="value">true</Col>
  336. </Row>
  337. </Rows>
  338. </Dataset>
  339. <Dataset id="ds_init_envelope" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  340. <ColumnInfo>
  341. <Column id="stddata" type="STRING" size="256" sumtext="기준데이터"/>
  342. <Column id="fsexamflag" type="STRING" size="256" sumtext="병초/과초"/>
  343. </ColumnInfo>
  344. </Dataset>
  345. </Objects>
  346. <Bind>
  347. <BindItem id="item0" compid="swt_barcode.case2.ipt_cretpid" propid="value" datasetid="ds_main_cretchart" columnid="pid"/>
  348. <BindItem id="item1" compid="swt_barcode.case2.ipt_cretpatnm" propid="value" datasetid="ds_main_cretchart" columnid="patnm"/>
  349. <BindItem id="item2" compid="swt_barcode.case2.checkbox1" propid="value" datasetid="ds_main_cretchart_checknum" columnid="value"/>
  350. <BindItem id="item3" compid="swt_barcode.case2.ipt_cretabbr" propid="value" datasetid="ds_main_cretchart" columnid="deptengabbr"/>
  351. <BindItem id="item4" compid="swt_barcode.case2.cmb_cretchrtdept" propid="value" datasetid="ds_main_cretchart" columnid="orddeptcd"/>
  352. <BindItem id="item5" compid="swt_barcode.case3.ipt_reprntpid" propid="value" datasetid="ds_main_reprntbarcode" columnid="pid"/>
  353. <BindItem id="item6" compid="swt_barcode.case3.ipt_reprntpatnm" propid="value" datasetid="ds_main_reprntbarcode" columnid="patnm"/>
  354. <BindItem id="item7" compid="swt_barcode.case3.ipt_reprntabbr" propid="value" datasetid="ds_main_reprntbarcode" columnid="deptengabbr"/>
  355. <BindItem id="item8" compid="swt_barcode.case3.cmb_rechrtdept" propid="value" datasetid="ds_main_reprntbarcode" columnid="orddeptcd"/>
  356. <BindItem id="item9" compid="swt_barcode.case4.rdo_fsexamflag" propid="value" datasetid="ds_main_envelopebarcode" columnid="fsexamflag"/>
  357. <BindItem id="item10" compid="swt_barcode.case4.ipt_frompid" propid="value" datasetid="ds_main_envelopebarcode" columnid="frompid"/>
  358. <BindItem id="item11" compid="swt_barcode.case4.ipt_topid" propid="value" datasetid="ds_main_envelopebarcode" columnid="topid"/>
  359. <BindItem id="item12" compid="swt_barcode.case4.ipt_stddate" propid="value" datasetid="ds_main_envelopebarcode" columnid="stddate"/>
  360. <BindItem id="item13" compid="swt_barcode.case2.opt_message" propid="text" datasetid="ds_main_cretchart" columnid="contents"/>
  361. <BindItem id="item14" compid="swt_barcode.case3.output1" propid="text" datasetid="ds_main_reprntbarcode" columnid="contents"/>
  362. <BindItem id="item16" compid="swt_barcode.case3.checkbox2" propid="value" datasetid="ds_main_reprntbarcode_checknum" columnid="value"/>
  363. </Bind>
  364. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  365. * System Name :
  366. * Job Name :
  367. * Creator :
  368. * Make Date : 2015-11-13
  369. * Description :
  370. *---------------------------------------------------------------------------------------
  371. * Modify Date Modifier Modify Description
  372. *---------------------------------------------------------------------------------------
  373. * 2015-11-13 Live Converter TF->XP
  374. *
  375. *---------------------------------------------------------------------------------------
  376. ****************************************************************************************/
  377. include "com_commonxp::comm_main.xjs";
  378. include "emr_commonxp::EMRCommon.xjs";
  379. include "emr_prcpmngtxp::MMO001.xjs";
  380. include "lis_commonxp::LZZ001.xjs";
  381. include "com_commodulexp::SSZFM00901.xjs";
  382. var arErrorCode = new HashArray();
  383. function SPMRC01600_oninit(obj:Form, e:InitEventInfo)
  384. {
  385. frmf_initForm(obj);
  386. }
  387. function SPMRC01600_onload(obj:Form, e:LoadEventInfo)
  388. {
  389. grdf_initGrid(swt_barcode.case1.datagrid1);
  390. grdf_initGrid(swt_barcode.case4.datagrid2);
  391. fInitialize();
  392. }
  393. function fInitialize()
  394. {
  395. var rslt_ref = "ds_main_common";
  396. swt_barcode.tabindex = 1;
  397. dsf_makeValue(ds_send_reqdata, "instcd", "string", sysf_getUserInfo("dutplceinstcd"));
  398. var oParam = {};
  399. oParam.id = "TRMRC01606";
  400. oParam.service = "chrtmngtapp.ChrtRendMngt";
  401. oParam.method = "reqGetChartDeptInfo";
  402. oParam.inds = "req=ds_send_reqdata";
  403. oParam.outds = "ds_main_common=chrtdeptlist";
  404. oParam.async = false;
  405. //oParam.callback = "cf_TRMRC01606";
  406. tranf_submit(oParam);
  407. ds_send_reqdata.clearData();
  408. ds_init_cretchart_deptinfo.copyData(ds_main_common);
  409. ds_init_reprntbarcode_deptinfo.copyData(ds_main_common);
  410. fGetBrcdPrntInfo();
  411. ds_hidden_barcode_barcodeinfo.appendData(ds_barcdprntsetup);
  412. }
  413. function swt_barcode_case2_ipt_cretpid_onkeyup(obj:Edit, e:KeyEventInfo)
  414. {
  415. if(e.keycode == 13)
  416. {
  417. obj.updateToDataset();
  418. if(ds_main_cretchart_checknum.getColumn(0, "value") == "true")
  419. {
  420. var pid = getCretCheckNo(obj.value, sysf_getUserInfo("dutplceinstcd"));
  421. }
  422. else
  423. {
  424. var pid = obj.value;
  425. }
  426. fGetPatSearch("pid", "1", pid);
  427. swt_barcode.case2.ipt_cretabbr.setFocus();
  428. }
  429. }
  430. function fGetPatSearch(flag, trg, txt)
  431. {
  432. ds_temp.clearData();
  433. ds_send_reqdata.clearData();
  434. if(flag == "pid")
  435. {
  436. dsf_makeValue(ds_send_reqdata, "pid", "string", txt);
  437. var oParam = {};
  438. oParam.id = "TRMRC01604";
  439. oParam.service = "chrtmngtapp.ChrtRendMngt";
  440. oParam.method = "reqGetPatBaseInfo";
  441. oParam.inds = "req=ds_send_reqdata";
  442. oParam.outds = "ds_patinfolist=patbaseinfo";
  443. oParam.async = false;
  444. //oParam.callback = "cf_TRMRC01604";
  445. tranf_submit(oParam);
  446. }
  447. else if(flag == "patnm")
  448. {
  449. if(trg == "1")
  450. {
  451. var usr_val = txt;
  452. dsf_makeValue(ds_temp, "srchcond", "string", "2");
  453. dsf_makeValue(ds_temp, "hngnm", "string", usr_val);
  454. dsf_makeValue(ds_temp, "autoflag", "string", "Y");
  455. }
  456. else if(trg == "2")
  457. {
  458. var usr_val = txt;
  459. dsf_makeValue(ds_temp, "srchcond", "string", "2");
  460. dsf_makeValue(ds_temp, "hngnm", "string", usr_val);
  461. dsf_makeValue(ds_temp, "autoflag", "string", "Y");
  462. }
  463. var objArg = new Object();
  464. objArg.arg_ds_send = ds_temp;
  465. frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");
  466. }
  467. if(trg == "1")
  468. {
  469. ds_main_cretchart.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
  470. ds_main_cretchart.setColumn(0, "patnm", ds_patinfolist.getColumn(0, "hngnm"));
  471. }
  472. else if(trg == "2")
  473. {
  474. ds_main_reprntbarcode.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
  475. ds_main_reprntbarcode.setColumn(0, "patnm", ds_patinfolist.getColumn(0, "hngnm"));
  476. }
  477. }
  478. function swt_barcode_case2_ipt_cretpatnm_onkeyup(obj:Edit, e:KeyEventInfo)
  479. {
  480. if(e.keycode == 13)
  481. {
  482. obj.updateToDataset();
  483. var patnm = obj.value;
  484. fGetPatSearch("patnm", "1", patnm);
  485. swt_barcode.case2.ipt_cretabbr.setFocus();
  486. }
  487. }
  488. function swt_barcode_case2_ipt_cretabbr_onkeyup(obj:Edit, e:KeyEventInfo)
  489. {
  490. if(e.keycode == 13)
  491. {
  492. obj.updateToDataset();
  493. var engabbr = obj.value;
  494. engabbr = engabbr.toUpperCase();
  495. fGetDeptEngAbbr(engabbr, "ds_init_cretchart_deptinfo", "ds_main_cretchart/orddeptcd");
  496. ds_main_cretchart.setColumn(0, "deptengabbr", ds_init_cretchart_deptinfo.lookup("deptengabbr", engabbr, "deptengabbr"));
  497. swt_barcode.case2.btn_cretPrnt.setFocus();
  498. }
  499. }
  500. function fGetDeptEngAbbr(engabbr, ref, resref)
  501. {
  502. var deptcd = eval(ref).lookup("deptengabbr", engabbr, "deptcd");
  503. var resref = resref.split("/");
  504. var path = resref[0];
  505. var column = resref[1];
  506. eval(path).setColumn(0, column, deptcd);
  507. }
  508. function swt_barcode_case2_cmb_cretchrtdept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  509. {
  510. ds_main_cretchart.setColumn(0, "deptengabbr", ds_init_cretchart_deptinfo.getColumn(obj.index, "chrtdeptabbr"));
  511. swt_barcode.case2.btn_cretPrnt.setFocus();
  512. }
  513. function swt_barcode_case2_checkbox1_onclick(obj:CheckBox, e:ClickEventInfo)
  514. {
  515. if(obj.value == "true")
  516. {
  517. }
  518. else
  519. {
  520. ds_main_cretchart_checknum.setColumn(0, "value", "");
  521. }
  522. }
  523. function swt_barcode_case2_btn_cretPrnt_onclick(obj:Button, e:ClickEventInfo)
  524. {
  525. var pRef = ds_hidden_barcode_barcodeinfo;
  526. fBarCodePrnt(pRef);
  527. }
  528. function fBarCodePrnt(pRef)
  529. {
  530. ds_main_exstchart.clearData();
  531. ds_main_barcodeinfo.clearData();
  532. dsf_makeValue(ds_send_reqdata, "pid", "string", ds_main_cretchart.getColumn(0, "pid"));
  533. dsf_makeValue(ds_send_reqdata, "orddeptcd", "string", ds_main_cretchart.getColumn(0, "orddeptcd"));
  534. dsf_makeValue(ds_send_reqdata, "ioflag", "string", "O");
  535. var oParam = {};
  536. oParam.id = "TRMRC01603";
  537. oParam.service = "chrtmngtapp.ChrtRendMngt";
  538. oParam.method = "reqGetNewChart";
  539. oParam.inds = "req=ds_send_reqdata";
  540. oParam.outds = "ds_main_exstchart=chrtlist";
  541. oParam.async = false;
  542. oParam.callback = "cf_submit";
  543. tranf_submit(oParam);
  544. if(arErrorCode.pop("TRMRC01603") > -1)
  545. {
  546. var getNodeListCnt = ds_main_exstchart.rowcount;
  547. if(getNodeListCnt > 0 && !utlf_isNull(ds_main_exstchart.getColumn(0, "pid")))
  548. {
  549. sysf_messageBox("챠트를 신규 생성", "E001");
  550. ds_send_reqdata.clearData();
  551. return;
  552. }
  553. }
  554. var val_pid = ds_send_reqdata.getColumn(0, "pid");
  555. for(i = val_pid.length; i < 10; i++)
  556. {
  557. val_pid = "0" + val_pid;
  558. }
  559. dsf_makeValue(ds_send_reqdata, "orddd", "String", "");
  560. dsf_makeValue(ds_send_reqdata, "dschdd", "String", "");
  561. dsf_makeValue(ds_send_reqdata, "atdoctid", "String", "");
  562. dsf_makeValue(ds_send_reqdata, "bcno", "String", val_pid);
  563. dsf_makeValue(ds_send_reqdata, "chrtrem", "String", "");
  564. swt_barcode.case2.opt_message.visible ="visable";
  565. //img_progress.attribute("visibility") = "visable";
  566. var oParam = {};
  567. oParam.id = "TXMRC01601";
  568. oParam.service = "chrtmngtapp.ChrtRendMngt";
  569. oParam.method = "reqSetCretChart";
  570. oParam.inds = "req=ds_send_reqdata";
  571. oParam.outds = "ds_main_barcodeinfo=barcodeinfo";
  572. oParam.async = false;
  573. oParam.callback = "cf_submit";
  574. tranf_submit(oParam);
  575. if(arErrorCode.pop("TXMRC01601") > -1)
  576. {
  577. fBarCodePrnterSetting(pRef);
  578. swt_barcode.case2.opt_message.visible = false;
  579. //img_progress.attribute("visibility") = "hidden";
  580. }
  581. ds_send_reqdata.clearData();
  582. }
  583. function cf_submit(sSvcId, nErrorCode, sErrorMsg)
  584. {
  585. arErrorCode.push(sSvcId, nErrorCode);
  586. if(nErrorCode < 0) return;
  587. }
  588. function fBarCodePrnterSetting(pRef)
  589. {
  590. var barcdRef = ds_data_setupinfo;
  591. //var vInstance = document.models(0).instances(0);
  592. var cntHR = pRef.rowcount
  593. var sPrntKind = barcdRef.getColumn(0, "prntkind");
  594. var portOpenTF = "";
  595. dsf_makeValue(ds_send, "scrnid", "string", frmf_getScreenID());
  596. var oParam = {};
  597. oParam.id = "TRLLC90101";
  598. oParam.service = "diagtestapplib.LisCommon";
  599. oParam.method = "reqGetSetUpInfo";
  600. oParam.inds = "scrnid=ds_send";
  601. oParam.outds = "ds_barcdprntsetup=getSetUpInfo";
  602. oParam.async = false;
  603. //oParam.callback = "cf_TRLLC90101";
  604. tranf_submit(oParam);
  605. lf_convertXmlToDs(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"));
  606. if(cntHR > 0 && sPrntKind != 0)
  607. {
  608. var sCommKind = barcdRef.getColumn(0, "commkind");
  609. var sLeftBank = ds_data_blank.getColumn(0, "left");
  610. var sTopBank = ds_data_blank.getColumn(0, "top");
  611. if(sCommKind == "01")
  612. {
  613. //var sSetUpVal = barcdRef+ "[1]/comm01/setupval");
  614. }
  615. else if(sCommKind == "02")
  616. {
  617. var sComm = ds_data_comm02.getColumn(0, "comm");
  618. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  619. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  620. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  621. var sParity = ds_data_comm02.getColumn(0, "parity");
  622. CommAX.CommPort = sComm;
  623. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  624. portOpenTF = CommAX.PortOpen("true");
  625. }
  626. else if(sCommKind == "03")
  627. {
  628. // var sSetUpVal = model.getValue(barcdRef + "[1]/comm03/setupval");
  629. }
  630. fSetLblPaper(sCommKind, sLeftBank, sTopBank, sPrntKind, portOpenTF, barcdRef);
  631. }
  632. }
  633. function fSetLblPaper(sCommKind, sLeftBank, sTopBank, sPrntKind, portOpenTF, barcdRef)
  634. {
  635. var barcodeinfo = ds_main_barcodeinfo;
  636. var sSndMsg = "";
  637. var sBcno = barcodeinfo.getColumn(0, "bcno");
  638. var sPatnm = barcodeinfo.getColumn(0, "hngnm");
  639. var sPid = barcodeinfo.getColumn(0, "pid");
  640. var sDeptEngAbbr = barcodeinfo.getColumn(0, "deptengabbr");
  641. var sRrsgtno = barcodeinfo.getColumn(0, "rrgstno");
  642. var sOrddd = barcodeinfo.getColumn(0, "orddd");
  643. var sFsexamflag = barcodeinfo.getColumn(0, "fsexamflag");
  644. if(sFsexamflag == "F")
  645. {
  646. sFsexamflag = "병초";
  647. }
  648. else if(sFsexamflag == "D")
  649. {
  650. sFsexamflag = "과초";
  651. }
  652. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  653. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  654. var iLeft = ds_data_blank.getColumn(0, "left");
  655. var iTop = ds_data_blank.getColumn(0, "top");
  656. if(utlf_isNull(iLeft) || iLeft == "-")
  657. {
  658. iLeft = 0;
  659. }
  660. if(utlf_isNull(iTop) || iTop == "-")
  661. {
  662. iTop = 0;
  663. }
  664. if(sPrntKind == "2" || sPrntKind == "6" || sPrntKind == "7")
  665. {
  666. var esc = String.fromCharCode(27);
  667. var sSndMsg = esc + "A" + esc + "A105500800";
  668. lf_getHardCDList("N", 3801, null, ds_temp_hardcode);
  669. var hardcd = ds_temp_hardcode.getColumn(0, "hardcd");
  670. if (hardcd == "Y")
  671. {
  672. for(var i = sPid.length; i < 10; i++)
  673. {
  674. sPid = "0" + sPid;
  675. }
  676. var tmp_pid = barcodeinfo.getColumn(0, "pid");
  677. if(tmp_pid.length >= 9)
  678. {
  679. sPid = sPid.substring(0, 2) + " " + sPid.substring(2, 5) + " " + sPid.substring(5, 7) + " " + sPid.substring(7, 9) + " - " + sPid.substring(9, 10);
  680. }
  681. else
  682. {
  683. sPid = sPid.substring(2, 5) + " " + sPid.substring(5, 7) + " " + sPid.substring(7, 9) + " - " + sPid.substring(9, 10);
  684. }
  685. }
  686. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+20, parseInt(iLeft)+270, sPid, 2, 2);
  687. if (sPatnm.length > 3)
  688. {
  689. sPatnm = sPatnm.substring(0, 1) + " " + sPatnm.substring(1, 2) + " " + sPatnm.substring(2, 3) + " " + sPatnm.substring(3, 4);
  690. }
  691. else
  692. {
  693. sPatnm = sPatnm.substring(0, 1) + " " + sPatnm.substring(1, 2) + " " + sPatnm.substring(2, 3);
  694. }
  695. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+90, parseInt(iLeft)+280, sPatnm, 2, 2);
  696. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+100, parseInt(iLeft)+620, sDeptEngAbbr, 2, 2);
  697. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+100, parseInt(iLeft)+720, sFsexamflag, 2, 2);
  698. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+160, parseInt(iLeft)+230, sRrsgtno.substring(0,8)+"******", 1, 1.5);
  699. if(!utlf_isNull(sOrddd))
  700. {
  701. sOrddd = sOrddd.substring(0, 4) + "-" + sOrddd.substring(4, 6) + "-" + sOrddd.substring(6, 8);
  702. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+160, parseInt(iLeft)+490, sOrddd, 1, 1.5);
  703. }
  704. sSndMsg += esc + "V" + parseInt(iTop)+220 + esc + "H" + parseInt(iLeft)+200 + esc + "BG02100" + sBcno; // 바코드(BGaabbb : a-간격(01~12), b-높이(001~600))
  705. sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+350, parseInt(iLeft)+300, "*" + sBcno + "*", 1, 1);
  706. sSndMsg += esc + "Q1" + esc + "Z";
  707. CommAX.SendMsg(sSndMsg);
  708. CommAX.PortOpen("false");
  709. }
  710. else
  711. {
  712. if(portOpenTF == "TRUE")
  713. {
  714. sSndMsg += chrtBarCode_StartFormat(sLeftBank, sTopBank);
  715. lf_getHardCDList("N", 3801, null, ds_temp_hardcode);
  716. var hardcd = ds_temp_hardcode.getColumn(0, "hardcd");
  717. if (hardcd == "Y")
  718. {
  719. for(var i = sPid.length; i < 10; i++)
  720. {
  721. sPid = "0" + sPid;
  722. }
  723. var tmp_pid = barcodeinfo.getColumn(0, "pid");
  724. if(tmp_pid.length >= 9)
  725. {
  726. sPid = sPid.substring(0, 2) + " " + sPid.substring(2, 5) + " " + sPid.substring(5, 7) + " " + sPid.substring(7, 9) + " - " + sPid.substring(9, 10);
  727. }
  728. else
  729. {
  730. sPid = sPid.substring(2, 5) + " " + sPid.substring(5, 7) + " " + sPid.substring(7, 9) + " - " + sPid.substring(9, 10);
  731. }
  732. }
  733. else
  734. {
  735. var instcd = sysf_getUserInfo("dutplceinstcd");
  736. if (instcd == "013")
  737. {
  738. if (sPid < 1314016)
  739. {
  740. for(var i = sPid.length; i < 6; i++)
  741. {
  742. sPid = "0" + sPid;
  743. }
  744. }
  745. var tmp_pid = barcodeinfo.getColumn(0, "pid");
  746. if(tmp_pid.length >= 7)
  747. {
  748. sPid = sPid.substring(0, 2) + " " + sPid.substring(2, 4) + " " + sPid.substring(4, 6) + "-" + sPid.substring(6, 7);
  749. }
  750. else
  751. {
  752. sPid = sPid.substring(0, 2) + " " + sPid.substring(2, 4) + " " + sPid.substring(4, 6);
  753. }
  754. }
  755. }
  756. sSndMsg += chrtBarCode_ChangeFont("C", 52, 32); // Height, width폰트 설정
  757. sSndMsg += chrtBarCode_FieldDataA(70, 20, sPid); // 가로, 세로, 텍스트 환자등록번호
  758. sPatnm = sPatnm.substring(0, 1) + " " + sPatnm.substring(1, 2) + " " + sPatnm.substring(2, 3);
  759. sSndMsg += chrtBarCode_ChangeFont("C", 100, 100); // Height, width폰트 설정
  760. sSndMsg += CommAX.PrtImgOut(75, 90, sPatnm, 2, 2); //환자이름
  761. sSndMsg += CommAX.HanImageData();
  762. sSndMsg += chrtBarCode_ChangeFont("C", 32, 32); // Height, width폰트 설정
  763. sSndMsg += chrtBarCode_FieldDataA(380, 100, sDeptEngAbbr); // 가로, 세로, 텍스트 부서영문약어
  764. sSndMsg += chrtBarCode_ChangeFont("C", 300, 300); // Height, width폰트 설정
  765. sSndMsg += CommAX.PrtImgOut(500, 100, sFsexamflag, 1, 1); //초재진구분
  766. sSndMsg += CommAX.HanImageData();
  767. sSndMsg += chrtBarCode_ChangeFont("C", 20, 20); // Height, width폰트 설정
  768. sSndMsg += chrtBarCode_FieldDataA(30, 160, sRrsgtno); // 주민번호
  769. if(!utlf_isNull(sOrddd))
  770. {
  771. sOrddd = sOrddd.substring(0, 4) + "-" + sOrddd.substring(4, 6) + "-" + sOrddd.substring(6, 8);
  772. sSndMsg += chrtBarCode_ChangeFont("C", 20, 20); // Height, width폰트 설정
  773. sSndMsg += chrtBarCode_FieldDataA(390, 160, sOrddd); // 진료일자
  774. }
  775. sSndMsg += chrtBarCode_ChangeFont("F", 10, 10);
  776. sSndMsg += chrtBarCode_BarCode_Code39(50, 185, "N", 60, sBcno); // 바코드
  777. sSndMsg += chrtBarCode_ChangeFont("C", 10, 10); // 폰트 설정
  778. sSndMsg += chrtBarCode_FieldDataA(190, 250, "*" + sBcno + "*"); //바코드번호
  779. sSndMsg += chrtBarCode_EndFormat(1);
  780. if(sCommKind == "01")
  781. {
  782. CommAX.SendMessageToLPT(sSndMsg);
  783. }
  784. else if(sCommKind == "02")
  785. {
  786. CommAX.SendMessage(sSndMsg);
  787. }
  788. }
  789. }
  790. CommAX.PortOpen("false");
  791. }
  792. function button4_onclick(obj:Button, e:ClickEventInfo)
  793. {
  794. this.close();
  795. }
  796. function button26_onclick(obj:Button, e:ClickEventInfo)
  797. {
  798. var scrnid = frmf_getScreenID();
  799. ds_barcdprntsetup.clearData();
  800. ds_send_reqdata.clearData();
  801. dsf_makeValue(ds_send, "scrnid", "string", scrnid);
  802. var oParam = {};
  803. oParam.id = "TRLLC90101";
  804. oParam.service = "diagtestapplib.LisCommon";
  805. oParam.method = "reqGetSetUpInfo";
  806. oParam.inds = "scrnid=ds_send";
  807. oParam.outds = "ds_barcdprntsetup=getSetUpInfo";
  808. oParam.async = false;
  809. //oParam.callback = "cf_TRLLC90101";
  810. tranf_submit(oParam);
  811. var count = ds_barcdprntsetup.rowcount;
  812. if(count == 0)
  813. {
  814. ds_barcdprntsetup.clearData();
  815. }
  816. var objArg = new Object();
  817. objArg.arg_sSetupInfo = ds_barcdprntsetup.getColumn(0, "prntsetupinfo");
  818. frmf_modal("SPLLC90100", "SPLLC90100", objArg, null, null, null, null, null, null, null, null, null, "M");
  819. }
  820. function button66_onclick(obj:Button, e:ClickEventInfo)
  821. {
  822. obj.class = "btn_tab_S";
  823. button2.class = "btn_tab";
  824. button1.class = "btn_tab";
  825. button67.class = "btn_tab";
  826. swt_barcode.tabindex = 1;
  827. swt_barcode.case2.ipt_cretpid.setFocus();
  828. }
  829. function button2_onclick(obj:Button, e:ClickEventInfo)
  830. {
  831. obj.class = "btn_tab_S";
  832. button1.class = "btn_tab";
  833. button66.class = "btn_tab";
  834. button67.class = "btn_tab";
  835. swt_barcode.tabindex = 2;
  836. swt_barcode.case3.ipt_reprntpid.setFocus();
  837. }
  838. function swt_barcode_case3_ipt_reprntpid_onkeyup(obj:Edit, e:KeyEventInfo)
  839. {
  840. if(e.keycode == 13)
  841. {
  842. obj.updateToDataset();
  843. if(ds_main_reprntbarcode_checknum.getColumn(0, "value") == "true")
  844. {
  845. var pid = getCretCheckNo(obj.value, sysf_getUserInfo("dutplceinstcd"));
  846. }
  847. else
  848. {
  849. var pid = obj.value;
  850. }
  851. fGetPatSearch("pid", "2", pid);
  852. swt_barcode.case3.ipt_reprntabbr.setFocus();
  853. }
  854. }
  855. function swt_barcode_case3_checkbox2_onclick(obj:CheckBox, e:ClickEventInfo)
  856. {
  857. if(obj.value == "true")
  858. {}
  859. else
  860. {
  861. ds_main_reprntbarcode_checknum.setColumn(0, "value", "");
  862. }
  863. }
  864. function swt_barcode_case3_ipt_reprntpatnm_onkeyup(obj:Edit, e:KeyEventInfo)
  865. {
  866. if(e.keycode == 13)
  867. {
  868. obj.updateToDataset();
  869. var patnm = obj.value;
  870. fGetPatSearch("patnm", "2", patnm);
  871. swt_barcode.case3.ipt_reprntabbr.setFocus();
  872. }
  873. }
  874. function swt_barcode_case3_ipt_reprntabbr_onkeyup(obj:Edit, e:KeyEventInfo)
  875. {
  876. if(e.keycode == 13)
  877. {
  878. obj.updateToDataset();
  879. var engabbr = obj.value;
  880. engabbr = engabbr.toUpperCase();
  881. fGetDeptEngAbbr(engabbr, "ds_init_reprntbarcode_deptinfo", "ds_main_reprntbarcode/orddeptcd");
  882. ds_main_reprntbarcode.setColumn(0, "deptengabbr", ds_init_reprntbarcode_deptinfo.lookup("deptengabbr", engabbr, "deptengabbr"));
  883. swt_barcode.case3.btn_rePrnt.setFocus();
  884. }
  885. }
  886. function swt_barcode_case3_cmb_rechrtdept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  887. {
  888. ds_main_reprntbarcode.setColumn(0, "deptengabbr", ds_init_reprntbarcode_deptinfo.getColumn(obj.index, "chrtdeptabbr"));
  889. swt_barcode.case3.btn_rePrnt.setFocus();
  890. }
  891. function swt_barcode_case3_btn_rePrnt_onclick(obj:Button, e:ClickEventInfo)
  892. {
  893. var pRef = ds_hidden_barcode_barcodeinfo;
  894. fBarCodeRePrnt(pRef);
  895. }
  896. function fBarCodeRePrnt(pRef)
  897. {
  898. dsf_makeValue(ds_send, "scrnid", frmf_getScreenID());
  899. var oParam = {};
  900. oParam.id = "TRLLC90101";
  901. oParam.service = "diagtestapplib.LisCommon";
  902. oParam.method = "reqGetSetUpInfo";
  903. oParam.inds = "scrnid=ds_send";
  904. oParam.outds = "ds_barcdprntsetup=getSetUpInfo";
  905. oParam.async = false;
  906. //oParam.callback = "cf_TRLLC90101";
  907. tranf_submit(oParam);
  908. lf_convertXmlToDs(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"));
  909. //lzzfMakeBrcdPrntObjHanDo("CommAX");
  910. ds_main_exstchart.clearData();
  911. ds_main_barcodeinfo.clearData();
  912. dsf_makeValue(ds_send_reqdata, "pid", ds_main_reprntbarcode.getColumn(0, "pid"));
  913. dsf_makeValue(ds_send_reqdata, "orddeptcd", ds_main_reprntbarcode.getColumn(0, "orddeptcd"));
  914. dsf_makeValue(ds_send_reqdata, "ioflag", "O");
  915. var oParam = {};
  916. oParam.id = "TRMRC01601";
  917. oParam.service = "chrtmngtapp.ChrtRendMngt";
  918. oParam.method = "reqGetSrchChart";
  919. oParam.inds = "req=ds_send_reqdata";
  920. oParam.outds = "ds_main_exstchart=chrtlist";
  921. oParam.async = false;
  922. oParam.callback = "cf_submit";
  923. tranf_submit(oParam);
  924. if(arErrorCode.pop("TRMRC01601") > -1)
  925. {
  926. if(!utlf_isNull(ds_main_exstchart.getColumn(0, "pid")))
  927. {
  928. ds_main_barcodeinfo.setColumn(0, "pid", ds_main_exstchart.getColumn(0, "pid"));
  929. ds_main_barcodeinfo.setColumn(0, "orddeptcd", ds_main_exstchart.getColumn(0, "orddeptcd"));
  930. ds_main_barcodeinfo.setColumn(0, "ioflag", ds_main_exstchart.getColumn(0, "ordtype"));
  931. ds_main_barcodeinfo.setColumn(0, "orddd", ds_main_exstchart.getColumn(0, "orddd"));
  932. ds_main_barcodeinfo.setColumn(0, "atdoctid", ds_main_exstchart.getColumn(0, "atdoctid"));
  933. ds_main_barcodeinfo.setColumn(0, "bcno", ds_main_exstchart.getColumn(0, "bcno"));
  934. ds_main_barcodeinfo.setColumn(0, "fstrgstrid", "");
  935. ds_main_barcodeinfo.setColumn(0, "lastupdtrid", "");
  936. ds_main_barcodeinfo.setColumn(0, "chrtrem", "");
  937. ds_main_barcodeinfo.setColumn(0, "hngnm", ds_main_exstchart.getColumn(0, "hngnm"));
  938. ds_main_barcodeinfo.setColumn(0, "rrgstno", ds_main_exstchart.getColumn(0, "rrgstno"));
  939. ds_main_barcodeinfo.setColumn(0, "fsexamflag", ds_main_exstchart.getColumn(0, "fsexamflag"));
  940. ds_main_barcodeinfo.setColumn(0, "depthngnm", ds_main_exstchart.getColumn(0, "depthngnm"));
  941. ds_main_barcodeinfo.setColumn(0, "deptengabbr", ds_main_exstchart.getColumn(0, "deptengabbr"));
  942. fBarCodePrnterSetting(pRef);
  943. }
  944. else
  945. {
  946. sysf_messageBox("등록된 챠트가", "I004");
  947. }
  948. swt_barcode.case2.opt_message.visible = false;
  949. //img_progress.attribute("visibility") = "hidden";
  950. }
  951. ds_send_reqdata.clearData();
  952. }
  953. function button1_onclick(obj:Button, e:ClickEventInfo)
  954. {
  955. swt_barcode.tabindex = 0;
  956. obj.class = "btn_tab_S";
  957. button67.class = "btn_tab";
  958. button2.class = "btn_tab";
  959. button66.class = "btn_tab";
  960. }
  961. function button67_onclick(obj:Button, e:ClickEventInfo)
  962. {
  963. swt_barcode.tabindex = 3;
  964. obj.class = "btn_tab_S";
  965. button1.class = "btn_tab";
  966. button2.class = "btn_tab";
  967. button66.class = "btn_tab";
  968. }
  969. function swt_barcode_case1_button6_onclick(obj:Button, e:ClickEventInfo)
  970. {
  971. fAutoPrntBarCd();
  972. }
  973. function fAutoPrntBarCd()
  974. {
  975. dsf_makeValue(ds_send_reqdata, "curr_date", "string", utlf_getCurrentDate()+utlf_getCurrentTime());
  976. var oParam = {};
  977. oParam.id = "TRMRC01604";
  978. oParam.service = "chrtmngtapp.ChrtRendMngt";
  979. oParam.method = "reqGetPatBaseInfo";
  980. oParam.inds = "req=ds_send_reqdata";
  981. oParam.outds = "ds_patinfolist=patbaseinfo";
  982. oParam.async = false;
  983. //oParam.callback = "cf_TRMRC01604";
  984. tranf_submit(oParam);
  985. gTimerID = this.setTimer("fAutoPrntBarCd();", 300000);
  986. var oParam = {};
  987. oParam.id = "TXMRC01601";
  988. oParam.service = "chrtmngtapp.ChrtRendMngt";
  989. oParam.method = "reqSetCretChart";
  990. oParam.inds = "req=ds_send_reqdata";
  991. oParam.outds = "ds_main_barcodeinfo=barcodeinfo";
  992. oParam.async = false;
  993. oParam.callback = "cf_submit";
  994. tranf_submit(oParam);
  995. if(arErrorCode.pop("TXMRC01601") > -1)
  996. {
  997. fBarCodePrnterSetting(pRef);
  998. }
  999. }
  1000. function swt_barcode_case4_rdo_fsexamflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  1001. {
  1002. if(obj.value == "F")
  1003. {
  1004. swt_barcode.case4.ipt_stddate.enable = false;
  1005. swt_barcode.case4.ipt_frompid.enable = true;
  1006. swt_barcode.case4.ipt_topid.enable = true;
  1007. }
  1008. else if(obj.value == "D")
  1009. {
  1010. swt_barcode.case4.ipt_stddate.enable = true;
  1011. swt_barcode.case4.ipt_frompid.enable = false;
  1012. swt_barcode.case4.ipt_topid.enable = false;
  1013. }
  1014. }
  1015. function swt_barcode_case4_button23_onclick(obj:Button, e:ClickEventInfo)
  1016. {
  1017. fGetOutEnvelopeInfo();
  1018. }
  1019. function fGetOutEnvelopeInfo()
  1020. {
  1021. ds_send_reqdata.clearData();
  1022. dsf_makeValue(ds_send_reqdata, "frompid", "string", ds_main_envelopebarcode.getColumn(0, "frompid"));
  1023. dsf_makeValue(ds_send_reqdata, "topid", "string", ds_main_envelopebarcode.getColumn(0, "topid"));
  1024. dsf_makeValue(ds_send_reqdata, "stddate", "string", ds_main_envelopebarcode.getColumn(0, "stddate"));
  1025. dsf_makeValue(ds_send_reqdata, "fsexamflag", "string", ds_main_envelopebarcode.getColumn(0, "fsexamflag"));
  1026. var oParam = {};
  1027. oParam.id = "TRMRC01602";
  1028. oParam.service = "chrtmngtapp.ChrtRendMngt";
  1029. oParam.method = "reqGetOutEnvelopeInfo";
  1030. oParam.inds = "req=ds_send_reqdata";
  1031. oParam.outds = "ds_main_envelopebarcode_info_list=chrtlist";
  1032. oParam.async = false;
  1033. oParam.callback = "cf_sumbit";
  1034. tranf_submit(oParam);
  1035. if(arErrorCode.pop("TRMRC01602") > -1)
  1036. {
  1037. sysf_messageBox("검색을", "I002")
  1038. }
  1039. ds_send_reqdata.clearData();
  1040. fLastEnvelopeStdData();
  1041. }
  1042. function fLastEnvelopeStdData()
  1043. {
  1044. ds_send_reqdata.clearData();
  1045. if(ds_main_envelopebarcode.getColumn(0, "fsexamflag") == "F")
  1046. {
  1047. dsf_makeValue(ds_send_reqdata, "fsexamflag", "string", ds_main_envelopebarcode.getColumn(0, "fsexamflag"));
  1048. var oParam = {};
  1049. oParam.id = "TRMRC01605";
  1050. oParam.service = "chrtmngtapp.ChrtRendMngt";
  1051. oParam.method = "reqGetEvlPrnt";
  1052. oParam.inds = "req=ds_send_reqdata";
  1053. oParam.outds = "ds_init_envelope=evlprntinfo";
  1054. oParam.async = false;
  1055. //oParam.callback = "cf_TRMRC01605";
  1056. tranf_submit(oParam);
  1057. var node_cnt = ds_init_envelope.rowcount;
  1058. if(!utlf_isNull(ds_init_envelope.getColumn(0, "stddata")))
  1059. {
  1060. ds_main_envelopebarcode.setColumn(0, "frompid", ds_init_envelope.getColumn(0, "stddata"));
  1061. }
  1062. }
  1063. else if(ds_main_envelopebarcode.getColumn(0, "fsexamflag") == "D")
  1064. {
  1065. dsf_makeValue(ds_send_reqdata, "fsexamflag", "string", ds_main_envelopebarcode.getColumn(0, "fsexamflag"));
  1066. var oParam = {};
  1067. oParam.id = "TRMRC01605";
  1068. oParam.service = "chrtmngtapp.ChrtRendMngt";
  1069. oParam.method = "reqGetEvlPrnt";
  1070. oParam.inds = "req=ds_send_reqdata";
  1071. oParam.outds = "ds_init_envelope=evlprntinfo";
  1072. oParam.async = false;
  1073. //oParam.callback = "cf_TRMRC01605";
  1074. tranf_submit(oParam);
  1075. var node_cnt = ds_init_envelope.rowcount;
  1076. if(!utlf_isNull(ds_init_envelope.getColumn(0, "stddata")))
  1077. {
  1078. ds_main_envelopebarcode.setColumn(0, "stddate", ds_init_envelope.getColumn(0, "stddata"));
  1079. }
  1080. }
  1081. ds_send_reqdata.clearData();
  1082. }
  1083. function swt_barcode_case4_button5_onclick(obj:Button, e:ClickEventInfo)
  1084. {
  1085. var pRef = ds_hidden_barcode_barcodeinfo;
  1086. fEnvelopePrnt(pRef);
  1087. }
  1088. function fEnvelopePrnt(pRef)
  1089. {
  1090. ds_main_barcodeinfo.clearData();
  1091. ds_send_reqdata.clearData();
  1092. var result_cnt = ds_main_envelopebarcode_info_list.rowcount;
  1093. for(var cnt = 0; cnt < result_cnt; cnt++)
  1094. {
  1095. ds_main_barcodeinfo.setColumn(0, "pid", ds_main_envelopebarcode_info_list.getColumn(cnt, "pid"));
  1096. ds_main_barcodeinfo.setColumn(0, "orddeptcd", ds_main_envelopebarcode_info_list.getColumn(cnt, "orddeptcd"));
  1097. ds_main_barcodeinfo.setColumn(0, "ioflag", ds_main_envelopebarcode_info_list.getColumn(cnt, "ordtype"));
  1098. ds_main_barcodeinfo.setColumn(0, "orddd", ds_main_envelopebarcode_info_list.getColumn(cnt, "orddd"));
  1099. ds_main_barcodeinfo.setColumn(0, "atdoctid", ds_main_envelopebarcode_info_list.getColumn(cnt, "atdoctid"));
  1100. var barcode = ds_main_envelopebarcode_info_list.getColumn(cnt, "bcno");
  1101. for(var i = barcode.length; i < 10; i++)
  1102. {
  1103. barcode = "0" + barcode;
  1104. }
  1105. ds_main_barcodeinfo.setColumn(0, "bcno", barcode);
  1106. ds_main_barcodeinfo.setColumn(0, "fstrgstrid", "");
  1107. ds_main_barcodeinfo.setColumn(0, "lastupdtrid", "");
  1108. ds_main_barcodeinfo.setColumn(0, "chrtrem", "");
  1109. ds_main_barcodeinfo.setColumn(0, "hngnm", ds_main_envelopebarcode_info_list.getColumn(cnt, "hngnm"));
  1110. ds_main_barcodeinfo.setColumn(0, "rrgstno", ds_main_envelopebarcode_info_list.getColumn(cnt, "rrgstno"));
  1111. ds_main_barcodeinfo.setColumn(0, "fsexamflag", ds_main_envelopebarcode_info_list.getColumn(cnt, "fsexamflag"));
  1112. ds_main_barcodeinfo.setColumn(0, "depthngnm", ds_main_envelopebarcode_info_list.getColumn(cnt, "depthngnm"));
  1113. ds_main_barcodeinfo.setColumn(0, "deptengabbr", ds_main_envelopebarcode_info_list.getColumn(cnt, "deptengabbr"));
  1114. ds_main_barcodeinfo.setColumn(0, "cretno", ds_main_envelopebarcode_info_list.getColumn(cnt, "cretno"));
  1115. fBarCodePrnterSetting(pRef);
  1116. ds_send_reqdata.clearData();
  1117. dsf_makeValue(ds_send_reqdata, "pid", "string", ds_main_barcodeinfo.getColumn(0, "pid"));
  1118. dsf_makeValue(ds_send_reqdata, "orddeptcd", "string", ds_main_barcodeinfo.getColumn(0, "orddeptcd"));
  1119. dsf_makeValue(ds_send_reqdata, "ordtype", "string", ds_main_barcodeinfo.getColumn(0, "ioflag"));
  1120. dsf_makeValue(ds_send_reqdata, "orddd", "string", ds_main_barcodeinfo.getColumn(0, "orddd"));
  1121. dsf_makeValue(ds_send_reqdata, "orddrid", "string", ds_main_barcodeinfo.getColumn(0, "atdoctid"));
  1122. dsf_makeValue(ds_send_reqdata, "fsexamflag", "string", ds_main_barcodeinfo.getColumn(0, "fsexamflag"));
  1123. dsf_makeValue(ds_send_reqdata, "stddata", "string", ds_main_barcodeinfo.getColumn(0, "pid"));
  1124. dsf_makeValue(ds_send_reqdata, "cretno", "string", ds_main_barcodeinfo.getColumn(0, "cretno"));
  1125. if(ds_main_envelopebarcode.getColumn(0, "topid") == "9999999999")
  1126. {
  1127. var oParam = {};
  1128. oParam.id = "TXMRC01602";
  1129. oParam.service = "chrtmngtapp.ChrtRendMngt";
  1130. oParam.method = "reqSetEvlPrnt";
  1131. oParam.inds = "req=ds_send_reqdata";
  1132. oParam.outds = "ds_main_envelopebarcode=chrtlist";
  1133. oParam.async = false;
  1134. //oParam.callback = "cf_TXMRC01602";
  1135. tranf_submit(oParam);
  1136. }
  1137. }
  1138. fLastEnvelopeStdData();
  1139. ds_main_envelopebarcode.setColumn(0, "topid","9999999999");
  1140. }]]></Script>
  1141. </Form>
  1142. </FDL>