12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SMLLC00100" position="absolute 0 0 1203 805" titletext="외래채혈관리" onload="SMLLC00100_onload" scrollbars="none" ontimer="SMLLC00100_ontimer">
- <Layouts>
- <Layout>
- <Div position="absolute 0 0 1194 25" id="group1">
- <Layouts>
- <Layout>
- <Static text="외래채혈" position="absolute 0 0 98 25" id="caption6" class="tit_1"/>
- <CheckBox id="lis_m" taborder="1" text="핵의학바코드테스트용" position="absolute 133 4 271 24" falsevalue="0" truevalue="1" visible="false"/>
- </Layout>
- </Layouts>
- </Div>
- <Div position="absolute 0 40 1204 802" id="group3" scrollbars="none">
- <Layouts>
- <Layout>
- <Div position="absolute 324 17 1200 751" id="import1" enable="true" visible="true" url="SSLLC80100_채혈검사처방상세.xfdl" scrollbars="none" anchor="default" asyncmode="false"/>
- <Static text="채혈정보" position="absolute 0 228 72 245" align="align:center middle;" id="caption3" class="tit_2" anchor="default"/>
- <Shape position="absolute -1 245 320 251" linetype="horizontal" id="line1" class="line_10" anchor="default"/>
- <Div position="absolute 1 19 315 104" id="group2" anchor="default" class="div_SA2">
- <Layouts>
- <Layout>
- <Static text="등록번호 :" position="absolute 15 32 89 49" align="align:center middle;" id="caption4" class="search_name" anchor="default"/>
- <Combo position="absolute 105 8 305 27" id="combo3" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group3_group2_combo3_onitemchanged">
- <Dataset id="innerdataset">
- <ColumnInfo>
- <Column id="codecolumn"/>
- <Column id="datacolumn"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="codecolumn">0</Col>
- <Col id="datacolumn">전체조회</Col>
- </Row>
- <Row>
- <Col id="codecolumn">1</Col>
- <Col id="datacolumn">미채혈</Col>
- </Row>
- <Row>
- <Col id="codecolumn">2</Col>
- <Col id="datacolumn">채혈</Col>
- </Row>
- </Rows>
- </Dataset>
- </Combo>
- <Static text="채혈구분 :" position="absolute 15 9 93 26" align="align:center middle;" id="caption5" class="search_name" anchor="default"/>
- <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"/>
- <Edit readonly="true" position="absolute 201 32 286 51" id="ipt_hngnm" anchor="default"/>
- <Static text="도착시간등록 :" position="absolute 15 58 116 75" align="align:center middle;" id="caption2" class="search_name" anchor="default"/>
- <MaskEdit position="absolute 130 57 230 76" id="iptArv" mask="9999-99-99 99:99:99" anchor="default"/>
- <Button id="btn_reftext" taborder="2" position="absolute 182 34 198 49" onclick="group3_group2_btn_reftext_onclick" anchor="default"/>
- </Layout>
- </Layouts>
- </Div>
- <Grid position="absolute 0 250 320 720" id="grd_BcollInfo" binddataset="ds_grd_BcollInfo" anchor="default" oncellclick="group3_grd_BcollInfo_oncellclick">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="28"/>
- <Column size="22"/>
- <Column size="60"/>
- <Column size="80"/>
- <Column size="70"/>
- <Column size="70"/>
- <Column size="70"/>
- <Column size="76"/>
- <Column size="100"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell/>
- <Cell col="1"/>
- <Cell col="2" text="처방일자"/>
- <Cell col="3" text="Donor 명"/>
- <Cell col="4" text="진료과"/>
- <Cell col="5" text="검사희망일"/>
- <Cell col="6" text="채혈일"/>
- <Cell col="7" text="진료예약일"/>
- <Cell col="8" text="등록번호"/>
- <Cell col="9" text="testdeptcd"/>
- <Cell col="10" text="testdeptflagcd"/>
- <Cell col="11" text="tnsyn"/>
- </Band>
- <Band id="body">
- <Cell celltype="head" text="expr:currow + 1"/>
- <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk" expr="(chk == 'true' || chk == '1')?1:0"/>
- <Cell col="2" style="color:EXPR(!utlf_isNull(color)?color:"");color2:EXPR(!utlf_isNull(color)?color:"");" text="bind:prcpdd"/>
- <Cell col="3" text="bind:hngnm"/>
- <Cell col="4" text="bind:orddeptnm"/>
- <Cell col="5" displaytype="date" edittype="date" style="color:EXPR(!utlf_isNull(color)?color:"");color2:EXPR(!utlf_isNull(color)?color:"");" text="bind:prcphopedd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
- <Cell col="6" displaytype="date" text="bind:barcdprntdt" calendardisplaynulltype="nulltext"/>
- <Cell col="7" displaytype="date" text="bind:ordrsrvdt" calendardisplaynulltype="nulltext"/>
- <Cell col="8" text="bind:pid"/>
- <Cell col="9" text="bind:testdeptcd"/>
- <Cell col="10" text="bind:testdeptflagcd"/>
- <Cell col="11" text="bind:tnsyn"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <CheckBox position="absolute 235 76 311 96" id="checkbox1" anchor="default" text="응급채혈" truevalue="1" falsevalue="0"/>
- <Button position="absolute 288 52 304 68" id="button61" class="icon_search" text="" anchor="default" onclick="group3_button61_onclick"/>
- <CheckBox position="absolute 81 228 151 243" id="checkbox4" text="통합표시" truevalue="1" falsevalue="0" anchor="default"/>
- <Button position="absolute 235 723 321 742" id="button4" class="btn5" visible="true" text="환자명바코드" anchor="default" onclick="group3_button4_onclick"/>
- <Static position="absolute 465 265 721 335" align="align:center middle;" id="caption1" visible="false" style="background:#ffff99ff;" anchor="default"/>
- <Static position="absolute 465 335 721 405" align="align:center middle;" id="caption7" visible="false" style="background:#ccffffff;" anchor="default"/>
- <Grid position="absolute 51 106 315 222" id="datagrid2" binddataset="ds_ordrsrvinfo" anchor="default" autofittype="col">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="30"/>
- <Column size="200"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell text="번호"/>
- <Cell col="1" text="예약일"/>
- </Band>
- <Band id="body">
- <Cell text="bind:cd"/>
- <Cell col="1" text="bind:nm"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <Static text="진료" position="absolute 2 107 47 123" align="align:center middle;" id="caption8" class="tit_2" wordwrap="none" anchor="default"/>
- <Static text="예약" position="absolute 21 125 51 138" align="align:center middle;" id="caption9" style="font:돋움체,9,bold;" anchor="default"/>
- <Static text="정보" position="absolute 21 140 51 153" align="align:center middle;" id="caption10" style="font:돋움체,9,bold;" anchor="default"/>
- <Button position="absolute 110 723 215 742" id="button7" class="btn5" visible="true" text="이름표출력" anchor="default" onclick="group3_button7_onclick"/>
- <Button position="absolute 0 723 103 742" id="button9" class="btn5" visible="true" text="환자명 프린터" anchor="default" onclick="group3_button9_onclick"/>
- </Layout>
- </Layouts>
- </Div>
- <Div position="absolute 0 25 1202 57" id="group5" scrollbars="autoboth" class="div_SA">
- <Layouts>
- <Layout>
- <Div position="absolute 828 4 1198 29" id="group4" style="background:transparent;" anchor="default">
- <Layouts>
- <Layout width="370" height="25">
- <Button position="absolute 301 1 369 23" id="btn_cle" class="btn4" text="초기화" anchor="default" onclick="group5_group4_btn_cle_onclick"/>
- <Button position="absolute 241 1 297 23" id="btn_bcoll" class="btn4" text="채혈" anchor="default" onclick="group5_group4_btn_bcoll_onclick"/>
- </Layout>
- </Layouts>
- </Div>
- <Div position="absolute 827 1 1197 26" id="group6" anchor="default">
- <Layouts>
- <Layout>
- <Button position="absolute 231 3 299 25" id="button1" class="btn4" text="재출력" anchor="default" onclick="group5_group6_button1_onclick"/>
- <Button position="absolute 148 3 228 25" id="btn_bcollcan" class="btn4" text="채혈취소" anchor="default" onclick="group5_group6_btn_bcollcan_onclick"/>
- <Button position="absolute 301 3 369 25" id="btn_can2" class="btn4" text="초기화" anchor="default" onclick="group5_group6_btn_can2_onclick"/>
- </Layout>
- </Layouts>
- </Div>
- <Button position="absolute 1 5 93 27" id="button26" class="btn3" text="프린터설정" onclick="group5_button26_onclick" anchor="default"/>
- <Button position="absolute 96 5 200 27" id="button5" class="btn3" text="채취일시등록" anchor="default" onclick="group5_button5_onclick"/>
- <Button position="absolute 203 5 283 27" id="button8" class="btn3" text="이력조회" anchor="default" onclick="group5_button8_onclick"/>
- <Button position="absolute 390 5 467 27" id="button2" class="btn3" text="수혈처방" anchor="default" onclick="group5_button2_onclick"/>
- <Button position="absolute 285 5 389 27" id="button3" class="btn3" text="전환검체변경" anchor="default" onclick="group5_button3_onclick"/>
- <CheckBox position="absolute 475 6 590 26" id="checkbox5" anchor="default" text="자동대기건수조회" onchanged="group5_checkbox5_onchanged"/>
- <Radio id="radio1" taborder="1" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="group5_group4_radio1_onitemchanged" position="absolute 807 6 971 24">
- <Dataset id="innerdataset">
- <ColumnInfo>
- <Column id="codecolumn" size="256"/>
- <Column id="datacolumn" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="codecolumn">1</Col>
- <Col id="datacolumn">일반</Col>
- </Row>
- <Row>
- <Col id="codecolumn">3</Col>
- <Col id="datacolumn">Auto Label</Col>
- </Row>
- </Rows>
- </Dataset>
- </Radio>
- <CheckBox id="checkbox1" taborder="2" text="기본조회(3년)" value="1" truevalue="1" falsevalue="0" onclick="group3_checkbox1_onclick" position="absolute 627 7 736 27"/>
- </Layout>
- </Layouts>
- </Div>
- <Grid position="absolute 595 0 817 50" align="align:center middle;" id="datagrid1" visible="false" binddataset="ds_datagrid1">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="55"/>
- <Column size="55"/>
- <Column size="55"/>
- <Column size="55"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell text="A"/>
- <Cell col="1" text="B"/>
- <Cell col="2" text="C"/>
- <Cell col="3" text="D"/>
- </Band>
- <Band id="body">
- <Cell text="bind:jangbi0"/>
- <Cell col="1" text="bind:jangbi1"/>
- <Cell col="2" text="bind:jangbi2"/>
- <Cell col="3" text="bind:jangbi3"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_init_cmb_prestr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="nm" type="STRING"/>
- <Column id="cd" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_datagrid1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_datagrid1_oncolumnchanged">
- <ColumnInfo>
- <Column id="jangbi0" type="STRING"/>
- <Column id="jangbi1" type="STRING"/>
- <Column id="jangbi2" type="STRING"/>
- <Column id="jangbi3" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <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">
- <ColumnInfo>
- <Column id="chk" type="STRING" size="256"/>
- <Column id="prcpdd" type="STRING" size="256"/>
- <Column id="orddeptnm" type="STRING" size="256"/>
- <Column id="execdeptnm" type="STRING" size="256"/>
- <Column id="ordrsrvdt" type="STRING" size="256"/>
- <Column id="pid" type="STRING" size="256"/>
- <Column id="prcphopedd" type="STRING" size="256"/>
- <Column id="barcdprntdt" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="chk"/>
- <Col id="prcpdd"/>
- <Col id="orddeptnm"/>
- <Col id="execdeptnm"/>
- <Col id="ordrsrvdt"/>
- <Col id="pid"/>
- <Col id="prcphopedd"/>
- <Col id="barcdprntdt"/>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_ordrsrvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="check" type="STRING" size="256" sumtext="체크"/>
- <Column id="chk" type="STRING" size="256" sumtext="체크"/>
- <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
- <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
- <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
- <Column id="execdeptcd" type="STRING" size="256" sumtext="시행부서코드"/>
- <Column id="execdeptnm" type="STRING" size="256" sumtext="시행부서"/>
- <Column id="ordrsrvdt" type="STRING" size="256" sumtext="진료예약일"/>
- <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
- <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
- <Column id="wardnm" type="STRING" size="256" sumtext="병동"/>
- <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
- <Column id="roomnm" type="STRING" size="256" sumtext="병실"/>
- <Column id="prcphopedt" type="STRING" size="256" sumtext="희망일시"/>
- <Column id="prcphopedd" type="STRING" size="256" sumtext="희망일자"/>
- <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
- <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방구분"/>
- <Column id="prcpstatcd" type="STRING" size="256" sumtext="채혈상태"/>
- <Column id="wardroom" type="STRING" size="256" sumtext="병동/병실"/>
- <Column id="orddrid" type="STRING" size="256" sumtext="진료의id"/>
- <Column id="orddrnm" type="STRING" size="256" sumtext="진료의"/>
- <Column id="testdeptcd" type="STRING" size="256" sumtext="검사과코드"/>
- <Column id="testdeptflagcd" type="STRING" size="256" sumtext="검사과구분코드"/>
- <Column id="rgstdt" type="STRING" size="256" sumtext="처방등록일시"/>
- <Column id="barcdprntdt" type="STRING" size="256" sumtext="바코드출력일"/>
- <Column id="tnsyn" type="STRING" size="256" sumtext="수혈처방여부(보관검체바코드출력용)"/>
- <Column id="atdoctid" type="STRING" size="256" sumtext="주치의"/>
- <Column id="dnorno" type="STRING" size="256" sumtext="공여자번호"/>
- <Column id="testreqlnkno" type="STRING" size="256" sumtext="검사의뢰지번호"/>
- <Column id="state" type="STRING" size="256"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="cancelyn" type="STRING" size="256"/>
- <Column id="pflag" type="STRING" size="256"/>
- <Column id="autoref" type="STRING" size="256"/>
- <Column id="prcprcptyn" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="cancelyn">1</Col>
- <Col id="pflag">3</Col>
- <Col id="autoref"/>
- <Col id="prcprcptyn"/>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_johoi" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="refflag" type="STRING" size="256"/>
- <Column id="regnopatnm" type="STRING" size="256"/>
- <Column id="bcollflag" type="STRING" size="256"/>
- <Column id="bizflag" type="STRING" size="256"/>
- <Column id="pid" type="STRING" size="256"/>
- <Column id="hdisp" type="STRING" size="256"/>
- <Column id="prcpgenrflag" type="STRING" size="256"/>
- <Column id="xrwGBN" type="STRING" size="256"/>
- <Column id="erflag" type="STRING" size="256"/>
- <Column id="arvtime" type="STRING" size="256"/>
- <Column id="orddeptcd" type="STRING" size="256"/>
- <Column id="bcollflag1" type="STRING" size="256"/>
- <Column id="ibftest" type="STRING" size="256"/>
- <Column id="donorbcoll" type="STRING" size="256"/>
- <Column id="prcpkindcd" type="STRING" size="256"/>
- <Column id="roundkind" type="STRING" size="256"/>
- <Column id="testdeptcd" type="STRING" size="256"/>
- <Column id="testdeptflagcd" type="STRING" size="256"/>
- <Column id="atdoctid" type="STRING" size="256"/>
- <Column id="ibftestp" type="STRING" size="256"/>
- <Column id="baseflag" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="refflag">1</Col>
- <Col id="regnopatnm"/>
- <Col id="bcollflag">1</Col>
- <Col id="bizflag">Out</Col>
- <Col id="pid"/>
- <Col id="hdisp"/>
- <Col id="prcpgenrflag"/>
- <Col id="xrwGBN"/>
- <Col id="erflag"/>
- <Col id="arvtime"/>
- <Col id="orddeptcd"/>
- <Col id="bcollflag1">1</Col>
- <Col id="ibftest"/>
- <Col id="donorbcoll"/>
- <Col id="prcpkindcd">-</Col>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_tnsprcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="tnsprcpyn" type="STRING" size="256"/>
- <Column id="bftnsprcpyn" type="STRING" size="256"/>
- <Column id="today" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="tnsprcpyn"/>
- <Col id="bftnsprcpyn"/>
- <Col id="today"/>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_hngnminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="hngnm" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row/>
- </Rows>
- </Dataset>
- <Dataset id="ds_jaewoninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_bloodinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_bbcoll" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_spccdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="tclscd" type="STRING" size="256"/>
- <Column id="tclsnm" type="STRING" size="256"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_lb8001" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="cd" type="STRING"/>
- <Column id="nm" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_lb0401" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="cd" type="STRING"/>
- <Column id="nm" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_lb9990" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="cd" type="STRING"/>
- <Column id="nm" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_lb0138" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="cd" type="STRING"/>
- <Column id="nm" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_lb0139" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="cd" type="STRING"/>
- <Column id="nm" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_temp_locatelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_sflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="regnopatnm" type="STRING"/>
- <Column id="testdeptcd" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_source" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="srchcond" type="STRING" size="256"/>
- <Column id="pid" type="STRING" size="256"/>
- <Column id="hngnm" type="STRING" size="256"/>
- <Column id="rrgstno1" type="STRING" size="256"/>
- <Column id="rrgstno2" type="STRING" size="256"/>
- <Column id="autoflag" type="STRING" size="256"/>
- <Column id="checkfnexam" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="srchcond"/>
- <Col id="pid"/>
- <Col id="hngnm"/>
- <Col id="rrgstno1"/>
- <Col id="rrgstno2"/>
- <Col id="autoflag"/>
- <Col id="checkfnexam"/>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- </Objects>
- <Bind>
- <BindItem id="item0" compid="group3.group2.combo3" propid="value" datasetid="ds_johoi" columnid="bcollflag"/>
- <BindItem id="item1" compid="group3.group2.iptSearch" propid="value" datasetid="ds_johoi" columnid="regnopatnm"/>
- <BindItem id="item4" compid="group5.checkbox5" propid="value" datasetid="ds_hidden" columnid="autoref"/>
- <BindItem id="item5" compid="group3.group2.ipt_hngnm" propid="value" datasetid="ds_hngnminfo" columnid="hngnm"/>
- <BindItem id="item6" compid="group3.group2.iptArv" propid="value" datasetid="ds_johoi" columnid="arvtime"/>
- <BindItem id="item7" compid="group3.checkbox1" propid="value" datasetid="ds_johoi" columnid="erflag"/>
- <BindItem id="item8" compid="group3.checkbox4" propid="value" datasetid="ds_johoi" columnid="hdisp"/>
- <BindItem id="item2" compid="group5.radio1" propid="value" datasetid="ds_hidden" columnid="pflag"/>
- <BindItem id="item3" compid="group5.checkbox1" propid="value" datasetid="ds_johoi" columnid="baseflag"/>
- </Bind>
- <Script type="xscript4.0"><![CDATA[/***************************************************************************************
- * System Name :
- * Job Name :
- * Creator :
- * Make Date : 2015-10-27
- * Description :
- *---------------------------------------------------------------------------------------
- * Modify Date Modifier Modify Description
- *---------------------------------------------------------------------------------------
- * 2015-10-27 Live Converter TF->XP
- *
- *---------------------------------------------------------------------------------------
- ****************************************************************************************/
- include "com_commonxp::comm_main.xjs";
- include "com_commodulexp::SSZFM00901.xjs";
- include "lis_commonxp::LLZ001.xjs";
- include "lis_commonxp::LZZ001.xjs";
- include "lis_commonxp::LZZ002.xjs";
- include "lis_commonxp::LPZ001.xjs";
- include "pam_pamcomnxp::PAM.xjs";
- var gTimerID = 0;
- var lfcancelYN = 1;
- var gMsg = 'N';
-
- //리스트 클릭
- function lf_GetTclscdList(row){
-
-
- group3.import1.grp4.btn_chky.visible = false; //전체선택 숨기기
- group3.import1.grp4.btn_chkn.visible = true; //전체선택해제 보이기
-
- if(ds_johoi.getColumn(0,"hdisp") != "1"){ //통합표시 아닐때.
- ds_johoi.setColumn(0,"pid",ds_grd_BcollInfo.getColumn(row,"pid"));
- ds_johoi.setColumn(0,"prcpgenrflag",ds_grd_BcollInfo.getColumn(row,"prcpgenrflag"));
- ds_johoi.setColumn(0,"orddeptcd",ds_grd_BcollInfo.getColumn(row,"orddeptcd"));
- dsf_copyColInfo(ds_send_data1,ds_grd_BcollInfo);
- ds_send_data1.addRow();
- ds_send_data1.copyRow(0,ds_grd_BcollInfo,row);
- dsf_copyDs(ds_send_data2,ds_johoi,"replace");
-
- }
- else{ //통합표시일 경우.
- if(ds_johoi.getColumn(0,"bcollflag1") == "1") { //희망일시인 경우.
- var prcphopedtList = "";
- var orddeptcdList = "";
- var orddridList = "";
- var prcpddList = "";
-
- if(ds_grd_BcollInfo.rowcount > 0) {
- var fRow = ds_grd_BcollInfo.findRow("chk","true");
-
- if(fRow < 0) return;
-
- prcphopedtList = "'" + ds_grd_BcollInfo.getColumn(fRow,"prcphopedd") + "'";
- orddeptcdList = "'" + ds_grd_BcollInfo.getColumn(fRow,"orddeptcd") + "'";
- orddridList = "'" + ds_grd_BcollInfo.getColumn(fRow,"orddrid") + "'";
- prcpddList = "'" + ds_grd_BcollInfo.getColumn(fRow,"prcpdd") + "'";
-
- for(iRow = fRow + 1; iRow < ds_grd_BcollInfo.rowcount;iRow++){
- if(ds_grd_BcollInfo.getColumn(iRow,"chk") == "true"){
-
- prcphopedtList = prcphopedtList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"prcphopedd") + "'";
- orddeptcdList = orddeptcdList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"orddeptcd") + "'";
- orddridList = orddridList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"orddrid") + "'";
- prcpddList = prcpddList + "," + "'" + ds_grd_BcollInfo.getColumn(iRow,"prcpdd") + "'";
-
- }
- }
- dsf_copyColInfo(ds_send_data1,ds_grd_BcollInfo);
- ds_send_data1.addRow();
- ds_send_data1.copyRow(0,ds_grd_BcollInfo,fRow);
- dsf_copyDs(ds_send_data2,ds_johoi,"replace");
- dsf_makeValue(ds_send_data1,"prcpdd","string",prcphopedtList);
- dsf_makeValue(ds_send_data1,"orddeptcd","string",orddeptcdList);
- dsf_makeValue(ds_send_data1,"orddrid","string",orddridList);
- dsf_makeValue(ds_send_data1,"prcpdd2","string",prcpddList); // prcpdd는 이미 쓰이고 있어서 prcpdd2 로... 왜 희망일시를 prcpdd로 셋하는지 모르겠음.
-
- }
- }
- }
-
-
- // alert(model.getValue("/root/main/TestInfo/bfcontrol/bfcontrolyn"));
- // 이재오 추가 2013
-
-
- group3.import1.ds_bfcontrol.clearData(); //HbA1c 보험 인정 기준조회 clear 2.0 전환추가
-
- dsf_makeValue(ds_send_data2,"testdeptcd","string","-");
- dsf_makeValue(ds_send_data2,"testdeptflagcd","string","-");
- var oParam = {};
- oParam.id = "TRLLC00102";
- oParam.service = "bcollmngtapp.BCollMngt";
- oParam.method = "reqGetTestList";
- oParam.inds = "BCollRefData=ds_send_data2 PatInfo=ds_send_data1";
- oParam.outds = "group3.import1.ds_grd_TestInfoCnts=testlist group3.import1.ds_TestspcfInfo=patinfo group3.import1.ds_roundinfo=roundinfo group3.import1.ds_bfcontrol=bfcontrol";
- oParam.async = false;
- oParam.error = false;
- //oParam.callback = "cf_TRLLC00102";
- tranf_submit(oParam);
-
-
- group3.import1.ds_grd_TestInfoCnts.updatecontrol = false;
- for( var i=0; i<group3.import1.ds_grd_TestInfoCnts.rowcount;i++)
- {
- group3.import1.ds_grd_TestInfoCnts.setColumn(i,"reprntcnt",1);
- group3.import1.ds_grd_TestInfoCnts.setColumn(i,"testdeptcd","-");
- group3.import1.ds_grd_TestInfoCnts.setColumn(i,"testdeptflagcd","-");
-
- }
- group3.import1.ds_grd_TestInfoCnts.updatecontrol = true;
- //=============================================================
- //2013 10. 30일 주의사항 관리 이재오 추가
- //=============================================================
-
- var ordList = group3.import1.ds_grd_TestInfoCnts.getColumn(0,"tclscd") ; ;
- if(group3.import1.ds_grd_TestInfoCnts.rowcount > 0) {
- // alert(grd_TestInfoCnts.rows);
- for(iRow = 0; iRow < group3.import1.ds_grd_TestInfoCnts.rowcount ;iRow++){
- ordList = ordList + "','" + group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"tclscd") ;
- }
-
-
- //model.makeValue("/root/send/data1/tclscdlist","'" + ordList + "'");
-
- dsf_createDsRow("ds_send_tclscdlist"
- , [{col: "tclscdlist", val: ordList}
- ]);
-
- var oParam = {};
- oParam.id = "TRLLC90904";
- oParam.service = "bcollmngtapp.BCollMngt";
- oParam.method = "reqGetSpccdList2";
- oParam.inds = "cond=ds_send_tclscdlist";
- oParam.outds = "ds_spccdlist=getSpccdList";
- oParam.async = false;
- //oParam.callback = "cf_TRLLC90904";
- tranf_submit(oParam);
-
-
- var count = ds_spccdlist.rowcount;
- if(count > 0){
- for(i=0; i< count; i++){
- var tclscd = ds_spccdlist.getColumn(i,"tclscd");
- var tclscdnm = ds_spccdlist.getColumn(i,"tclsnm");
- if(ds_johoi.getColumn(0,"bcollflag") == "1") { //미채혈 일때
- if (!utlf_isNull(tclscd)){
- sysf_messageBox("주의! " + tclscd + " : " + tclscdnm, "I007");
- }
- }
- }
- }
-
- ds_spccdlist.clearData();
- }
-
- //=============================================================
- //2012 08. 30일 사전체크 이재오 추가
- //=============================================================
- if(group3.import1.ds_bfcontrol.getColumn(0,"bfcontrolyn") == "Y") {
- sysf_messageBox("최근 90일 이내에 실시된 검사가 있습니다. HbA1c는 3~4개월에 1회만 보험인정됩니다", "I007");
- }
-
- //=============================================================
- //2014 07. 31일 수가변경에 따른 검사오더 검증 사전체크 이재오 추가
- //=============================================================
-
- iMaxRowCnt = group3.import1.ds_grd_TestInfoCnts.rowcount;
- //iMaxRowCnt = 1;//한번만 체크하게 2.0 추가
-
- if( ds_johoi.getColumn(0,"bcollflag") == "1" && iMaxRowCnt > 0 ) {
- for(iRow = 0; iRow < iMaxRowCnt ;iRow++){
- //if (gMsg = 'N') {
- var pid = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"pid") ;
- var prcpdd = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"prcpdd") ;
- //var cretno = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"cretno") ;
- var orddd = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"orddd") ;
- var execprcpuniqno = group3.import1.ds_grd_TestInfoCnts.getColumn(iRow,"execprcpuniqno") ;
-
- var cnt = getPrcpRcptCheck("LIS", pid, orddd, "", prcpdd, execprcpuniqno); //자격조회 메세지
- // trace(' cnt =='+iRow+' / '+cnt+' / '+gMsg+' / '+prcpdd);
- if ( cnt > 0 ) {
- iRow = iMaxRowCnt + 1;
- break;
-
- }
- }
- }
-
- group3.import1.lf_gridReMake();
- }
- function lf_PrintSetChange() {
- if(group5.radio1.value == "1") {
- if ((utlf_isNull(group3.import1.objects["ds_data_setupinfo_genr"])) || (group3.import1.ds_data_setupinfo_genr.rowcount == 0)) {
- sysf_messageBox("일반프린터 설정이 되어 있지 않습니다. 일반프린터 설정을", "I008");
- return;
- }
- group3.import1.ds_barcdprntsetup.copyData(group3.import1.ds_data_setupinfo_genr);
- group3.import1.ds_data_setupinfo.copyData(group3.import1.ds_data_setupinfo_genr);
-
- }else if(group5.radio1.value == "3") {
-
- if ((utlf_isNull(group3.import1.objects["ds_data_setupinfo_auto"])) || (group3.import1.ds_data_setupinfo_auto.rowcount == 0)) {
- sysf_messageBox("Auto프린터 설정이 되어 있지 않습니다. Auto프린터 설정을", "I008");
- return;
- }
- group3.import1.ds_barcdprntsetup.copyData(group3.import1.ds_data_setupinfo_auto);
- group3.import1.ds_data_setupinfo.copyData(group3.import1.ds_data_setupinfo_auto);
- }
-
- }
- function cf_TRLLC00103(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
- }
- function lf_GetBBcoll(row) {
- if(ds_johoi.getColumn(0,"bcollflag") == "1") {
-
- dsf_createDsRow("ds_send"
- , [{col: "pid", val: ds_grd_BcollInfo.getColumn(row,"pid")}]);
-
- var oParam = {};
- oParam.id = "TRLLC00103";
- oParam.service = "bcollmngtapp.BCollMngt";
- oParam.method = "reqGetBBcoll";
- oParam.inds = "cond=ds_send";
- oParam.outds = "ds_bbcoll=bbcoll";
- oParam.async = false;
- oParam.callback = "cf_TRLLC00103";
- tranf_submit(oParam);
-
- if(ds_bbcoll.rowcount > 0) {
- sysf_messageBox("오늘 채혈한 항목이 있습니다.", "I");
- }
-
- if(ds_grd_BcollInfo.getColumn(row,"prcphopedd") == ds_tnsprcpinfo.getColumn(0,"today"))
- {
- if(sysf_getUserInfo("dutplceinstcd") == "031") {
- ds_johoi.setColumn(0,"erflag", "1");
- }
- }
- }
- }
-
- function lf_Click_grdBcollinfo (flag){
-
- if(flag == "1"){
- if(ds_grd_BcollInfo.rowcount > 0) {
- ds_grd_BcollInfo.rowposition = 0;
- lf_GetBBcoll(0);
- lf_GetTclscdList(0);
- lf_GetPopupLocate(0);
-
- }else{
- //채혈정보 존재하지 않으면 탑정보 초기화.
- //delPatientInfos(); //미채혈 화면에서 환자 바코드 출력후 환자의 검사 정보가 바로 채혈화면으로
- //활성화 되지 않고 다음번 행위부터 활성화요청 바람.( 화면이 사라지지 않게 바람
- //라는 요구사항(상단 탑정보 초기화 하지 않길 원함 변경요청 10763 20100211수정
- lf_GetPopupLocate(0);
- return;
- }
- }
- else{
- var row = ds_grd_BcollInfo.rowposition;
-
- if(row >= 0){
- lf_GetBBcoll(row)
- lf_GetTclscdList(row);
- lf_GetPopupLocate(0);
- }
-
- }
-
- }
-
- function cf_TRLLC00101(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
- }
-
- function lf_GetOutBCollJoHoi()
- {
- group3.caption1.visible = false;
- group3.caption7.visible = false;
- if(utlf_isNull(ds_johoi.getColumn(0,"regnopatnm"))){
- sysf_messageBox("등록번호를","C001","") ;
- return;
- }
- appf_delPatientInfos(); //새로운 등록번호 치면 상단정보 초기화
- group3.import1.lf_initDetailForm();
- var gbn = ds_johoi.getColumn(0,"refflag");
-
- // 이재오 추가 2017.2.21 일 합번 추가
- var pid = utlf_trim(group3.group2.iptSearch.text);
-
- var current_pid = fCheckedBindPid(pid);
- //trace('aaaa :'+ pid +' / '+current_pid);
- ds_johoi.setColumn(0,"regnopatnm", current_pid);
- // 이재오 추가 2017.2.21 일 합번 추가
-
- ds_johoi.setColumn(0,"regnopatnm", utlf_transNullToEmpty(ds_johoi.getColumn(0,"regnopatnm")).getTrim());
- var oParam = {};
- oParam.id = "TRLLC00101";
- oParam.service = "bcollmngtapp.BCollMngt";
- oParam.method = "reqGetBCollPatList";
- oParam.inds = "BCollRefData=ds_johoi";
- oParam.outds = "ds_grd_BcollInfo=bcolllist ds_ordrsrvinfo=ordrsrvinfo ds_tnsprcpinfo=tnsprcpinfo ds_hngnminfo=hngnminfo ds_jaewoninfo=jaewoninfo ds_bloodinfo=bloodinfo";
- oParam.async = false;
- oParam.callback = "cf_TRLLC00101";
- tranf_submit(oParam);
- ds_grd_BcollInfo.updatecontrol = false;
- dsf_setFixVal(ds_grd_BcollInfo, "testdeptcd:-,testdeptflagcd:-,testreqlnkno:0");
- ds_grd_BcollInfo.updatecontrol = true;
-
- //=============================================================
- //2012 08. 30일 입원유무체크 이재오 추가
- //=============================================================
- if(ds_jaewoninfo.getColumn(0,"jaewon") == "Y") {
- sysf_messageBox("입원중인 환자입니다. 확인하세요", "I");
- }
- //=============================================================
-
- //=============================================================
- //2012 08. 30일 입원유무체크 이재오 추가
- //=============================================================
- if(ds_bloodinfo.getColumn(0,"bloodchk") == "Y") {
- sysf_messageBox("사혈 또는 자가채혈이 존재하는 환자입니다. 확인하세요", "I");
- }
- //=============================================================
- //=============================================================
- //외래 수혈 처방 존재 여부 메시지 - 2009.04.02 김성희 추가
- //=============================================================
- if(ds_tnsprcpinfo.getColumn(0,"tnsprcpyn") == "Y") {
- sysf_messageBox("수혈처방이", "I010");
- }else if(ds_tnsprcpinfo.getColumn(0,"tnsprcpyn") == "N" && ds_tnsprcpinfo.getColumn(0,"bftnsprcpyn") == "Y") {
- sysf_messageBox("한달 이내에 수혈 내역이", "I010");
- }
-
- //진료예약정보 기본선택
- //group3.cmb_prestr.index = 0;
- lf_Click_grdBcollinfo("1"); //자격조회
-
- //========================================================================
- //2009.07.01 고시변경에 의한 본인부담 요율변경 대상 환자
- //원무 수납 재정산 안내 메시지 및 메시지 출력 여부 (2009.06.30 김성희 추가)
- //========================================================================
- lf_getPrcpRcptInfo(sysf_getUserInfo("dutplceinstcd")
- , utlf_transNullToEmpty(ds_johoi.getColumn(0,"regnopatnm")).getTrim()
- , ds_init_lb8001.getColumn(0,"cd")
- , "1");
- // 당일검사시 검사희망일 및 처방일 색깔 빨강색으로 둔다
- if(ds_grd_BcollInfo.rowcount > 0) {
- for(iRow = 0; iRow < ds_grd_BcollInfo.rowcount;iRow++)
- {
- if(ds_grd_BcollInfo.getColumn(iRow,"prcphopedd") == ds_tnsprcpinfo.getColumn(0,"today"))
- {
- ds_grd_BcollInfo.setColumn(iRow,"color", "#ff3300");
-
- }
- }
-
- }
-
- }
-
- // 채혈구분 선택시 버튼영역 변경
- function lf_SetBcollFlag(){
- group3.import1.lf_initDetailForm();
-
- if(ds_johoi.getColumn(0,"bcollflag")=="1"){
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","bcno"),"size",0); // 바코드번호
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","canceldesc"),"size",0); // 취소사유
- group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","barcdprntdt"),"size",0); // 바코드출력일
- group3.checkbox4.visible = true;
- }else{
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","bcno"),"size",85); // 바코드번호
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","canceldesc"),"size",100); // 취소사유
- group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","barcdprntdt"),"size",80); // 바코드출력일
- group3.checkbox4.visible = false;
- ds_johoi.setColumn(0,"hdisp", "");
- }
-
- if(ds_johoi.getColumn(0,"bcollflag")=="1"){
- group5.group4.visible = true;
- group5.group6.visible = false;
- }else if(ds_johoi.getColumn(0,"bcollflag")=="2"){
- group5.group4.visible = false;
- group5.group6.visible = true;
- }else{
- group5.group4.visible = false;
- group5.group6.visible = false;
- }
- }
- function lf_ChangeDonorYN(row) {
- if(ds_johoi.getColumn(0,"donorbcoll") == "Y") { //donor채혈이면 공여자명 보임
- group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","hngnm"),"size",80);
- } else {
- group3.grd_BcollInfo.setFormatColProperty(group3.grd_BcollInfo.getBindCellIndex("body","hngnm"),"size",0);
- }
-
-
- }
- function lf_DaeGiCnt() {
- ds_johoi.setColumn(0,"regnopatnm", group3.group2.iptSearch.value);
- ds_datagrid1.clearData();
-
- var sSetUpVal = group3.import1.ds_data_comm03.getColumn(0,"daegiip");
-
- var sReturn = AutoLabel.WAITDATA(0, sSetUpVal);
-
- if(!utlf_isNull(sReturn)) { //오류가 나지 않았다면.
- var vJangBi = sReturn.split("^");
- for(i = 0; i < vJangBi.length-1; i++) {
- var vDaegi = vJangBi[i].split("|");
- ds_datagrid1.addRow();
- ds_datagrid1.setColumn(i,"jangbi" + i, vDaegi[2]);
- }
- }
-
- }
-
- function lf_AutoRefYN() {
- if(ds_hidden.getColumn(0,"autoref") == "Y") {
- lf_DaeGiCnt();
-
- lf_Timer();
- } else {
-
- if (!utlf_isNull(gTimerID))
- {
- //window.clearInterval(gTimerID);
- gTimerID = 0;
- this.killTimer(0);
- }
-
- }
-
-
- }
- function lf_Timer(){
- //gTimerID = window.setInterval( "fDaeGiCnt()", 5 * 1000 ); //5초 마다 대기인수 바뀜.
- this.setTimer(0,5 * 1000);
- }
- function lf_GetPopupLocate(row){
-
-
- group3.caption1.visible = false;
- group3.caption7.visible = false;
-
- var tempdd = "";
-
- if(ds_init_lb0401.rowcount > 0){
-
- var prcpdd = ds_init_lb0401.getColumn(row,"prcphopedd");
-
- if(utlf_isNull(prcpdd)){
-
- var toDay = utlf_getCurrentDate();
- tempdd = toDay;
-
- }else{
-
- tempdd = prcpdd;
- }
-
- dsf_createDsRow("ds_send_data2"
- , [{col: "prcpdd", val: tempdd}
- ,{col: "pid", val: ds_johoi.getColumn(0,"regnopatnm")}
- ]);
-
- var oParam = {};
- oParam.id = "TRLLC00102";
- oParam.service = "bcollmngtapp.BCollMngt";
- oParam.method = "reqGetLocateList";
- oParam.inds = "PatInfo=ds_send_data2";
- oParam.outds = "ds_temp_locatelist=locatelist";
- oParam.async = false;
- // oParam.callback = "cf_TRLLC00102";
- tranf_submit(oParam);
-
- var ekg = ds_temp_locatelist.getColumn(0,"ekg");
- var inject = ds_temp_locatelist.getColumn(0,"inject");
- var pat = ds_temp_locatelist.getColumn(0,"pat");
- var exam = ds_temp_locatelist.getColumn(0,"exam");
- var inpt = ds_temp_locatelist.getColumn(0,"inpt");
-
- var PopLocate = "";
- var InptLocate = "";
-
-
- if(ekg != "N"){
- PopLocate = PopLocate + ekg;
- }
- if(inject != "N"){
- if(utlf_isNull(PopLocate)){
- PopLocate = PopLocate + inject;
- }else{
- PopLocate = PopLocate + ", " + inject;
- }
- }
- if(pat != "N"){
- if(utlf_isNull(PopLocate)){
- PopLocate = PopLocate + pat;
- }else{
- PopLocate = PopLocate + ", " + pat;
- }
-
- }
- if(exam != "N"){
- if(utlf_isNull(PopLocate)){
- PopLocate = PopLocate + exam;
- }else{
- PopLocate = PopLocate + ", " + exam;
- }
- }
- if(inpt != "N"){
-
- InptLocate = inpt;
-
- }
-
-
- if(!utlf_isNull(PopLocate)){
- PopLocate = PopLocate + "\n처방이 있습니다.";
- group3.caption1.text = PopLocate;
- group3.caption1.visible = true;
-
- }
- if(!utlf_isNull(InptLocate)){
- InptLocate = InptLocate;
- group3.caption7.text = InptLocate;
- group3.caption7.visible = true;
-
- }
- }
- group3.group2.iptSearch.setFocus();
- }
- function SMLLC00100_onload(obj:Form, e:LoadEventInfo)
- {
- frmf_initForm(obj);
- //fBaseInfoRef("8001|0401|9990|0138|0139|");
- var mGroup = frmf_getMenuGroupCD();
-
- if (mGroup == "MG00430000") { //핵의학체외 그룹
- group1.lis_m.value = "1";
- }else{
- group1.lis_m.value = "0";
- }
-
- dsf_createDsRow("ds_temp_search"
- , [{col: "codeflag", val: "8001|0401|9990|0138|0139|"}]);
-
- // 서브밋호출
- var oParam = {};
- oParam.id = "TRLZZ00101";
- oParam.service = "diagtestapplib.DiagTestBaseInfoMngt";
- oParam.method = "reqGetInitCodeInfo";
- oParam.inds = "cond=ds_temp_search";
- oParam.outds = "ds_init_lb8001=8001 "
- +"ds_init_lb0401=0401 "
- +"ds_init_lb9990=9990 "
- +"ds_init_lb0138=0138 "
- +"ds_init_lb0139=0139 ";
- oParam.async = false;
-
- tranf_submit(oParam);
-
- ds_hidden.setColumn(0,"pflag", ds_init_lb9990.getColumn(0,"cd"));
- ds_johoi.setColumn(0,"xrwGBN" , "outbcoll");
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","bcollbarcdprntcnt"),"size",0); // 바코드갯수
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","reprntcnt"),"size",0); // 재출력범위
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","tclscd"),"size",0); // 검사코드
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","prcpdd"),"size",0); // 처방등록일
- //group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","barcdprntdt"),"size",0); // 바코드출력일시
- group3.import1.grp4.grd_TestInfoCnts.setFormatColProperty(group3.import1.grp4.grd_TestInfoCnts.getBindCellIndex("body","prcpkindcd"),"size",0); // 구분
-
-
-
-
- group3.grd_BcollInfo.setCellProperty("head", 1, "displaytype","checkbox");
- group3.grd_BcollInfo.setCellProperty("head", 1, "edittype","checkbox");
- grdf_initGrid(group3.grd_BcollInfo);
- group3.import1.grp4.btn_chkn.visible = true; //전체선택해제 보이기
- lf_ChangeDonorYN();
-
- ds_johoi.setColumn(0,"ibftest", ds_init_lb0138.getColumn(0,"cd"));
-
-
- dsf_createDs("ds_data_setupinfo_genr");
- dsf_createDs("ds_data_setupinfo_genr_comm01");
- dsf_createDs("ds_data_setupinfo_genr_comm02");
- dsf_createDs("ds_data_setupinfo_genr_comm03");
- dsf_createDs("ds_data_setupinfo_genr_blank");
-
- dsf_createDs("ds_data_setupinfo_auto");
- dsf_createDs("ds_data_setupinfo_auto_comm01");
- dsf_createDs("ds_data_setupinfo_auto_comm02");
- dsf_createDs("ds_data_setupinfo_auto_comm03");
- dsf_createDs("ds_data_setupinfo_auto_blank");
-
- lf_SetBcollFlag();
-
- //lf_PrintSetChange();
- group3.group2.iptSearch.setFocus();
- }
- function group5_button26_onclick(obj:Button, e:ClickEventInfo)
- {
- var count = group3.import1.ds_barcdprntsetup.rowcount;
-
- if(count == 0) {
- group3.import1.ds_barcdprntsetup.addRow();
- }
- group3.import1.ds_barcdprntsetup_genr.clearData();
- group3.import1.ds_barcdprntsetup_auto.clearData();
- group3.import1.ds_barcdprntsetup_genr.copyData(group3.import1.ds_data_genr);
- group3.import1.ds_barcdprntsetup_auto.copyData(group3.import1.ds_data_auto);
- //
- var objArg = new Object();
- objArg.arg_sSetupInfo = group3.import1.ds_barcdprntsetup.getColumn(0,"prntsetupinfo");
-
- //trace("1111 :"+group3.import1.ds_barcdprntsetup.getColumn(0,"prntsetupinfo"));
- //objArg.arg_sCallBackFunction = "group3.import1.lf_convertXmlToDs";
-
- frmf_modal("SPLLC91000" ,"SPLLC91000",objArg, "","","","", "", "","","","", "M");
-
- if (!utlf_isNull(frmf_getParameter("SetupInfo"))) {
- group3.import1.ds_barcdprntsetup.setColumn(0,"prntsetupinfo",frmf_getParameter("SetupInfo"));
- group3.import1.ds_barcdprntsetup_genr.clearData();
- group3.import1.ds_barcdprntsetup_auto.clearData();
-
- var pParamObj = new Object();
- pParamObj.pathYN = "Y";
- pParamObj.nullColumnYN = "Y";
- lf_convertXmlToDs3(group3.import1.ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj);
-
- //lf_convertXmlToDs3(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj,"/auto");
- //lf_convertXmlToDs3(ds_barcdprntsetup.getColumn(0,"prntsetupinfo"),pParamObj,"/genr");
-
- //group3.import1.ds_barcdprntsetup_genr.copyData(group3.import1.ds_data_genr);
- //group3.import1.ds_barcdprntsetup_auto.copyData(group3.import1.ds_data_auto);
-
- // var sXML1 = lf_getPrintSetupInfoXMLgenr();
- // var sXML2 = lf_getPrintSetupInfoXMLauto();
- //
- // //trace("sXML1 :"+sXML1);
- // //trace("sXML2 :"+sXML2);
- // ds_data_setupinfo_genr.addColumn("prntsetupinfo", "string");
- // ds_data_setupinfo_auto.addColumn("prntsetupinfo", "string");
- // ds_data_setupinfo_genr.setColumn(0,"prntsetupinfo",sXML1 );
- // ds_data_setupinfo_auto.setColumn(0,"prntsetupinfo",sXML2 );
-
-
- if ((!utlf_isNull(this.objects["ds_data_setupinfo_genr"])) && (ds_data_setupinfo_genr.rowcount > 0)) {
- var sXML1 = lf_getPrintSetupInfoXMLgenr();
- ds_data_setupinfo_genr.addColumn("prntsetupinfo", "string");
- ds_data_setupinfo_genr.setColumn(0,"prntsetupinfo",sXML1 );
- }
- if ((!utlf_isNull(this.objects["ds_data_setupinfo_auto"])) && (ds_data_setupinfo_auto.rowcount > 0)) {
- var sXML2 = lf_getPrintSetupInfoXMLauto();
- ds_data_setupinfo_auto.addColumn("prntsetupinfo", "string");
- ds_data_setupinfo_auto.setColumn(0,"prntsetupinfo",sXML2 );
- }
-
-
- lf_PrintSetChange();
- }
-
- }
- function cf_TRLLC00101(sSvcId, nErrorCode, sErrorMsg) {
- if(nErrorCode < 0) return;
- ds_grd_BcollInfo.addColumn("color","string");
- ds_grd_BcollInfo.addColumn("testdeptcd","string");
- ds_grd_BcollInfo.addColumn("testdeptflagcd","string");
- ds_grd_BcollInfo.addColumn("testreqlnkno","string");
-
-
-
- ds_grd_BcollInfo.updatecontrol = false;
- for(var i=0;i<ds_grd_BcollInfo.rowcount;i++)
- {
- ds_grd_BcollInfo.setColumn(i,"testdeptcd","-");
- ds_grd_BcollInfo.setColumn(i,"testdeptflagcd","-");
- ds_grd_BcollInfo.setColumn(i,"testreqlnkno","0");
-
- }
- ds_grd_BcollInfo.updatecontrol = true;
- }
- function group3_group2_iptSearch_onkeydown(obj:Edit, e:KeyEventInfo)
- {
-
- obj.updateToDataset();
- if(e.keycode == 13)
- {
- lf_GetOutBCollJoHoi();
- group3.group2.ipt_hngnm.setFocus();
- group3.group2.iptSearch.setFocus();
- }
- }
- function SMLLC00100_ontimer(obj:Form, e:TimerEventInfo)
- {
- gTimerID++;
- lf_DaeGiCnt()
- }
- function group5_button5_onclick(obj:Button, e:ClickEventInfo)
- {
- frmf_modal("SPLLC90300","SPLLC90300","","", "", "", "", "", "", "", "","", "M");
- }
- function group5_button8_onclick(obj:Button, e:ClickEventInfo)
- {
- if(utlf_isNull(group3.group2.iptSearch.value)){
- frmf_setParameter ( "SMMMO02500_cond", appf_getPatientInfo("pid"));
-
-
- }else{
- frmf_setParameter ( "SMMMO02500_cond", ds_johoi.getColumn(0,"regnopatnm"));
-
- }
- frmf_modal("SMMMO02500", "SMMMO02500", "","", "", "", "", "", "", "", "","", "M");
- }
- function group5_button3_onclick(obj:Button, e:ClickEventInfo)
- {
-
- var objArg = new Object();
- if(utlf_isNull(group3.group2.iptSearch.value)){
- dsf_createDsRow("ds_hidden_ref",[{col: "searchtext", val: appf_getPatientInfo("pid")}
- ]);
- }else{
- dsf_createDsRow("ds_hidden_ref",[{col: "searchtext", val:group3.group2.iptSearch.value}
- ]);
-
- }
- objArg.arg_ds_hidden_ref = ds_hidden_ref;
-
- frmf_modal("SPLLC90900","SPLLC90900",objArg,"","","","","","","","","","M");
- }
- function group5_button2_onclick(obj:Button, e:ClickEventInfo)
- {
- frmf_open("SPLBT90400","SPLBT90400","","", "", "", "", "", "", "", "","", "M");
- }
- function group5_checkbox5_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
- {
- obj.updateToDataset();
-
- lf_AutoRefYN();
- }
- function group5_group4_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
- {
- lf_PrintSetChange();
- }
- function group3_grd_BcollInfo_oncellclick(obj:Grid, e:GridClickEventInfo)
- {
- lf_Click_grdBcollinfo();
- }
- function group5_group4_btn_bcoll_onclick(obj:Button, e:ClickEventInfo)
- {
- group3.import1.lf_exeBcoll();
- group3.group2.iptSearch.setFocus();
- //lf_GetOutBCollJoHoi();
-
- }
- function group5_group4_btn_cle_onclick(obj:Button, e:ClickEventInfo)
- {
- group3.import1.lf_initDetailForm();
- group3.group2.iptSearch.setFocus();
- lf_GetOutBCollJoHoi();
- }
- function group3_group2_combo3_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
- {
- obj.updateToDataset();
- lf_SetBcollFlag();
- var pId = group3.group2.iptSearch.value;
-
- if(!utlf_isNull(pId)){
- lf_GetOutBCollJoHoi();
- }
- }
- function ds_grd_BcollInfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
- {
- if(e.columnid == "chk")
- {
- obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"true":"false");
- }
- }
- function group5_group6_button1_onclick(obj:Button, e:ClickEventInfo)
- {
- group3.import1.lf_lzzfBarCodeRePrinf();
- group3.group2.iptSearch.setFocus();
-
- }
- function group5_group6_btn_bcollcan_onclick(obj:Button, e:ClickEventInfo)
- {
- group3.import1.lf_exeBcollCan("1");
- group3.group2.iptSearch.setFocus();
- lf_GetOutBCollJoHoi();
-
- }
- function group5_group6_btn_can2_onclick(obj:Button, e:ClickEventInfo)
- {
- group3.import1.lf_initDetailForm();
- group3.group2.iptSearch.setFocus();
- }
- function group3_button4_onclick(obj:Button, e:ClickEventInfo)
- {
- if(sysf_getUserInfo("dutplceinstcd") == "031") {
- fGetPatNmBarCdPrint();
- }else{
- fGetPatNmBarCdPrint_in();
- }
- group3.group2.iptSearch.setFocus();
- }
- /* @group : 환자명 바코드 출력 기능
- * @ver : 2009.04.07
- * @by : 김성희
- * @-----------------------------------
- * @type : function
- * @access : public
- * @desc : 환자명 바코드 출력
- */
- function fGetPatNmBarCdPrint(){
- var pid = "";
- var toppid = appf_getPatientInfo("pid");
- //alert("바코드 분기1");
- //top 정보가 없으면 조회조건에 입력한 환자번호
- if(utlf_isNull(toppid)){
- pid = ds_johoi.getColumn(0,"regnopatnm");
- //top 정보가 있으면 탑정보의 환자번호
- }else{
- pid = toppid;
- }
-
- if(utlf_isNull(pid)){
- sysf_messageBox("환자등록번호를 확인해주세요." , "I");
- return;
- }
-
- if(!utlf_isNull(toppid) && toppid != ds_johoi.getColumn(0,"regnopatnm")){
- sysf_messageBox("조건의 등록번호와 상단정보가 일치하지 않습니다." , "I");
- return;
- }
- dsf_createDsRow("ds_temp_search"
- , [{col: "pid", val: pid}
- ]);
-
- var oParam = {};
- oParam.id = "TRLZZ90101";
- oParam.service = "diagtestapplib.LisCommon";
- oParam.method = "reqGetPatNmBarCdPrint";
- oParam.inds = "cond=ds_temp_search";
- oParam.outds = "group3.import1.ds_patNmBarCdPrint=printinfo";
- oParam.async = false;
- //oParam.callback = "cf_TRLZZ90101";
- tranf_submit(oParam);
- if(group3.import1.ds_patNmBarCdPrint.rowcount > 0){
- var prtkind = group3.import1.ds_data_setupinfo.getColumn(0,"prntkind");
- var portnm = group3.import1.ds_data_setupinfo.getColumn(0,"commkind");
-
- group3.import1.ds_data_comm01.copyData(group3.import1.ds_data_setupinfo_comm01);
- group3.import1.ds_data_comm02.copyData(group3.import1.ds_data_setupinfo_comm02);
- group3.import1.ds_data_comm03.copyData(group3.import1.ds_data_setupinfo_comm03);
- group3.import1.ds_data_blank.copyData(group3.import1.ds_data_setupinfo_blank);
-
- //trace(group3.import1.ds_data_comm03.saveXML());
-
- /* 이재옿 막다 2018.6월 18일
- var mGroup = frmf_getMenuGroupCD();
-
-
- if ( mGroup == "MG00430000" ) { //핵의학 바코드용
- trace('핵의학 11111111111111');
- lf_LisSpcBarcodePrint_test(ds_barcodeinfo,"", 0, 0, scrflag); //fLisSpcBarcodePrint(진검바코드인스턴스, 보관검체바코드갯수, 병리바코드갯수, 화면구분(병동,환자별일때 true))
-
-
- // var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
- // //var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js 바코드프린터별 환경설정(Zebra,SATO)
- //
- //
- //
- // var objDOM = rptf_createDOM(); // DOM 객체 설정
- // rptf_setNodeListToDOM(objDOM, "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint); // 데이터셋
- //
- // var objParam = new Object();
- // objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
- //
- // var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
- //
- // //var sOption = "copies=" + prncnt;
- // var sOption = "";
- //
- // group3.import1.rptf_printRexNmbar("RPMNO00113", "", "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint,"", "", sOption);
- }
- */
- if( (prtkind == "9" && portnm == "01") || (prtkind == "11" && portnm == "01") || prtkind == "10" || prtkind == "2" || prtkind == "6" || prtkind == "7" ){
- group3.import1.lf_PatNmBarCdLabelSaTo(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
- }else if(prtkind == "8"){
- group3.import1.lf_PatNmBarCdLabel_B472(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
- }else{
- group3.import1.lf_PatNmBarCdLabel(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
- }
- }
-
- }
- function fGetPatNmBarCdPrint_in(){
- var pid = "";
- var toppid = appf_getPatientInfo("pid");
- //alert("바코드 분기1");
- //top 정보가 없으면 조회조건에 입력한 환자번호
- if(utlf_isNull(toppid)){
- pid = ds_johoi.getColumn(0,"regnopatnm");
- //top 정보가 있으면 탑정보의 환자번호
- }else{
- pid = toppid;
- }
-
- if(utlf_isNull(pid)){
- sysf_messageBox("환자등록번호를 확인해주세요." , "I");
- return;
- }
-
- if(!utlf_isNull(toppid) && toppid != ds_johoi.getColumn(0,"regnopatnm")){
- sysf_messageBox("조건의 등록번호와 상단정보가 일치하지 않습니다." , "I");
- return;
- }
- dsf_createDsRow("ds_temp_search"
- , [{col: "pid", val: pid}
- ]);
-
- var oParam = {};
- oParam.id = "TRLZZ90101";
- oParam.service = "diagtestapplib.LisCommon";
- oParam.method = "reqGetPatNmBarCdPrint";
- oParam.inds = "cond=ds_temp_search";
- oParam.outds = "group3.import1.ds_patNmBarCdPrint=printinfo";
- oParam.async = false;
- //oParam.callback = "cf_TRLZZ90101";
- tranf_submit(oParam);
- if(group3.import1.ds_patNmBarCdPrint.rowcount > 0){
- var prtkind = group3.import1.ds_data_setupinfo.getColumn(0,"prntkind");
- group3.import1.ds_data_comm01.copyData(group3.import1.ds_data_setupinfo_comm01);
- group3.import1.ds_data_comm02.copyData(group3.import1.ds_data_setupinfo_comm02);
- group3.import1.ds_data_comm03.copyData(group3.import1.ds_data_setupinfo_comm03);
- group3.import1.ds_data_blank.copyData(group3.import1.ds_data_setupinfo_blank);
- //trace(group3.import1.ds_data_comm03.saveXML());
-
- /* 이재옿 막다 2018.6월 18일
- var mGroup = frmf_getMenuGroupCD();
-
-
- if ( mGroup == "MG00430000" ) { //핵의학 바코드용
- trace('핵의학 11111111111111');
- lf_LisSpcBarcodePrint_test(ds_barcodeinfo,"", 0, 0, scrflag); //fLisSpcBarcodePrint(진검바코드인스턴스, 보관검체바코드갯수, 병리바코드갯수, 화면구분(병동,환자별일때 true))
-
-
- // var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
- // //var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js 바코드프린터별 환경설정(Zebra,SATO)
- //
- //
- //
- // var objDOM = rptf_createDOM(); // DOM 객체 설정
- // rptf_setNodeListToDOM(objDOM, "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint); // 데이터셋
- //
- // var objParam = new Object();
- // objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
- //
- // var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
- //
- // //var sOption = "copies=" + prncnt;
- // var sOption = "";
- //
- // group3.import1.rptf_printRexNmbar("RPMNO00113", "", "root/BarCodeNode", group3.import1.ds_patNmBarCdPrint,"", "", sOption);
- }
- */
- if( prtkind == "2" || prtkind == "6" || prtkind == "7" ){
- group3.import1.lf_PatNmBarCdLabelSaTo(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
- }else if(prtkind == "8"){
- group3.import1.lf_PatNmBarCdLabel_B472(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
- }else{
- group3.import1.lf_PatNmBarCdLabel(group3.import1.ds_patNmBarCdPrint,"group3.import1.");
- }
- }
-
- }
- function group3_button9_onclick(obj:Button, e:ClickEventInfo)
- {
- fGetPatNmBarCdPrint_in();
- group3.group2.iptSearch.setFocus();
- }
- function group3_button7_onclick(obj:Button, e:ClickEventInfo)
- {
- fPrintPatnm();
- group3.group2.iptSearch.setFocus();
- }
- function fPrintPatnm(){
- var pid = "";
- var toppid = appf_getPatientInfo("pid");
- //alert("바코드 분기1");
- //top 정보가 없으면 조회조건에 입력한 환자번호
- if(utlf_isNull(toppid)){
- pid = ds_johoi.getColumn(0,"regnopatnm");
- //top 정보가 있으면 탑정보의 환자번호
- }else{
- pid = toppid;
- }
-
- if(utlf_isNull(pid)){
- sysf_messageBox("환자등록번호를 확인해주세요." , "I");
- return;
- }
-
- if(!utlf_isNull(toppid) && toppid != ds_johoi.getColumn(0,"regnopatnm")){
- sysf_messageBox("조건의 등록번호와 상단정보가 일치하지 않습니다." , "I");
- return;
- }
- dsf_createDsRow("ds_temp_search"
- , [{col: "pid", val: pid}
- ]);
-
- var oParam = {};
- oParam.id = "TRLZZ90101";
- oParam.service = "diagtestapplib.LisCommon";
- oParam.method = "reqGetPatNmBarCdPrint";
- oParam.inds = "cond=ds_temp_search";
- oParam.outds = "group3.import1.ds_patNmBarCdPrint=printinfo";
- oParam.async = false;
- //oParam.callback = "cf_TRLZZ90101";
- tranf_submit(oParam);
- var orddd = group3.import1.ds_patNmBarCdPrint.getColumn(0,"printdt");
- var orddday = orddd.substr(0,4) + orddd.substr(5,2) + orddd.substr(8,2);
- var patnm = group3.import1.ds_patNmBarCdPrint.getColumn(0,"patnm");
- var pid = group3.import1.ds_patNmBarCdPrint.getColumn(0,"pid");
- var patsexage = group3.import1.ds_patNmBarCdPrint.getColumn(0,"patsexage");
-
- dsf_createDsRow("ds_patname"
- , [{col: "orddd", val: orddday}
- , {col: "patnm", val: patnm}
- , {col: "pid", val: pid}
- , {col: "sexage", val: patsexage}
- ]);
- var objParam = new Object();
- var objDOM = rptf_createDOM();
- //rptf_setNodeListToDOM(objDOM, "/root/temp2/printdata/patname", group3.import1.ds_patNmBarCdPrint);
- rptf_setNodeListToDOM(objDOM, "/root/temp2/printdata/patname", ds_patname);
-
- objParam.xml_data_XML1 = objDOM.documentElement.source;
- //trace(objParam.xml_data_XML1);
- var option = "open=1;save=1;directprint=0;print=1;zoom=0";
- rptf_exeReportPreview30(["RPMNO00111"], [objParam], option);
-
- }
- function group3_button61_onclick(obj:Button, e:ClickEventInfo)
- {
- ds_patinfolist.clearData();
-
- ds_source.setColumn( 0, "srchcond", "3");
-
- var objArg = new Object();
- objArg.arg_ds_send = ds_source;
- frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "1", "150", "150", "", "", "", "", "", "M");
- //frmf_modal("SPPMC02500", "SPPMC02500", "_root_source"-"_root_send", "", "1", "150", "150", "", "", "", "", "", "M");
- if (ds_patinfolist.rowcount > 0) {
- var pid = ds_patinfolist.getColumn(0,"pid");
- //trace('pid '+pid);
- group3.group2.iptSearch.value = pid;
- lf_GetOutBCollJoHoi();
- }
- }
- function group1_Button00_onclick(obj:Button, e:ClickEventInfo)
- {
- // var sSetUpVal = ds_data_comm03.getColumn(0,"setupval");
- // var sSndMsg = "";
- // sSndMsg += "^^^P"; //환자정보 시작
- // sSndMsg += 'test '+"^^^_S"; //채혈정보 종료
- //
- // lzzfMakeAutoBrcdPrntObj("AutoLabel"); //auto label
- // trace('auto 9 print start= '+sSetUpVal +' / '+sSndMsg);
- // var sReturnValue = AutoLabel.TRANSDATA(0, sSetUpVal, sSndMsg); //전송
- // trace('auto 10 print end '+sReturnValue);
- trace('aaa :'+frmf_getMenuGroupCD()+" / "+frmf_getPrestDeptCd());
- }
- /****************************************************************************************
- * Argument : N/A
- * Description : 저장.
- ****************************************************************************************/
- function lf_getPrintSetupInfoXMLgenr()
- {
- var sReplace, sValue;
- var sXML = "<setupinfo></setupinfo>";
- var nRow = ds_data_setupinfo_genr.rowposition;
- var arrColID = ["prntkind", "commkind", "setupval02", "comm01", "comm02", "comm03", "blank", "rexgbn", "pcl"];
- var arrComm02 = ["comm", "databit", "stopbit", "baudrate", "parity", "setupval02"];
- var arrComm03 = ["setupval", "daegiip", "eqmtcd", "autoyn"]; //
- var arrBlank = ["left", "top", "b472size"];
- var arrPcllist = ["barnm", "xpos", "ypos", "prtnm"];
-
-
- for(var i=0; i<arrColID.length; i++)
- {
- if(arrColID[i]=="prntkind"||arrColID[i]=="commkind"||arrColID[i]=="rexgbn")
- {
- sValue = ds_data_setupinfo_genr.getColumn(0, arrColID[i]);
- if(utlf_isNull(sValue))
- {
- sReplace = "<"+arrColID[i]+"/></setupinfo>";
- }
- else
- {
- sReplace = "<"+arrColID[i]+">"+sValue+"</"+arrColID[i]+"></setupinfo>";
- }
- }
- else if(arrColID[i]=="comm01")
- {
- sValue = ds_data_setupinfo_genr_comm01.getColumn(nRow, "setupval");
- if(utlf_isNull(sValue))
- {
- sReplace = "<"+arrColID[i]+"/></setupinfo>";
- }
- else
- {
- sReplace = "<"+arrColID[i]+"><setupval>"+sValue+"</setupval></"+arrColID[i]+"></setupinfo>";
- }
- }
- else if(arrColID[i]=="comm02")
- {
-
- sReplace = "";
-
- for(var j=0; j < arrComm02.length; j++)
- {
- sValue = ds_data_setupinfo_genr_comm02.getColumn(nRow, arrComm02[j]);
-
- if(utlf_isNull(sValue))
- {
- sReplace += "<"+arrComm02[j]+"/>";
- }
- else
- {
- sReplace += "<"+arrComm02[j]+">"+sValue+"</"+arrComm02[j]+">";
- }
- }
- sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
- }
- else if(arrColID[i]=="comm03")
- {
- sReplace = "";
- //sValue = ds_hidden_setupinfo_comm03.getColumn(nRow, "setupval");
- for(var j=0; j < arrComm03.length; j++)
- {
-
- sValue = ds_data_setupinfo_genr_comm03.getColumn(nRow, arrComm03[j]);
- if(utlf_isNull(sValue))
- {
- //sReplace = "<"+arrComm03[j]+"/></setupinfo>";
- sReplace += "<"+arrComm03[j]+"/>";
- }
- else
- {
- sReplace += "<"+arrComm03[j]+">"+sValue+"</"+arrComm03[j]+">";
- //sReplace = "<"+arrComm03[j]+"><setupval>"+sValue+"</setupval></"+arrComm03[j]+"></setupinfo>";
- }
- }
- sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
- }
- else if(arrColID[i]=="blank")
- {
- sReplace = "";
- for(var j=0; j<arrBlank.length; j++){
- sValue = ds_data_setupinfo_genr_blank.getColumn(nRow, arrBlank[j]);
- if(utlf_isNull(sValue)){
- sReplace += "<"+arrBlank[j]+"/>";
- }else{
- sReplace += "<"+arrBlank[j]+">"+sValue+"</"+arrBlank[j]+">";
- }
- }
- sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
-
- }
- sXML = sXML.replace("</setupinfo>", sReplace);
- //trace(sXML);
- }
- return sXML;
- }
- function lf_getPrintSetupInfoXMLauto()
- {
- var sReplace, sValue;
- var sXML = "<setupinfo></setupinfo>";
- var nRow = ds_data_setupinfo_auto.rowposition;
- var arrColID = ["prntkind", "commkind", "setupval", "comm01", "comm02", "comm03", "blank", "rexgbn", "pcl"];
- var arrComm02 = ["comm", "databit", "stopbit", "baudrate", "parity", "setupval"];
- var arrComm03 = ["setupval", "daegiip", "eqmtcd", "autoyn"]; //
- var arrBlank = ["left", "top", "b472size"];
- var arrPcllist = ["barnm", "xpos", "ypos", "prtnm"];
-
-
- for(var i=0; i<arrColID.length; i++)
- {
- if(arrColID[i]=="prntkind"||arrColID[i]=="commkind"||arrColID[i]=="rexgbn")
- {
- sValue = ds_data_setupinfo_auto.getColumn(0, arrColID[i]);
- if(utlf_isNull(sValue))
- {
- sReplace = "<"+arrColID[i]+"/></setupinfo>";
- }
- else
- {
- sReplace = "<"+arrColID[i]+">"+sValue+"</"+arrColID[i]+"></setupinfo>";
- }
- }
- else if(arrColID[i]=="comm01")
- {
- sValue = ds_data_setupinfo_auto_comm01.getColumn(nRow, "setupval");
- if(utlf_isNull(sValue))
- {
- sReplace = "<"+arrColID[i]+"/></setupinfo>";
- }
- else
- {
- sReplace = "<"+arrColID[i]+"><setupval>"+sValue+"</setupval></"+arrColID[i]+"></setupinfo>";
- }
- }
- else if(arrColID[i]=="comm02")
- {
-
- sReplace = "";
-
- for(var j=0; j < arrComm02.length; j++)
- {
- sValue = ds_data_setupinfo_auto_comm02.getColumn(nRow, arrComm02[j]);
-
- if(utlf_isNull(sValue))
- {
- sReplace += "<"+arrComm02[j]+"/>";
- }
- else
- {
- sReplace += "<"+arrComm02[j]+">"+sValue+"</"+arrComm02[j]+">";
- }
- }
- sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
- }
- else if(arrColID[i]=="comm03")
- {
- sReplace = "";
- //sValue = ds_hidden_setupinfo_comm03.getColumn(nRow, "setupval");
- for(var j=0; j < arrComm03.length; j++)
- {
-
- sValue = ds_data_setupinfo_auto_comm03.getColumn(nRow, arrComm03[j]);
- if(utlf_isNull(sValue))
- {
- //sReplace = "<"+arrComm03[j]+"/></setupinfo>";
- sReplace += "<"+arrComm03[j]+"/>";
- }
- else
- {
- sReplace += "<"+arrComm03[j]+">"+sValue+"</"+arrComm03[j]+">";
- //sReplace = "<"+arrComm03[j]+"><setupval>"+sValue+"</setupval></"+arrComm03[j]+"></setupinfo>";
- }
- }
- sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
- }
- else if(arrColID[i]=="blank")
- {
- sReplace = "";
- for(var j=0; j<arrBlank.length; j++){
- sValue = ds_data_setupinfo_auto_blank.getColumn(nRow, arrBlank[j]);
- if(utlf_isNull(sValue)){
- sReplace += "<"+arrBlank[j]+"/>";
- }else{
- sReplace += "<"+arrBlank[j]+">"+sValue+"</"+arrBlank[j]+">";
- }
- }
- sReplace = "<"+arrColID[i]+">"+sReplace+"</"+arrColID[i]+"></setupinfo>";
-
- }
- sXML = sXML.replace("</setupinfo>", sReplace);
- //trace(sXML);
- }
- return sXML;
- }
- /****************************************************************************************
- * Function : fCheckedBindPid
- * Description : 환자번호 합번여부 체크
- * Argument : pPid - 환자번호
- * return type : String sResult
- * Creator :
- ****************************************************************************************/
- function fCheckedBindPid(pPid){
- var sResult = "";
- if(!utlf_isNull(pPid)){
- /*TRMRC00509에 사용할 환자번호 설정*/
-
- dsf_createDsRow("ds_temp_TRMRC00510", [{col:"pid", type:"string", size:256, val:pPid}] ,"true");
- dsf_createDs("ds_temp_rtn", [{col:"pid" , type:"string" , size:256}
- ,{col:"hngnm" , type:"string" , size:256}
- ,{col:"bindpid", type:"string" , size:256}
- ], "true");
-
- var oParam = {};
- oParam.id = "TRMRC00510";
- oParam.service = "chrtmngtapp.BaseInfoMngt";
- oParam.method = "reqGetDblNoPidList";
- oParam.inds = "item=ds_temp_TRMRC00510";
- oParam.outds = "ds_temp_rtn=item";
- oParam.async = false;
- // oParam.callback = "";
- tranf_submit(oParam);
-
- if(ds_temp_rtn.rowcount > 0) {
-
- var sBindPid = ds_temp_rtn.getColumn(0,"bindpid");
-
- if(sBindPid != "-" && !utlf_isNull(sBindPid) && sBindPid != " "){
- var sHngnm = ds_temp_rtn.getColumn(0,"hngnm");
- var messageValue = sysf_messageBox(pPid + "(" + sHngnm + ") 환자의 등록번호가 [ " + sBindPid + " ] 로 합번 되었습니다. 합번된 등록번호를 사용 하시겠습니까?", "Q999", "");
-
- if(messageValue == "6"){
- sResult = sBindPid;
- } else {
- sResult = pPid;
- }
- } else {
- sResult = pPid;
- }
- } else {
- sResult = pPid;
- }
-
- dsf_deleteDs("ds_temp_TRMRC00510");
- dsf_deleteDs("ds_temp_rtn");
-
- } else {
- sResult = pPid;
- }
- return sResult;
- }
- function group3_group2_btn_reftext_onclick(obj:Button, e:ClickEventInfo)
- {
- lf_GetOutBCollJoHoi();
- group3.group2.ipt_hngnm.setFocus();
- group3.group2.iptSearch.setFocus();
- }
- ]]></Script>
- </Form>
- </FDL>
|