123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SMRAH04000" position="absolute 0 0 816 561" titletext="프로젝트 정보" oninit="SMRAH04000_oninit" onload="SMRAH04000_onload">
- <Layouts>
- <Layout>
- <Static id="caption6" text="프로젝트 정보" onclick="group1_caption6_onclick" class="tit_1" position="absolute 0 0 125 25"/>
- <Shape id="line2" linetype="horizontal" class="line_6" position="absolute 0 38 815 44"/>
- <Button id="btn_save" taborder="1" text="저장" class="btn4" position="absolute 701 18 757 40" onclick="btn_save_onclick"/>
- <Button id="btn_close" taborder="2" text="닫기" class="btn4" position="absolute 759 18 815 40" onclick="btn_close_onclick"/>
- <Button id="btn_delete" taborder="3" text="삭제" class="btn4" position="absolute 643 18 699 40" onclick="btn_delete_onclick"/>
- <Shape id="line1" linetype="horizontal" class="line_10" position="absolute -1 65 814 71"/>
- <Shape id="line13" linetype="horizontal" class="line_2" position="absolute 1 91 813 97"/>
- <Static id="caption20" text="상세내역" class="tit_2" position="absolute 0 49 72 66"/>
- <Static id="cap_matrcd" text="프로젝트 번호" class="cell_1" position="absolute 0 70 90 93"/>
- <Static id="cap_matrnm" text="프로젝트 명" class="cell_1" position="absolute 0 95 90 118"/>
- <Shape id="line4" linetype="horizontal" class="line_2" position="absolute 1 116 813 122"/>
- <Static id="caption25" text="프로젝트 내용" class="cell_1" position="absolute 0 120 90 214"/>
- <Shape id="line7" linetype="horizontal" class="line_2" position="absolute 1 212 813 218"/>
- <Shape id="line20" linetype="horizontal" class="line_2" position="absolute 1 237 813 243"/>
- <Static id="caption11" text="담당부서" class="cell_1" position="absolute 0 216 90 239"/>
- <Shape id="line9" linetype="horizontal" class="line_2" position="absolute 1 262 813 268"/>
- <Static id="caption3" text="시작일" class="cell_1" position="absolute 0 241 90 264"/>
- <Edit id="opt_deptnm" taborder="4" readonly="false" position="absolute 93 218 270 237" enable="false"/>
- <Button id="btn_deptcd" taborder="5" class="icon_search" position="absolute 272 219 288 235" onclick="btn_deptcd_onclick"/>
- <Static id="caption1" text="담당자" class="cell_1" position="absolute 295 216 385 239"/>
- <Static id="caption2" text="관리자" class="cell_1" position="absolute 555 216 645 239"/>
- <Static id="caption4" text="종료예정일" class="cell_1" position="absolute 295 241 385 264"/>
- <Static id="caption5" text="종료일" class="cell_1" position="absolute 555 241 645 264"/>
- <Edit id="ipt_deptcd" taborder="6" class="input_default" visible="false" position="absolute 210 242 285 261"/>
- <Shape id="line3" linetype="horizontal" class="line_2" position="absolute 1 287 813 293"/>
- <Static id="caption8" text="상태" class="cell_1" position="absolute 0 266 90 289"/>
- <Static id="caption7" text="진행사항" class="tit_2" position="absolute 0 303 72 319"/>
- <Shape id="line5" linetype="horizontal" class="line_10" position="absolute -1 319 814 325"/>
- <Button id="btn_add" taborder="7" text="보고서 등록" class="btn2" position="absolute 727 299 813 318" onclick="btn_add_onclick"/>
- <Edit id="ipt_prjttitle" taborder="8" class="input_default" position="absolute 93 97 815 116"/>
- <TextArea id="txt_prjtcontext" taborder="9" position="absolute 93 122 815 210" wordwrap="both"/>
- <Edit id="ipt_prjtuser" taborder="10" class="input_default" enable="false" position="absolute 389 217 430 236"/>
- <Button id="btn_prjtuser" taborder="11" class="icon_search" position="absolute 432 218 448 234" onclick="btn_prjtuser_onclick"/>
- <Edit id="ipt_prjtusernm" taborder="12" class="input_default" enable="false" position="absolute 450 217 545 236"/>
- <Edit id="ipt_prjtmanager" taborder="13" class="input_default" enable="false" position="absolute 649 217 690 236"/>
- <Button id="btn_prjtmanager" taborder="14" class="icon_search" position="absolute 692 218 708 234" onclick="btn_prjtmanager_onclick"/>
- <Edit id="ipt_prjtmanagernm" taborder="15" class="input_default" enable="false" position="absolute 710 217 805 236"/>
- <Calendar id="ipt_prjtfromdd" taborder="16" class="input_default" position="absolute 94 243 193 262"/>
- <Calendar id="ipt_prjtexptodd" taborder="17" class="input_default" position="absolute 390 243 489 262"/>
- <Calendar id="ipt_prjttodd" taborder="18" class="input_default" position="absolute 650 243 749 262"/>
- <Grid id="grd_reptlist" taborder="19" binddataset="ds_main_reptinfo_reptlist" useinputpanel="false" position="absolute 0 324 815 559" autosizingtype="row" cellsizingtype="row" extendsizetype="row">
- <Formats>
- <Format id="default">
- <Columns>
- <Column size="23"/>
- <Column size="81"/>
- <Column size="317"/>
- <Column size="56"/>
- <Column size="283"/>
- <Column size="44"/>
- <Column size="0"/>
- <Column size="0"/>
- <Column size="0"/>
- </Columns>
- <Rows>
- <Row size="24" band="head"/>
- <Row size="24" band="head"/>
- <Row size="24"/>
- </Rows>
- <Band id="head">
- <Cell rowspan="2" taborder="undefined"/>
- <Cell col="1" rowspan="2" text="보고일" taborder="undefined"/>
- <Cell col="2" rowspan="2" text="보고내용" taborder="undefined"/>
- <Cell col="3" rowspan="2" text="보고자" taborder="undefined"/>
- <Cell col="4" rowspan="2" text="관리자 comment" taborder="undefined"/>
- <Cell col="5" rowspan="2" text="관리자 확인" taborder="undefined"/>
- <Cell col="6" text="instcd"/>
- <Cell col="7" text="prjtsqno"/>
- <Cell col="8" text="reptuser"/>
- <Cell row="1" col="6" text="instcd"/>
- <Cell row="1" col="7" text="prjtsqno"/>
- <Cell row="1" col="8" text="reptuser"/>
- </Band>
- <Band id="body">
- <Cell celltype="head" text="expr:expr:currow == ds_main_reptinfo_reptlist.rowposition ? '▶' : ''" autosizerow="limitmin"/>
- <Cell col="1" displaytype="date" edittype="date" text="bind:reptdd" mask="yyyy-MM-dd" autosizerow="limitmin"/>
- <Cell col="2" style="align:left middle;" text="bind:reptcontext" wordwrap="both" autosizerow="limitmin"/>
- <Cell col="3" text="bind:reptusernm" autosizerow="limitmin"/>
- <Cell col="4" text="bind:comtcontext" autosizerow="limitmin"/>
- <Cell col="5" text="bind:reptconfirm" autosizerow="limitmin"/>
- <Cell col="6" text="bind:instcd"/>
- <Cell col="7" text="bind:prjtsqno"/>
- <Cell col="8" text="bind:reptuser"/>
- </Band>
- </Format>
- </Formats>
- </Grid>
- <Combo id="cmb_prjtstat" taborder="20" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_s_default" position="absolute 94 268 185 287">
- <Dataset id="innerdataset">
- <ColumnInfo>
- <Column id="codecolumn"/>
- <Column id="datacolumn"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="codecolumn">1</Col>
- <Col id="datacolumn">예정</Col>
- </Row>
- <Row>
- <Col id="codecolumn">2</Col>
- <Col id="datacolumn">진행중</Col>
- </Row>
- <Row>
- <Col id="codecolumn">3</Col>
- <Col id="datacolumn">완료</Col>
- </Row>
- </Rows>
- </Dataset>
- </Combo>
- <Edit id="opt_prjtsqno" taborder="21" readonly="true" position="absolute 94 72 145 91"/>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_main_reptinfo_reptlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="reptdd" type="STRING"/>
- <Column id="reptcontext" type="STRING"/>
- <Column id="reptusernm" type="STRING"/>
- <Column id="comtcontext" type="STRING"/>
- <Column id="reptconfirm" type="STRING"/>
- <Column id="instcd" type="STRING"/>
- <Column id="prjtsqno" type="STRING"/>
- <Column id="reptuser" type="STRING"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_main_condition" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="status" type="STRING" size="256"/>
- <Column id="instcd" type="STRING" size="256"/>
- <Column id="prjtsqno" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row/>
- </Rows>
- </Dataset>
- <Dataset id="ds_main_prjtinfo_detail" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="status" type="STRING" size="256" sumtext="상태"/>
- <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
- <Column id="prjtsqno" type="STRING" size="256" sumtext="프로젝트 번호"/>
- <Column id="prjttitle" type="STRING" size="256" sumtext="프로젝트 명"/>
- <Column id="prjtcontext" type="STRING" size="256" sumtext="프로젝트 내용"/>
- <Column id="prjtdeptcd" type="STRING" size="256" sumtext="담당부서"/>
- <Column id="prjtdeptnm" type="STRING" size="256" sumtext="담당부서명"/>
- <Column id="prjtuser" type="STRING" size="256" sumtext="담당자"/>
- <Column id="prjtusernm" type="STRING" size="256" sumtext="담당자명"/>
- <Column id="prjtmanager" type="STRING" size="256" sumtext="관리자"/>
- <Column id="prjtmanagernm" type="STRING" size="256" sumtext="관리자명"/>
- <Column id="prjtstat" type="STRING" size="256" sumtext="상태"/>
- <Column id="prjtfromdd" type="STRING" size="256" sumtext="시작일"/>
- <Column id="prjtexptodd" type="STRING" size="256" sumtext="종료예정일"/>
- <Column id="prjttodd" type="STRING" size="256" sumtext="종료일"/>
- <Column id="cmt" type="STRING" size="256" sumtext="비고"/>
- </ColumnInfo>
- </Dataset>
- <Dataset id="ds_popdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
- <ColumnInfo>
- <Column id="status" type="STRING" size="256"/>
- <Column id="instcd" type="STRING" size="256"/>
- <Column id="prjtsqno" type="STRING" size="256"/>
- <Column id="reptdd" type="STRING" size="256"/>
- <Column id="reptuser" type="STRING" size="256"/>
- <Column id="prjttitle" type="STRING" size="256"/>
- <Column id="workflag" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row/>
- </Rows>
- </Dataset>
- </Objects>
- <Bind>
- <BindItem id="item0" compid="opt_prjtsqno" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtsqno"/>
- <BindItem id="item1" compid="ipt_prjttitle" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjttitle"/>
- <BindItem id="item2" compid="txt_prjtcontext" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtcontext"/>
- <BindItem id="item3" compid="opt_deptnm" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtdeptnm"/>
- <BindItem id="item4" compid="ipt_prjtfromdd" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtfromdd"/>
- <BindItem id="item5" compid="cmb_prjtstat" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtstat"/>
- <BindItem id="item6" compid="ipt_deptcd" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtdeptcd"/>
- <BindItem id="item7" compid="ipt_prjtexptodd" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtexptodd"/>
- <BindItem id="item8" compid="ipt_prjtuser" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtuser"/>
- <BindItem id="item9" compid="ipt_prjtusernm" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtusernm"/>
- <BindItem id="item10" compid="ipt_prjtmanager" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtmanager"/>
- <BindItem id="item11" compid="ipt_prjttodd" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjttodd"/>
- <BindItem id="item12" compid="ipt_prjtmanagernm" propid="value" datasetid="ds_main_prjtinfo_detail" columnid="prjtmanagernm"/>
- </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";
- include "mis_miscommonxp::RAC001.xjs";
- include "mis_humtrafactmngtxp::RPB001.xjs";
- include "mis_paybaseinfomngtxp::RWC001.xjs";
- var A; //리턴값
- function SMRAH04000_oninit(obj:Form, e:InitEventInfo)
- {
- frmf_initForm(obj);
- }
- function SMRAH04000_onload(obj:Form, e:LoadEventInfo)
- {
- grdf_initGrid(grd_reptlist);
-
- try
- {
- ds_main_condition.copyData(arg_ds_popdata);
- }catch(e){}
-
-
- fOpenForm();
- }
- function fOpenForm()
- {
- if(ds_main_condition.getColumn(0, "status") == "u") //u: 수정mode
- {
- if(fGetPrjtInfo())//프로젝트 정보 조회
- {
- fGetReptList(); //프로젝트 진행사항 조회
- }
- //본인이 담당자도 관리자도 아니면 상세내역 수정 및 삭제가 불가하다
- if(ds_main_prjtinfo_detail.getColumn(0, "prjtuser") != sysf_getUserInfo("userid") && ds_main_prjtinfo_detail.getColumn(0, "prjtmanager") != sysf_getUserInfo("userid"))
- {
- btn_delete.enable = false;
- btn_save.enable = false;
- ipt_prjttitle.enable = false;
- txt_prjtcontext.enable = false;
- btn_deptcd.enable = false;
- btn_prjtuser.enable = false;
- btn_prjtmanager.enable = false;
- ipt_prjtfromdd.enable = false;
- ipt_prjtexptodd.enable = false;
- ipt_prjttodd.enable = false;
- cmb_prjtstat.enable = false;
- }
- }
- else //i: 입력 mode
- {
- ds_main_reptinfo_reptlist.clearData();
- ds_main_prjtinfo_detail.addRow();
- ds_main_prjtinfo_detail.setColumn(0, "status", "i"); //i: 입력 mode
- ds_main_prjtinfo_detail.setColumn(0, "instcd", ds_main_condition.getColumn(0, "instcd"));
- }
- }
- //프로젝트 정보 조회
- function fGetPrjtInfo()
- {
- var oParam = {};
- oParam.id = "TRRAH04001";
- oParam.service = "acntknuhapp.Acntknuh";
- oParam.method = "reqGetPrjtInfo";
- oParam.inds = "req=ds_main_condition";
- oParam.outds = "ds_main_prjtinfo_detail=detail";
- oParam.async = false;
- oParam.callback = "cf_TRRAH04001";
- tranf_submit(oParam);
-
- return A;
- }
- function cf_TRRAH04001(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- A = false;
- //return false;
- }
- else
- {
- A = true;
- //return true;
- }
- }
- //프로젝트 진행사항 조회
- function fGetReptList()
- {
- ds_main_reptinfo_reptlist.clearData();
- ds_main_reptinfo_reptlist.addRow();
- var oParam = {};
- oParam.id = "TXRAH04002";
- oParam.service = "acntknuhapp.Acntknuh";
- oParam.method = "reqSaveConfirmFlagAndGetReptList";
- oParam.inds = "req=ds_main_condition";
- oParam.outds = "ds_main_reptinfo_reptlist=reptlist";
- oParam.async = false;
- oParam.callback = "cf_TXRAH04002";
- tranf_submit(oParam);
-
- return A;
- }
- function cf_TXRAH04002(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- sysf_messageBox("프로젝트 진행사항을 조회하는 중 오류가 발생하였습니다.", "E999", "");
- A = false;
- }
- else
- {
- A = true;
- }
- }
- function btn_deptcd_onclick(obj:Button, e:ClickEventInfo)
- {
- var recv_list = "prjtdeptcd,prjtdeptnm"; //"deptcd,deptnm";
- misfOpenPopUpList("02", ipt_deptcd,"", recv_list) ;
- }
- function btn_prjtuser_onclick(obj:Button, e:ClickEventInfo)
- {
- var recv_list = "prjtuser,prjtusernm";
- rpbfOpenPopUpList("SPRPB00101", ipt_prjtuser, recv_list,"","","","emplno,emplnm");
-
- }
- function btn_prjtmanager_onclick(obj:Button, e:ClickEventInfo)
- {
- var recv_list = "prjtmanager,prjtmanagernm";
- rpbfOpenPopUpList("SPRPB00101", ipt_prjtmanager, recv_list,"","","","emplno,emplnm");
-
- }
- function btn_delete_onclick(obj:Button, e:ClickEventInfo)
- {
- if(utlf_isNull(opt_prjtsqno.value)) return;
-
- if(sysf_messageBox("해당 프로젝트의 정보를 삭제하시겠습니까? \n(삭제시 보고된 진행사항도 모두 함께 삭제됩니다) ", "Q999", "") != 6) return;
- ds_main_prjtinfo_detail.setColumn(0, "status", "d"); //d: 삭제 mode
-
- if(fClickSaveBtn())
- {
- this.close();
- }
- }
- // 저장버튼 클릭시 저장 수행 함수
- function fClickSaveBtn()
- {
- var oParam = {};
- oParam.id = "TXRAH04001";
- oParam.service = "acntknuhapp.Acntknuh";
- oParam.method = "reqExeSavePrjtInfo";
- oParam.inds = "req=ds_main_prjtinfo_detail:U";
- oParam.outds = "ds_main_prjtinfo_detail=detail";
- oParam.async = false;
- oParam.callback = "cf_TXRAH04001";
- tranf_submit(oParam);
- }
- function cf_TXRAH04001(sSvcId, nErrorCode, sErrorMsg)
- {
- if(nErrorCode < 0)
- {
- A = false;
- }
- else
- {
- this.opener.ds_popdata.setColumn(0, "workflag", "Y");
- sysf_messageBox("처리되었습니다. ", "I999", "");
- return true;
- }
- }
- function btn_save_onclick(obj:Button, e:ClickEventInfo)
- {
- if( utlf_isNull(ds_main_condition.getColumn(0, "instcd")))
- {
- sysf_messageBox("기관코드가 지정되지 않아 작업을 강제로 중단합니다. \n다시 작업하십시요. ", "E999", "");
- this.close();
- return;
- }
- if(ipt_prjttitle.value.trim().length == 0)
- {
- sysf_messageBox("프로젝트 명이 등록되지 않았습니다. " , "I999", "");
- ipt_prjttitle.setFocus();
- return;
- }
- if(txt_prjtcontext.value.trim().length == 0)
- {
- sysf_messageBox("프로젝트 내용이 등록되지 않았습니다. " , "I999", "");
- txt_prjtcontext.setFocus();
- return;
- }
- if(utlf_isNull(ipt_prjtuser.value))
- {
- messageBox("프로젝트 담당자가 지정되지 않았습니다. " , "I999", "");
- btn_prjtuser.setFocus();
- return;
- }
- if(ipt_prjtfromdd.value.trim().length != 8)
- {
- messageBox("프로젝트 시작일이 등록되지 않았습니다. " , "I999", "");
- ipt_prjtfromdd.setFocus();
- return;
- }
- if(utlf_isNull(cmb_prjtstat.value))
- {
- sysf_messageBox("상태가 지정되지 않았습니다. " , "I999", "");
- cmb_prjtstat.setFocus();
- return;
- }
-
- if(fClickSaveBtn())
- {
- ds_main_condition.setColumn(0, "prjtsqno", ds_main_prjtinfo_detail.getColumn(0, "prhtsqno"));
- }
- }
- function btn_close_onclick(obj:Button, e:ClickEventInfo)
- {
- this.close();
- }
- function btn_add_onclick(obj:Button, e:ClickEventInfo)
- {
- if(utlf_isNull(opt_prjtsqno.value))
- {
- sysf_messageBox("프로젝트 상세정보가 아직 등록되지 않았습니다. \n먼저 프로젝트 상세정보 저장한 후, 보고서를 등록해 주십시요. ", "I999", "");
- return;
- }
- ds_popdata.setColumn(0, "status", "i"); //작업 종류(i, u, d)
- ds_popdata.setColumn(0, "instcd", ds_main_condition.getColumn(0, "instcd")); //기관코드
- ds_popdata.setColumn(0, "prjtsqno", opt_prjtsqno.value ); //번호
- ds_popdata.setColumn(0, "reptdd", utlf_getCurrentDate() ); //보고일
- ds_popdata.setColumn(0, "reptuser", sysf_getUserInfo("userid") ); //보고자
- ds_popdata.setColumn(0, "prjttitle", ipt_prjttitle.value ); //프로젝트명
- ds_popdata.setColumn(0, "workflag", ""); //popup 내에서 작업이 이루어 졌는지 확인하기 위해 우선 지웁니다.
-
- var objArg = new Object();
- objArg.arg_ds_popdata = ds_popdata;
- frmf_modal("SMRAH04100", "SMRAH04100", objArg, "", "", "", "", "", "", "", "", "", "M");
-
- if(ds_popdata.getColumn(0, "workflag") == "Y") //popup 내에서 작업이 이루어 졌는지 확인 후 다시 조회
- {
- fGetReptList(); //프로젝트 진행사항 조회
- }
- }
- ]]></Script>
- </Form>
- </FDL>
|