YNU_JEUS/app_home/himed/xpapps/ast/healcarecoopxp/xp/SPARC00900_의뢰서회송서확인.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPARC00900" classname="SMARC01900_타병원진료의뢰서조회" inheritanceid="" position="absolute 0 0 1445 934" titletext="의뢰서회신서확인" oninit="SPARC00900_oninit" onload="SPARC00900_onload" onclose="SPARC00900_onclose">
    <Layouts>
      <Layout>
        <Div id="group2" taborder="13" position="absolute 202 26 606 55" class="div_SA2">
          <Layouts>
            <Layout/>
          </Layouts>
        </Div>
        <Div id="group1" taborder="4" position="absolute 0 59 196 239" class="div_SA2">
          <Layouts>
            <Layout>
              <Static id="ipt_pid" position="absolute 63 4 152 23" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_hngnm" position="absolute 63 22 152 41" anchor="default" style="font:Dotum,9,bold;"/>
              <Static id="ipt_rgstdd" position="absolute 48 43 97 62" anchor="default" style="align:center middle;font:Dotum,9,bold;"/>
              <Static id="ipt_formrecdd" position="absolute 142 44 188 61" anchor="default" style="align:center middle;font:Dotum,9,bold;"/>
              <Static id="ipt_formrecdeptnm" position="absolute 63 64 192 81" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_formrecusernm" position="absolute 63 84 152 101" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_coophospnm" position="absolute 64 98 195 127" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_drnm" position="absolute 64 125 153 140" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_rsrvflag" position="absolute 64 143 177 157" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_ocryn" position="absolute 64 161 83 176" style="font:Dotum,9,bold;" anchor="default"/>
              <Static id="ipt_ocryn00" position="absolute 130 161 149 178" style="font:Dotum,9,bold;" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption2" text="의뢰서회신서 확인" class="tit_1" position="absolute 0 0 173 24"/>
        <Grid id="grd_list" taborder="1" binddataset="ds_main_replprntlist" autoenter="select" useinputpanel="false" cellsizingtype="col" cellclickbound="cell" position="absolute 0 240 196 924" anchor="left top bottom" autofittype="col" selecttype="multirow" onrbuttonup="grd_list_onrbuttonup" oncellclick="grd_list_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="30"/>
                <Column size="60"/>
                <Column size="60"/>
              </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="환자명"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" displaytype="checkbox" text="bind:cnfmyn" expr="expr:cnfmyn == 'Y' ? 1 : 0"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:hngnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption23" text="등록번호" position="absolute 6 64 69 81" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption1" text="환자명" position="absolute 5 83 68 100" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Div id="iviewerIemr" taborder="5" position="absolute 201 58 782 924" style="background:#ffffffff;border:1 solid #808080ff ;" dragscrolltype="horz" url="emr_imgemrxp::SSMRC03130.xfdl" anchor="left top bottom">
          <Layouts/>
        </Div>
        <Div id="div_report" taborder="6" position="absolute 786 2 1443 924" style="background:#ffffffff;border:1 solid #808080ff ;" anchor="all"/>
        <Button id="btn_next" taborder="7" position="absolute 126 33 151 58" class="icon_next" onclick="btn_next_onclick"/>
        <Button id="btn_pre" taborder="8" class="icon_pre" position="absolute 100 33 125 58" onclick="btn_pre_onclick"/>
        <Button id="btn_confirm" taborder="9" text="확인" position="absolute 152 33 196 58" class="btn5" style="font:Dotum,9,bold;" onclick="btn_confirm_onclick"/>
        <Button id="btn_agr" taborder="10" text="동의서" position="absolute 0 33 67 58" class="btn4" onclick="btn_agr_onclick" enable="false"/>
        <Calendar id="ipt_fromdd" taborder="11" position="absolute 292 30 394 52" autoselect="true"/>
        <Static id="caption00" text="조회 기간 :" class="search_name" position="absolute 207 33 302 50"/>
        <Static id="caption7" text="~" class="search_no_b" position="absolute 402 34 414 51"/>
        <Calendar id="ipt_todd" taborder="12" autoselect="true" position="absolute 420 30 522 52"/>
        <Button id="btn_search" taborder="14" text="조회" class="btn1" position="absolute 540 29 596 52" onclick="btn_search_onclick"/>
        <Static id="caption03" position="absolute 5 99 52 124" style="color:#01548eff;font:Dotum,9,bold;" text="등록일"/>
        <Static id="caption04" text="작성일" position="absolute 101 100 143 125" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption05" text="작성과" position="absolute 5 119 60 144" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption06" text="작성자" position="absolute 5 139 60 164" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption08" text="의뢰병원" position="absolute 6 159 77 184" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption09" text="의뢰의" position="absolute 6 179 77 204" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption10" text="예약구분" position="absolute 6 198 61 223" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption11" text="타병원" position="absolute 6 220 53 237" style="color:#01548eff;font:Dotum,9,bold;"/>
        <Static id="caption12" text="개인" position="absolute 94 220 141 237" style="color:#01548eff;font:Dotum,9,bold;"/>
        <PopupMenu id="pmn_menu1" position="absolute 1491 309 1558 336" innerdataset="@ds_menu" idcolumn="func" levelcolumn="level" captioncolumn="label" onmenuclick="pmn_menu1_onmenuclick"/>
        <Div id="div_report_print" taborder="15" text="진료회신서 출력용 Div" position="absolute 1456 8 1645 88" visible="false"/>
        <PopupMenu id="pmn_menu2" innerdataset="@ds_menu1" idcolumn="func" captioncolumn="label" levelcolumn="level" position="absolute 1491 341 1558 384" onmenuclick="pmn_menu2_onmenuclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_temp_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_replprntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="ocryn" type="STRING" size="256"/>
          <Column id="replseqno" type="INT" size="256"/>
          <Column id="rgstdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_baseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcdnm" type="STRING" size="256" sumtext="기관명"/>
          <Column id="ordfromdd" type="STRING" size="256" sumtext="진료시작일자"/>
          <Column id="ordtodd" type="STRING" size="256" sumtext="진료종료일자"/>
          <Column id="telno1" type="STRING" size="256" sumtext="전화번호1"/>
          <Column id="telno2" type="STRING" size="256" sumtext="전화번호2"/>
          <Column id="faxno" type="STRING" size="256" sumtext="fax번호"/>
          <Column id="url" type="STRING" size="256" sumtext="ep url"/>
          <Column id="mainemail" type="STRING" size="256" sumtext="발송 email주소"/>
          <Column id="maindeptnm" type="STRING" size="256" sumtext="의료협력부서명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_patientinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="한글명"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="age" type="INT" size="256" sumtext="나이"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호1"/>
          <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호2"/>
          <Column id="brthdd" type="STRING" size="256" sumtext="생년월일"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_replinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="replseqno" type="INT" size="256" sumtext="회신일련번호"/>
          <Column id="replflag" type="STRING" size="256" sumtext="회신/되의뢰구분(P, A)"/>
          <Column id="writflag" type="STRING" size="256" sumtext="작성자구분(D, R)"/>
          <Column id="recdd" type="STRING" size="256" sumtext="기록일자"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="진료의명"/>
          <Column id="reqorddd" type="STRING" size="256" sumtext="의뢰등록 진료일자"/>
          <Column id="reqcretno" type="INT" size="256" sumtext="의뢰등록 생성일자"/>
          <Column id="reqseqno" type="INT" size="256" sumtext="의뢰등록 일련번호"/>
          <Column id="rsrvdd" type="STRING" size="256" sumtext="외래예약일자"/>
          <Column id="rsrvtm" type="STRING" size="256" sumtext="외래예약시간"/>
          <Column id="rsrvorddeptcd" type="STRING" size="256" sumtext="외래예약진료과코드"/>
          <Column id="rsrvorddrid" type="STRING" size="256" sumtext="외래예약진료의ID"/>
          <Column id="rsrvorddeptnm" type="STRING" size="256" sumtext="외래예약진료과명"/>
          <Column id="rsrvorddrnm" type="STRING" size="256" sumtext="외래예약진료의명"/>
          <Column id="rsrvcretno" type="INT" size="256" sumtext="외래예약생성번호"/>
          <Column id="diagnm" type="STRING" size="256" sumtext="진단내역"/>
          <Column id="curecnts" type="STRING" size="256" sumtext="치료계획내용"/>
          <Column id="delivefact" type="STRING" size="256" sumtext="전달사항"/>
          <Column id="reqagnkindcd" type="STRING" size="256" sumtext="되의뢰유형코드"/>
          <Column id="reqagnkindnm" type="STRING" size="256" sumtext="되의뢰유형기타"/>
          <Column id="saverid" type="STRING" size="256" sumtext="저장자ID"/>
          <Column id="savernm" type="STRING" size="256" sumtext="저장자명"/>
          <Column id="savedd" type="STRING" size="256" sumtext="저장일자"/>
          <Column id="aprvrid" type="STRING" size="256" sumtext="승인자ID"/>
          <Column id="aprvrnm" type="STRING" size="256" sumtext="승인자명"/>
          <Column id="aprvdd" type="STRING" size="256" sumtext="승인일자"/>
          <Column id="aprvdeptcd" type="STRING" size="256" sumtext="승인부서"/>
          <Column id="aprvdeptnm" type="STRING" size="256" sumtext="승인부서명"/>
          <Column id="saveflag" type="STRING" size="256" sumtext="저장구분(저장T, 승인A)"/>
          <Column id="footflag" type="STRING" size="256" sumtext="작성자구분(P, D)"/>
          <Column id="prntdt" type="STRING" size="256" sumtext="출력일시"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reqhospinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqdd" type="STRING" size="256" sumtext="의뢰일자"/>
          <Column id="coophospcd" type="STRING" size="256" sumtext="협력병원코드"/>
          <Column id="coophospnm" type="STRING" size="256" sumtext="협력병원명"/>
          <Column id="coopdrcd" type="STRING" size="256" sumtext="협력의사코드"/>
          <Column id="coopdrnm" type="STRING" size="256" sumtext="협력의사명"/>
          <Column id="clsmatyn" type="STRING" size="256" sumtext="동문여부"/>
          <Column id="gradyear" type="STRING" size="256" sumtext="졸업년도"/>
          <Column id="telno" type="STRING" size="256" sumtext="전화번호"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="핸드폰번호"/>
          <Column id="emailid" type="STRING" size="256" sumtext="emaidid"/>
          <Column id="emailaddr" type="STRING" size="256" sumtext="email주소"/>
          <Column id="coopflag" type="STRING" size="256" sumtext="협력여부"/>
          <Column id="reqorddd" type="STRING" size="256" sumtext="의뢰등록 진료일자"/>
          <Column id="reqcretno" type="INT" size="256" sumtext="의뢰등록 생성번호"/>
          <Column id="reqseqno" type="INT" size="256" sumtext="의뢰등록 일련번호"/>
          <Column id="addr" type="STRING" size="256" sumtext="주소"/>
          <Column id="detladdr" type="STRING" size="256" sumtext="상세주소"/>
          <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호1"/>
          <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호2"/>
          <Column id="drflag" type="STRING" size="256" sumtext="의사구분"/>
          <Column id="faxno" type="STRING" size="256" sumtext="FAX번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_rsltinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="examnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="spcnm" type="STRING" size="256" sumtext="검체명"/>
          <Column id="examgubun" type="STRING" size="256" sumtext="검사구분"/>
          <Column id="lastreptdd" type="STRING" size="256" sumtext="최종보고일자"/>
          <Column id="bcno" type="STRING" size="256" sumtext="바코드번호"/>
          <Column id="testmdlcd" type="STRING" size="256" sumtext="검사중분류코드"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시유일번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="depth" type="STRING" size="256" sumtext="바코드검사레벨(LIS)"/>
          <Column id="replseqno" type="INT" size="256" sumtext="회신이력번호"/>
          <Column id="seqno" type="INT" size="256" sumtext="순번"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpqty" type="BIGDECIMAL" size="256" sumtext="수량"/>
          <Column id="prcpqtyunitnm" type="STRING" size="256" sumtext="수량단위명"/>
          <Column id="prcptims" type="INT" size="256" sumtext="횟수"/>
          <Column id="prcpdayno" type="INT" size="256" sumtext="일수"/>
          <Column id="prcpno" type="INT" size="256" sumtext="처방번호"/>
          <Column id="prcphistno" type="INT" size="256" sumtext="처방이력번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="replseqno" type="INT" size="256" sumtext="회신이력번호"/>
          <Column id="seqno" type="INT" size="256" sumtext="순번"/>
          <Column id="prcpqtyunitflag" type="STRING" size="256" sumtext="수량단위"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_opinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="opdd" type="STRING" size="256" sumtext="수술일자"/>
          <Column id="opnm" type="STRING" size="256" sumtext="수술명"/>
          <Column id="perfdeptnm" type="STRING" size="256" sumtext="집도과명"/>
          <Column id="perfdrnm" type="STRING" size="256" sumtext="집도의명"/>
          <Column id="opstatcd" type="STRING" size="256" sumtext="상태"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="replseqno" type="INT" size="256" sumtext="회신일련번호"/>
          <Column id="seqno" type="INT" size="256" sumtext="일련번호"/>
          <Column id="oprsrvno" type="INT" size="256" sumtext="수술예약번호"/>
          <Column id="ophistno" type="INT" size="256" sumtext="수술일련번호"/>
          <Column id="opcd" type="STRING" size="256" sumtext="수술코드"/>
          <Column id="perfdrid" type="STRING" size="256" sumtext="집도의ID"/>
          <Column id="perfdeptcd" type="STRING" size="256" sumtext="집도과코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_dschinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="주치의명"/>
          <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
          <Column id="formrecseq" type="BIGDECIMAL" size="256" sumtext="서식기록순번"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의사코드"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="replseqno" type="INT" size="256" sumtext="회신일련번호"/>
          <Column id="seqno" type="INT" size="256" sumtext="일련번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_curelsit" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="curecnts" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_subresultdetail1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_maindata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="testmdlcd" type="STRING" size="256"/>
          <Column id="lastreptdd" type="STRING" size="256"/>
          <Column id="examgubun" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_confirm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="replseqno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_iemr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="docucd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="docucd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_date" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rgstdd" type="STRING" size="256"/>
          <Column id="formrecdd" type="STRING" size="256"/>
          <Column id="formrecdeptnm" type="STRING" size="256"/>
          <Column id="formrecusernm" type="STRING" size="256"/>
          <Column id="coophospnm" type="STRING" size="256"/>
          <Column id="drnm" type="STRING" size="256"/>
          <Column id="rsrvflag" type="STRING" size="256"/>
          <Column id="ocryn" type="STRING" size="256"/>
          <Column id="personal_ocryn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid">-</Col>
            <Col id="hngnm">-</Col>
            <Col id="rgstdd">-</Col>
            <Col id="formrecdd">-</Col>
            <Col id="formrecdeptnm">-</Col>
            <Col id="formrecusernm">-</Col>
            <Col id="coophospnm">-</Col>
            <Col id="drnm">-</Col>
            <Col id="rsrvflag">-</Col>
            <Col id="ocryn">-</Col>
            <Col id="personal_ocryn">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_rsrvflag_P0341" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_menu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="level" type="STRING" size="256"/>
          <Column id="func" type="STRING" size="256"/>
          <Column id="label" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="func">fRightBtn</Col>
            <Col id="label">일괄출력</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_repldoculist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_print_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="replseqno" type="STRING" size="256"/>
          <Column id="replflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_menu1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="level" type="STRING" size="256"/>
          <Column id="func" type="STRING" size="256"/>
          <Column id="label" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="func">fConfirmCancel</Col>
            <Col id="label">확인취소</Col>
          </Row>
          <Row>
            <Col id="func">fRightBtn</Col>
            <Col id="label">일괄출력</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_todd" propid="value" datasetid="ds_send_date" columnid="todd"/>
      <BindItem id="item1" compid="ipt_fromdd" propid="value" datasetid="ds_send_date" columnid="fromdd"/>
      <BindItem id="item2" compid="group1.ipt_pid" propid="text" datasetid="ds_patinfo" columnid="pid"/>
      <BindItem id="item3" compid="group1.ipt_hngnm" propid="text" datasetid="ds_patinfo" columnid="hngnm"/>
      <BindItem id="item4" compid="group1.ipt_rgstdd" propid="text" datasetid="ds_patinfo" columnid="rgstdd"/>
      <BindItem id="item5" compid="group1.ipt_formrecdd" propid="text" datasetid="ds_patinfo" columnid="formrecdd"/>
      <BindItem id="item6" compid="group1.ipt_formrecdeptnm" propid="text" datasetid="ds_patinfo" columnid="formrecdeptnm"/>
      <BindItem id="item7" compid="group1.ipt_formrecusernm" propid="text" datasetid="ds_patinfo" columnid="formrecusernm"/>
      <BindItem id="item8" compid="group1.ipt_coophospnm" propid="text" datasetid="ds_patinfo" columnid="coophospnm"/>
      <BindItem id="item9" compid="group1.ipt_drnm" propid="text" datasetid="ds_patinfo" columnid="drnm"/>
      <BindItem id="item10" compid="group1.ipt_rsrvflag" propid="text" datasetid="ds_patinfo" columnid="rsrvflag"/>
      <BindItem id="item11" compid="group1.ipt_ocryn" propid="text" datasetid="ds_patinfo" columnid="ocryn"/>
      <BindItem id="item12" compid="group1.ipt_ocryn00" propid="text" datasetid="ds_patinfo" columnid="personal_ocryn"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";	
include "ast_healcarecoopxp::ARCCommon.xjs"
var arErrorCode = new HashArray();
function SPARC00900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPARC00900_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_list);
	
	fInit();
}

function fInit()
{
	try
	{
		ds_temp_list.copyData(arg_ds_replprntlist);
		ds_send_iemr.setColumn(0, "docucd", hardcd);
	}
	catch(e){}
	
	var arrParam = [{dsNm: "ds_init_rsrvflag_P0341", cdGrpId: "P0341", sortField: "dispseq", sortMehotd: "asc", showValue:false}]; //예약구분
    appf_getCodeList(arrParam, true);
    
	if(ds_temp_list.rowcount > 0)
	{
		ds_main_replprntlist.copyData(ds_temp_list);
		ds_main_replprntlist.keystring = arg_keyString;
		ds_main_replprntlist.clearSelect();		
	}
	
	var CurrentDate = utlf_getCurrentDate();
	var Fromdd = ((CurrentDate.toDate()).getAddDate(-3,"M")).getDateFormat();
	
	ds_send_date.setColumn(0, "fromdd", Fromdd);
	ds_send_date.setColumn(0, "todd", CurrentDate);
	
	iviewerIemr.cleanViewer();
}

function btn_pre_onclick(obj:Button,  e:ClickEventInfo)
{
	var selRow = ds_main_replprntlist.rowposition-1;
	if(selRow >= 0)
	{
		ds_main_replprntlist.clearSelect();
		ds_main_replprntlist.selectRow(selRow);
		ds_main_replprntlist.rowposition = selRow;
		
		ds_send_search.setColumn(0, "pid", ds_main_replprntlist.getColumn(selRow, "pid"));
		ds_send_search.setColumn(0, "hngnm", ds_main_replprntlist.getColumn(selRow, "hngnm"));
		ds_send_search.setColumn(0, "ocryn", ds_main_replprntlist.getColumn(selRow, "ocryn"));
		ds_send_search.setColumn(0, "replseqno", ds_main_replprntlist.getColumn(selRow, "replseqno"));
		
		fPatinfoSetting(selRow);
	}
	
	fSearch(selRow);
}

function btn_next_onclick(obj:Button,  e:ClickEventInfo)
{
	var selRow = ds_main_replprntlist.rowposition+1;
	
	if(selRow < ds_main_replprntlist.rowcount)
	{
		ds_main_replprntlist.clearSelect();
		ds_main_replprntlist.selectRow(selRow);
		ds_main_replprntlist.rowposition = selRow;
		
		ds_send_search.setColumn(0, "pid", ds_main_replprntlist.getColumn(selRow, "pid"));
		ds_send_search.setColumn(0, "hngnm", ds_main_replprntlist.getColumn(selRow, "hngnm"));
		ds_send_search.setColumn(0, "ocryn", ds_main_replprntlist.getColumn(selRow, "ocryn"));
		ds_send_search.setColumn(0, "replseqno", ds_main_replprntlist.getColumn(selRow, "replseqno"));
		
		fPatinfoSetting(selRow);
	}
	
	fSearch(selRow);
}

function fPatinfoSetting(sRow)
{
	//환자정보입력
	ds_patinfo.setColumn(0, "pid", ds_main_replprntlist.getColumn(sRow, "pid"));
	ds_patinfo.setColumn(0, "hngnm", ds_main_replprntlist.getColumn(sRow, "hngnm"));
	ds_patinfo.setColumn(0, "rgstdd", String(utlf_transNullToEmpty(ds_main_replprntlist.getColumn(sRow, "rgstdd"))).substr(2,8));
	ds_patinfo.setColumn(0, "formrecdd", String(utlf_transNullToEmpty(ds_main_replprntlist.getColumn(sRow, "formrecdd"))).substr(2,8));
	ds_patinfo.setColumn(0, "formrecdeptnm", ds_main_replprntlist.getColumn(sRow, "formrecdeptnm"));
	ds_patinfo.setColumn(0, "formrecusernm", ds_main_replprntlist.getColumn(sRow, "formrecusernm"));
	ds_patinfo.setColumn(0, "coophospnm", ds_main_replprntlist.getColumn(sRow, "coophospnm"));
	ds_patinfo.setColumn(0, "drnm", ds_main_replprntlist.getColumn(sRow, "drnm"));
	var rsrvflagcd = ds_main_replprntlist.getColumn(sRow, "rsrvflag");
	var rsrvflagnm = ds_init_rsrvflag_P0341.lookup("cdid", rsrvflagcd,"cdnm");
	ds_patinfo.setColumn(0, "rsrvflag", utlf_isNull(rsrvflagnm) ? '입원' : rsrvflagnm);
	ds_patinfo.setColumn(0, "ocryn", ds_main_replprntlist.getColumn(sRow, "ocryn"));
	ds_patinfo.setColumn(0, "personal_ocryn", ds_main_replprntlist.getColumn(sRow, "personal_ocryn"));
}

function grd_list_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var selRow = ds_main_replprntlist.rowposition;

	ds_send_search.setColumn(0, "pid", ds_main_replprntlist.getColumn(selRow, "pid"));
	ds_send_search.setColumn(0, "hngnm", ds_main_replprntlist.getColumn(selRow, "hngnm"));
	ds_send_search.setColumn(0, "ocryn", ds_main_replprntlist.getColumn(selRow, "ocryn"));
	ds_send_search.setColumn(0, "replseqno", ds_main_replprntlist.getColumn(selRow, "replseqno"));
	
	fPatinfoSetting(selRow);
	
	if(ds_main_replprntlist.getColumn(selRow, "personal_ocryn") == "Y")
	{
		btn_agr.enable = true;
	}
	else
	{
		btn_agr.enable = false;
	}
	
	fSearch(selRow)
}

function fSearch(mRow)
{
	//초기화
	ds_send_maindata.clearData();
	ds_baseinfo.clearData();
	ds_patientinfo.clearData();
	ds_replinfo.clearData();
	ds_rsltinfo.clearData();
	ds_reqhospinfo.clearData();
	ds_prcpinfo.clearData();
	ds_opinfo.clearData();
	ds_subresultdetail1.clearData();
	ds_curelsit.clearData();
		
	var ocrYN 	  = ds_send_search.getColumn(0, "ocryn");
	var pid 	  = ds_send_search.getColumn(0, "pid");
	var hngnm 	  = ds_send_search.getColumn(0, "hngnm");
	
	//메인 창 환자 선택되도록
	if(opener.frmf_getScreenID() == "SMARC05100")
	{
		opener.ds_replprntlist.clearSelect();
		var mRow = opener.ds_replprntlist.findRowExpr("pid == '"+pid+"' && hngnm == '"+hngnm+"'");
		opener.ds_replprntlist.selectRow(mRow);
		opener.ds_replprntlist.rowposition = mRow;		
	}
	
	dsf_makeValue(ds_send_date, "screenid", "string", "SPARC00900");	
	dsf_makeValue(ds_send_date, "docucd", "string", "0000001736"); // 타병원 진료 의뢰서 code
	dsf_makeValue(ds_send_date, "ocryn", "string", ds_send_search.getColumn(0, "ocryn")); // 타병원의뢰서 기간 fromdd
	dsf_makeValue(ds_send_date, "pid", "string", ds_send_search.getColumn(0, "pid")); // 타병원의뢰서 기간 todd
	
	//타병원 진료 의뢰서 호출
	if (ocrYN == "Y") 
	{
		iviewerIemr.reloadChart(ds_send_date);
    }
    else
    {
		sysf_messageBox("스캔된 타병원 진료의뢰서가 없습니다","I999");
		iviewerIemr.cleanViewer();
    }
    
    fPrint("N");
}

function fRightBtn()
{
	var rows = grdf_getSelectedRows(grd_list);
	 
	for(var i = 0; i < rows.length; i++) 
	{
		var m_row = rows[i];
		
		if(ds_main_replprntlist.getColumn(m_row, "cnfmyn") == "Y")
		{
			// 공통 function 으로 대체
			ds_print_temp.setColumn(0, "pid", ds_main_replprntlist.getColumn(m_row, "pid"));
			ds_print_temp.setColumn(0, "replseqno", ds_main_replprntlist.getColumn(m_row, "replseqno"));
			ds_print_temp.setColumn(0, "replflag", "P");
			
			fPrint("Y");
			
			var oParam = {};
				oParam.id          = "TXARC05106";
				oParam.service     = "healcarecoopapp.ReqMngt";
				oParam.method      = "reqExeReplPrtList";
				oParam.inds        = "replinfo=ds_replinfo req_hospinfo=ds_reqhospinfo req_opinfo=ds_opinfo req_dschinfo=ds_dschinfo";
				oParam.outds       = "=repldoculist";
				oParam.async       = false;
				oParam.callback    = "cf_TRARC02507";
			tranf_submit(oParam);
			
			if(arErrorCode.pop("TXARC05106") > -1)
			{
				opener.ds_replprntlist.clearSelect();
				var mRow = opener.ds_replprntlist.findRowExpr("pid == '"+ds_main_replprntlist.getColumn(m_row, "pid")+"' && hngnm == '"+ds_main_replprntlist.getColumn(m_row, "hngnm")+"'");
				opener.ds_replprntlist.setColumn(mRow, "fstprint", "기출력");
			}
		}
	}
}

function fPrint(direct)
{
	//초기화
	ds_send_maindata.clearData();
	ds_baseinfo.clearData();
	ds_patientinfo.clearData();
	ds_replinfo.clearData();
	ds_rsltinfo.clearData();
	ds_reqhospinfo.clearData();
	ds_prcpinfo.clearData();
	ds_opinfo.clearData();
	ds_subresultdetail1.clearData();
	ds_curelsit.clearData();
	
	var dsfTemp = "ds_send_search";
	//회신서 호출
	if(direct == "Y")
	{
		dsfTemp = "ds_print_temp";
		dsf_setDefaultVal(ds_print_temp, "replseqno:0");
	}
	else
	{
		dsf_makeValue(ds_send_search, "replflag", "string", "P"); // 회신서
		dsf_setDefaultVal(ds_send_search, "replseqno:0");
		
		dsfTemp = "ds_send_search";
	}	
									  
	var oParam = {};
		oParam.id          = "TRARC02507";
		oParam.service     = "healcarecoopapp.ReqMngt";
		oParam.method      = "reqGetPreviewInfo";
		oParam.inds        = "req="+dsfTemp;
		oParam.outds       = "ds_baseinfo=baseinfo "
							+"ds_patientinfo=patientinfo "
							+"ds_replinfo=replinfo " 
							+"ds_reqhospinfo=reqhospinfo "
							+"ds_rsltinfo=rsltinfo "
							+"ds_prcpinfo=prcpinfo "
							+"ds_opinfo=opinfo "
							+"ds_dschinfo=dschinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRARC02507";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TRARC02507") > -1)
	{
		dsf_setDefaultVal(ds_replinfo, "reqcretno:0,reqseqno:0,rsrvcretno:0");
		dsf_setDefaultVal(ds_opinfo, "replseqno:0,seqno:0,oprsrvno:0,ophistno:0");
		dsf_setDefaultVal(ds_dschinfo, "formrecseq:0,replseqno:0,seqno:0");
		
		var curecnts = utlf_transNullToEmpty(ds_replinfo.getColumn(0, "curecnts"));
		cureArray = curecnts.split("\n");
			
		for (var i = 0; i < cureArray.length; i++)
		{
			var nRow = ds_curelsit.addRow();
			ds_curelsit.setColumn(nRow, "curecnts", cureArray[i]);
		}
	
		var rsltinfoCnt = ds_rsltinfo.rowcount;
		if (rsltinfoCnt > 0)
		{
			if(!utlf_isNull(ds_rsltinfo.getColumn(0, "prcpdd")))
			{
				for( var i = 0; i < rsltinfoCnt; i++ ) 
				{
					var nRow = ds_send_maindata.addRow();
					ds_send_maindata.setColumn(nRow, "bcno"			 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "bcno")));           //바코드번호
					ds_send_maindata.setColumn(nRow, "testmdlcd"	 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "testmdlcd")));      //검사중분류코드
					ds_send_maindata.setColumn(nRow, "lastreptdd"	 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "lastreptdd")));     //최종보고일자
					ds_send_maindata.setColumn(nRow, "examgubun"	 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "examgubun")));      //검사구분
					ds_send_maindata.setColumn(nRow, "level"		 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "depth")));          //바코드검사레벨(LIS)
					ds_send_maindata.setColumn(nRow, "pid"			 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "pid")));            //등록번호
					ds_send_maindata.setColumn(nRow, "instcd"		 , sysf_getUserInfo("dutplceinstcd"));               				   //기관코드
					ds_send_maindata.setColumn(nRow, "prcpdd"		 , utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "prcpdd")));         //처방일자
					ds_send_maindata.setColumn(nRow, "execprcpuniqno", utlf_transNullToEmpty(ds_rsltinfo.getColumn(i, "execprcpuniqno"))); //실시유일번호
				}
			
				var oParam = {};
					oParam.id          = "TRAER00850";
					oParam.service     = "examcureresultrefapp.RsltRef";
					oParam.method      = "reqGetRsltRefDetailList";
					oParam.inds        = "reqparam=ds_send_maindata";
					oParam.outds       = "ds_subresultdetail1=getResultDetail";
					oParam.async       = false;
					//oParam.callback    = "cf_TRAER00850";

				tranf_submit(oParam);				
			}	    
		}
		
		var objDOM = rptf_createDOM();	// DOM 객체 설정
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/baseinfo", ds_baseinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/patientinfo", ds_patientinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/replinfo", ds_replinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/reqhospinfo", ds_reqhospinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/rsltinfo", ds_rsltinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/prcpinfo", ds_prcpinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/opinfo", ds_opinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/dschinfo", ds_dschinfo);
			rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/curelsit", ds_curelsit);
			rptf_setNodeListToDOM(objDOM, "/root/main/subordlist1/subresultdetail1", ds_subresultdetail1);
				
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;	// 최상의노드 XML 스트링 추출
		
		if(direct == "Y")
		{		
			rptf_exeReportPreview30(["RPARC02500"],[objParam], "open=0;save=0;directprint=1;printdialog=0;", "", "div_report_print");
		}
		else 
		{
			div_report.url = "";
			rptf_exeReportPreview30(["RPARC02500"],[objParam], "zoomlvl=PageWidth;", "", "div_report");
			
			if(!utlf_isNull(frmf_findPopup("SSMRC03130")))
			{
				btn_agr.click();
			}
		}
	}
}

function cf_TRARC02507(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    arErrorCode.push(sSvcId, nErrorCode);
}

function btn_confirm_onclick(obj:Button,  e:ClickEventInfo)
{
	var selRow = ds_main_replprntlist.rowposition;
	ds_send_confirm.clearData();
	ds_send_confirm.copyRow(ds_send_confirm.addRow(), ds_main_replprntlist, selRow);
		
	dsf_setDefaultVal(ds_send_confirm, "cnfmyn:Y");
	var oParam = {};
		oParam.id          = "TRARC00109";
		oParam.service     = "healcarecoopapp.ReqMngt";
		oParam.method      = "reqSetConfirmYN";
		oParam.inds        = "req=ds_send_confirm";
		oParam.outds       = "=getResult";
		oParam.async       = false;
		oParam.callback    = "cf_callback";

	tranf_submit(oParam);	
	
	if(arErrorCode.pop("TRARC00109") > -1)
	{
		ds_main_replprntlist.setColumn(selRow, "cnfmyn", "Y");
		opener.ds_replprntlist.setColumn(opener.ds_replprntlist.rowposition, "cnfmyn", "Y");
		btn_next.click();
	}
}

function fConfirmCancel()
{
	var selRow = ds_main_replprntlist.rowposition;
	ds_send_confirm.clearData();
	ds_send_confirm.copyRow(ds_send_confirm.addRow(), ds_main_replprntlist, selRow);
	
	dsf_setDefaultVal(ds_send_confirm, "cnfmyn:N");
	
	var oParam = {};
		oParam.id          = "TRARC00109";
		oParam.service     = "healcarecoopapp.ReqMngt";
		oParam.method      = "reqSetConfirmYN";
		oParam.inds        = "req=ds_send_confirm";
		oParam.outds       = "=getResult";
		oParam.async       = false;
		oParam.callback    = "cf_callback";

	tranf_submit(oParam);	
	
	ds_main_replprntlist.setColumn(selRow, "cnfmyn", "N");
	opener.ds_replprntlist.setColumn(opener.ds_replprntlist.rowposition, "cnfmyn", "N");
}

function cf_callback(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

function btn_agr_onclick(obj:Button,  e:ClickEventInfo)
{	
	ds_send_iemr.setColumn(0, "pid", ds_send_search.getColumn(0, "pid"));
	
	var obj = frmf_findPopup("SSMRC03130");
	if(obj == null)
	{
		var objArg = {"arg_ds_hidden_temp":ds_send_iemr};
		frmf_open("SSMRC03130", "SSMRC03130", objArg, "", "", "", "", "", "", "", "", "", "M");
	}
	else
	{
		var iemrNode = ds_send_iemr;
		obj.reloadChart(iemrNode);
		obj.setFocus();
	}
}

function SPARC00900_onclose(obj:Form, e:CloseEventInfo)
{
	var obj = frmf_findPopup("SSMRC03130");
	if(!utlf_isNull(frmf_findPopup("SSMRC03130")))
	{
		frmf_findPopup("SSMRC03130").close();
	}
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

function grd_list_onrbuttonup(obj:Grid, e:GridMouseEventInfo)
{
	if(ds_main_replprntlist.getColumn(ds_main_replprntlist.rowposition, "cnfmyn") == "Y"){
		pmn_menu2.trackPopup(e.screenX,e.screenY);
	}
	else{
		pmn_menu1.trackPopup(e.screenX,e.screenY);
	}	
}

function pmn_menu1_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	obj.closePopup();
	eval(e.id +"();");
}

function pmn_menu2_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	obj.closePopup();
	eval(e.id +"();");
}
]]></Script>
  </Form>
</FDL>