YNU_JEUS/app_home/himed/xpapps/pam/patinfomngtxp/xp/SPPMC00301_수진내역환자전달사항등록.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPMC00301" position="absolute 0 0 740 690" titletext="Untitle" onload="SPPMC00301_onload">
    <Layouts>
      <Layout>
        <Div id="group5" position="absolute 10 10 720 680" style="">
          <Layouts>
            <Layout>
              <Button id="btn_search" class="btn1" position="absolute 644 7 700 29" text="조회" onclick="group5_btn_search_onclick"/>
              <Shape id="line17" class="line_10" linetype="horizontal" position="absolute 5 31 700 35" style="" anchor="default"/>
              <Grid id="grd_memo" binddataset="ds_main_memoinfo_memolist" position="absolute 5 34 700 624" style="" ontextchanged="group5_grd_memo_ontextchanged" autoenter="select">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25" band="left"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="400"/>
                      <Column size="60"/>
                      <Column size="121"/>
                      <Column size="116"/>
                      <Column size="86"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="처리상태"/>
                      <Cell col="2" text="구분"/>
                      <Cell col="3" text="상태"/>
                      <Cell col="4" text="심사자 전달사항"/>
                      <Cell col="5" text="심사자"/>
                      <Cell col="6" text="전달사항 입력일시"/>
                      <Cell col="7" text="의사확인일시"/>
                      <Cell col="8" text="의사확인여부"/>
                    </Band>
                    <Band id="body">
                      <Cell/>
                      <Cell col="1" displaytype="combo" edittype="combo" text="bind:tretflag" combodataset="ds_paminit_P5008list_P5008" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="2" displaytype="combo" edittype="combo" text="bind:refundflag" combodataset="ds_paminit_P5009list_P5009" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="3" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:histstat" combodataset="ds_paminit_P5010list_P5010" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="4" displaytype="text" edittype="text" text="bind:memo"/>
                      <Cell col="5" style="align:left middle;" text="bind:memojudgrnm"/>
                      <Cell col="6" displaytype="date" style="align:left middle;" text="bind:judgmmdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="none"/>
                      <Cell col="7" displaytype="date" style="align:left middle;" text="bind:docchkdt" mask="yyyy-MM-dd hh:mm:ss" calendardisplaynulltype="none"/>
                      <Cell col="8" displaytype="checkbox" edittype="checkbox" text="bind:doccnfchk" expr="expr:(doccnfchk == 'Y' || doccnfchk == '1') ? '1' : '0'"/>
                      <Cell col="9" text="bind:pid"/>
                      <Cell col="10" text="bind:ofidocacptdd"/>
                      <Cell col="11" text="bind:ofidocretno"/>
                      <Cell col="12" text="bind:orddeptcd"/>
                      <Cell col="13" text="bind:orddrid"/>
                      <Cell col="14" text="bind:seqno"/>
                      <Cell col="15" text="bind:memojudgrid"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button id="button20" class="btn2" position="absolute 650 640 692 659" style="" text="닫기" onclick="group5_button20_onclick"/>
              <Button id="button23" class="btn5" position="absolute 598 9 640 28" text="저장" onclick="group5_button23_onclick"/>
              <Static id="caption1" class="tit_2" position="absolute 10 14 123 32" style="" text="전달사항 내역"/>
              <Button id="button1" class="btn2" position="absolute 507 9 549 28" text="추가" onclick="group5_button1_onclick"/>
              <Button id="button2" class="btn2" position="absolute 553 9 595 28" text="삭제" onclick="group5_button2_onclick"/>
              <Grid id="grd_memochk" binddataset="ds_hidden_memoinfo_memolist" visible="false" position="absolute 70 281 673 338" style="">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="81"/>
                      <Column size="0"/>
                      <Column size="87"/>
                      <Column size="103"/>
                      <Column size="99"/>
                      <Column size="72"/>
                      <Column size="74"/>
                      <Column size="86"/>
                    </Columns>
                    <Rows>
                      <Row size="31" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="의사확인여부"/>
                      <Cell col="1" text="환자번호"/>
                      <Cell col="2" text="공문접수일자"/>
                      <Cell col="3" text="공문접수일자별&#13;&#10;일련번호"/>
                      <Cell col="4" text="전달사항저장&#13;&#10;일련번호"/>
                      <Cell col="5"/>
                      <Cell col="6"/>
                      <Cell col="7"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="checkbox" text="bind:doccnfchk"/>
                      <Cell col="1" text="bind:pid"/>
                      <Cell col="2" text="bind:ofidocacptdd"/>
                      <Cell col="3" text="bind:ofidocretno"/>
                      <Cell col="4" text="bind:seqno"/>
                      <Cell col="5" text="bind:tretflag"/>
                      <Cell col="6" text="bind:refundflag"/>
                      <Cell col="7" text="bind:histstat"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_paminit_P5009list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_paminit_P5008list_P5008" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cd"/>
            <Col id="nm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="GridMemo01" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="GridMemo01"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp4" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp4" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="temp4"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0495list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_memoinfo_memolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep" oncolumnchanged="ds_main_memoinfo_memolist_oncolumnchanged">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_hidden_memoinfo_memolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="doccnfchk" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="ofidocacptdd" type="STRING" size="256"/>
          <Column id="ofidocretno" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="tretflag" type="STRING" size="256"/>
          <Column id="refundflag" type="STRING" size="256"/>
          <Column id="histstat" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="doccnfchk"/>
            <Col id="pid"/>
            <Col id="ofidocacptdd"/>
            <Col id="ofidocretno"/>
            <Col id="seqno"/>
            <Col id="tretflag"/>
            <Col id="refundflag"/>
            <Col id="histstat"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="srchFlag" type="STRING" size="256"/>
          <Column id="srchFlagNm" type="STRING" size="256"/>
          <Column id="memoFlag01" type="STRING" size="256"/>
          <Column id="memoCls01" type="STRING" size="256"/>
          <Column id="judgrID01" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchFlag"/>
            <Col id="srchFlagNm"/>
            <Col id="memoFlag01"/>
            <Col id="memoCls01"/>
            <Col id="judgrID01"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="temp"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0496list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_paminit" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_paminit_P5010list_P5010" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_P0496list_P0496" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"/>
            <Col id="cdid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_paminit_P5009list_P5009" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cd"/>
            <Col id="nm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_paminit_P5008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_P0495list_P0495" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"/>
            <Col id="cdid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_memoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_paminit_P5010list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_send_reqdata" 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"/>
    </Objects>
    <Bind/>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";
include "com_basiccodexp::ZBC001.xjs";
include "pam_pamcomnxp::PAM.xjs";
include "pam_pamcomnxp::PAM001.xjs";

var arErrorCode = new HashArray();

function SPPMC00301_onload(obj: Form, e: LoadEventInfo) {
    frmf_initForm(obj);

    grdf_setRowTypeIcon(group5.grd_memo, 0); 

    var arrParam = [{
        dsNm: "ds_paminit_P5008list_P5008",
        cdGrpId: "P5008"
    }, {
        dsNm: "ds_paminit_P5009list_P5009",
        cdGrpId: "P5009"
    }, {
        dsNm: "ds_paminit_P5010list_P5010",
        cdGrpId: "P5010"
    }];

    pamfGetCodeList(arrParam);

    var param_pid = opener.frmf_getParameter("SPPMC00301_pid");
    var param_ofidocacptdd = opener.frmf_getParameter("SPPMC00301_ofidocacptdd");
    var param_ofidocretno = opener.frmf_getParameter("SPPMC00301_ofidocretno");
    var param_orddeptcd = opener.frmf_getParameter("SPPMC00301_orddeptcd");
    var param_orddrid = opener.frmf_getParameter("SPPMC00301_orddrid");
    var param_tretflag = opener.frmf_getParameter("SPPMC00301_tretflag");

    ds_send_data1.clearData();
    ds_send_data1.addRow();

    dsf_makeValue(ds_send_data1, "pid", "string", "");
    dsf_makeValue(ds_send_data1, "ofidocacptdd", "string", "");
    dsf_makeValue(ds_send_data1, "ofidocretno", "string", "");
    dsf_makeValue(ds_send_data1, "orddeptcd", "string", "");
    dsf_makeValue(ds_send_data1, "orddrid", "string", "");
    dsf_makeValue(ds_send_data1, "tretflag", "string", "");

    ds_send_data1.setColumn(0, "pid", param_pid);
    ds_send_data1.setColumn(0, "ofidocacptdd", param_ofidocacptdd);
    ds_send_data1.setColumn(0, "ofidocretno", param_ofidocretno);
    ds_send_data1.setColumn(0, "orddeptcd", param_orddeptcd);
    ds_send_data1.setColumn(0, "orddrid", param_orddrid);
    ds_send_data1.setColumn(0, "tretflag", param_tretflag);

    group5.grd_memo.setCellProperty("body", group5.grd_memo.getBindCellIndex("body", "tretflag"), "edittype", "none");
    group5.grd_memo.setCellProperty("body", group5.grd_memo.getBindCellIndex("body", "histstat"), "edittype", "none");

    group5.btn_search.click();

}

function group5_btn_search_onclick(obj: Button, e: ClickEventInfo) {
    var oParam = {};
    oParam.id = "TRPMC03011";
    oParam.service = "patinfomngtapp.PatSpecPat";
    oParam.method = "reqGetJudgMemoList";
    oParam.inds = "req=ds_send_data1";
    oParam.outds = "ds_main_memoinfo_memolist=memolist";
    oParam.async = false;

    tranf_submit(oParam);
}

function group5_grd_memo_ontextchanged(obj: Grid, e: GridEditTextChangedEventInfo) {

}

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


function group5_button20_onclick(obj: Button, e: ClickEventInfo) {
    this.close();
}

function group5_button23_onclick(obj: Button, e: ClickEventInfo) {
    var updata = grdf_getGridUpdateData(group5.grd_memo, "all");
    grdf_setStatusColumn(updata, "status");
    ds_send_reqdata.copyData(updata);
    
    var oParam = {};
    oParam.id = "TXPMC03008";
    oParam.service = "patinfomngtapp.PatSpecPat";
    oParam.method = "reqExeJudgMemoList";
    oParam.inds = "req=ds_send_reqdata";
    oParam.outds = "";
    oParam.async = false;
    oParam.callback = "cf_TXPMC03008";

    tranf_submit(oParam);

    if (arErrorCode.pop("TXPMC03008") > -1) {
        sysf_messageBox("저장되었습니다.", "I");
        group5.btn_search.click();
    }

}

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

function group5_button1_onclick(obj: Button, e: ClickEventInfo) {
    var iRow = ds_main_memoinfo_memolist.addRow();
    ds_main_memoinfo_memolist.setColumn(iRow, "pid", ds_send_data1.getColumn(0, "pid"));
    ds_main_memoinfo_memolist.setColumn(iRow, "ofidocacptdd", ds_send_data1.getColumn(0, "ofidocacptdd"));
    ds_main_memoinfo_memolist.setColumn(iRow, "ofidocretno", ds_send_data1.getColumn(0, "ofidocretno"));
    ds_main_memoinfo_memolist.setColumn(iRow, "orddeptcd", ds_send_data1.getColumn(0, "orddeptcd"));
    ds_main_memoinfo_memolist.setColumn(iRow, "orddrid", ds_send_data1.getColumn(0, "orddrid"));
    ds_main_memoinfo_memolist.setColumn(iRow, "tretflag", ds_send_data1.getColumn(0, "tretflag"));
    ds_main_memoinfo_memolist.setColumn(iRow, "memojudgrnm", sysf_getUserInfo("usernm"));
    ds_main_memoinfo_memolist.setColumn(iRow, "memojudgrid", sysf_getUserInfo("userid"));
    ds_main_memoinfo_memolist.setColumn(iRow, "histstat", "Y");
    ds_main_memoinfo_memolist.setColumn(iRow, "refundflag", "0");
}

function group5_button2_onclick(obj: Button, e: ClickEventInfo) {
    var iRow = ds_main_memoinfo_memolist.rowposition;
    ds_main_memoinfo_memolist.setRowType(iRow, Dataset.ROWTYPE_DELETE); //group5.grd_memo.rowStatus(group5.grd_memo.row) = 4;
    group5.button23.click();
}

function ds_main_memoinfo_memolist_oncolumnchanged(obj: Dataset, e: DSColChangeEventInfo) {
    if (e.columnid == 'doccnfchk') {
        var value = obj.getcolumn(e.row, 'doccnfchk');
        value = (value == 'Y' || value == '1') ? 'Y' : 'N';
        obj.setColumn(e.row, 'doccnfchk', value);
    }
    var iRow = ds_main_memoinfo_memolist.rowposition;
    var stat = ds_main_memoinfo_memolist.getColumn(iRow, "histstat");

    if (stat != "Y") {
        sysf_messageBox(" 'Y' 상태가 아닌 내역은 수정할 수 없습니다. ", "I");
        group5.btn_search.click();
        return;
    }

    if (e.col == group5.grd_memo.getBindCellIndex("body", "doccnfchk")) {

        if (stat != "Y") {
            sysf_messageBox(" 'Y' 상태가 아닌 내역은 수정할 수 없습니다. ", "I");
            group5.btn_search.click();
            return;
        }
        else {
            ds_hidden_memoinfo_memolist.setColumn(0, "pid", ds_main_memoinfo_memolist.getColumn(iRow, "pid"));
            ds_hidden_memoinfo_memolist.setColumn(0, "ofidocacptdd", ds_main_memoinfo_memolist.getColumn(iRow, "ofidocacptdd"));
            ds_hidden_memoinfo_memolist.setColumn(0, "ofidocretno", ds_main_memoinfo_memolist.getColumn(iRow, "ofidocretno"));
            ds_hidden_memoinfo_memolist.setColumn(0, "seqno", ds_main_memoinfo_memolist.getColumn(iRow, ("seqno")));
            ds_hidden_memoinfo_memolist.setColumn(0, "doccnfchk", ds_main_memoinfo_memolist.getColumn(iRow, "doccnfchk"));
            ds_hidden_memoinfo_memolist.setColumn(0, "tretflag", ds_main_memoinfo_memolist.getColumn(iRow, "tretflag"));
            ds_hidden_memoinfo_memolist.setColumn(0, "refundflag", ds_main_memoinfo_memolist.getColumn(iRow, "refundflag"));
            ds_hidden_memoinfo_memolist.setColumn(0, "histstat", ds_main_memoinfo_memolist.getColumn(iRow, "histstat"));

            var chkdata = grdf_getGridUpdateData(group5.grd_memochk, "all"); //.getUpdateData();
            ds_send_reqdata.copyData(chkdata);

            var oParam = {};
            oParam.id = "TXPMC03009";
            oParam.service = "patinfomngtapp.PatSpecPat";
            oParam.method = "reqExeJudgMemoChkInfo";
            oParam.inds = "req=ds_send_reqdata";
            oParam.outds = "";
            oParam.async = false;
            oParam.callback = "cf_TXPMC03009";

            tranf_submit(oParam);

            if (arErrorCode.pop("TXPMC03009") > -1) {
                sysf_messageBox("저장되었습니다.", "I");
                group5.btn_search.click();
            }
        }
    }
}]]></Script>
  </Form>
</FDL>