123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SMRSD04420" position="absolute 0 0 1045 650" titletext="신규재료수가위원회내역(팝업)" oninit="SMRSD04420_oninit" onload="SMRSD04420_onload">
- <Layouts>
- <Layout>
- <Div id="group2" taborder="0" class="div_SA2" position="absolute 0 0 1040 40">
- <Layouts>
- <Layout>
- <Edit id="ipt_newmatrseq" taborder="1" class="input_essential" position="absolute 495 10 730 29" autoselect="true" autoskip="true"/>
- <Button id="btn_search" taborder="2" text="조회" class="btn1" position="absolute 975 9 1031 31" onclick="group2_btn_search_onclick"/>
- <Shape id="line13" linetype="vertical" class="line_4" position="absolute 957 9 963 27"/>
- <Static id="cap_newmatrseq" text="수가위원회차수 :" class="search_name" position="absolute 370 11 495 28"/>
- <Static id="cap_instcd" text="기관코드 :" class="search_name" position="absolute 15 11 101 28"/>
- <Combo id="cmb_instcd" taborder="3" class="combo_essential" position="absolute 115 10 240 29"/>
- </Layout>
- </Layouts>
- </Div>
- <Static id="caption4" text="물품 리스트" class="tit_2" position="absolute 0 61 113 82"/>
- <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 77 1040 83" anchor="left top right"/>
- <Grid id="grd_rscmnwgd" taborder="1" binddataset="ds_main_rscmnwgd" useinputpanel="false" position="absolute 0 82 1040 615" autoenter="select" autofittype="col" cellsizingtype="col">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="22"/>
- <Column size="55"/>
- <Column size="100"/>
- <Column size="100"/>
- <Column size="100"/>
- <Column size="100"/>
- <Column size="100"/>
- <Column size="0"/>
- <Column size="100"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="180"/>
- <Column size="169"/>
- </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="제조회사"/>
- <Cell col="9" text="주거래처-최종공급처"/>
- <Cell col="10" text="주거래처"/>
- <Cell col="11" text="담당자ID"/>
- <Cell col="12" text="담당자HP"/>
- <Cell col="13" text="담당자전화번호"/>
- <Cell col="14" text="구매단위"/>
- <Cell col="15" text="사용단위"/>
- <Cell col="16" text="청구수량"/>
- <Cell col="17" text="단가"/>
- <Cell col="18" text="월평균사용량"/>
- <Cell col="19" text="사용예정일"/>
- <Cell col="20" text="청구사유및용도"/>
- <Cell col="21" text="유사재료사용현황"/>
- <Cell col="22" text="타병원사용현황"/>
- <Cell col="23" text="신규재료사용시개선점"/>
- <Cell col="24" text="비고"/>
- <Cell col="25" text="청구부서"/>
- <Cell col="26" text="청구부서"/>
- <Cell col="27" text="청구자"/>
- <Cell col="28" text="청구자"/>
- <Cell col="29" text="청구자원내전화"/>
- <Cell col="30" text="요양급여"/>
- <Cell col="31" text="요양급여"/>
- <Cell col="32" text="EDI 코드"/>
- <Cell col="33" text="의료적비급여사유"/>
- <Cell col="34" text="해당고시"/>
- <Cell col="35" text="미결정치료재료신청일"/>
- <Cell col="36" text="미결정치료재료"/>
- <Cell col="37" text="행위료포함"/>
- <Cell col="38" text="심사소견"/>
- <Cell col="39" text="수가위원회여부"/>
- <Cell col="40" text="신규재료진행상태"/>
- <Cell col="41" text="대분류"/>
- <Cell col="42" text="대분류"/>
- <Cell col="43" text="중분류"/>
- <Cell col="44" text="중분류"/>
- <Cell col="45" text="소분류"/>
- <Cell col="46" text="소분류"/>
- <Cell col="47" text="물품코드"/>
- <Cell col="48" text="물품명"/>
- <Cell col="49" text="동재료한글명"/>
- <Cell col="50" text="동재료영어명"/>
- <Cell col="51" text="동재료수가코드"/>
- <Cell col="52" text="동재료금액"/>
- <Cell col="53" text="기관코드"/>
- <Cell col="54" text="수가위원회차수"/>
- <Cell col="55" text="청구일자"/>
- <Cell col="56" text="청구순번"/>
- <Cell col="57" text="물품구분"/>
- <Cell col="58" text="구매팀소견"/>
- <Cell col="59" text="응급처리여부"/>
- <Cell col="60" text="단가"/>
- <Cell col="61" text="구매단위"/>
- <Cell col="62" text="수가위원회구입여부결과"/>
- <Cell col="63" text="수가위원회수가결과" wordwrap="word"/>
- </Band>
- <Band id="body">
- <Cell celltype="head"/>
- <Cell col="1" text="bind:newmatrordseq"/>
- <Cell col="2" text="bind:goodhngnm"/>
- <Cell col="3" text="bind:goodengnm"/>
- <Cell col="4" text="bind:goodspec"/>
- <Cell col="5" text="bind:goodmodel"/>
- <Cell col="6" displaytype="combo" edittype="combo" text="bind:prodplce"/>
- <Cell col="7" text="bind:prodcmpycd"/>
- <Cell col="8" text="bind:prodcmpynm"/>
- <Cell col="9" text="bind:maincustlastsuplplce"/>
- <Cell col="10" text="bind:custnm"/>
- <Cell col="11" text="bind:chrgid"/>
- <Cell col="12" text="bind:chrgmpphon"/>
- <Cell col="13" text="bind:chrgtel"/>
- <Cell col="14" text="bind:gumae"/>
- <Cell col="15" text="bind:deliveunit"/>
- <Cell col="16" text="bind:reqqty" mask="999999999"/>
- <Cell col="17" text="bind:danga" mask="#,###"/>
- <Cell col="18" text="bind:mmavguseqty" mask="999999999"/>
- <Cell col="19" text="bind:useschedd"/>
- <Cell col="20" text="bind:reqresnusge"/>
- <Cell col="21" text="bind:smlartymatruseprestcond"/>
- <Cell col="22" text="bind:anohospusestat"/>
- <Cell col="23" text="bind:newmatrusgeimprvpnt"/>
- <Cell col="24" text="bind:reqcmt"/>
- <Cell col="25" text="bind:reqdeptcd"/>
- <Cell col="26" text="bind:depthngnm"/>
- <Cell col="27" text="bind:reqpsnid"/>
- <Cell col="28" text="bind:name"/>
- <Cell col="29" text="bind:reqdepttel"/>
- <Cell col="30" text="bind:insuyn"/>
- <Cell col="31" text="bind:insu"/>
- <Cell col="32" text="bind:edicd"/>
- <Cell col="33" text="bind:insuresn"/>
- <Cell col="34" text="bind:insucomd"/>
- <Cell col="35" text="bind:undecicurematrreqdt" mask="yyyy-mm-dd"/>
- <Cell col="36" text="bind:undecicurematr"/>
- <Cell col="37" text="bind:actamtincl"/>
- <Cell col="38" text="bind:judgcmt"/>
- <Cell col="39" text="bind:insucommityn"/>
- <Cell col="40" text="bind:newmatrprcsstat"/>
- <Cell col="41" text="bind:lrgcd"/>
- <Cell col="42" text="bind:lrgnm"/>
- <Cell col="43" text="bind:mdlcd"/>
- <Cell col="44" text="bind:mdlnm"/>
- <Cell col="45" text="bind:smlcd"/>
- <Cell col="46" text="bind:smlnm"/>
- <Cell col="47" text="bind:goodcd"/>
- <Cell col="48" text="bind:goodnm"/>
- <Cell col="49" text="bind:smlartygoodhngnm"/>
- <Cell col="50" text="bind:smlartygoodengnm"/>
- <Cell col="51" text="bind:calcscorcd"/>
- <Cell col="52" text="bind:smlartyamt" mask="#,###"/>
- <Cell col="53" text="bind:instcd"/>
- <Cell col="54" text="bind:newmatrseq"/>
- <Cell col="55" text="bind:reqdd"/>
- <Cell col="56" text="bind:reqseqno"/>
- <Cell col="57" text="bind:goodflag"/>
- <Cell col="58" text="bind:purcteamcmt"/>
- <Cell col="59" text="bind:newmatremflag"/>
- <Cell col="60" text="bind:goodunitcost"/>
- <Cell col="61" text="bind:purcunit"/>
- <Cell col="62" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:rsltpurc" combodataset="ds_init_rsltpurc" combocodecol="value" combodatacol="label"/>
- <Cell col="63" displaytype="text" edittype="text" text="bind:rsltinsucmt"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <Button id="btn_iptrslt" taborder="2" text="저장" class="btn4" position="absolute 987 57 1040 77" onclick="btn_iptrslt_onclick"/>
- <Button id="btn_cancel" taborder="4" text="닫기" class="btn4" position="absolute 984 618 1040 640" onclick="btn_cancel_onclick"/>
- <Shape id="line3" linetype="horizontal" class="line_6" position="absolute 0 614 1040 620"/>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="instcd" type="STRING" size="256"/>
- <Column id="newmatrseq" type="STRING" size="256"/>
- <Column id="rscmnwgd" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="instcd"/>
- <Col id="newmatrseq"/>
- <Col id="rscmnwgd"/>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_main_rscmnwgd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
- <Column id="newmatrseq" type="STRING" size="256" sumtext="수가위원회차수"/>
- <Column id="reqdd" type="STRING" size="256" sumtext="청구일자"/>
- <Column id="reqseqno" type="STRING" size="256" sumtext="청구순번"/>
- <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
- <Column id="insucommityn" type="STRING" size="256" sumtext="수"/>
- <Column id="newmatrordseq" type="BIGDECIMAL" size="256" sumtext="수가위원회출력순번"/>
- <Column id="newmatremflag" type="STRING" size="256" sumtext="응급처리여부"/>
- <Column id="goodunitcost" type="BIGDECIMAL" size="256" sumtext="단가"/>
- <Column id="purcunit" type="STRING" size="256" sumtext="구매단위"/>
- <Column id="rsltpurc" type="STRING" size="256" sumtext="수가위원회구입여부결과"/>
- <Column id="rsltinsucmt" type="STRING" size="256" sumtext="수가위원회수가결과"/>
- <Column id="rsltcmt" type="STRING" size="256" sumtext="수가위원회구입여부결과(출력물)"/>
- <Column id="goodhngnm" type="STRING" size="256" sumtext="물품한글명"/>
- <Column id="goodengnm" type="STRING" size="256" sumtext="물품영문명"/>
- <Column id="goodspec" type="STRING" size="256" sumtext="물품규격"/>
- <Column id="goodmodel" type="STRING" size="256" sumtext="물품모델"/>
- <Column id="prodplce" type="STRING" size="256" sumtext="제조국"/>
- <Column id="prodcmpycd" type="STRING" size="256" sumtext="제조회사코드"/>
- <Column id="prodcmpynm" type="STRING" size="256" sumtext="제조회사명"/>
- <Column id="maincustlastsuplplce" type="STRING" size="256" sumtext="주거래처-최종공급처"/>
- <Column id="custnm" type="STRING" size="256" sumtext="주거래처-최종공급처명"/>
- <Column id="chrgid" type="STRING" size="256" sumtext="담당자ID"/>
- <Column id="chrgmpphon" type="STRING" size="256" sumtext="담당자HP"/>
- <Column id="chrgtel" type="STRING" size="256" sumtext="담당자전화번호"/>
- <Column id="gumae" type="STRING" size="256" sumtext="구매단위"/>
- <Column id="deliveunit" type="STRING" size="256" sumtext="사용단위"/>
- <Column id="reqqty" type="STRING" size="256" sumtext="청구수량"/>
- <Column id="danga" type="BIGDECIMAL" size="256" sumtext="단가"/>
- <Column id="mmavguseqty" type="BIGDECIMAL" size="256" sumtext="월평균사용량"/>
- <Column id="useschedd" type="STRING" size="256" sumtext="사용예정일"/>
- <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
- <Column id="reqresnusge" type="STRING" size="256" sumtext="청구사유 및 용도"/>
- <Column id="smlartymatruseprestcond" type="STRING" size="256" sumtext="유사재료사용현황"/>
- <Column id="anohospusestat" type="STRING" size="256" sumtext="타병원사용현황"/>
- <Column id="newmatrusgeimprvpnt" type="STRING" size="256" sumtext="신규재료사용시 개선점"/>
- <Column id="reqcmt" type="STRING" size="256" sumtext="비고"/>
- <Column id="reqdeptcd" type="STRING" size="256" sumtext="청구부서"/>
- <Column id="depthngnm" type="STRING" size="256" sumtext="청구부서명"/>
- <Column id="reqpsnid" type="STRING" size="256" sumtext="청구자"/>
- <Column id="name" type="STRING" size="256" sumtext="청구자"/>
- <Column id="reqdepttel" type="STRING" size="256" sumtext="청구자원내전화"/>
- <Column id="insuyn" type="STRING" size="256" sumtext="보험여부"/>
- <Column id="insuresn" type="STRING" size="256" sumtext="의료적비급여사유"/>
- <Column id="insucomd" type="STRING" size="256" sumtext="해당고시"/>
- <Column id="undecicurematr" type="STRING" size="256" sumtext="미결정치료재료"/>
- <Column id="undecicurematrreqdt" type="STRING" size="256" sumtext="미결정치료재료신청일"/>
- <Column id="insu" type="STRING" size="256" sumtext="보험여부결과"/>
- <Column id="actamtincl" type="STRING" size="256" sumtext="행위료포함"/>
- <Column id="judgcmt" type="STRING" size="256" sumtext="심사소견"/>
- <Column id="purcteamcmt" type="STRING" size="256" sumtext="구매팀소견"/>
- <Column id="newmatrprcsstat" type="STRING" size="256" sumtext="신규재료진행상태"/>
- <Column id="lrgcd" type="STRING" size="256" sumtext="대분류"/>
- <Column id="lrgnm" type="STRING" size="256" sumtext="대분류"/>
- <Column id="mdlcd" type="STRING" size="256" sumtext="중분류"/>
- <Column id="mdlnm" type="STRING" size="256" sumtext="중분류"/>
- <Column id="smlcd" type="STRING" size="256" sumtext="소분류"/>
- <Column id="smlnm" type="STRING" size="256" sumtext="소분류"/>
- <Column id="goodcd" type="STRING" size="256" sumtext="물품코드"/>
- <Column id="goodnm" type="STRING" size="256" sumtext="물품명"/>
- <Column id="smlartygoodhngnm" type="STRING" size="256" sumtext="동재료 한글명"/>
- <Column id="smlartygoodengnm" type="STRING" size="256" sumtext="동재료 영어명"/>
- <Column id="calcscorcd" type="STRING" size="256" sumtext="동재료 수가코드"/>
- <Column id="smlartyamt" type="STRING" size="256" sumtext="동재료 금액"/>
- <Column id="instnm" type="STRING" size="256" sumtext="기관명"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_init_rsltpurc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="label" type="STRING" size="256"/>
- <Column id="value" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="label">통과</Col>
- <Col id="value">1</Col>
- </Row>
- <Row>
- <Col id="label">보류</Col>
- <Col id="value">2</Col>
- </Row>
- <Row>
- <Col id="label">불가</Col>
- <Col id="value">3</Col>
- </Row>
- </Rows>
- </Dataset>
- <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_temp_rscmnwsg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
- <Column id="newmatrseq" type="STRING" size="256" sumtext="수가위원회차수"/>
- <Column id="reqdd" type="STRING" size="256" sumtext="청구일자"/>
- <Column id="reqseqno" type="STRING" size="256" sumtext="청구순번"/>
- <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
- <Column id="smlartygoodcd" type="STRING" size="256" sumtext="물품구분"/>
- </ColumnInfo>
- </Dataset>
- </Objects>
- <Bind>
- <BindItem id="item0" compid="group2.cmb_instcd" propid="value" datasetid="ds_send" columnid="instcd"/>
- <BindItem id="item1" compid="group2.ipt_newmatrseq" propid="value" datasetid="ds_send" columnid="newmatrseq"/>
- </Bind>
- <Script type="xscript4.0"><![CDATA[/***************************************************************************************
- * System Name :
- * Job Name :
- * Creator :
- * Make Date : 2017-06-19
- * Description :
- *---------------------------------------------------------------------------------------
- * Modify Date Modifier Modify Description
- *---------------------------------------------------------------------------------------
- * 2017-06-19 Live Converter TF->XP
- *
- *---------------------------------------------------------------------------------------
- ****************************************************************************************/
- include "com_commonxp::comm_main.xjs";
- include "mis_miscommonxp::MIS.xjs";
- function SMRSD04420_oninit(obj:Form, e:InitEventInfo)
- {
- frmf_initForm(obj);
- }
- function SMRSD04420_onload(obj:Form, e:LoadEventInfo)
- {
- grdf_initGrid(grd_rscmnwgd);
- grdf_setRowTypeIcon(grd_rscmnwgd, 0);
-
- try
- {
- ds_temp.copyData(arg_ds_temp);
- }
- catch(e)
- {
- }
-
- fInitialize();
- fGetdata();
- }
- function fInitialize()
- {
- ds_send.clearData();
- ds_send.addRow();
- misfGridInit(grd_rscmnwgd);
-
- misfComboComCdListMulti("Z0007", "group2.cmb_instcd");
-
- ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
-
- misfMsterDetailSet(grd_rscmnwgd, null, "TRRSD04401","Y");
- }
- function fGetdata()
- {
- var sInstcd = ds_temp.getColumn(0, "instcd");
- var sNewmatrseq = ds_temp.getColumn(0, "newmatrseq");
-
- if(!utlf_isNull(sInstcd))
- {
- group2.cmb_instcd.value = ds_temp.getColumn(0, "instcd");
- group2.cmb_instcd.enable = false;
- }
- if(!utlf_isNull(sNewmatrseq))
- {
- group2.ipt_newmatrseq.value = ds_temp.getColumn(0, "newmatrseq");
- group2.ipt_newmatrseq.enable = false;
- }
- if(!utlf_isNull(sInstcd) && !utlf_isNull(sNewmatrseq)) group2.btn_search.click();
- }
- function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
- {
- arrCompId = new Array("group2.cmb_instcd","group2.ipt_newmatrseq");
- frmf_isRequiredControls(arrCompId);
-
- var oParam = {};
- oParam.id = "TRRSD04401";
- oParam.service = "purcbaseapp.PurcBaseMngt";
- oParam.method = "reqGetGoodCd";
- oParam.inds = "req=ds_send";
- oParam.outds = "ds_main_rscmnwgd=rscmnwgd";
- oParam.async = false;
- //oParam.callback = "cf_TRRSD04401";
- tranf_submit(oParam);
- }
- function btn_iptrslt_onclick(obj:Button, e:ClickEventInfo)
- {
- fSave();
- }
- function fSave()
- {
- if(!frmf_chkMdtGrid(grd_rscmnwgd, [2,3,4,5], ["물품한글명", "물품영문명", "물품규격", "물품모델", "제조국"])) return;
- var oParam = {};
- oParam.id = "TXRSD04402";
- oParam.service = "purcbaseapp.PurcBaseMngt";
- oParam.method = "reqSetNewMatr";
- oParam.inds = "wic=ds_main_rscmnwgd:u wsg=ds_temp_rscmnwsg:u";
- oParam.outds = "";
- oParam.async = false;
- //oParam.callback = "cf_TXRSD04402";
- tranf_submit(oParam);
- }
- function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
- {
- this.close();
- }
- ]]></Script>
- </Form>
- </FDL>
|