SPAER00201_환자별바코드출력.xfdl 40 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPAER00201" position="absolute 0 0 618 349" titletext="환자별바코드출력" oninit="SPAER00201_oninit" onload="SPAER00201_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 316 617 343" id="group1" scrollbars="autoboth">
  8. <Layouts>
  9. <Layout>
  10. <Button position="absolute 501 5 557 27" id="btn_confirm" class="btn4" taborder="8" text="출력" anchor="default" onclick="group1_btn_confirm_onclick"/>
  11. <Button position="absolute 560 5 616 27" id="btn_cancel" class="btn4" taborder="9" text="닫기" anchor="default" onclick="group1_btn_cancel_onclick"/>
  12. <Shape position="absolute 0 -3 617 3" linetype="horizontal" id="line32" class="line_6" anchor="default"/>
  13. <Combo position="absolute 370 5 490 24" id="combo1" innerdataset="@ds_init_cmb_info_initexcuroomgrp" datacolumn="excuroomgrpcdnm" codecolumn="excuroomgrpcdid" anchor="default" class="combo_essential" index="0"/>
  14. <MaskEdit position="absolute 186 5 216 24" id="input1" class="input_search" mask="#,###" anchor="default"/>
  15. <Edit readonly="true" position="absolute 95 5 185 24" align="align:center middle;" id="output1" anchor="default"/>
  16. <Edit readonly="true" position="absolute 235 5 330 24" align="align:center middle;" id="output2" anchor="default"/>
  17. <MaskEdit position="absolute 331 5 366 24" id="input2" mask="#,###" anchor="default"/>
  18. </Layout>
  19. </Layouts>
  20. </Div>
  21. <Div id="group2" taborder="1" position="absolute 0 0 618 40" class="div_SA2">
  22. <Layouts>
  23. <Layout>
  24. <Static id="caption2" text="검색조건 :" class="search_name" position="absolute 15 12 101 29"/>
  25. <Button id="btn_search" taborder="6" text="조회" class="btn1" position="absolute 545 9 601 31" onclick="group2_btn_search_onclick"/>
  26. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 526 9 532 31"/>
  27. <Edit id="ipt_hngnm" taborder="1" class="input_search" visible="false" position="absolute 224 10 354 29" onkeydown="common_onkeydown"/>
  28. <MaskEdit id="ipt_rrgstno1" taborder="2" mask="999999" class="input_search" visible="false" position="absolute 247 10 332 29" onkeydown="common_onkeydown"/>
  29. <Combo id="cmb_cond" taborder="0" innerdataset="@ds_init_P0350" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 106 10 216 29" onitemchanged="group2_cmb_cond_onitemchanged"/>
  30. <MaskEdit id="ipt_rrgstno2" taborder="3" mask="9999999" class="input_search" visible="false" position="absolute 285 10 370 29" onkeydown="common_onkeydown"/>
  31. <Edit id="ipt_pid" taborder="4" class="input_search" visible="false" position="absolute 325 10 455 29" onkeydown="common_onkeydown"/>
  32. <Calendar id="ipt_acptdd" taborder="5" class="input_search" visible="false" position="absolute 390 10 520 29" onchanged="group2_ipt_acptdd_onchanged"/>
  33. </Layout>
  34. </Layouts>
  35. </Div>
  36. <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 61 618 67" style="strokepen:3 solid #33bbbbff;"/>
  37. <Static id="caption1" text="인적사항" class="tit_2" position="absolute 0 45 111 61"/>
  38. <Grid id="grd_patinfo" taborder="2" binddataset="ds_patinfolist" useinputpanel="false" position="absolute 0 66 618 315" oncelldblclick="grd_patinfo_oncelldblclick">
  39. <Formats>
  40. <Format id="default">
  41. <Columns>
  42. <Column size="60"/>
  43. <Column size="0"/>
  44. <Column size="65"/>
  45. <Column size="0"/>
  46. <Column size="0"/>
  47. <Column size="50"/>
  48. <Column size="50"/>
  49. <Column size="85"/>
  50. <Column size="100"/>
  51. <Column size="100"/>
  52. <Column size="100"/>
  53. <Column size="0"/>
  54. <Column size="0"/>
  55. <Column size="0"/>
  56. <Column size="0"/>
  57. <Column size="0"/>
  58. <Column size="0"/>
  59. <Column size="0"/>
  60. <Column size="0"/>
  61. <Column size="0"/>
  62. <Column size="0"/>
  63. <Column size="0"/>
  64. <Column size="0"/>
  65. <Column size="0"/>
  66. <Column size="100"/>
  67. <Column size="100"/>
  68. <Column size="0"/>
  69. <Column size="0"/>
  70. <Column size="0"/>
  71. <Column size="0"/>
  72. <Column size="0"/>
  73. <Column size="0"/>
  74. <Column size="0"/>
  75. <Column size="0"/>
  76. <Column size="0"/>
  77. <Column size="0"/>
  78. <Column size="0"/>
  79. <Column size="0"/>
  80. <Column size="0"/>
  81. <Column size="0"/>
  82. <Column size="0"/>
  83. <Column size="0"/>
  84. <Column size="0"/>
  85. <Column size="0"/>
  86. <Column size="0"/>
  87. <Column size="0"/>
  88. <Column size="0"/>
  89. <Column size="0"/>
  90. <Column size="0"/>
  91. <Column size="0"/>
  92. <Column size="0"/>
  93. <Column size="0"/>
  94. <Column size="0"/>
  95. <Column size="0"/>
  96. <Column size="0"/>
  97. <Column size="0"/>
  98. </Columns>
  99. <Rows>
  100. <Row size="24" band="head"/>
  101. <Row size="24"/>
  102. </Rows>
  103. <Band id="head">
  104. <Cell text="등록번호"/>
  105. <Cell col="1" text="기관코드"/>
  106. <Cell col="2" text="환자성명"/>
  107. <Cell col="3" text="영문이름"/>
  108. <Cell col="4" text="한문이름"/>
  109. <Cell col="5" colspan="2" text="주민등록번호" taborder="undefined"/>
  110. <Cell col="7" text="집전화번호"/>
  111. <Cell col="8" text="휴대전화번호"/>
  112. <Cell col="9" text="최근내원일"/>
  113. <Cell col="10" text="최근내원과"/>
  114. <Cell col="11" text="외래미수금"/>
  115. <Cell col="12" text="퇴원미수금"/>
  116. <Cell col="13" text="생년월일"/>
  117. <Cell col="14" text="성별"/>
  118. <Cell col="15" text="나이"/>
  119. <Cell col="16" text="합본등록번호"/>
  120. <Cell col="17" text="기타전화번호1"/>
  121. <Cell col="18" text="기타전화번호2"/>
  122. <Cell col="19" text="sms전송승인 여부"/>
  123. <Cell col="20" text="이메일 계정"/>
  124. <Cell col="21" text="우편번호"/>
  125. <Cell col="22" text="우편번호"/>
  126. <Cell col="23" text="우편번호순서"/>
  127. <Cell col="24" text="주소"/>
  128. <Cell col="25" text="상세주소"/>
  129. <Cell col="26" text="혈액형"/>
  130. <Cell col="27" text="RH혈액형"/>
  131. <Cell col="28" text="외국인여부"/>
  132. <Cell col="29" text="국적"/>
  133. <Cell col="30" text="여권번호"/>
  134. <Cell col="31" text="추천여부"/>
  135. <Cell col="32" text="추천인ID"/>
  136. <Cell col="33" text="추천인명"/>
  137. <Cell col="34" text="추천인관계"/>
  138. <Cell col="35" text="VIP여부"/>
  139. <Cell col="36" text="VIP비고"/>
  140. <Cell col="37" text="종교코드"/>
  141. <Cell col="38" text="세례명"/>
  142. <Cell col="39" text="성당명"/>
  143. <Cell col="40" text="사망여부"/>
  144. <Cell col="41" text="사망시각"/>
  145. <Cell col="42" text="사망일자"/>
  146. <Cell col="43" text="사망시간"/>
  147. <Cell col="44" text="내원사유"/>
  148. <Cell col="45" text="동물여부"/>
  149. <Cell col="46" text="원외예외사유코드"/>
  150. <Cell col="47" text="재원여부"/>
  151. <Cell col="48" text="장애인여부"/>
  152. <Cell col="49" text="특이/문제환자"/>
  153. <Cell col="50" text="당일퇴원여부"/>
  154. <Cell col="51" text="참고사항"/>
  155. <Cell col="52" text="최초등록자ID"/>
  156. <Cell col="53" text="최초등록일시"/>
  157. <Cell col="54" text="최종수정자ID"/>
  158. <Cell col="55" text="최종수정일시"/>
  159. </Band>
  160. <Band id="body">
  161. <Cell text="bind:pid"/>
  162. <Cell col="1" text="bind:instcd"/>
  163. <Cell col="2" text="bind:hngnm"/>
  164. <Cell col="3" text="bind:engnm"/>
  165. <Cell col="4" text="bind:chinm"/>
  166. <Cell col="5" text="bind:rrgstno1"/>
  167. <Cell col="6" text="bind:rrgstno2"/>
  168. <Cell col="7" style="align:left;padding:0 0 0 2;" text="bind:hometel"/>
  169. <Cell col="8" style="align:left;padding:0 0 0 2;" text="bind:mpphontel"/>
  170. <Cell col="9" displaytype="date" text="bind:lastorddd"/>
  171. <Cell col="10" displaytype="combo" edittype="combo" style="align:left;padding:0 0 0 2;" text="bind:lastorddeptcd" combodataset="ds_init_orddeptcd_orddeptcdlist" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  172. <Cell col="11" text="bind:outuncoamt"/>
  173. <Cell col="12" text="bind:dschuncoamt"/>
  174. <Cell col="13" text="bind:brthdd" mask="yyyy-mm-dd"/>
  175. <Cell col="14" text="bind:sex"/>
  176. <Cell col="15" text="bind:age"/>
  177. <Cell col="16" text="bind:bindpid"/>
  178. <Cell col="17" text="bind:etctel1"/>
  179. <Cell col="18" text="bind:etctel2"/>
  180. <Cell col="19" text="bind:smsaprvyn"/>
  181. <Cell col="20" text="bind:email"/>
  182. <Cell col="21" text="bind:zipcd1"/>
  183. <Cell col="22" text="bind:zipcd2"/>
  184. <Cell col="23" text="bind:zipcdseq"/>
  185. <Cell col="24" style="align:left;padding:0 0 0 2;" text="bind:addr"/>
  186. <Cell col="25" style="align:left;padding:0 0 0 2;" text="bind:detladdr"/>
  187. <Cell col="26" text="bind:btype"/>
  188. <Cell col="27" text="bind:rh"/>
  189. <Cell col="28" text="bind:forgeryn"/>
  190. <Cell col="29" text="bind:nati"/>
  191. <Cell col="30" text="bind:psptno"/>
  192. <Cell col="31" text="bind:recmyn"/>
  193. <Cell col="32" text="bind:recmerid"/>
  194. <Cell col="33" text="bind:recmernm"/>
  195. <Cell col="34" text="bind:recmerrela"/>
  196. <Cell col="35" text="bind:vipyn"/>
  197. <Cell col="36" text="bind:viprem"/>
  198. <Cell col="37" text="bind:religncd"/>
  199. <Cell col="38" text="bind:baptnm"/>
  200. <Cell col="39" text="bind:chchnm"/>
  201. <Cell col="40" text="bind:dethyn"/>
  202. <Cell col="41" text="bind:dethdt"/>
  203. <Cell col="42" text="bind:dethdd"/>
  204. <Cell col="43" text="bind:dethtm"/>
  205. <Cell col="44" text="bind:chosresn"/>
  206. <Cell col="45" text="bind:animyn"/>
  207. <Cell col="46" text="bind:exptresncd"/>
  208. <Cell col="47" text="bind:inhospyn"/>
  209. <Cell col="48" text="bind:handicapryn"/>
  210. <Cell col="49" text="bind:patspcfyn"/>
  211. <Cell col="50" text="bind:tdaydsch"/>
  212. <Cell col="51" text="bind:remfact"/>
  213. <Cell col="52" text="bind:acptdd"/>
  214. <Cell col="53" text="bind:acptno"/>
  215. <Cell col="54" text="bind:lastupdtrid"/>
  216. <Cell col="55" text="bind:lastupdtdt"/>
  217. </Band>
  218. </Format>
  219. </Formats>
  220. </Grid>
  221. </Layout>
  222. </Layouts>
  223. <Objects>
  224. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  225. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  226. <ColumnInfo>
  227. <Column id="srchcond" type="STRING" size="256"/>
  228. <Column id="pid" type="STRING" size="256"/>
  229. <Column id="hngnm" type="STRING" size="256"/>
  230. <Column id="rrgstno1" type="STRING" size="256"/>
  231. <Column id="rrgstno2" type="STRING" size="256"/>
  232. <Column id="acptdd" type="STRING" size="256"/>
  233. </ColumnInfo>
  234. <Rows>
  235. <Row>
  236. <Col id="srchcond"/>
  237. <Col id="pid"/>
  238. <Col id="hngnm"/>
  239. <Col id="rrgstno1"/>
  240. <Col id="rrgstno2"/>
  241. <Col id="acptdd"/>
  242. </Row>
  243. </Rows>
  244. </Dataset>
  245. <Dataset id="ds_send_data_cmb_info_initexcuroomgrp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  246. <ColumnInfo>
  247. <Column id="excuroomgrpcdid" type="STRING" size="256"/>
  248. </ColumnInfo>
  249. <Rows>
  250. <Row/>
  251. </Rows>
  252. </Dataset>
  253. <Dataset id="ds_init_P0350" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  254. <ColumnInfo>
  255. <Column id="cdnm" type="STRING" size="256"/>
  256. <Column id="cdid" type="STRING" size="256"/>
  257. </ColumnInfo>
  258. <Rows>
  259. <Row/>
  260. </Rows>
  261. </Dataset>
  262. <Dataset id="ds_init_orddeptcd_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  263. <ColumnInfo>
  264. <Column id="cdnm" type="STRING" size="256"/>
  265. <Column id="cdid" type="STRING" size="256"/>
  266. </ColumnInfo>
  267. <Rows>
  268. <Row/>
  269. </Rows>
  270. </Dataset>
  271. <Dataset id="ds_init_orddrid_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  272. <ColumnInfo>
  273. <Column id="cd" type="STRING" size="256"/>
  274. <Column id="nm" type="STRING" size="256"/>
  275. <Column id="dp" type="STRING" size="256"/>
  276. <Column id="sp" type="STRING" size="256"/>
  277. </ColumnInfo>
  278. <Rows>
  279. <Row>
  280. <Col id="cd"/>
  281. <Col id="nm"/>
  282. <Col id="dp"/>
  283. <Col id="sp"/>
  284. </Row>
  285. </Rows>
  286. </Dataset>
  287. <Dataset id="ds_init_cmb_info_initexcuroomgrp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  288. <ColumnInfo>
  289. <Column id="excuroomgrpcdid" type="STRING" size="256"/>
  290. <Column id="excuroomgrpcdnm" type="STRING" size="256"/>
  291. </ColumnInfo>
  292. <Rows>
  293. <Row/>
  294. </Rows>
  295. </Dataset>
  296. <Dataset id="ds_hidden_uid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  297. <ColumnInfo>
  298. <Column id="myself" type="STRING" size="256"/>
  299. <Column id="opener" type="STRING" size="256"/>
  300. </ColumnInfo>
  301. <Rows>
  302. <Row/>
  303. </Rows>
  304. </Dataset>
  305. <Dataset id="ds_hidden_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  306. <Dataset id="ds_hidden_barprntinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  307. <ColumnInfo>
  308. <Column id="comport" type="STRING" size="256"/>
  309. <Column id="setting" type="STRING" size="256"/>
  310. <Column id="ip" type="STRING" size="256"/>
  311. <Column id="patdonor" type="STRING" size="256"/>
  312. </ColumnInfo>
  313. <Rows>
  314. <Row>
  315. <Col id="comport">2</Col>
  316. <Col id="setting">9600,n,8,1</Col>
  317. <Col id="ip"/>
  318. <Col id="patdonor">1</Col>
  319. </Row>
  320. </Rows>
  321. </Dataset>
  322. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  323. <ColumnInfo>
  324. <Column id="Message" type="STRING" size="256"/>
  325. </ColumnInfo>
  326. <Rows>
  327. <Row/>
  328. </Rows>
  329. </Dataset>
  330. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  331. <ColumnInfo>
  332. <Column id="comportctl" type="STRING" size="256"/>
  333. <Column id="outputcnt" type="STRING" size="256"/>
  334. <Column id="outputcntval" type="STRING" size="256"/>
  335. </ColumnInfo>
  336. <Rows>
  337. <Row>
  338. <Col id="comportctl">출력포트입력 :</Col>
  339. <Col id="outputcnt">출력매수입력 :</Col>
  340. <Col id="outputcntval">1</Col>
  341. </Row>
  342. </Rows>
  343. </Dataset>
  344. <Dataset id="ds_barcdprntsetup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  345. <Dataset id="ds_data_comm01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  346. <Dataset id="ds_data_comm02" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  347. <Dataset id="ds_data_comm03" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  348. <Dataset id="ds_data_setupinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  349. <Dataset id="ds_data_blank" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  350. </Objects>
  351. <Bind>
  352. <BindItem id="item0" compid="group2.cmb_cond" propid="value" datasetid="ds_send" columnid="srchcond"/>
  353. <BindItem id="item1" compid="group2.ipt_hngnm" propid="value" datasetid="ds_send" columnid="hngnm"/>
  354. <BindItem id="item2" compid="group2.ipt_rrgstno1" propid="value" datasetid="ds_send" columnid="rrgstno1"/>
  355. <BindItem id="item3" compid="group2.ipt_rrgstno2" propid="value" datasetid="ds_send" columnid="rrgstno2"/>
  356. <BindItem id="item4" compid="group2.ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
  357. <BindItem id="item5" compid="group2.ipt_acptdd" propid="value" datasetid="ds_send" columnid="acptdd"/>
  358. <BindItem id="item6" compid="group1.output1" propid="value" datasetid="ds_init" columnid="comportctl"/>
  359. <BindItem id="item7" compid="group1.input1" propid="value" datasetid="ds_hidden_barprntinfo" columnid="comport"/>
  360. <BindItem id="item8" compid="group1.output2" propid="value" datasetid="ds_init" columnid="outputcnt"/>
  361. <BindItem id="item9" compid="group1.input2" propid="value" datasetid="ds_init" columnid="outputcntval"/>
  362. <BindItem id="item10" compid="group1.combo1" propid="value" datasetid="ds_send_data_cmb_info_initexcuroomgrp" columnid="excuroomgrpcdid"/>
  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. //=======================================================================================
  378. // Lib Include
  379. //---------------------------------------------------------------------------------------
  380. include "com_commonxp::comm_main.xjs"
  381. include "ast_examcurexp::AEZ0001.xjs"
  382. include "pam_pamcomnxp::PAM.xjs"
  383. //include "lis_commonxp::LZZ001.xjs"
  384. include "lis_commonxp::LLZ001.xjs"
  385. include "com_commodulexp::SSZFM00901.xjs"
  386. //=======================================================================================
  387. // Global Form Variable
  388. //---------------------------------------------------------------------------------------
  389. var arErrorCode = new HashArray();
  390. var gSuppdeptcd = "";
  391. //=======================================================================================
  392. // Function
  393. //---------------------------------------------------------------------------------------
  394. /****************************************************************************************
  395. * Argument : N/A
  396. * Description : 창 생성시 부모창으로 부터 받은 입력값의 유효범위 체크
  397. ****************************************************************************************/
  398. function fInputValueCheckXformsReady(){
  399. var cond = ds_send.getColumn(0,"srchcond");
  400. switch(cond){
  401. case '1':
  402. //환자등록번호 체크
  403. if(group2.ipt_pid.text.length >= 1 ){
  404. return (true);
  405. }else{
  406. sysf_messageBox("환자등록번호를 정확히", "C001");
  407. return (false);
  408. }
  409. break;
  410. case '2':
  411. //환자이름 체크
  412. if(group2.ipt_hngnm.text.length >= 2 ){
  413. ds_send.setColumn(0,"hngnm", group2.ipt_hngnm.text);
  414. return (true);
  415. }else{
  416. sysf_messageBox("환자이름을 2자리 이상", "C001");
  417. return (false);
  418. }
  419. break;
  420. case '3':
  421. //환자 주민번호 체크
  422. if( group2.ipt_rrgstno1.text.length >= 1 || group2.ipt_rrgstno2.text.length >= 1 ){
  423. ds_send.setColumn(0,"rrgstno1", group2.ipt_rrgstno1.text);
  424. ds_send.setColumn(0,"rrgstno2", group2.ipt_rrgstno2.text);
  425. return (true);
  426. }else{
  427. sysf_messageBox("환자 주민번호를", "C001");
  428. return (false);
  429. }
  430. break;
  431. case '4':
  432. //환자이름 유효성 체크.
  433. if(group2.ipt_hngnm.text.length >= 2 ){
  434. ds_send.setColumn(0,"hngnm", group2.ipt_hngnm.text);
  435. }else{
  436. sysf_messageBox("환자이름을 2자리 이상", "C001");
  437. return (false);
  438. }
  439. //환자 주민번호 체크
  440. if( group2.ipt_rrgstno1.text.length >= 1 || group2.ipt_rrgstno2.text.length >= 1){
  441. ds_send.setColumn(0,"rrgstno1", group2.ipt_rrgstno1.text);
  442. ds_send.setColumn(0,"rrgstno2", group2.ipt_rrgstno2.text);
  443. }else{
  444. sysf_messageBox("환자 주민번호를", "C001");
  445. return (false);
  446. }
  447. return( true );
  448. break;
  449. case '5':
  450. //예약일자 유효성 체크 --
  451. if( utlf_isValidDateTime( ds_send.getColumn(0,"acptdd"), "YYYYMMDD") ){
  452. ds_send.setColumn(0,"acptdd", model.getValue("/root/send/acptdd"));
  453. return (true);
  454. }else{
  455. sysf_messageBox("예약일자를 정확히", "C001");
  456. return (false);
  457. }
  458. break;
  459. default :
  460. group2.cmb_cond.setFocus();
  461. return( false );
  462. break;
  463. }
  464. }
  465. /****************************************************************************************
  466. * Argument : N/A
  467. * Description : 입력값의 유효범위 체크
  468. ****************************************************************************************/
  469. function fInputValueCheck(){
  470. var cond = ds_send.getColumn(0,"srchcond");
  471. switch(cond){
  472. case '1':
  473. //환자등록번호 체크
  474. if(group2.ipt_pid.text.length >= 1 ){
  475. ds_send.setColumn(0,"pid", group2.ipt_pid.text);
  476. return (true);
  477. }else{
  478. sysf_messageBox("환자등록번호를 정확히", "C001");
  479. return (false);
  480. }
  481. break;
  482. case '2':
  483. //환자이름 체크
  484. if(group2.ipt_hngnm.text.length >= 2 ){
  485. ds_send.setColumn(0,"hngnm", group2.ipt_hngnm.text);
  486. return (true);
  487. }else{
  488. sysf_messageBox("환자이름을 2자리 이상", "C001");
  489. return (false);
  490. }
  491. break;
  492. case '3':
  493. //환자 주민번호 체크
  494. if( group2.ipt_rrgstno1.text.length >= 1 || group2.ipt_rrgstno2.text.length >= 1 ){
  495. ds_send.setColumn(0,"rrgstno1", group2.ipt_rrgstno1.text);
  496. ds_send.setColumn(0,"rrgstno2", group2.ipt_rrgstno2.text);
  497. return (true);
  498. }else{
  499. sysf_messageBox("환자 주민번호를", "C001");
  500. return (false);
  501. }
  502. break;
  503. case '4':
  504. //환자이름 유효성 체크.
  505. if(group2.ipt_hngnm.text.length>= 2 ){
  506. ds_send.setColumn(0,"hngnm", group2.ipt_hngnm.text);
  507. }else{
  508. sysf_messageBox("환자이름을 2자리 이상", "C001");
  509. return (false);
  510. }
  511. //환자 주민번호 체크
  512. if( group2.ipt_rrgstno1.text.length >= 1 || group2.ipt_rrgstno2.text.length >= 1){
  513. ds_send.setColumn(0,"rrgstno1", group2.ipt_rrgstno1.text);
  514. ds_send.setColumn(0,"rrgstno2", group2.ipt_rrgstno2.text);
  515. }else{
  516. sysf_messageBox("환자 주민번호를", "C001");
  517. return (false);
  518. }
  519. return( true );
  520. break;
  521. case '5':
  522. //예약일자 유효성 체크 --
  523. if( utlf_isValidDateTime( ds_send.getColumn(0,"acptdd"), "YYYYMMDD") ){
  524. return (true);
  525. }else{
  526. sysf_messageBox("예약일자를 정확히", "C001");
  527. return (false);
  528. }
  529. break;
  530. default :
  531. sysf_messageBox("검색조건이 정확히 선택되지 않았습니다. 확인 후 다시 시도해 주십시요.", "E999", "");
  532. group2.cmb_cond.setFocus();
  533. return( false );
  534. break;
  535. }
  536. }
  537. /****************************************************************************************
  538. * Argument : N/A
  539. * Description : 조회 조건에 맞는 input 컨트롤을 세팅해 준다.
  540. ****************************************************************************************/
  541. function fChangeSearchCondition(cond){
  542. switch(cond){
  543. case '1':
  544. ds_send.setColumn(0,"pid");
  545. group2.ipt_pid.visible = true;
  546. group2.ipt_pid.position.left = 224;
  547. group2.ipt_pid.position.top = 10;
  548. group2.ipt_hngnm.visible = false;
  549. group2.ipt_rrgstno1.visible = false;
  550. group2.ipt_rrgstno2.visible = false;
  551. group2.ipt_acptdd.visible = false;
  552. group2.ipt_pid.setFocus();
  553. break;
  554. case '2':
  555. ds_send.setColumn(0,"hngnm");
  556. group2.ipt_hngnm.visible = true;
  557. group2.ipt_hngnm.position.left = 224;
  558. group2.ipt_hngnm.position.top = 10;
  559. group2.ipt_pid.visible = false;
  560. group2.ipt_rrgstno1.visible = false;
  561. group2.ipt_rrgstno2.visible = false;
  562. group2.ipt_acptdd.visible = false;
  563. group2.ipt_hngnm.setFocus();
  564. break;
  565. case '3':
  566. ds_send.setColumn(0,"rrgstno1");
  567. ds_send.setColumn(0,"rrgstno2");
  568. group2.ipt_rrgstno1.visible = true;
  569. group2.ipt_rrgstno2.visible = true;
  570. group2.ipt_rrgstno1.position.left = 224;
  571. group2.ipt_rrgstno1.position.top = 10;
  572. group2.ipt_rrgstno2.position.left = 312;
  573. group2.ipt_rrgstno2.position.top = 10;
  574. group2.ipt_hngnm.visible = false;
  575. group2.ipt_pid.visible = false;
  576. group2.ipt_acptdd.visible = false;
  577. group2.ipt_rrgstno1.setFocus();
  578. break;
  579. case '4':
  580. ds_send.setColumn(0,"hngnm");
  581. ds_send.setColumn(0,"rrgstno1");
  582. ds_send.setColumn(0,"rrgstno2");
  583. group2.ipt_hngnm.visible = true;
  584. group2.ipt_rrgstno1.position.left = 224;
  585. group2.ipt_rrgstno1.position.top = 10;
  586. group2.ipt_rrgstno1.visible = true;
  587. group2.ipt_rrgstno2.visible = true;
  588. group2.ipt_rrgstno1.position.left = 357;
  589. group2.ipt_rrgstno1.position.top = 10;
  590. group2.ipt_rrgstno2.position.left = 445;
  591. group2.ipt_rrgstno2.position.top = 10;
  592. group2.ipt_pid.visible = false;
  593. group2.ipt_acptdd.visible = false;
  594. group2.ipt_hngnm.setFocus();
  595. break;
  596. case '5':
  597. ds_send.setColumn(0,"acptdd");
  598. group2.ipt_acptdd.visible = true;
  599. group2.ipt_acptdd.position.left = 224;
  600. group2.ipt_acptdd.position.top = 10;
  601. group2.ipt_pid.visible = false;
  602. group2.ipt_hngnm.visible = false;
  603. group2.ipt_rrgstno1.visible = false;
  604. group2.ipt_rrgstno2.visible = false;
  605. group2.ipt_acptdd.setFocus();
  606. break;
  607. default :
  608. break;
  609. }
  610. }
  611. /****************************************************************************************
  612. * Argument : N/A
  613. * Description : 라벨출력
  614. ****************************************************************************************/
  615. function fLabelPrint() {
  616. var sSndMsg = "";
  617. var sBcNo = "";
  618. var iprintcnt = 0;
  619. if ( utlf_isNull(ds_send_data_cmb_info_initexcuroomgrp.getColumn(0,"excuroomgrpcdid")) ) {
  620. sysf_messageBox("검사실그룹이 선택되지 ", "E007");
  621. return;
  622. }
  623. var pid = ds_patinfolist.getColumn(ds_patinfolist.rowposition,"pid");
  624. var patnm = ds_patinfolist.getColumn(ds_patinfolist.rowposition,"hngnm");
  625. var gbn = ds_patinfolist.getColumn(ds_patinfolist.rowposition,"rrgstno2").substring(0, 1);
  626. var rrgstno1 = ds_patinfolist.getColumn(ds_patinfolist.rowposition,"rrgstno1");
  627. var rrgstno2 = ds_patinfolist.getColumn(ds_patinfolist.rowposition,"rrgstno2");
  628. var barpid = pid;
  629. var excugrp = ds_send_data_cmb_info_initexcuroomgrp.getColumn(0,"excuroomgrpcdid");
  630. var currentdate = utlf_getCurrentDate();
  631. if ( gbn == "1" ) { // 12개월 미만의 나이는 계산못함. 향후 체크해야 함. 장준원
  632. var sex = "M";
  633. var age = lf_aezfgetFullAge(rrgstno1+rrgstno2);
  634. } else {
  635. var sex = "F";
  636. var age = lf_aezfgetFullAge(rrgstno1+rrgstno2);
  637. }
  638. if ( utlf_isNull(pid) ) {
  639. sysf_messageBox("처방목록이 선택되지 ", "E007");
  640. return;
  641. }
  642. sSndMsg = "";
  643. //시작(X, Y)
  644. sSndMsg += lzzfBP_StartFormat(0, 0);
  645. sSndMsg += "^BY2,2.5^FO" + "200" + "," + "30"; // 바코드 Width 조절
  646. sSndMsg += "^BCN,70,N,N,N^FD" + "*"+barpid+excugrp+"*" + "^FS";
  647. // 등록번호 + 그룹코드
  648. sSndMsg += lzzfBP_ChangeFont("C", 7, 7); // 폰트 설정
  649. sSndMsg += lzzfBP_FieldDataA(265, 105, "*"+pid+' '+excugrp+"*" );
  650. // 등록번호 --
  651. sSndMsg += lzzfBP_ChangeFont("C", 45, 15); // 폰트 설정
  652. sSndMsg += lzzfBP_FieldDataA(85, 150, pid );
  653. //환자명 --
  654. sSndMsg += lzzfBP_ChangeFont("C", 45, 15); // 폰트 설정
  655. sSndMsg += CommAX.PrtImgOut(100, 210, patnm, 2, 2); //가로시작위치, 세로시작위치, 출력할문자열, 1,1 (비율)
  656. sSndMsg += CommAX.HanImageData();
  657. // 성별
  658. sSndMsg += lzzfBP_ChangeFont("C", 45, 15); // 폰트 설정
  659. sSndMsg += lzzfBP_FieldDataA(400, 210, sex );
  660. // 나이
  661. sSndMsg += lzzfBP_ChangeFont("C", 45, 15); // 폰트 설정
  662. sSndMsg += lzzfBP_FieldDataA(550, 210, age );
  663. // 그룹코드
  664. sSndMsg += lzzfBP_ChangeFont("C", 45, 15); // 폰트 설정
  665. sSndMsg += lzzfBP_FieldDataA(550, 150, excugrp );
  666. // 주민번호
  667. sSndMsg += lzzfBP_ChangeFont("C", 35, 15); // 폰트 설정
  668. sSndMsg += lzzfBP_FieldDataA(400, 270, rrgstno1+"-"+gbn );
  669. // 초음파실
  670. //sSndMsg += fCarePrintOutH(480, 5, 2, "N", "초음파실" , "");
  671. // 처방명
  672. //sSndMsg += fCarePrintOutH(5, 180, 1, "Y", prcpnm , "");
  673. //sSndMsg += lzzfBP_ChangeFont("C", 40, 15);
  674. //sSndMsg += lzzfBP_FieldDataA(5, 180, prcpnm);
  675. //종료(매수)
  676. sSndMsg += lzzfBP_EndFormat();
  677. CommAX.SendMessage(sSndMsg);
  678. ds_hidden.setColumn(0,"Message", CommAX.Message);
  679. }
  680. //=======================================================================================
  681. // Event
  682. //---------------------------------------------------------------------------------------
  683. /****************************************************************************************
  684. * Components : Form
  685. * Components ID : SPAER00201
  686. * Event : oninit
  687. * Argument : 01.obj : Object Event has occurred
  688. * : 02.e : Event Object
  689. * Description : 화면 처음 초기화시 폼초기화
  690. ****************************************************************************************/
  691. function SPAER00201_oninit(obj:Form, e:InitEventInfo)
  692. {
  693. frmf_initForm(obj); // 폼 초기화
  694. }
  695. /****************************************************************************************
  696. * Components : Form
  697. * Components ID : SPAER00201
  698. * Event : onload
  699. * Argument : 01.obj : Object Event has occurred
  700. * : 02.e : Event Object
  701. * Description : 화면 처음 초기화시 폼초기화
  702. ****************************************************************************************/
  703. function SPAER00201_onload(obj:Form, e:LoadEventInfo)
  704. {
  705. lf_aezfSetSuppDeptcd(); //AEZ0001.xjs
  706. gSuppdeptcd = frmf_getParameter("AST_DEPTCD");
  707. var arrParam = [{dsNm: "ds_init_P0350", cdGrpId: "P0350"}
  708. ]
  709. appf_getCodeList(arrParam);
  710. //진료과코드 진료의사ID 조회
  711. pamGetDeptCDDrIDList(); //PAM.xjs
  712. dsf_createDsRow("ds_reqparam", [{col:"basesuppdeptcd", val:gSuppdeptcd}
  713. ,{col:"rbasecdflag" , val:"R"}
  714. ,{col:"ebasecdflag" , val:"E"}
  715. ,{col:"initflag" , val:"1"}
  716. ]);
  717. var oParam = {};
  718. oParam.id = "TRAEA01301";
  719. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  720. oParam.method = "reqGetInitExamCureRoomGrpCodeList";
  721. oParam.inds = "reqparam=ds_reqparam";
  722. oParam.outds = "ds_init_cmb_info_initexcuroomgrp=initexcuroomgrp"
  723. oParam.async = false;
  724. oParam.callback = "cf_TRAEA01301";
  725. tranf_submit(oParam);
  726. //바코드 출력
  727. dsf_createDsRow("ds_req", [
  728. {col:"scrnid", type:"STRING", size:256, val:frmf_getScreenID()}
  729. ]);
  730. var oParam = {}; // 20090617 SATO 관련 추가
  731. oParam.id = "TRLLC90101";
  732. oParam.service = "diagtestapplib.LisCommon";
  733. oParam.method = "reqGetSetUpInfo";
  734. oParam.inds = "scrnid=ds_req";
  735. oParam.outds = "ds_barcdprntsetup=getSetUpInfo";
  736. oParam.async = false;
  737. //oParam.callback = "cf_TRLLC90101";
  738. tranf_submit(oParam);
  739. // 라벨출력 초기화
  740. lzzfMakeBrcdPrntObjHanDo("CommAX");
  741. ds_send.setColumn(0,"srchcond" , "1");
  742. frmf_inputEnterKey("group2.cmb_cond", "onitemchanged", new ItemChangeEventInfo);
  743. ds_init_P0350.filter("cdid!='5'"); // 원무기준 예약일자 는 제외
  744. group1.combo1.index = 0;
  745. }
  746. function cf_TRAEA01301(sSvcId, nErrorCode, sErrorMsg) {
  747. if(nErrorCode < 0) return;
  748. ds_init_cmb_info_initexcuroomgrp.updateColID("basecdcnts" ,"excuroomgrpcdid");
  749. ds_init_cmb_info_initexcuroomgrp.updateColID("basecdcnts2" ,"excuroomgrpcdnm");
  750. }
  751. /****************************************************************************************
  752. * Components : Combo
  753. * Components ID : group2.cmb_cond
  754. * Event : onitemchanged
  755. * Argument : 01.obj : Object Event has occurred
  756. * : 02.e : Event Object
  757. * Description : 검색조건 변경
  758. ****************************************************************************************/
  759. function group2_cmb_cond_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  760. {
  761. var cond = ds_send.getColumn(0,"srchcond");
  762. fChangeSearchCondition(cond);
  763. }
  764. /****************************************************************************************
  765. * Components : Button
  766. * Components ID : group2.btn_search
  767. * Event : onclick
  768. * Argument : 01.obj : Object Event has occurred
  769. * : 02.e : Event Object
  770. * Description : 조회
  771. ****************************************************************************************/
  772. function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
  773. {
  774. if( fInputValueCheck() ){
  775. var oParam = {};
  776. oParam.id = "TRPMC02500";
  777. oParam.service = "patinfomngtapp.PatBaseInfo";
  778. oParam.method = "reqGetPatInfo";
  779. oParam.inds = "req=ds_send";
  780. oParam.outds = "ds_patinfolist=patinfolist";
  781. oParam.async = false;
  782. oParam.callback = "cf_TRPMC02500";
  783. tranf_submit(oParam);
  784. if(arErrorCode.pop("TRPMC02500") >= 0){
  785. if( ds_patinfolist.rowcount > 0 ){
  786. grd_patinfo.setFocus();
  787. }else{
  788. fChangeSearchCondition( ds_send.getColumn(0,"srchcond") );
  789. }
  790. }
  791. }
  792. }
  793. function cf_TRPMC02500(sSvcId, nErrorCode, sErrorMsg) {
  794. arErrorCode.push(sSvcId, nErrorCode);
  795. }
  796. /****************************************************************************************
  797. * Components : Edit
  798. * Components ID : group2.input
  799. * Event : onkeydown
  800. * Argument : 01.obj : Object Event has occurred
  801. * : 02.e : Event Object
  802. * Description : 조회조건 입력후 엔터로 조회
  803. ****************************************************************************************/
  804. function common_onkeydown(obj:Edit, e:KeyEventInfo)
  805. {
  806. if(e.keycode == 13) {
  807. obj.updateToDataset();
  808. frmf_inputEnterKey("group2.btn_search", "onclick", new ClickEventInfo);
  809. }
  810. }
  811. /****************************************************************************************
  812. * Components : Calendar
  813. * Components ID : group2.ipt_acptdd
  814. * Event : onchanged
  815. * Argument : 01.obj : Object Event has occurred
  816. * : 02.e : Event Object
  817. * Description : 날자 변경하여 조회
  818. ****************************************************************************************/
  819. function group2_ipt_acptdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  820. {
  821. obj.updateToDataset();
  822. frmf_inputEnterKey("group2.btn_search", "onclick", new ClickEventInfo);
  823. }
  824. /****************************************************************************************
  825. * Components : Grid
  826. * Components ID : grd_patinfo
  827. * Event : oncelldblclick
  828. * Argument : 01.obj : Object Event has occurred
  829. * : 02.e : Event Object
  830. * Description : 리스트 선택하여 출력
  831. ****************************************************************************************/
  832. function grd_patinfo_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  833. {
  834. frmf_inputEnterKey("group1.btn_confirm", "onclick", new ClickEventInfo);
  835. }
  836. /****************************************************************************************
  837. * Components : Button
  838. * Components ID : group1.btn_confirm
  839. * Event : onclick
  840. * Argument : 01.obj : Object Event has occurred
  841. * : 02.e : Event Object
  842. * Description : 출력
  843. ****************************************************************************************/
  844. function group1_btn_confirm_onclick(obj:Button, e:ClickEventInfo)
  845. {
  846. var cnt = ds_init.getColumn(0,"outputcntval");
  847. if ( cnt < 1 ) {
  848. sysf_messageBox("출력매수가 정확하지 않습니다.","I999");
  849. return;
  850. }
  851. var portOpenTF = ""; //오픈 성공 여부
  852. CommAX.CommPort = ds_hidden_barprntinfo.getColumn(0,"comport"); // 출력 Port
  853. CommAX.Settings = ds_hidden_barprntinfo.getColumn(0,"setting"); // Comm 설정
  854. portOpenTF = CommAX.PortOpen("true");
  855. if(portOpenTF == "TRUE"){
  856. for (var i = 1; i <= cnt; i++) {
  857. fLabelPrint();
  858. }
  859. CommAX.PortOpen("false");
  860. } else {
  861. sysf_messageBox( "아래 사항을 확인후 재출력해주십시오."
  862. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  863. + " \n 2.케이블 확인"
  864. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  865. return;
  866. }
  867. }
  868. function group1_btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  869. {
  870. this.close();
  871. }
  872. ]]></Script>
  873. </Form>
  874. </FDL>