SMLLC00100_외래채혈관리.xfdl 75 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLLC00100" position="absolute 0 0 1203 805" titletext="외래채혈관리" onload="SMLLC00100_onload" scrollbars="none" ontimer="SMLLC00100_ontimer">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 0 1194 25" id="group1">
  8. <Layouts>
  9. <Layout>
  10. <Static text="외래채혈" position="absolute 0 0 98 25" id="caption6" class="tit_1"/>
  11. <CheckBox id="lis_m" taborder="1" text="핵의학바코드테스트용" position="absolute 133 4 271 24" falsevalue="0" truevalue="1" visible="false"/>
  12. </Layout>
  13. </Layouts>
  14. </Div>
  15. <Div position="absolute 0 40 1204 802" id="group3" scrollbars="none">
  16. <Layouts>
  17. <Layout>
  18. <Div position="absolute 324 17 1200 751" id="import1" enable="true" visible="true" url="SSLLC80100_채혈검사처방상세.xfdl" scrollbars="none" anchor="default" asyncmode="false"/>
  19. <Static text="채혈정보" position="absolute 0 228 72 245" align="align:center middle;" id="caption3" class="tit_2" anchor="default"/>
  20. <Shape position="absolute -1 245 320 251" linetype="horizontal" id="line1" class="line_10" anchor="default"/>
  21. <Div position="absolute 1 19 315 104" id="group2" anchor="default" class="div_SA2">
  22. <Layouts>
  23. <Layout>
  24. <Static text="등록번호 :" position="absolute 15 32 89 49" align="align:center middle;" id="caption4" class="search_name" anchor="default"/>
  25. <Combo position="absolute 105 8 305 27" id="combo3" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group3_group2_combo3_onitemchanged">
  26. <Dataset id="innerdataset">
  27. <ColumnInfo>
  28. <Column id="codecolumn"/>
  29. <Column id="datacolumn"/>
  30. </ColumnInfo>
  31. <Rows>
  32. <Row>
  33. <Col id="codecolumn">0</Col>
  34. <Col id="datacolumn">전체조회</Col>
  35. </Row>
  36. <Row>
  37. <Col id="codecolumn">1</Col>
  38. <Col id="datacolumn">미채혈</Col>
  39. </Row>
  40. <Row>
  41. <Col id="codecolumn">2</Col>
  42. <Col id="datacolumn">채혈</Col>
  43. </Row>
  44. </Rows>
  45. </Dataset>
  46. </Combo>
  47. <Static text="채혈구분 :" position="absolute 15 9 93 26" align="align:center middle;" id="caption5" class="search_name" anchor="default"/>
  48. <Edit position="absolute 105 32 200 51" id="iptSearch" class="input_s_button" taborder="1" onkeydown="group3_group2_iptSearch_onkeydown" anchor="default" autoselect="true" oneditclick="group3_group2_iptSearch_oneditclick"/>
  49. <Edit readonly="true" position="absolute 201 32 286 51" id="ipt_hngnm" anchor="default"/>
  50. <Static text="도착시간등록 :" position="absolute 15 58 116 75" align="align:center middle;" id="caption2" class="search_name" anchor="default"/>
  51. <MaskEdit position="absolute 130 57 230 76" id="iptArv" mask="9999-99-99 99:99:99" anchor="default"/>
  52. <Button id="btn_reftext" taborder="2" position="absolute 182 34 198 49" onclick="group3_group2_btn_reftext_onclick" anchor="default"/>
  53. </Layout>
  54. </Layouts>
  55. </Div>
  56. <Grid position="absolute 0 250 320 720" id="grd_BcollInfo" binddataset="ds_grd_BcollInfo" anchor="default" oncellclick="group3_grd_BcollInfo_oncellclick">
  57. <Formats>
  58. <Format id="default">
  59. <Columns>
  60. <Column size="28"/>
  61. <Column size="22"/>
  62. <Column size="60"/>
  63. <Column size="80"/>
  64. <Column size="70"/>
  65. <Column size="70"/>
  66. <Column size="70"/>
  67. <Column size="76"/>
  68. <Column size="100"/>
  69. <Column size="0"/>
  70. <Column size="0"/>
  71. <Column size="0"/>
  72. </Columns>
  73. <Rows>
  74. <Row size="24" band="head"/>
  75. <Row size="24"/>
  76. </Rows>
  77. <Band id="head">
  78. <Cell/>
  79. <Cell col="1"/>
  80. <Cell col="2" text="처방일자"/>
  81. <Cell col="3" text="Donor 명"/>
  82. <Cell col="4" text="진료과"/>
  83. <Cell col="5" text="검사희망일"/>
  84. <Cell col="6" text="채혈일"/>
  85. <Cell col="7" text="진료예약일"/>
  86. <Cell col="8" text="등록번호"/>
  87. <Cell col="9" text="testdeptcd"/>
  88. <Cell col="10" text="testdeptflagcd"/>
  89. <Cell col="11" text="tnsyn"/>
  90. </Band>
  91. <Band id="body">
  92. <Cell celltype="head" text="expr:currow + 1"/>
  93. <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="(chk == 'true' || chk == '1')?1:0"/>
  94. <Cell col="2" style="color:EXPR(!utlf_isNull(color)?color:&quot;&quot;);color2:EXPR(!utlf_isNull(color)?color:&quot;&quot;);" text="bind:prcpdd"/>
  95. <Cell col="3" text="bind:hngnm"/>
  96. <Cell col="4" text="bind:orddeptnm"/>
  97. <Cell col="5" displaytype="date" edittype="date" style="color:EXPR(!utlf_isNull(color)?color:&quot;&quot;);color2:EXPR(!utlf_isNull(color)?color:&quot;&quot;);" text="bind:prcphopedd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  98. <Cell col="6" displaytype="date" text="bind:barcdprntdt" calendardisplaynulltype="nulltext"/>
  99. <Cell col="7" displaytype="date" text="bind:ordrsrvdt" calendardisplaynulltype="nulltext"/>
  100. <Cell col="8" text="bind:pid"/>
  101. <Cell col="9" text="bind:testdeptcd"/>
  102. <Cell col="10" text="bind:testdeptflagcd"/>
  103. <Cell col="11" text="bind:tnsyn"/>
  104. </Band>
  105. </Format>
  106. </Formats>
  107. </Grid>
  108. <CheckBox position="absolute 235 76 311 96" id="checkbox1" anchor="default" text="응급채혈" truevalue="1" falsevalue="0"/>
  109. <Button position="absolute 288 52 304 68" id="button61" class="icon_search" text="" anchor="default" onclick="group3_button61_onclick"/>
  110. <CheckBox position="absolute 81 228 151 243" id="checkbox4" text="통합표시" truevalue="1" falsevalue="0" anchor="default"/>
  111. <Button position="absolute 235 723 321 742" id="button4" class="btn5" visible="true" text="환자명바코드" anchor="default" onclick="group3_button4_onclick"/>
  112. <Static position="absolute 465 265 721 335" align="align:center middle;" id="caption1" visible="false" style="background:#ffff99ff;" anchor="default"/>
  113. <Static position="absolute 465 335 721 405" align="align:center middle;" id="caption7" visible="false" style="background:#ccffffff;" anchor="default"/>
  114. <Grid position="absolute 51 106 315 222" id="datagrid2" binddataset="ds_ordrsrvinfo" anchor="default" autofittype="col">
  115. <Formats>
  116. <Format id="default">
  117. <Columns>
  118. <Column size="30"/>
  119. <Column size="200"/>
  120. </Columns>
  121. <Rows>
  122. <Row size="24" band="head"/>
  123. <Row size="24"/>
  124. </Rows>
  125. <Band id="head">
  126. <Cell text="번호"/>
  127. <Cell col="1" text="예약일"/>
  128. </Band>
  129. <Band id="body">
  130. <Cell text="bind:cd"/>
  131. <Cell col="1" text="bind:nm"/>
  132. </Band>
  133. </Format>
  134. </Formats>
  135. </Grid>
  136. <Static text="진료" position="absolute 2 107 47 123" align="align:center middle;" id="caption8" class="tit_2" wordwrap="none" anchor="default"/>
  137. <Static text="예약" position="absolute 21 125 51 138" align="align:center middle;" id="caption9" style="font:돋움체,9,bold;" anchor="default"/>
  138. <Static text="정보" position="absolute 21 140 51 153" align="align:center middle;" id="caption10" style="font:돋움체,9,bold;" anchor="default"/>
  139. <Button position="absolute 110 723 215 742" id="button7" class="btn5" visible="true" text="이름표출력" anchor="default" onclick="group3_button7_onclick"/>
  140. <Button position="absolute 0 723 103 742" id="button9" class="btn5" visible="true" text="환자명 프린터" anchor="default" onclick="group3_button9_onclick"/>
  141. </Layout>
  142. </Layouts>
  143. </Div>
  144. <Div position="absolute 0 25 1202 57" id="group5" scrollbars="autoboth" class="div_SA">
  145. <Layouts>
  146. <Layout>
  147. <Div position="absolute 828 4 1198 29" id="group4" style="background:transparent;" anchor="default">
  148. <Layouts>
  149. <Layout width="370" height="25">
  150. <Button position="absolute 301 1 369 23" id="btn_cle" class="btn4" text="초기화" anchor="default" onclick="group5_group4_btn_cle_onclick"/>
  151. <Button position="absolute 241 1 297 23" id="btn_bcoll" class="btn4" text="채혈" anchor="default" onclick="group5_group4_btn_bcoll_onclick"/>
  152. </Layout>
  153. </Layouts>
  154. </Div>
  155. <Div position="absolute 827 1 1197 26" id="group6" anchor="default">
  156. <Layouts>
  157. <Layout>
  158. <Button position="absolute 231 3 299 25" id="button1" class="btn4" text="재출력" anchor="default" onclick="group5_group6_button1_onclick"/>
  159. <Button position="absolute 148 3 228 25" id="btn_bcollcan" class="btn4" text="채혈취소" anchor="default" onclick="group5_group6_btn_bcollcan_onclick"/>
  160. <Button position="absolute 301 3 369 25" id="btn_can2" class="btn4" text="초기화" anchor="default" onclick="group5_group6_btn_can2_onclick"/>
  161. </Layout>
  162. </Layouts>
  163. </Div>
  164. <Button position="absolute 1 5 93 27" id="button26" class="btn3" text="프린터설정" onclick="group5_button26_onclick" anchor="default"/>
  165. <Button position="absolute 96 5 200 27" id="button5" class="btn3" text="채취일시등록" anchor="default" onclick="group5_button5_onclick"/>
  166. <Button position="absolute 203 5 283 27" id="button8" class="btn3" text="이력조회" anchor="default" onclick="group5_button8_onclick"/>
  167. <Button position="absolute 390 5 467 27" id="button2" class="btn3" text="수혈처방" anchor="default" onclick="group5_button2_onclick"/>
  168. <Button position="absolute 285 5 389 27" id="button3" class="btn3" text="전환검체변경" anchor="default" onclick="group5_button3_onclick"/>
  169. <CheckBox position="absolute 475 6 590 26" id="checkbox5" anchor="default" text="자동대기건수조회" onchanged="group5_checkbox5_onchanged"/>
  170. <Radio id="radio1" taborder="1" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group5_group4_radio1_onitemchanged" position="absolute 807 6 971 24">
  171. <Dataset id="innerdataset">
  172. <ColumnInfo>
  173. <Column id="codecolumn" size="256"/>
  174. <Column id="datacolumn" size="256"/>
  175. </ColumnInfo>
  176. <Rows>
  177. <Row>
  178. <Col id="codecolumn">1</Col>
  179. <Col id="datacolumn">일반</Col>
  180. </Row>
  181. <Row>
  182. <Col id="codecolumn">3</Col>
  183. <Col id="datacolumn">Auto Label</Col>
  184. </Row>
  185. </Rows>
  186. </Dataset>
  187. </Radio>
  188. <CheckBox id="checkbox1" taborder="2" text="기본조회(3년)" value="1" truevalue="1" falsevalue="0" onclick="group3_checkbox1_onclick" position="absolute 627 7 736 27"/>
  189. </Layout>
  190. </Layouts>
  191. </Div>
  192. <Grid position="absolute 595 0 817 50" align="align:center middle;" id="datagrid1" visible="false" binddataset="ds_datagrid1">
  193. <Formats>
  194. <Format id="default">
  195. <Columns>
  196. <Column size="55"/>
  197. <Column size="55"/>
  198. <Column size="55"/>
  199. <Column size="55"/>
  200. </Columns>
  201. <Rows>
  202. <Row size="24" band="head"/>
  203. <Row size="24"/>
  204. </Rows>
  205. <Band id="head">
  206. <Cell text="A"/>
  207. <Cell col="1" text="B"/>
  208. <Cell col="2" text="C"/>
  209. <Cell col="3" text="D"/>
  210. </Band>
  211. <Band id="body">
  212. <Cell text="bind:jangbi0"/>
  213. <Cell col="1" text="bind:jangbi1"/>
  214. <Cell col="2" text="bind:jangbi2"/>
  215. <Cell col="3" text="bind:jangbi3"/>
  216. </Band>
  217. </Format>
  218. </Formats>
  219. </Grid>
  220. </Layout>
  221. </Layouts>
  222. <Objects>
  223. <Dataset id="ds_init_cmb_prestr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  224. <ColumnInfo>
  225. <Column id="nm" type="STRING"/>
  226. <Column id="cd" type="STRING"/>
  227. </ColumnInfo>
  228. </Dataset>
  229. <Dataset id="ds_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_datagrid1_oncolumnchanged">
  230. <ColumnInfo>
  231. <Column id="jangbi0" type="STRING"/>
  232. <Column id="jangbi1" type="STRING"/>
  233. <Column id="jangbi2" type="STRING"/>
  234. <Column id="jangbi3" type="STRING"/>
  235. </ColumnInfo>
  236. </Dataset>
  237. <Dataset id="ds_grd_BcollInfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_grd_BcollInfo_oncolumnchanged">
  238. <ColumnInfo>
  239. <Column id="chk" type="STRING" size="256"/>
  240. <Column id="prcpdd" type="STRING" size="256"/>
  241. <Column id="orddeptnm" type="STRING" size="256"/>
  242. <Column id="execdeptnm" type="STRING" size="256"/>
  243. <Column id="ordrsrvdt" type="STRING" size="256"/>
  244. <Column id="pid" type="STRING" size="256"/>
  245. <Column id="prcphopedd" type="STRING" size="256"/>
  246. <Column id="barcdprntdt" type="STRING" size="256"/>
  247. </ColumnInfo>
  248. <Rows>
  249. <Row>
  250. <Col id="chk"/>
  251. <Col id="prcpdd"/>
  252. <Col id="orddeptnm"/>
  253. <Col id="execdeptnm"/>
  254. <Col id="ordrsrvdt"/>
  255. <Col id="pid"/>
  256. <Col id="prcphopedd"/>
  257. <Col id="barcdprntdt"/>
  258. </Row>
  259. </Rows>
  260. </Dataset>
  261. <Dataset id="ds_ordrsrvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  262. <ColumnInfo>
  263. <Column id="check" type="STRING" size="256" sumtext="체크"/>
  264. <Column id="chk" type="STRING" size="256" sumtext="체크"/>
  265. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  266. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  267. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
  268. <Column id="execdeptcd" type="STRING" size="256" sumtext="시행부서코드"/>
  269. <Column id="execdeptnm" type="STRING" size="256" sumtext="시행부서"/>
  270. <Column id="ordrsrvdt" type="STRING" size="256" sumtext="진료예약일"/>
  271. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  272. <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
  273. <Column id="wardnm" type="STRING" size="256" sumtext="병동"/>
  274. <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
  275. <Column id="roomnm" type="STRING" size="256" sumtext="병실"/>
  276. <Column id="prcphopedt" type="STRING" size="256" sumtext="희망일시"/>
  277. <Column id="prcphopedd" type="STRING" size="256" sumtext="희망일자"/>
  278. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  279. <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방구분"/>
  280. <Column id="prcpstatcd" type="STRING" size="256" sumtext="채혈상태"/>
  281. <Column id="wardroom" type="STRING" size="256" sumtext="병동/병실"/>
  282. <Column id="orddrid" type="STRING" size="256" sumtext="진료의id"/>
  283. <Column id="orddrnm" type="STRING" size="256" sumtext="진료의"/>
  284. <Column id="testdeptcd" type="STRING" size="256" sumtext="검사과코드"/>
  285. <Column id="testdeptflagcd" type="STRING" size="256" sumtext="검사과구분코드"/>
  286. <Column id="rgstdt" type="STRING" size="256" sumtext="처방등록일시"/>
  287. <Column id="barcdprntdt" type="STRING" size="256" sumtext="바코드출력일"/>
  288. <Column id="tnsyn" type="STRING" size="256" sumtext="수혈처방여부(보관검체바코드출력용)"/>
  289. <Column id="atdoctid" type="STRING" size="256" sumtext="주치의"/>
  290. <Column id="dnorno" type="STRING" size="256" sumtext="공여자번호"/>
  291. <Column id="testreqlnkno" type="STRING" size="256" sumtext="검사의뢰지번호"/>
  292. <Column id="state" type="STRING" size="256"/>
  293. </ColumnInfo>
  294. </Dataset>
  295. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  296. <ColumnInfo>
  297. <Column id="cancelyn" type="STRING" size="256"/>
  298. <Column id="pflag" type="STRING" size="256"/>
  299. <Column id="autoref" type="STRING" size="256"/>
  300. <Column id="prcprcptyn" type="STRING" size="256"/>
  301. </ColumnInfo>
  302. <Rows>
  303. <Row>
  304. <Col id="cancelyn">1</Col>
  305. <Col id="pflag">3</Col>
  306. <Col id="autoref"/>
  307. <Col id="prcprcptyn"/>
  308. </Row>
  309. </Rows>
  310. </Dataset>
  311. <Dataset id="ds_johoi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  312. <ColumnInfo>
  313. <Column id="refflag" type="STRING" size="256"/>
  314. <Column id="regnopatnm" type="STRING" size="256"/>
  315. <Column id="bcollflag" type="STRING" size="256"/>
  316. <Column id="bizflag" type="STRING" size="256"/>
  317. <Column id="pid" type="STRING" size="256"/>
  318. <Column id="hdisp" type="STRING" size="256"/>
  319. <Column id="prcpgenrflag" type="STRING" size="256"/>
  320. <Column id="xrwGBN" type="STRING" size="256"/>
  321. <Column id="erflag" type="STRING" size="256"/>
  322. <Column id="arvtime" type="STRING" size="256"/>
  323. <Column id="orddeptcd" type="STRING" size="256"/>
  324. <Column id="bcollflag1" type="STRING" size="256"/>
  325. <Column id="ibftest" type="STRING" size="256"/>
  326. <Column id="donorbcoll" type="STRING" size="256"/>
  327. <Column id="prcpkindcd" type="STRING" size="256"/>
  328. <Column id="roundkind" type="STRING" size="256"/>
  329. <Column id="testdeptcd" type="STRING" size="256"/>
  330. <Column id="testdeptflagcd" type="STRING" size="256"/>
  331. <Column id="atdoctid" type="STRING" size="256"/>
  332. <Column id="ibftestp" type="STRING" size="256"/>
  333. <Column id="baseflag" type="STRING" size="256"/>
  334. </ColumnInfo>
  335. <Rows>
  336. <Row>
  337. <Col id="refflag">1</Col>
  338. <Col id="regnopatnm"/>
  339. <Col id="bcollflag">1</Col>
  340. <Col id="bizflag">Out</Col>
  341. <Col id="pid"/>
  342. <Col id="hdisp"/>
  343. <Col id="prcpgenrflag"/>
  344. <Col id="xrwGBN"/>
  345. <Col id="erflag"/>
  346. <Col id="arvtime"/>
  347. <Col id="orddeptcd"/>
  348. <Col id="bcollflag1">1</Col>
  349. <Col id="ibftest"/>
  350. <Col id="donorbcoll"/>
  351. <Col id="prcpkindcd">-</Col>
  352. </Row>
  353. </Rows>
  354. </Dataset>
  355. <Dataset id="ds_tnsprcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  356. <ColumnInfo>
  357. <Column id="tnsprcpyn" type="STRING" size="256"/>
  358. <Column id="bftnsprcpyn" type="STRING" size="256"/>
  359. <Column id="today" type="STRING" size="256"/>
  360. </ColumnInfo>
  361. <Rows>
  362. <Row>
  363. <Col id="tnsprcpyn"/>
  364. <Col id="bftnsprcpyn"/>
  365. <Col id="today"/>
  366. </Row>
  367. </Rows>
  368. </Dataset>
  369. <Dataset id="ds_hngnminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  370. <ColumnInfo>
  371. <Column id="hngnm" type="STRING" size="256"/>
  372. </ColumnInfo>
  373. <Rows>
  374. <Row/>
  375. </Rows>
  376. </Dataset>
  377. <Dataset id="ds_jaewoninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  378. <Dataset id="ds_bloodinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  379. <Dataset id="ds_bbcoll" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  380. <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  381. <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  382. <Dataset id="ds_spccdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  383. <ColumnInfo>
  384. <Column id="tclscd" type="STRING" size="256"/>
  385. <Column id="tclsnm" type="STRING" size="256"/>
  386. </ColumnInfo>
  387. </Dataset>
  388. <Dataset id="ds_init_lb8001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  389. <ColumnInfo>
  390. <Column id="cd" type="STRING"/>
  391. <Column id="nm" type="STRING"/>
  392. </ColumnInfo>
  393. </Dataset>
  394. <Dataset id="ds_init_lb0401" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  395. <ColumnInfo>
  396. <Column id="cd" type="STRING"/>
  397. <Column id="nm" type="STRING"/>
  398. </ColumnInfo>
  399. </Dataset>
  400. <Dataset id="ds_init_lb9990" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  401. <ColumnInfo>
  402. <Column id="cd" type="STRING"/>
  403. <Column id="nm" type="STRING"/>
  404. </ColumnInfo>
  405. </Dataset>
  406. <Dataset id="ds_init_lb0138" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  407. <ColumnInfo>
  408. <Column id="cd" type="STRING"/>
  409. <Column id="nm" type="STRING"/>
  410. </ColumnInfo>
  411. </Dataset>
  412. <Dataset id="ds_init_lb0139" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  413. <ColumnInfo>
  414. <Column id="cd" type="STRING"/>
  415. <Column id="nm" type="STRING"/>
  416. </ColumnInfo>
  417. </Dataset>
  418. <Dataset id="ds_temp_locatelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  419. <Dataset id="ds_sflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  420. <ColumnInfo>
  421. <Column id="regnopatnm" type="STRING"/>
  422. <Column id="testdeptcd" type="STRING"/>
  423. </ColumnInfo>
  424. </Dataset>
  425. <Dataset id="ds_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  426. <ColumnInfo>
  427. <Column id="srchcond" type="STRING" size="256"/>
  428. <Column id="pid" type="STRING" size="256"/>
  429. <Column id="hngnm" type="STRING" size="256"/>
  430. <Column id="rrgstno1" type="STRING" size="256"/>
  431. <Column id="rrgstno2" type="STRING" size="256"/>
  432. <Column id="autoflag" type="STRING" size="256"/>
  433. <Column id="checkfnexam" type="STRING" size="256"/>
  434. </ColumnInfo>
  435. <Rows>
  436. <Row>
  437. <Col id="srchcond"/>
  438. <Col id="pid"/>
  439. <Col id="hngnm"/>
  440. <Col id="rrgstno1"/>
  441. <Col id="rrgstno2"/>
  442. <Col id="autoflag"/>
  443. <Col id="checkfnexam"/>
  444. </Row>
  445. </Rows>
  446. </Dataset>
  447. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  448. </Objects>
  449. <Bind>
  450. <BindItem id="item0" compid="group3.group2.combo3" propid="value" datasetid="ds_johoi" columnid="bcollflag"/>
  451. <BindItem id="item1" compid="group3.group2.iptSearch" propid="value" datasetid="ds_johoi" columnid="regnopatnm"/>
  452. <BindItem id="item4" compid="group5.checkbox5" propid="value" datasetid="ds_hidden" columnid="autoref"/>
  453. <BindItem id="item5" compid="group3.group2.ipt_hngnm" propid="value" datasetid="ds_hngnminfo" columnid="hngnm"/>
  454. <BindItem id="item6" compid="group3.group2.iptArv" propid="value" datasetid="ds_johoi" columnid="arvtime"/>
  455. <BindItem id="item7" compid="group3.checkbox1" propid="value" datasetid="ds_johoi" columnid="erflag"/>
  456. <BindItem id="item8" compid="group3.checkbox4" propid="value" datasetid="ds_johoi" columnid="hdisp"/>
  457. <BindItem id="item2" compid="group5.radio1" propid="value" datasetid="ds_hidden" columnid="pflag"/>
  458. <BindItem id="item3" compid="group5.checkbox1" propid="value" datasetid="ds_johoi" columnid="baseflag"/>
  459. </Bind>
  460. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  461. * System Name :
  462. * Job Name :
  463. * Creator :
  464. * Make Date : 2015-10-27
  465. * Description :
  466. *---------------------------------------------------------------------------------------
  467. * Modify Date Modifier Modify Description
  468. *---------------------------------------------------------------------------------------
  469. * 2015-10-27 Live Converter TF->XP
  470. *
  471. *---------------------------------------------------------------------------------------
  472. ****************************************************************************************/
  473. include "com_commonxp::comm_main.xjs";
  474. include "com_commodulexp::SSZFM00901.xjs";
  475. include "lis_commonxp::LLZ001.xjs";
  476. include "lis_commonxp::LZZ001.xjs";
  477. include "lis_commonxp::LZZ002.xjs";
  478. include "lis_commonxp::LPZ001.xjs";
  479. include "pam_pamcomnxp::PAM.xjs";
  480. var gTimerID = 0;
  481. var lfcancelYN = 1;
  482. var gMsg = 'N';
  483. //리스트 클릭
  484. function lf_GetTclscdList(row){
  485. group3.import1.grp4.btn_chky.visible = false; //전체선택 숨기기
  486. group3.import1.grp4.btn_chkn.visible = true; //전체선택해제 보이기
  487. if(ds_johoi.getColumn(0,"hdisp") != "1"){ //통합표시 아닐때.
  488. ds_johoi.setColumn(0,"pid",ds_grd_BcollInfo.getColumn(row,"pid"));
  489. ds_johoi.setColumn(0,"prcpgenrflag",ds_grd_BcollInfo.getColumn(row,"prcpgenrflag"));
  490. ds_johoi.setColumn(0,"orddeptcd",ds_grd_BcollInfo.getColumn(row,"orddeptcd"));
  491. dsf_copyColInfo(ds_send_data1,ds_grd_BcollInfo);
  492. ds_send_data1.addRow();
  493. ds_send_data1.copyRow(0,ds_grd_BcollInfo,row);
  494. dsf_copyDs(ds_send_data2,ds_johoi,"replace");
  495. }
  496. else{ //통합표시일 경우.
  497. if(ds_johoi.getColumn(0,"bcollflag1") == "1") { //희망일시인 경우.
  498. var prcphopedtList = "";
  499. var orddeptcdList = "";
  500. var orddridList = "";
  501. var prcpddList = "";
  502. if(ds_grd_BcollInfo.rowcount > 0) {
  503. var fRow = ds_grd_BcollInfo.findRow("chk","true");
  504. if(fRow < 0) return;
  505. prcphopedtList = "'" + ds_grd_BcollInfo.getColumn(fRow,"prcphopedd") + "'";
  506. orddeptcdList = "'" + ds_grd_BcollInfo.getColumn(fRow,"orddeptcd") + "'";
  507. orddridList = "'" + ds_grd_BcollInfo.getColumn(fRow,"orddrid") + "'";
  508. prcpddList = "'" + ds_grd_BcollInfo.getColumn(fRow,"prcpdd") + "'";
  509. for(iRow = fRow + 1; iRow < ds_grd_BcollInfo.rowcount;iRow++){
  510. if(ds_grd_BcollInfo.getColumn(iRow,"chk") == "true"){
  511. prcphopedtList = prcphopedtList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"prcphopedd") + "'";
  512. orddeptcdList = orddeptcdList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"orddeptcd") + "'";
  513. orddridList = orddridList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"orddrid") + "'";
  514. prcpddList = prcpddList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"prcpdd") + "'";
  515. }
  516. }
  517. dsf_copyColInfo(ds_send_data1,ds_grd_BcollInfo);
  518. ds_send_data1.addRow();
  519. ds_send_data1.copyRow(0,ds_grd_BcollInfo,fRow);
  520. dsf_copyDs(ds_send_data2,ds_johoi,"replace");
  521. dsf_makeValue(ds_send_data1,"prcpdd","string",prcphopedtList);
  522. dsf_makeValue(ds_send_data1,"orddeptcd","string",orddeptcdList);
  523. dsf_makeValue(ds_send_data1,"orddrid","string",orddridList);
  524. dsf_makeValue(ds_send_data1,"prcpdd2","string",prcpddList); // prcpdd는 이미 쓰이고 있어서 prcpdd2 로... 왜 희망일시를 prcpdd로 셋하는지 모르겠음.
  525. }
  526. }
  527. }
  528. // alert(model.getValue("/root/main/TestInfo/bfcontrol/bfcontrolyn"));
  529. // 이재오 추가 2013
  530. group3.import1.ds_bfcontrol.clearData(); //HbA1c 보험 인정 기준조회 clear 2.0 전환추가
  531. dsf_makeValue(ds_send_data2,"testdeptcd","string","-");
  532. dsf_makeValue(ds_send_data2,"testdeptflagcd","string","-");
  533. var oParam = {};
  534. oParam.id = "TRLLC00102";
  535. oParam.service = "bcollmngtapp.BCollMngt";
  536. oParam.method = "reqGetTestList";
  537. oParam.inds = "BCollRefData=ds_send_data2 PatInfo=ds_send_data1";
  538. oParam.outds = "group3.import1.ds_grd_TestInfoCnts=testlist group3.import1.ds_TestspcfInfo=patinfo group3.import1.ds_roundinfo=roundinfo group3.import1.ds_bfcontrol=bfcontrol";
  539. oParam.async = false;
  540. oParam.error = false;
  541. //oParam.callback = "cf_TRLLC00102";
  542. tranf_submit(oParam);
  543. group3.import1.ds_grd_TestInfoCnts.updatecontrol = false;
  544. for( var i=0; i<group3.import1.ds_grd_TestInfoCnts.rowcount;i++)
  545. {
  546. group3.import1.ds_grd_TestInfoCnts.setColumn(i,"reprntcnt",1);
  547. group3.import1.ds_grd_TestInfoCnts.setColumn(i,"testdeptcd","-");
  548. group3.import1.ds_grd_TestInfoCnts.setColumn(i,"testdeptflagcd","-");
  549. }
  550. group3.import1.ds_grd_TestInfoCnts.updatecontrol = true;
  551. //=============================================================
  552. //2013 10. 30일 주의사항 관리 이재오 추가
  553. //=============================================================
  554. var ordList = group3.import1.ds_grd_TestInfoCnts.getColumn(0,"tclscd") ; ;
  555. if(group3.import1.ds_grd_TestInfoCnts.rowcount > 0) {
  556. // alert(grd_TestInfoCnts.rows);
  557. for(iRow = 0; iRow < group3.import1.ds_grd_TestInfoCnts.rowcount ;iRow++){
  558. ordList = ordList + "','" + group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"tclscd") ;
  559. }
  560. //model.makeValue("/root/send/data1/tclscdlist","'" + ordList + "'");
  561. dsf_createDsRow("ds_send_tclscdlist"
  562. , [{col: "tclscdlist", val: ordList}
  563. ]);
  564. var oParam = {};
  565. oParam.id = "TRLLC90904";
  566. oParam.service = "bcollmngtapp.BCollMngt";
  567. oParam.method = "reqGetSpccdList2";
  568. oParam.inds = "cond=ds_send_tclscdlist";
  569. oParam.outds = "ds_spccdlist=getSpccdList";
  570. oParam.async = false;
  571. //oParam.callback = "cf_TRLLC90904";
  572. tranf_submit(oParam);
  573. var count = ds_spccdlist.rowcount;
  574. if(count > 0){
  575. for(i=0; i< count; i++){
  576. var tclscd = ds_spccdlist.getColumn(i,"tclscd");
  577. var tclscdnm = ds_spccdlist.getColumn(i,"tclsnm");
  578. if(ds_johoi.getColumn(0,"bcollflag") == "1") { //미채혈 일때
  579. if (!utlf_isNull(tclscd)){
  580. sysf_messageBox("주의! " + tclscd + " : " + tclscdnm, "I007");
  581. }
  582. }
  583. }
  584. }
  585. ds_spccdlist.clearData();
  586. }
  587. //=============================================================
  588. //2012 08. 30일 사전체크 이재오 추가
  589. //=============================================================
  590. if(group3.import1.ds_bfcontrol.getColumn(0,"bfcontrolyn") == "Y") {
  591. sysf_messageBox("최근 90일 이내에 실시된 검사가 있습니다. HbA1c는 3~4개월에 1회만 보험인정됩니다", "I007");
  592. }
  593. //=============================================================
  594. //2014 07. 31일 수가변경에 따른 검사오더 검증 사전체크 이재오 추가
  595. //=============================================================
  596. iMaxRowCnt = group3.import1.ds_grd_TestInfoCnts.rowcount;
  597. //iMaxRowCnt = 1;//한번만 체크하게 2.0 추가
  598. if( ds_johoi.getColumn(0,"bcollflag") == "1" && iMaxRowCnt > 0 ) {
  599. for(iRow = 0; iRow < iMaxRowCnt ;iRow++){
  600. //if (gMsg = 'N') {
  601. var pid = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"pid") ;
  602. var prcpdd = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"prcpdd") ;
  603. //var cretno = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"cretno") ;
  604. var orddd = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"orddd") ;
  605. var execprcpuniqno = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"execprcpuniqno") ;
  606. var cnt = getPrcpRcptCheck("LIS", pid, orddd, "", prcpdd, execprcpuniqno); //자격조회 메세지
  607. // trace(' cnt =='+iRow+' / '+cnt+' / '+gMsg+' / '+prcpdd);
  608. if ( cnt > 0 ) {
  609. iRow = iMaxRowCnt + 1;
  610. break;
  611. }
  612. }
  613. }
  614. group3.import1.lf_gridReMake();
  615. }
  616. function lf_PrintSetChange() {
  617. if(group5.radio1.value == "1") {
  618. if ((utlf_isNull(group3.import1.objects["ds_data_setupinfo_genr"])) || (group3.import1.ds_data_setupinfo_genr.rowcount == 0)) {
  619. sysf_messageBox("일반프린터 설정이 되어 있지 않습니다. 일반프린터 설정을", "I008");
  620. return;
  621. }
  622. group3.import1.ds_barcdprntsetup.copyData(group3.import1.ds_data_setupinfo_genr);
  623. group3.import1.ds_data_setupinfo.copyData(group3.import1.ds_data_setupinfo_genr);
  624. }else if(group5.radio1.value == "3") {
  625. if ((utlf_isNull(group3.import1.objects["ds_data_setupinfo_auto"])) || (group3.import1.ds_data_setupinfo_auto.rowcount == 0)) {
  626. sysf_messageBox("Auto프린터 설정이 되어 있지 않습니다. Auto프린터 설정을", "I008");
  627. return;
  628. }
  629. group3.import1.ds_barcdprntsetup.copyData(group3.import1.ds_data_setupinfo_auto);
  630. group3.import1.ds_data_setupinfo.copyData(group3.import1.ds_data_setupinfo_auto);
  631. }
  632. }
  633. function cf_TRLLC00103(sSvcId, nErrorCode, sErrorMsg) {
  634. if(nErrorCode < 0) return;
  635. }
  636. function lf_GetBBcoll(row) {
  637. if(ds_johoi.getColumn(0,"bcollflag") == "1") {
  638. dsf_createDsRow("ds_send"
  639. , [{col: "pid", val: ds_grd_BcollInfo.getColumn(row,"pid")}]);
  640. var oParam = {};
  641. oParam.id = "TRLLC00103";
  642. oParam.service = "bcollmngtapp.BCollMngt";
  643. oParam.method = "reqGetBBcoll";
  644. oParam.inds = "cond=ds_send";
  645. oParam.outds = "ds_bbcoll=bbcoll";
  646. oParam.async = false;
  647. oParam.callback = "cf_TRLLC00103";
  648. tranf_submit(oParam);
  649. if(ds_bbcoll.rowcount > 0) {
  650. sysf_messageBox("오늘 채혈한 항목이 있습니다.", "I");
  651. }
  652. if(ds_grd_BcollInfo.getColumn(row,"prcphopedd") == ds_tnsprcpinfo.getColumn(0,"today"))
  653. {
  654. if(sysf_getUserInfo("dutplceinstcd") == "031") {
  655. ds_johoi.setColumn(0,"erflag", "1");
  656. }
  657. }
  658. }
  659. }
  660. function lf_Click_grdBcollinfo (flag){
  661. if(flag == "1"){
  662. if(ds_grd_BcollInfo.rowcount > 0) {
  663. ds_grd_BcollInfo.rowposition = 0;
  664. lf_GetBBcoll(0);
  665. lf_GetTclscdList(0);
  666. lf_GetPopupLocate(0);
  667. }else{
  668. //채혈정보 존재하지 않으면 탑정보 초기화.
  669. //delPatientInfos(); //미채혈 화면에서 환자 바코드 출력후 환자의 검사 정보가 바로 채혈화면으로
  670. //활성화 되지 않고 다음번 행위부터 활성화요청 바람.( 화면이 사라지지 않게 바람
  671. //라는 요구사항(상단 탑정보 초기화 하지 않길 원함 변경요청 10763 20100211수정
  672. lf_GetPopupLocate(0);
  673. return;
  674. }
  675. }
  676. else{
  677. var row = ds_grd_BcollInfo.rowposition;
  678. if(row >= 0){
  679. lf_GetBBcoll(row)
  680. lf_GetTclscdList(row);
  681. lf_GetPopupLocate(0);
  682. }
  683. }
  684. }
  685. function cf_TRLLC00101(sSvcId, nErrorCode, sErrorMsg) {
  686. if(nErrorCode < 0) return;
  687. }
  688. function lf_GetOutBCollJoHoi()
  689. {
  690. group3.caption1.visible = false;
  691. group3.caption7.visible = false;
  692. if(utlf_isNull(ds_johoi.getColumn(0,"regnopatnm"))){
  693. sysf_messageBox("등록번호를","C001","") ;
  694. return;
  695. }
  696. appf_delPatientInfos(); //새로운 등록번호 치면 상단정보 초기화
  697. group3.import1.lf_initDetailForm();
  698. var gbn = ds_johoi.getColumn(0,"refflag");
  699. // 이재오 추가 2017.2.21 일 합번 추가
  700. var pid = utlf_trim(group3.group2.iptSearch.text);
  701. var current_pid = fCheckedBindPid(pid);
  702. //trace('aaaa :'+ pid +' / '+current_pid);
  703. ds_johoi.setColumn(0,"regnopatnm", current_pid);
  704. // 이재오 추가 2017.2.21 일 합번 추가
  705. ds_johoi.setColumn(0,"regnopatnm", utlf_transNullToEmpty(ds_johoi.getColumn(0,"regnopatnm")).getTrim());
  706. var oParam = {};
  707. oParam.id = "TRLLC00101";
  708. oParam.service = "bcollmngtapp.BCollMngt";
  709. oParam.method = "reqGetBCollPatList";
  710. oParam.inds = "BCollRefData=ds_johoi";
  711. oParam.outds = "ds_grd_BcollInfo=bcolllist ds_ordrsrvinfo=ordrsrvinfo ds_tnsprcpinfo=tnsprcpinfo ds_hngnminfo=hngnminfo ds_jaewoninfo=jaewoninfo ds_bloodinfo=bloodinfo";
  712. oParam.async = false;
  713. oParam.callback = "cf_TRLLC00101";
  714. tranf_submit(oParam);
  715. ds_grd_BcollInfo.updatecontrol = false;
  716. dsf_setFixVal(ds_grd_BcollInfo, "testdeptcd:-,testdeptflagcd:-,testreqlnkno:0");
  717. ds_grd_BcollInfo.updatecontrol = true;
  718. //=============================================================
  719. //2012 08. 30일 입원유무체크 이재오 추가
  720. //=============================================================
  721. if(ds_jaewoninfo.getColumn(0,"jaewon") == "Y") {
  722. sysf_messageBox("입원중인 환자입니다. 확인하세요", "I");
  723. }
  724. //=============================================================
  725. //=============================================================
  726. //2012 08. 30일 입원유무체크 이재오 추가
  727. //=============================================================
  728. if(ds_bloodinfo.getColumn(0,"bloodchk") == "Y") {
  729. sysf_messageBox("사혈 또는 자가채혈이 존재하는 환자입니다. 확인하세요", "I");
  730. }
  731. //=============================================================
  732. //=============================================================
  733. //외래 수혈 처방 존재 여부 메시지 - 2009.04.02 김성희 추가
  734. //=============================================================
  735. if(ds_tnsprcpinfo.getColumn(0,"tnsprcpyn") == "Y") {
  736. sysf_messageBox("수혈처방이", "I010");
  737. }else if(ds_tnsprcpinfo.getColumn(0,"tnsprcpyn") == "N" && ds_tnsprcpinfo.getColumn(0,"bftnsprcpyn") == "Y") {
  738. sysf_messageBox("한달 이내에 수혈 내역이", "I010");
  739. }
  740. //진료예약정보 기본선택
  741. //group3.cmb_prestr.index = 0;
  742. lf_Click_grdBcollinfo("1"); //자격조회
  743. //========================================================================
  744. //2009.07.01 고시변경에 의한 본인부담 요율변경 대상 환자
  745. //원무 수납 재정산 안내 메시지 및 메시지 출력 여부 (2009.06.30 김성희 추가)
  746. //========================================================================
  747. lf_getPrcpRcptInfo(sysf_getUserInfo("dutplceinstcd")
  748. , utlf_transNullToEmpty(ds_johoi.getColumn(0,"regnopatnm")).getTrim()
  749. , ds_init_lb8001.getColumn(0,"cd")
  750. , "1");
  751. // 당일검사시 검사희망일 및 처방일 색깔 빨강색으로 둔다
  752. if(ds_grd_BcollInfo.rowcount > 0) {
  753. for(iRow = 0; iRow < ds_grd_BcollInfo.rowcount;iRow++)
  754. {
  755. if(ds_grd_BcollInfo.getColumn(iRow,"prcphopedd") == ds_tnsprcpinfo.getColumn(0,"today"))
  756. {
  757. ds_grd_BcollInfo.setColumn(iRow,"color", "#ff3300");
  758. }
  759. }
  760. }
  761. }
  762. // 채혈구분 선택시 버튼영역 변경
  763. function lf_SetBcollFlag(){
  764. group3.import1.lf_initDetailForm();
  765. if(ds_johoi.getColumn(0,"bcollflag")=="1"){
  766. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","bcno"),"size",0); // 바코드번호
  767. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","canceldesc"),"size",0); // 취소사유
  768. group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","barcdprntdt"),"size",0); // 바코드출력일
  769. group3.checkbox4.visible = true;
  770. }else{
  771. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","bcno"),"size",85); // 바코드번호
  772. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","canceldesc"),"size",100); // 취소사유
  773. group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","barcdprntdt"),"size",80); // 바코드출력일
  774. group3.checkbox4.visible = false;
  775. ds_johoi.setColumn(0,"hdisp", "");
  776. }
  777. if(ds_johoi.getColumn(0,"bcollflag")=="1"){
  778. group5.group4.visible = true;
  779. group5.group6.visible = false;
  780. }else if(ds_johoi.getColumn(0,"bcollflag")=="2"){
  781. group5.group4.visible = false;
  782. group5.group6.visible = true;
  783. }else{
  784. group5.group4.visible = false;
  785. group5.group6.visible = false;
  786. }
  787. }
  788. function lf_ChangeDonorYN(row) {
  789. if(ds_johoi.getColumn(0,"donorbcoll") == "Y") { //donor채혈이면 공여자명 보임
  790. group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","hngnm"),"size",80);
  791. } else {
  792. group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","hngnm"),"size",0);
  793. }
  794. }
  795. function lf_DaeGiCnt() {
  796. ds_johoi.setColumn(0,"regnopatnm", group3.group2.iptSearch.value);
  797. ds_datagrid1.clearData();
  798. var sSetUpVal = group3.import1.ds_data_comm03.getColumn(0,"daegiip");
  799. var sReturn = AutoLabel.WAITDATA(0, sSetUpVal);
  800. if(!utlf_isNull(sReturn)) { //오류가 나지 않았다면.
  801. var vJangBi = sReturn.split("^");
  802. for(i = 0; i < vJangBi.length-1; i++) {
  803. var vDaegi = vJangBi[i].split("|");
  804. ds_datagrid1.addRow();
  805. ds_datagrid1.setColumn(i,"jangbi" + i, vDaegi[2]);
  806. }
  807. }
  808. }
  809. function lf_AutoRefYN() {
  810. if(ds_hidden.getColumn(0,"autoref") == "Y") {
  811. lf_DaeGiCnt();
  812. lf_Timer();
  813. } else {
  814. if (!utlf_isNull(gTimerID))
  815. {
  816. //window.clearInterval(gTimerID);
  817. gTimerID = 0;
  818. this.killTimer(0);
  819. }
  820. }
  821. }
  822. function lf_Timer(){
  823. //gTimerID = window.setInterval( "fDaeGiCnt()", 5 * 1000 ); //5초 마다 대기인수 바뀜.
  824. this.setTimer(0,5 * 1000);
  825. }
  826. function lf_GetPopupLocate(row){
  827. group3.caption1.visible = false;
  828. group3.caption7.visible = false;
  829. var tempdd = "";
  830. if(ds_init_lb0401.rowcount > 0){
  831. var prcpdd = ds_init_lb0401.getColumn(row,"prcphopedd");
  832. if(utlf_isNull(prcpdd)){
  833. var toDay = utlf_getCurrentDate();
  834. tempdd = toDay;
  835. }else{
  836. tempdd = prcpdd;
  837. }
  838. dsf_createDsRow("ds_send_data2"
  839. , [{col: "prcpdd", val: tempdd}
  840. ,{col: "pid", val: ds_johoi.getColumn(0,"regnopatnm")}
  841. ]);
  842. var oParam = {};
  843. oParam.id = "TRLLC00102";
  844. oParam.service = "bcollmngtapp.BCollMngt";
  845. oParam.method = "reqGetLocateList";
  846. oParam.inds = "PatInfo=ds_send_data2";
  847. oParam.outds = "ds_temp_locatelist=locatelist";
  848. oParam.async = false;
  849. // oParam.callback = "cf_TRLLC00102";
  850. tranf_submit(oParam);
  851. var ekg = ds_temp_locatelist.getColumn(0,"ekg");
  852. var inject = ds_temp_locatelist.getColumn(0,"inject");
  853. var pat = ds_temp_locatelist.getColumn(0,"pat");
  854. var exam = ds_temp_locatelist.getColumn(0,"exam");
  855. var inpt = ds_temp_locatelist.getColumn(0,"inpt");
  856. var PopLocate = "";
  857. var InptLocate = "";
  858. if(ekg != "N"){
  859. PopLocate = PopLocate + ekg;
  860. }
  861. if(inject != "N"){
  862. if(utlf_isNull(PopLocate)){
  863. PopLocate = PopLocate + inject;
  864. }else{
  865. PopLocate = PopLocate + ", " + inject;
  866. }
  867. }
  868. if(pat != "N"){
  869. if(utlf_isNull(PopLocate)){
  870. PopLocate = PopLocate + pat;
  871. }else{
  872. PopLocate = PopLocate + ", " + pat;
  873. }
  874. }
  875. if(exam != "N"){
  876. if(utlf_isNull(PopLocate)){
  877. PopLocate = PopLocate + exam;
  878. }else{
  879. PopLocate = PopLocate + ", " + exam;
  880. }
  881. }
  882. if(inpt != "N"){
  883. InptLocate = inpt;
  884. }
  885. if(!utlf_isNull(PopLocate)){
  886. PopLocate = PopLocate + "\n처방이 있습니다.";
  887. group3.caption1.text = PopLocate;
  888. group3.caption1.visible = true;
  889. }
  890. if(!utlf_isNull(InptLocate)){
  891. InptLocate = InptLocate;
  892. group3.caption7.text = InptLocate;
  893. group3.caption7.visible = true;
  894. }
  895. }
  896. group3.group2.iptSearch.setFocus();
  897. }
  898. function SMLLC00100_onload(obj:Form, e:LoadEventInfo)
  899. {
  900. frmf_initForm(obj);
  901. //fBaseInfoRef("8001|0401|9990|0138|0139|");
  902. var mGroup = frmf_getMenuGroupCD();
  903. if (mGroup == "MG00430000") { //핵의학체외 그룹
  904. group1.lis_m.value = "1";
  905. }else{
  906. group1.lis_m.value = "0";
  907. }
  908. dsf_createDsRow("ds_temp_search"
  909. , [{col: "codeflag", val: "8001|0401|9990|0138|0139|"}]);
  910. // 서브밋호출
  911. var oParam = {};
  912. oParam.id = "TRLZZ00101";
  913. oParam.service = "diagtestapplib.DiagTestBaseInfoMngt";
  914. oParam.method = "reqGetInitCodeInfo";
  915. oParam.inds = "cond=ds_temp_search";
  916. oParam.outds = "ds_init_lb8001=8001 "
  917. +"ds_init_lb0401=0401 "
  918. +"ds_init_lb9990=9990 "
  919. +"ds_init_lb0138=0138 "
  920. +"ds_init_lb0139=0139 ";
  921. oParam.async = false;
  922. tranf_submit(oParam);
  923. ds_hidden.setColumn(0,"pflag", ds_init_lb9990.getColumn(0,"cd"));
  924. ds_johoi.setColumn(0,"xrwGBN" , "outbcoll");
  925. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","bcollbarcdprntcnt"),"size",0); // 바코드갯수
  926. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","reprntcnt"),"size",0); // 재출력범위
  927. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","tclscd"),"size",0); // 검사코드
  928. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","prcpdd"),"size",0); // 처방등록일
  929. //group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","barcdprntdt"),"size",0); // 바코드출력일시
  930. group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","prcpkindcd"),"size",0); // 구분
  931. group3.grd_BcollInfo.setCellProperty("head", 1, "displaytype","checkbox");
  932. group3.grd_BcollInfo.setCellProperty("head", 1, "edittype","checkbox");
  933. grdf_initGrid(group3.grd_BcollInfo);
  934. group3.import1.grp4.btn_chkn.visible = true; //전체선택해제 보이기
  935. lf_ChangeDonorYN();
  936. ds_johoi.setColumn(0,"ibftest", ds_init_lb0138.getColumn(0,"cd"));
  937. dsf_createDs("ds_data_setupinfo_genr");
  938. dsf_createDs("ds_data_setupinfo_genr_comm01");
  939. dsf_createDs("ds_data_setupinfo_genr_comm02");
  940. dsf_createDs("ds_data_setupinfo_genr_comm03");
  941. dsf_createDs("ds_data_setupinfo_genr_blank");
  942. dsf_createDs("ds_data_setupinfo_auto");
  943. dsf_createDs("ds_data_setupinfo_auto_comm01");
  944. dsf_createDs("ds_data_setupinfo_auto_comm02");
  945. dsf_createDs("ds_data_setupinfo_auto_comm03");
  946. dsf_createDs("ds_data_setupinfo_auto_blank");
  947. lf_SetBcollFlag();
  948. //lf_PrintSetChange();
  949. group3.group2.iptSearch.setFocus();
  950. }
  951. function group5_button26_onclick(obj:Button, e:ClickEventInfo)
  952. {
  953. var count = group3.import1.ds_barcdprntsetup.rowcount;
  954. if(count == 0) {
  955. group3.import1.ds_barcdprntsetup.addRow();
  956. }
  957. group3.import1.ds_barcdprntsetup_genr.clearData();
  958. group3.import1.ds_barcdprntsetup_auto.clearData();
  959. group3.import1.ds_barcdprntsetup_genr.copyData(group3.import1.ds_data_genr);
  960. group3.import1.ds_barcdprntsetup_auto.copyData(group3.import1.ds_data_auto);
  961. //
  962. var objArg = new Object();
  963. objArg.arg_sSetupInfo = group3.import1.ds_barcdprntsetup.getColumn(0,"prntsetupinfo");
  964. //trace("1111 :"+group3.import1.ds_barcdprntsetup.getColumn(0,"prntsetupinfo"));
  965. //objArg.arg_sCallBackFunction = "group3.import1.lf_convertXmlToDs";
  966. frmf_modal("SPLLC91000" ,"SPLLC91000",objArg, "","","","", "", "","","","", "M");
  967. if (!utlf_isNull(frmf_getParameter("SetupInfo"))) {
  968. group3.import1.ds_barcdprntsetup.setColumn(0,"prntsetupinfo",frmf_getParameter("SetupInfo"));
  969. group3.import1.ds_barcdprntsetup_genr.clearData();
  970. group3.import1.ds_barcdprntsetup_auto.clearData();
  971. var pParamObj = new Object();
  972. pParamObj.pathYN = "Y";
  973. pParamObj.nullColumnYN = "Y";
  974. lf_convertXmlToDs3(group3.import1.ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj);
  975. //lf_convertXmlToDs3(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj,"/auto");
  976. //lf_convertXmlToDs3(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj,"/genr");
  977. //group3.import1.ds_barcdprntsetup_genr.copyData(group3.import1.ds_data_genr);
  978. //group3.import1.ds_barcdprntsetup_auto.copyData(group3.import1.ds_data_auto);
  979. // var sXML1 = lf_getPrintSetupInfoXMLgenr();
  980. // var sXML2 = lf_getPrintSetupInfoXMLauto();
  981. //
  982. // //trace("sXML1 :"+sXML1);
  983. // //trace("sXML2 :"+sXML2);
  984. // ds_data_setupinfo_genr.addColumn("prntsetupinfo", "string");
  985. // ds_data_setupinfo_auto.addColumn("prntsetupinfo", "string");
  986. // ds_data_setupinfo_genr.setColumn(0,"prntsetupinfo",sXML1 );
  987. // ds_data_setupinfo_auto.setColumn(0,"prntsetupinfo",sXML2 );
  988. if ((!utlf_isNull(this.objects["ds_data_setupinfo_genr"])) && (ds_data_setupinfo_genr.rowcount > 0)) {
  989. var sXML1 = lf_getPrintSetupInfoXMLgenr();
  990. ds_data_setupinfo_genr.addColumn("prntsetupinfo", "string");
  991. ds_data_setupinfo_genr.setColumn(0,"prntsetupinfo",sXML1 );
  992. }
  993. if ((!utlf_isNull(this.objects["ds_data_setupinfo_auto"])) && (ds_data_setupinfo_auto.rowcount > 0)) {
  994. var sXML2 = lf_getPrintSetupInfoXMLauto();
  995. ds_data_setupinfo_auto.addColumn("prntsetupinfo", "string");
  996. ds_data_setupinfo_auto.setColumn(0,"prntsetupinfo",sXML2 );
  997. }
  998. lf_PrintSetChange();
  999. }
  1000. }
  1001. function cf_TRLLC00101(sSvcId, nErrorCode, sErrorMsg) {
  1002. if(nErrorCode < 0) return;
  1003. ds_grd_BcollInfo.addColumn("color","string");
  1004. ds_grd_BcollInfo.addColumn("testdeptcd","string");
  1005. ds_grd_BcollInfo.addColumn("testdeptflagcd","string");
  1006. ds_grd_BcollInfo.addColumn("testreqlnkno","string");
  1007. ds_grd_BcollInfo.updatecontrol = false;
  1008. for(var i=0;i<ds_grd_BcollInfo.rowcount;i++)
  1009. {
  1010. ds_grd_BcollInfo.setColumn(i,"testdeptcd","-");
  1011. ds_grd_BcollInfo.setColumn(i,"testdeptflagcd","-");
  1012. ds_grd_BcollInfo.setColumn(i,"testreqlnkno","0");
  1013. }
  1014. ds_grd_BcollInfo.updatecontrol = true;
  1015. }
  1016. function group3_group2_iptSearch_onkeydown(obj:Edit, e:KeyEventInfo)
  1017. {
  1018. obj.updateToDataset();
  1019. if(e.keycode == 13)
  1020. {
  1021. lf_GetOutBCollJoHoi();
  1022. group3.group2.ipt_hngnm.setFocus();
  1023. group3.group2.iptSearch.setFocus();
  1024. }
  1025. }
  1026. function SMLLC00100_ontimer(obj:Form, e:TimerEventInfo)
  1027. {
  1028. gTimerID++;
  1029. lf_DaeGiCnt()
  1030. }
  1031. function group5_button5_onclick(obj:Button, e:ClickEventInfo)
  1032. {
  1033. frmf_modal("SPLLC90300","SPLLC90300","","", "", "", "", "", "", "", "","", "M");
  1034. }
  1035. function group5_button8_onclick(obj:Button, e:ClickEventInfo)
  1036. {
  1037. if(utlf_isNull(group3.group2.iptSearch.value)){
  1038. frmf_setParameter ( "SMMMO02500_cond", appf_getPatientInfo("pid"));
  1039. }else{
  1040. frmf_setParameter ( "SMMMO02500_cond", ds_johoi.getColumn(0,"regnopatnm"));
  1041. }
  1042. frmf_modal("SMMMO02500", "SMMMO02500", "","", "", "", "", "", "", "", "","", "M");
  1043. }
  1044. function group5_button3_onclick(obj:Button, e:ClickEventInfo)
  1045. {
  1046. var objArg = new Object();
  1047. if(utlf_isNull(group3.group2.iptSearch.value)){
  1048. dsf_createDsRow("ds_hidden_ref",[{col: "searchtext", val: appf_getPatientInfo("pid")}
  1049. ]);
  1050. }else{
  1051. dsf_createDsRow("ds_hidden_ref",[{col: "searchtext", val:group3.group2.iptSearch.value}
  1052. ]);
  1053. }
  1054. objArg.arg_ds_hidden_ref = ds_hidden_ref;
  1055. frmf_modal("SPLLC90900","SPLLC90900",objArg,"","","","","","","","","","M");
  1056. }
  1057. function group5_button2_onclick(obj:Button, e:ClickEventInfo)
  1058. {
  1059. frmf_open("SPLBT90400","SPLBT90400","","", "", "", "", "", "", "", "","", "M");
  1060. }
  1061. function group5_checkbox5_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  1062. {
  1063. obj.updateToDataset();
  1064. lf_AutoRefYN();
  1065. }
  1066. function group5_group4_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  1067. {
  1068. lf_PrintSetChange();
  1069. }
  1070. function group3_grd_BcollInfo_oncellclick(obj:Grid, e:GridClickEventInfo)
  1071. {
  1072. lf_Click_grdBcollinfo();
  1073. }
  1074. function group5_group4_btn_bcoll_onclick(obj:Button, e:ClickEventInfo)
  1075. {
  1076. group3.import1.lf_exeBcoll();
  1077. group3.group2.iptSearch.setFocus();
  1078. //lf_GetOutBCollJoHoi();
  1079. }
  1080. function group5_group4_btn_cle_onclick(obj:Button, e:ClickEventInfo)
  1081. {
  1082. group3.import1.lf_initDetailForm();
  1083. group3.group2.iptSearch.setFocus();
  1084. lf_GetOutBCollJoHoi();
  1085. }
  1086. function group3_group2_combo3_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  1087. {
  1088. obj.updateToDataset();
  1089. lf_SetBcollFlag();
  1090. var pId = group3.group2.iptSearch.value;
  1091. if(!utlf_isNull(pId)){
  1092. lf_GetOutBCollJoHoi();
  1093. }
  1094. }
  1095. function ds_grd_BcollInfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1096. {
  1097. if(e.columnid == "chk")
  1098. {
  1099. obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"true":"false");
  1100. }
  1101. }
  1102. function group5_group6_button1_onclick(obj:Button, e:ClickEventInfo)
  1103. {
  1104. group3.import1.lf_lzzfBarCodeRePrinf();
  1105. group3.group2.iptSearch.setFocus();
  1106. }
  1107. function group5_group6_btn_bcollcan_onclick(obj:Button, e:ClickEventInfo)
  1108. {
  1109. group3.import1.lf_exeBcollCan("1");
  1110. group3.group2.iptSearch.setFocus();
  1111. lf_GetOutBCollJoHoi();
  1112. }
  1113. function group5_group6_btn_can2_onclick(obj:Button, e:ClickEventInfo)
  1114. {
  1115. group3.import1.lf_initDetailForm();
  1116. group3.group2.iptSearch.setFocus();
  1117. }
  1118. function group3_button4_onclick(obj:Button, e:ClickEventInfo)
  1119. {
  1120. if(sysf_getUserInfo("dutplceinstcd") == "031") {
  1121. fGetPatNmBarCdPrint();
  1122. }else{
  1123. fGetPatNmBarCdPrint_in();
  1124. }
  1125. group3.group2.iptSearch.setFocus();
  1126. }
  1127. /* @group : 환자명 바코드 출력 기능
  1128. * @ver : 2009.04.07
  1129. * @by : 김성희
  1130. * @-----------------------------------
  1131. * @type : function
  1132. * @access : public
  1133. * @desc : 환자명 바코드 출력
  1134. */
  1135. function fGetPatNmBarCdPrint(){
  1136. var pid = "";
  1137. var toppid = appf_getPatientInfo("pid");
  1138. //alert("바코드 분기1");
  1139. //top 정보가 없으면 조회조건에 입력한 환자번호
  1140. if(utlf_isNull(toppid)){
  1141. pid = ds_johoi.getColumn(0,"regnopatnm");
  1142. //top 정보가 있으면 탑정보의 환자번호
  1143. }else{
  1144. pid = toppid;
  1145. }
  1146. if(utlf_isNull(pid)){
  1147. sysf_messageBox("환자등록번호를 확인해주세요." , "I");
  1148. return;
  1149. }
  1150. if(!utlf_isNull(toppid) && toppid != ds_johoi.getColumn(0,"regnopatnm")){
  1151. sysf_messageBox("조건의 등록번호와 상단정보가 일치하지 않습니다." , "I");
  1152. return;
  1153. }
  1154. dsf_createDsRow("ds_temp_search"
  1155. , [{col: "pid", val: pid}
  1156. ]);
  1157. var oParam = {};
  1158. oParam.id = "TRLZZ90101";
  1159. oParam.service = "diagtestapplib.LisCommon";
  1160. oParam.method = "reqGetPatNmBarCdPrint";
  1161. oParam.inds = "cond=ds_temp_search";
  1162. oParam.outds = "group3.import1.ds_patNmBarCdPrint=printinfo";
  1163. oParam.async = false;
  1164. //oParam.callback = "cf_TRLZZ90101";
  1165. tranf_submit(oParam);
  1166. if(group3.import1.ds_patNmBarCdPrint.rowcount > 0){
  1167. var prtkind = group3.import1.ds_data_setupinfo.getColumn(0,"prntkind");
  1168. var portnm = group3.import1.ds_data_setupinfo.getColumn(0,"commkind");
  1169. group3.import1.ds_data_comm01.copyData(group3.import1.ds_data_setupinfo_comm01);
  1170. group3.import1.ds_data_comm02.copyData(group3.import1.ds_data_setupinfo_comm02);
  1171. group3.import1.ds_data_comm03.copyData(group3.import1.ds_data_setupinfo_comm03);
  1172. group3.import1.ds_data_blank.copyData(group3.import1.ds_data_setupinfo_blank);
  1173. //trace(group3.import1.ds_data_comm03.saveXML());
  1174. /* 이재옿 막다 2018.6월 18일
  1175. var mGroup = frmf_getMenuGroupCD();
  1176. if ( mGroup == "MG00430000" ) { //핵의학 바코드용
  1177. trace('핵의학 11111111111111');
  1178. lf_LisSpcBarcodePrint_test(ds_barcodeinfo,"", 0, 0, scrflag); //fLisSpcBarcodePrint(진검바코드인스턴스, 보관검체바코드갯수, 병리바코드갯수, 화면구분(병동,환자별일때 true))
  1179. // var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  1180. // //var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js 바코드프린터별 환경설정(Zebra,SATO)
  1181. //
  1182. //
  1183. //
  1184. // var objDOM = rptf_createDOM(); // DOM 객체 설정
  1185. // rptf_setNodeListToDOM(objDOM, "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint); // 데이터셋
  1186. //
  1187. // var objParam = new Object();
  1188. // objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  1189. //
  1190. // var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
  1191. //
  1192. // //var sOption = "copies=" + prncnt;
  1193. // var sOption = "";
  1194. //
  1195. // group3.import1.rptf_printRexNmbar("RPMNO00113", "", "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint,"", "", sOption);
  1196. }
  1197. */
  1198. if( (prtkind == "9" && portnm == "01") || (prtkind == "11" && portnm == "01") || prtkind == "10" || prtkind == "2" || prtkind == "6" || prtkind == "7" ){
  1199. group3.import1.lf_PatNmBarCdLabelSaTo(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
  1200. }else if(prtkind == "8"){
  1201. group3.import1.lf_PatNmBarCdLabel_B472(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
  1202. }else{
  1203. group3.import1.lf_PatNmBarCdLabel(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
  1204. }
  1205. }
  1206. }
  1207. function fGetPatNmBarCdPrint_in(){
  1208. var pid = "";
  1209. var toppid = appf_getPatientInfo("pid");
  1210. //alert("바코드 분기1");
  1211. //top 정보가 없으면 조회조건에 입력한 환자번호
  1212. if(utlf_isNull(toppid)){
  1213. pid = ds_johoi.getColumn(0,"regnopatnm");
  1214. //top 정보가 있으면 탑정보의 환자번호
  1215. }else{
  1216. pid = toppid;
  1217. }
  1218. if(utlf_isNull(pid)){
  1219. sysf_messageBox("환자등록번호를 확인해주세요." , "I");
  1220. return;
  1221. }
  1222. if(!utlf_isNull(toppid) && toppid != ds_johoi.getColumn(0,"regnopatnm")){
  1223. sysf_messageBox("조건의 등록번호와 상단정보가 일치하지 않습니다." , "I");
  1224. return;
  1225. }
  1226. dsf_createDsRow("ds_temp_search"
  1227. , [{col: "pid", val: pid}
  1228. ]);
  1229. var oParam = {};
  1230. oParam.id = "TRLZZ90101";
  1231. oParam.service = "diagtestapplib.LisCommon";
  1232. oParam.method = "reqGetPatNmBarCdPrint";
  1233. oParam.inds = "cond=ds_temp_search";
  1234. oParam.outds = "group3.import1.ds_patNmBarCdPrint=printinfo";
  1235. oParam.async = false;
  1236. //oParam.callback = "cf_TRLZZ90101";
  1237. tranf_submit(oParam);
  1238. if(group3.import1.ds_patNmBarCdPrint.rowcount > 0){
  1239. var prtkind = group3.import1.ds_data_setupinfo.getColumn(0,"prntkind");
  1240. group3.import1.ds_data_comm01.copyData(group3.import1.ds_data_setupinfo_comm01);
  1241. group3.import1.ds_data_comm02.copyData(group3.import1.ds_data_setupinfo_comm02);
  1242. group3.import1.ds_data_comm03.copyData(group3.import1.ds_data_setupinfo_comm03);
  1243. group3.import1.ds_data_blank.copyData(group3.import1.ds_data_setupinfo_blank);
  1244. //trace(group3.import1.ds_data_comm03.saveXML());
  1245. /* 이재옿 막다 2018.6월 18일
  1246. var mGroup = frmf_getMenuGroupCD();
  1247. if ( mGroup == "MG00430000" ) { //핵의학 바코드용
  1248. trace('핵의학 11111111111111');
  1249. lf_LisSpcBarcodePrint_test(ds_barcodeinfo,"", 0, 0, scrflag); //fLisSpcBarcodePrint(진검바코드인스턴스, 보관검체바코드갯수, 병리바코드갯수, 화면구분(병동,환자별일때 true))
  1250. // var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  1251. // //var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js 바코드프린터별 환경설정(Zebra,SATO)
  1252. //
  1253. //
  1254. //
  1255. // var objDOM = rptf_createDOM(); // DOM 객체 설정
  1256. // rptf_setNodeListToDOM(objDOM, "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint); // 데이터셋
  1257. //
  1258. // var objParam = new Object();
  1259. // objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  1260. //
  1261. // var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
  1262. //
  1263. // //var sOption = "copies=" + prncnt;
  1264. // var sOption = "";
  1265. //
  1266. // group3.import1.rptf_printRexNmbar("RPMNO00113", "", "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint,"", "", sOption);
  1267. }
  1268. */
  1269. if( prtkind == "2" || prtkind == "6" || prtkind == "7" ){
  1270. group3.import1.lf_PatNmBarCdLabelSaTo(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
  1271. }else if(prtkind == "8"){
  1272. group3.import1.lf_PatNmBarCdLabel_B472(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
  1273. }else{
  1274. group3.import1.lf_PatNmBarCdLabel(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
  1275. }
  1276. }
  1277. }
  1278. function group3_button9_onclick(obj:Button, e:ClickEventInfo)
  1279. {
  1280. fGetPatNmBarCdPrint_in();
  1281. group3.group2.iptSearch.setFocus();
  1282. }
  1283. function group3_button7_onclick(obj:Button, e:ClickEventInfo)
  1284. {
  1285. fPrintPatnm();
  1286. group3.group2.iptSearch.setFocus();
  1287. }
  1288. function fPrintPatnm(){
  1289. var pid = "";
  1290. var toppid = appf_getPatientInfo("pid");
  1291. //alert("바코드 분기1");
  1292. //top 정보가 없으면 조회조건에 입력한 환자번호
  1293. if(utlf_isNull(toppid)){
  1294. pid = ds_johoi.getColumn(0,"regnopatnm");
  1295. //top 정보가 있으면 탑정보의 환자번호
  1296. }else{
  1297. pid = toppid;
  1298. }
  1299. if(utlf_isNull(pid)){
  1300. sysf_messageBox("환자등록번호를 확인해주세요." , "I");
  1301. return;
  1302. }
  1303. if(!utlf_isNull(toppid) && toppid != ds_johoi.getColumn(0,"regnopatnm")){
  1304. sysf_messageBox("조건의 등록번호와 상단정보가 일치하지 않습니다." , "I");
  1305. return;
  1306. }
  1307. dsf_createDsRow("ds_temp_search"
  1308. , [{col: "pid", val: pid}
  1309. ]);
  1310. var oParam = {};
  1311. oParam.id = "TRLZZ90101";
  1312. oParam.service = "diagtestapplib.LisCommon";
  1313. oParam.method = "reqGetPatNmBarCdPrint";
  1314. oParam.inds = "cond=ds_temp_search";
  1315. oParam.outds = "group3.import1.ds_patNmBarCdPrint=printinfo";
  1316. oParam.async = false;
  1317. //oParam.callback = "cf_TRLZZ90101";
  1318. tranf_submit(oParam);
  1319. var orddd = group3.import1.ds_patNmBarCdPrint.getColumn(0,"printdt");
  1320. var orddday = orddd.substr(0,4) + orddd.substr(5,2) + orddd.substr(8,2);
  1321. var patnm = group3.import1.ds_patNmBarCdPrint.getColumn(0,"patnm");
  1322. var pid = group3.import1.ds_patNmBarCdPrint.getColumn(0,"pid");
  1323. var patsexage = group3.import1.ds_patNmBarCdPrint.getColumn(0,"patsexage");
  1324. dsf_createDsRow("ds_patname"
  1325. , [{col: "orddd", val: orddday}
  1326. , {col: "patnm", val: patnm}
  1327. , {col: "pid", val: pid}
  1328. , {col: "sexage", val: patsexage}
  1329. ]);
  1330. var objParam = new Object();
  1331. var objDOM = rptf_createDOM();
  1332. //rptf_setNodeListToDOM(objDOM, "/root/temp2/printdata/patname", group3.import1.ds_patNmBarCdPrint);
  1333. rptf_setNodeListToDOM(objDOM, "/root/temp2/printdata/patname", ds_patname);
  1334. objParam.xml_data_XML1 = objDOM.documentElement.source;
  1335. //trace(objParam.xml_data_XML1);
  1336. var option = "open=1;save=1;directprint=0;print=1;zoom=0";
  1337. rptf_exeReportPreview30(["RPMNO00111"], [objParam], option);
  1338. }
  1339. function group3_button61_onclick(obj:Button, e:ClickEventInfo)
  1340. {
  1341. ds_patinfolist.clearData();
  1342. ds_source.setColumn( 0, "srchcond", "3");
  1343. var objArg = new Object();
  1344. objArg.arg_ds_send = ds_source;
  1345. frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "1", "150", "150", "", "", "", "", "", "M");
  1346. //frmf_modal("SPPMC02500", "SPPMC02500", "_root_source"-"_root_send", "", "1", "150", "150", "", "", "", "", "", "M");
  1347. if (ds_patinfolist.rowcount > 0) {
  1348. var pid = ds_patinfolist.getColumn(0,"pid");
  1349. //trace('pid '+pid);
  1350. group3.group2.iptSearch.value = pid;
  1351. lf_GetOutBCollJoHoi();
  1352. }
  1353. }
  1354. function group1_Button00_onclick(obj:Button, e:ClickEventInfo)
  1355. {
  1356. // var sSetUpVal = ds_data_comm03.getColumn(0,"setupval");
  1357. // var sSndMsg = "";
  1358. // sSndMsg += "^^^P"; //환자정보 시작
  1359. // sSndMsg += 'test '+"^^^_S"; //채혈정보 종료
  1360. //
  1361. // lzzfMakeAutoBrcdPrntObj("AutoLabel"); //auto label
  1362. // trace('auto 9 print start= '+sSetUpVal +' / '+sSndMsg);
  1363. // var sReturnValue = AutoLabel.TRANSDATA(0, sSetUpVal, sSndMsg); //전송
  1364. // trace('auto 10 print end '+sReturnValue);
  1365. trace('aaa :'+frmf_getMenuGroupCD()+" / "+frmf_getPrestDeptCd());
  1366. }
  1367. /****************************************************************************************
  1368. * Argument : N/A
  1369. * Description : 저장.
  1370. ****************************************************************************************/
  1371. function lf_getPrintSetupInfoXMLgenr()
  1372. {
  1373. var sReplace, sValue;
  1374. var sXML = "<setupinfo></setupinfo>";
  1375. var nRow = ds_data_setupinfo_genr.rowposition;
  1376. var arrColID = ["prntkind", "commkind", "setupval02", "comm01", "comm02", "comm03", "blank", "rexgbn", "pcl"];
  1377. var arrComm02 = ["comm", "databit", "stopbit", "baudrate", "parity", "setupval02"];
  1378. var arrComm03 = ["setupval", "daegiip", "eqmtcd", "autoyn"]; //
  1379. var arrBlank = ["left", "top", "b472size"];
  1380. var arrPcllist = ["barnm", "xpos", "ypos", "prtnm"];
  1381. for(var i=0; i<arrColID.length; i++)
  1382. {
  1383. if(arrColID[i]=="prntkind"||arrColID[i]=="commkind"||arrColID[i]=="rexgbn")
  1384. {
  1385. sValue = ds_data_setupinfo_genr.getColumn(0, arrColID[i]);
  1386. if(utlf_isNull(sValue))
  1387. {
  1388. sReplace = "<"+arrColID[i]+"/></setupinfo>";
  1389. }
  1390. else
  1391. {
  1392. sReplace = "<"+arrColID[i]+">"+sValue+"</"+arrColID[i]+"></setupinfo>";
  1393. }
  1394. }
  1395. else if(arrColID[i]=="comm01")
  1396. {
  1397. sValue = ds_data_setupinfo_genr_comm01.getColumn(nRow, "setupval");
  1398. if(utlf_isNull(sValue))
  1399. {
  1400. sReplace = "<"+arrColID[i]+"/></setupinfo>";
  1401. }
  1402. else
  1403. {
  1404. sReplace = "<"+arrColID[i]+"><setupval>"+sValue+"</setupval></"+arrColID[i]+"></setupinfo>";
  1405. }
  1406. }
  1407. else if(arrColID[i]=="comm02")
  1408. {
  1409. sReplace = "";
  1410. for(var j=0; j < arrComm02.length; j++)
  1411. {
  1412. sValue = ds_data_setupinfo_genr_comm02.getColumn(nRow, arrComm02[j]);
  1413. if(utlf_isNull(sValue))
  1414. {
  1415. sReplace += "<"+arrComm02[j]+"/>";
  1416. }
  1417. else
  1418. {
  1419. sReplace += "<"+arrComm02[j]+">"+sValue+"</"+arrComm02[j]+">";
  1420. }
  1421. }
  1422. sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
  1423. }
  1424. else if(arrColID[i]=="comm03")
  1425. {
  1426. sReplace = "";
  1427. //sValue = ds_hidden_setupinfo_comm03.getColumn(nRow, "setupval");
  1428. for(var j=0; j < arrComm03.length; j++)
  1429. {
  1430. sValue = ds_data_setupinfo_genr_comm03.getColumn(nRow, arrComm03[j]);
  1431. if(utlf_isNull(sValue))
  1432. {
  1433. //sReplace = "<"+arrComm03[j]+"/></setupinfo>";
  1434. sReplace += "<"+arrComm03[j]+"/>";
  1435. }
  1436. else
  1437. {
  1438. sReplace += "<"+arrComm03[j]+">"+sValue+"</"+arrComm03[j]+">";
  1439. //sReplace = "<"+arrComm03[j]+"><setupval>"+sValue+"</setupval></"+arrComm03[j]+"></setupinfo>";
  1440. }
  1441. }
  1442. sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
  1443. }
  1444. else if(arrColID[i]=="blank")
  1445. {
  1446. sReplace = "";
  1447. for(var j=0; j<arrBlank.length; j++){
  1448. sValue = ds_data_setupinfo_genr_blank.getColumn(nRow, arrBlank[j]);
  1449. if(utlf_isNull(sValue)){
  1450. sReplace += "<"+arrBlank[j]+"/>";
  1451. }else{
  1452. sReplace += "<"+arrBlank[j]+">"+sValue+"</"+arrBlank[j]+">";
  1453. }
  1454. }
  1455. sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
  1456. }
  1457. sXML = sXML.replace("</setupinfo>", sReplace);
  1458. //trace(sXML);
  1459. }
  1460. return sXML;
  1461. }
  1462. function lf_getPrintSetupInfoXMLauto()
  1463. {
  1464. var sReplace, sValue;
  1465. var sXML = "<setupinfo></setupinfo>";
  1466. var nRow = ds_data_setupinfo_auto.rowposition;
  1467. var arrColID = ["prntkind", "commkind", "setupval", "comm01", "comm02", "comm03", "blank", "rexgbn", "pcl"];
  1468. var arrComm02 = ["comm", "databit", "stopbit", "baudrate", "parity", "setupval"];
  1469. var arrComm03 = ["setupval", "daegiip", "eqmtcd", "autoyn"]; //
  1470. var arrBlank = ["left", "top", "b472size"];
  1471. var arrPcllist = ["barnm", "xpos", "ypos", "prtnm"];
  1472. for(var i=0; i<arrColID.length; i++)
  1473. {
  1474. if(arrColID[i]=="prntkind"||arrColID[i]=="commkind"||arrColID[i]=="rexgbn")
  1475. {
  1476. sValue = ds_data_setupinfo_auto.getColumn(0, arrColID[i]);
  1477. if(utlf_isNull(sValue))
  1478. {
  1479. sReplace = "<"+arrColID[i]+"/></setupinfo>";
  1480. }
  1481. else
  1482. {
  1483. sReplace = "<"+arrColID[i]+">"+sValue+"</"+arrColID[i]+"></setupinfo>";
  1484. }
  1485. }
  1486. else if(arrColID[i]=="comm01")
  1487. {
  1488. sValue = ds_data_setupinfo_auto_comm01.getColumn(nRow, "setupval");
  1489. if(utlf_isNull(sValue))
  1490. {
  1491. sReplace = "<"+arrColID[i]+"/></setupinfo>";
  1492. }
  1493. else
  1494. {
  1495. sReplace = "<"+arrColID[i]+"><setupval>"+sValue+"</setupval></"+arrColID[i]+"></setupinfo>";
  1496. }
  1497. }
  1498. else if(arrColID[i]=="comm02")
  1499. {
  1500. sReplace = "";
  1501. for(var j=0; j < arrComm02.length; j++)
  1502. {
  1503. sValue = ds_data_setupinfo_auto_comm02.getColumn(nRow, arrComm02[j]);
  1504. if(utlf_isNull(sValue))
  1505. {
  1506. sReplace += "<"+arrComm02[j]+"/>";
  1507. }
  1508. else
  1509. {
  1510. sReplace += "<"+arrComm02[j]+">"+sValue+"</"+arrComm02[j]+">";
  1511. }
  1512. }
  1513. sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
  1514. }
  1515. else if(arrColID[i]=="comm03")
  1516. {
  1517. sReplace = "";
  1518. //sValue = ds_hidden_setupinfo_comm03.getColumn(nRow, "setupval");
  1519. for(var j=0; j < arrComm03.length; j++)
  1520. {
  1521. sValue = ds_data_setupinfo_auto_comm03.getColumn(nRow, arrComm03[j]);
  1522. if(utlf_isNull(sValue))
  1523. {
  1524. //sReplace = "<"+arrComm03[j]+"/></setupinfo>";
  1525. sReplace += "<"+arrComm03[j]+"/>";
  1526. }
  1527. else
  1528. {
  1529. sReplace += "<"+arrComm03[j]+">"+sValue+"</"+arrComm03[j]+">";
  1530. //sReplace = "<"+arrComm03[j]+"><setupval>"+sValue+"</setupval></"+arrComm03[j]+"></setupinfo>";
  1531. }
  1532. }
  1533. sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
  1534. }
  1535. else if(arrColID[i]=="blank")
  1536. {
  1537. sReplace = "";
  1538. for(var j=0; j<arrBlank.length; j++){
  1539. sValue = ds_data_setupinfo_auto_blank.getColumn(nRow, arrBlank[j]);
  1540. if(utlf_isNull(sValue)){
  1541. sReplace += "<"+arrBlank[j]+"/>";
  1542. }else{
  1543. sReplace += "<"+arrBlank[j]+">"+sValue+"</"+arrBlank[j]+">";
  1544. }
  1545. }
  1546. sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
  1547. }
  1548. sXML = sXML.replace("</setupinfo>", sReplace);
  1549. //trace(sXML);
  1550. }
  1551. return sXML;
  1552. }
  1553. /****************************************************************************************
  1554. * Function : fCheckedBindPid
  1555. * Description : 환자번호 합번여부 체크
  1556. * Argument : pPid - 환자번호
  1557. * return type : String sResult
  1558. * Creator :
  1559. ****************************************************************************************/
  1560. function fCheckedBindPid(pPid){
  1561. var sResult = "";
  1562. if(!utlf_isNull(pPid)){
  1563. /*TRMRC00509에 사용할 환자번호 설정*/
  1564. dsf_createDsRow("ds_temp_TRMRC00510", [{col:"pid", type:"string", size:256, val:pPid}] ,"true");
  1565. dsf_createDs("ds_temp_rtn", [{col:"pid" , type:"string" , size:256}
  1566. ,{col:"hngnm" , type:"string" , size:256}
  1567. ,{col:"bindpid", type:"string" , size:256}
  1568. ], "true");
  1569. var oParam = {};
  1570. oParam.id = "TRMRC00510";
  1571. oParam.service = "chrtmngtapp.BaseInfoMngt";
  1572. oParam.method = "reqGetDblNoPidList";
  1573. oParam.inds = "item=ds_temp_TRMRC00510";
  1574. oParam.outds = "ds_temp_rtn=item";
  1575. oParam.async = false;
  1576. // oParam.callback = "";
  1577. tranf_submit(oParam);
  1578. if(ds_temp_rtn.rowcount > 0) {
  1579. var sBindPid = ds_temp_rtn.getColumn(0,"bindpid");
  1580. if(sBindPid != "-" && !utlf_isNull(sBindPid) && sBindPid != " "){
  1581. var sHngnm = ds_temp_rtn.getColumn(0,"hngnm");
  1582. var messageValue = sysf_messageBox(pPid + "(" + sHngnm + ") 환자의 등록번호가 [ " + sBindPid + " ] 로 합번 되었습니다. 합번된 등록번호를 사용 하시겠습니까?", "Q999", "");
  1583. if(messageValue == "6"){
  1584. sResult = sBindPid;
  1585. } else {
  1586. sResult = pPid;
  1587. }
  1588. } else {
  1589. sResult = pPid;
  1590. }
  1591. } else {
  1592. sResult = pPid;
  1593. }
  1594. dsf_deleteDs("ds_temp_TRMRC00510");
  1595. dsf_deleteDs("ds_temp_rtn");
  1596. } else {
  1597. sResult = pPid;
  1598. }
  1599. return sResult;
  1600. }
  1601. function group3_group2_btn_reftext_onclick(obj:Button, e:ClickEventInfo)
  1602. {
  1603. lf_GetOutBCollJoHoi();
  1604. group3.group2.ipt_hngnm.setFocus();
  1605. group3.group2.iptSearch.setFocus();
  1606. }
  1607. ]]></Script>
  1608. </Form>
  1609. </FDL>