YNU_JEUS/app_home/himed/xpapps/ast/pharmacydrugsumxp/xp/SMADT12270_매핑내역조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADT12270" classname="SMADT12270_매핑내역조회" inheritanceid="" position="absolute 0 0 1200 780" titletext="매핑내역 재고조회" onload="SMADT12270_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="매핑내역조회" class="tit_1" position="absolute 0 0 165 25"/>
        <Static id="caption01" text="현재고" class="tit_2" position="absolute -1 99 170 120"/>
        <Shape id="line7" class="line_10" position="absolute 0 116 1195 122" anchor="left top right"/>
        <Div id="grp_button" anchor="left top right" taborder="40" position="absolute 0 13 1195 45">
          <Layouts>
            <Layout>
              <Shape id="line2" class="line_6" position="absolute 0 25 1195 31" anchor="left top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_search" anchor="left top right" taborder="42" class="div_SA" position="absolute 0 50 1195 85">
          <Layouts>
            <Layout>
              <Static id="caption2" text="등록번호 :" class="search_name" position="absolute 21 10 96 27"/>
              <Button id="btn_search" taborder="0" text="조회" onclick="grp_search_btn_search_onclick" class="btn1" position="absolute 1128 7 1184 29"/>
              <Edit id="Edit00" taborder="1" position="absolute 93 8 199 28" onkeydown="grp_search_Edit00_onkeydown"/>
              <Static id="caption00" text="약품코드:" class="search_name" position="absolute 600 10 667 27"/>
              <Edit id="Edit01" taborder="4" onkeydown="grp_search_Edit00_onkeydown" position="absolute 667 8 773 28"/>
              <Static id="caption01" text="적용일자 :" class="search_name" position="absolute 405 10 488 27"/>
              <Edit id="Edit03" taborder="2" onkeydown="grp_search_Edit00_onkeydown" position="absolute 275 8 381 28"/>
              <Static id="caption03" text="약번호 :" class="search_name" position="absolute 216 10 283 27"/>
              <Calendar id="input6" taborder="3" autoselect="true" autoskip="true" onchanged="group3_input6_onchanged" class="input_default" position="absolute 480 8 580 27"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_stoclist" taborder="43" binddataset="ds_stoclist" autoenter="key" useinputpanel="false" selecttype="multirow" cellsizingtype="col" cellsizebandtype="allband" cellclickbound="cell" onrbuttonup="switch1_case1_grd_narclist_onrbuttonup" onheadclick="switch1_case1_grd_narclist_onheadclick" oncelldblclick="switch1_case1_grd_narclist_oncelldblclick" position="absolute 0 121 1195 774" onkeydown="grd_stoclist_onkeydown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="27" band="left"/>
                <Column size="58" band="left"/>
                <Column size="60" band="left"/>
                <Column size="54" band="left"/>
                <Column size="77" band="left"/>
                <Column size="122" band="left"/>
                <Column size="62" band="left"/>
                <Column size="108" band="left"/>
                <Column size="90" band="left"/>
                <Column size="63" band="left"/>
                <Column size="139"/>
                <Column size="101"/>
                <Column size="30"/>
                <Column size="19"/>
                <Column size="49"/>
                <Column size="73"/>
                <Column size="69"/>
                <Column size="81"/>
                <Column size="88"/>
              </Columns>
              <Rows>
                <Row size="30" band="head"/>
                <Row size="21"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text=" 등록번호"/>
                <Cell col="2" text="환자명"/>
                <Cell col="3" text="투약번호"/>
                <Cell col="4" text="처방&#10;코드" wordwrap="char"/>
                <Cell col="5" text="처방명"/>
                <Cell col="6" text="불출저장소"/>
                <Cell col="7" text="LabelNo"/>
                <Cell col="8" text="제품번호" wordwrap="char"/>
                <Cell col="9" text="유효기간" wordwrap="char"/>
                <Cell col="10" text="제조번호" wordwrap="char"/>
                <Cell col="11" text="일련번호" wordwrap="char"/>
                <Cell col="12" colspan="2" text="seq" taborder="undefined">
                  <Cell text="seq" wordwrap="char" taborder="undefined"/>
                  <Cell col="1"/>
                </Cell>
                <Cell col="14" text="잔량"/>
                <Cell col="15" text="불출일자"/>
                <Cell col="16" text="반환일자"/>
                <Cell col="17" text="잔량처리일자"/>
                <Cell col="18" text="취급일자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:pid"/>
                <Cell col="2" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:pat_nm"/>
                <Cell col="3" displaytype="text" text="bind:drugno"/>
                <Cell col="4" style="align:center top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:drugcd" wordwrap="char" autosizerow="limitmin"/>
                <Cell col="5" style="align:left;" text="bind:prduct_nm" tooltiptext="bind:prduct_nm"/>
                <Cell col="6" text="bind:storge_no"/>
                <Cell col="7" text="bind:labelno" mask="@@@@-@@-@@ @@@"/>
                <Cell col="8" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:gtin" wordwrap="char" autosizerow="limitmin"/>
                <Cell col="9" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:prd_valid_de" wordwrap="char" autosizerow="limitmin"/>
                <Cell col="10" displaytype="text" style="align:left top;padding:4 2 3 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_no" wordwrap="char" autosizerow="limitmin"/>
                <Cell col="11" displaytype="text" style="align:left top;padding:4 2 1 2;background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:mnf_seq" wordwrap="char" autosizerow="limitmin"/>
                <Cell col="12" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:seq" taborder="undefined">
                  <Cell style="align:right;padding:0 2 0 0;background2:#f0f0f0ff;" text="bind:seq"/>
                </Cell>
                <Cell col="13" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:histno"/>
                <Cell col="14" text="bind:spreqy"/>
                <Cell col="15" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:outdd"/>
                <Cell col="16" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:rtndd"/>
                <Cell col="17" style="background:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));background2:EXPR(EXPR( fnshfg == '1' ? 'yellow' : ''));" text="bind:spredd"/>
                <Cell col="18" text="bind:hdr_de"/>
              </Band>
            </Format>
            <Format id="format_copy"/>
          </Formats>
        </Grid>
        <Button id="btn_mappingcncl" taborder="44" text="매핑취소" class="btn2" position="absolute 1126 96 1192 115" anchor="top right" onclick="btn_mappingcncl_onclick"/>
      </Layout>
    </Layouts>
    <Bind>
      <BindItem id="item12" compid="SMADT12170" propid="text" datasetid="ds_main_prntlist_patinfo" columnid=""/>
      <BindItem id="item0" compid="grp_search.Edit00" propid="value" datasetid="ds_send_search" columnid="pid"/>
      <BindItem id="item1" compid="grp_search.Edit01" propid="value" datasetid="ds_send_search" columnid="drugcd"/>
      <BindItem id="item3" compid="grp_search.Edit03" propid="value" datasetid="ds_send_search" columnid="drugno"/>
      <BindItem id="item8" compid="grp_search.input6" propid="value" datasetid="ds_send_search" columnid="drugdd"/>
    </Bind>
    <Objects>
      <Dataset id="ds_send_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_send_search_oncolumnchanged">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="drugno" type="STRING" size="256"/>
          <Column id="drugdd" type="STRING" size="256"/>
          <Column id="flag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_storgelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="storge_no" type="STRING" size="256"/>
          <Column id="storge_nm" type="STRING" size="256"/>
          <Column id="storge_nonm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_stoclist" 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="drugcd" type="STRING" size="256"/>
          <column id="infg" type="STRING" size="256"/>
          <column id="histno" type="STRING" size="256"/>
          <column id="gtin" type="STRING" size="256"/>
          <column id="prd_valid_de" type="STRING" size="256"/>
          <column id="mnf_no" type="STRING" size="256"/>
          <column id="mnf_seq" type="STRING" size="256"/>
          <column id="seq" type="STRING" size="256"/>
          <column id="prd_sgtin" type="STRING" size="256"/>
          <column id="storge_no" type="STRING" size="256"/>
          <column id="prtm_se_nm" type="STRING" size="256"/>
          <column id="prd_min_distb_qy" type="STRING" size="256"/>
          <column id="prd_min_distb_unit" type="STRING" size="256"/>
          <column id="prd_tot_pce_qy" type="STRING" size="256"/>
          <column id="prd_pce_unit" type="STRING" size="256"/>
          <column id="in_pce_qy" type="STRING" size="256"/>
          <column id="indd" type="STRING" size="256"/>
          <column id="opp_bssh_cd" type="STRING" size="256"/>
          <column id="opp_bssh_nm" type="STRING" size="256"/>
          <column id="opp_storge_no" type="STRING" size="256"/>
          <column id="in_dtl_cd" type="STRING" size="256"/>
          <column id="in_trnsfe_se_cd" type="STRING" size="256"/>
          <column id="out_fg" type="STRING" size="256"/>
          <column id="out_pce_qy" type="STRING" size="256"/>
          <column id="fnshfg" type="STRING" size="256"/>
          <column id="prcpno" type="STRING" size="256"/>
          <column id="drugdd" type="STRING" size="256"/>
          <column id="drugno" type="STRING" size="256"/>
          <column id="ioflag" type="STRING" size="256"/>
          <column id="drugseqno" type="STRING" size="256"/>
          <column id="pat_id_no_ty_cd" type="STRING" size="256"/>
          <column id="pat_id_no" type="STRING" size="256"/>
          <column id="pat_in" type="STRING" size="256"/>
          <column id="lcns_asort_cd" type="STRING" size="256"/>
          <column id="lcns_no" type="STRING" size="256"/>
          <column id="prsc_doc_nm" type="STRING" size="256"/>
          <column id="prsc_ord_no" type="STRING" size="256"/>
          <column id="diss_code" type="STRING" size="256"/>
          <column id="once_qy" type="STRING" size="256"/>
          <column id="ade_cnt" type="STRING" size="256"/>
          <column id="tot_dcnt" type="STRING" size="256"/>
          <column id="sum_qy" type="STRING" size="256"/>
          <column id="aft_dsuse_qy" type="STRING" size="256"/>
          <column id="dsuse_se_cd" type="STRING" size="256"/>
          <column id="dsuse_prv_cd" type="STRING" size="256"/>
          <column id="dsuse_mth_cd" type="STRING" size="256"/>
          <column id="dsuse_loc" type="STRING" size="256"/>
          <column id="dsuse_de" type="STRING" size="256"/>
          <column id="dsuse_instt_cd" type="STRING" size="256"/>
          <column id="dsuse_doc_de" type="STRING" size="256"/>
          <column id="outdd" type="STRING" size="256"/>
          <column id="out_bssh_cd" type="STRING" size="256"/>
          <column id="out_bssh_nm" type="STRING" size="256"/>
          <column id="out_storge_no" type="STRING" size="256"/>
          <column id="out_dtl_cd" type="STRING" size="256"/>
          <column id="out_trnsfr_se_cd" type="STRING" size="256"/>
          <column id="insendfg" type="STRING" size="256"/>
          <column id="outsendfg" type="STRING" size="256"/>
          <column id="spreqy" type="STRING" size="256"/>
          <column id="spredd" type="STRING" size="256"/>
          <column id="spredt" type="STRING" size="256"/>
          <column id="rtnfg" type="STRING" size="256"/>
          <column id="rtndd" type="STRING" size="256"/>
          <column id="rtndt" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="labelno" type="STRING" size="256"/>
          <Column id="hdr_de" type="STRING" size="256"/>
          <Column id="cnt" type="STRING" size="256"/>
          <Column id="prduct_nm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_receivedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="receiveref" type="STRING" size="256"/>
          <Column id="receive_drugcd" type="STRING" size="256"/>
          <Column id="receive_hngnm" type="STRING" size="256"/>
          <Column id="receive_gtin" type="STRING" size="256"/>
          <Column id="receive_prtm_se_nm" type="STRING" size="256"/>
          <Column id="receive_prd_min_distb_qy" type="STRING" size="256"/>
          <Column id="receive_prd_min_distb_unit" type="STRING" size="256"/>
          <Column id="receive_prd_tot_pce_qy" type="STRING" size="256"/>
          <Column id="receive_prd_pce_unit" type="STRING" size="256"/>
          <Column id="basedd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_druglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="drugnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************
 * System Name		:	경대 의료정보시스템
 * Job Name 		:	ast_pharmacydrugsumxp-> SMADT12170
 * Creator			:	pjb
 * Make Date 		:	2018-04-11
 * Description		:	
 *---------------------------------------------------------------------------------------
 * Modify Date		Modifier		Modify Description
 *---------------------------------------------------------------------------------------
 * 2018-04-11		pjb				XP개발
 * 
 *---------------------------------------------------------------------------------------
 ****************************************************************************************/


//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
//include "mis_miscommonxp::MIS.xjs";
//include "mis_humtrafactmngtxp::RPB001.xjs";

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode 	= new HashArray();
var argflag;


//=======================================================================================
// Function
//---------------------------------------------------------------------------------------


//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SMADT12170
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시
 ****************************************************************************************/
function SMADT12170_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SMADT12170
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 로딩 완료시
 ****************************************************************************************/

function SMADT12270_onload(obj:Form, e:LoadEventInfo)
{
	var pid = arg_pid;
	var drugdd = arg_drugdd;
	var drugno = arg_drugno;
	var prcpcd = arg_prcpcd;
	argflag =  arg_flag;
		
	if(utlf_isNull(pid)) {
		pid    = "";
		drugdd = "";
		drugno = "";
		prcpcd = "";
	}
	
	ds_send_search.setColumn(0, "pid", pid);
	ds_send_search.setColumn(0, "drugdd", drugdd);
	ds_send_search.setColumn(0, "drugno", drugno);
	ds_send_search.setColumn(0, "flag", argflag);
	
	if(argflag =="mapping") {
		ds_send_search.setColumn(0, "drugcd", prcpcd);
	} else if(argflag=="tran") {
		ds_send_search.setColumn(0, "drugcd", "");
		grp_search.caption00.visible = false;
		grp_search.Edit01.visible = false;
		btn_mappingcncl.text="신규보고";
	}
	
	
	
	if(pid != "") {
		fSearch();
	}
	
	grdf_setGridSort(grd_stoclist);

}



/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_search_btn_search
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 조회버튼 클릭시
 ****************************************************************************************/
function grp_search_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{	
	fSearch();
}



/****************************************************************************************
 * Components		: Dataset
 * Components ID	: ds_send_search
 * Event			: oncolumnchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 컬럼의 값 변경시
 ****************************************************************************************/
function ds_send_search_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	

}

function fSearch(){
	
	var oParam = {};
		oParam.id          = "TRADT12271";
		oParam.service     = "pharmacydrugsumapp.NarcManagent";
		oParam.method      = "reqGetMappingInfo";
		oParam.inds        = "req=ds_send_search";
		oParam.outds       = "ds_stoclist=stoclist";
		oParam.async       = false;
		oParam.callback    = "cf_TRADT12271";

	tranf_submit(oParam);
	
	
}

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



function grp_search_ipt_drugcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {	
		obj.updateToDataset();
	}
	
}

function btn_download_onclick(obj:Button,  e:ClickEventInfo)
{
	//조회된 자료가 없으면 먼저 조회하라고 message
	if(ds_stoclist.rowcount < 1) {
		sysf_messageBox("조회된 결과가 존재하지 않습니다. \n\n먼저 조회 후 Download 하십시요. ", "E999", "");							
		return;
	}
																							
	grdf_exportExcel(grd_stoclist, "excel", "savetype", false, "", "user", false);
	
}

function grp_search_Edit00_onkeydown(obj:Edit, e:KeyEventInfo)
{
	
}


function grd_stoclist_onkeydown(obj:Grid, e:KeyEventInfo)
{	
	fGridCopyClipboard(obj, e);
}

function fGridCopyClipboard(obj:Grid, e:KeyEventInfo)
{
	var bPushed = e.ctrlKey;
    var clipStr = "";
            
    if (e.keycode == 67 && bPushed == true )		// ctrl + c
    {
    	clipStr = obj.getCellText(obj.currentrow, obj.currentcol);
		system.clearClipboard();
		system.setClipboard("CF_TEXT",clipStr);
    }
}

function btn_mappingcncl_onclick(obj:Button,  e:ClickEventInfo)
{
	
	var cnt = grd_stoclist.rowcount;
	var str = "";
	var chkcnt = 0;
	
	if(cnt == 0) {
		sysf_messageBox("매핑취소할 내역이 없습니다. ", "E");
		return;
	}
	var hdr_de="";
	for(var i= 0 ; i < cnt; i++) {
		hdr_de = ds_stoclist.getColumn(i, "hdr_de");
		if(!utlf_isNull(hdr_de)) {
			chkcnt++;
		}
	}
	
	if(argflag =="mapping") {
		str = "매핑취소";
	} else if(argflag=="tran") {
		str = "신규전송";
	}
	
	
	if(chkcnt > 0) {
		sysf_messageBox("이미 전송된 내역은 "+ str + " 할 수 없습니다. ", "E");
		return;
	}
	
	var pid    = ds_send_search.getColumn(0, "pid");
	var drugdd = ds_send_search.getColumn(0, "drugdd");
	var drugno = ds_send_search.getColumn(0, "drugno");
	var drugcd = ds_send_search.getColumn(0, "drugcd");
	
	if(utlf_isNull(pid)) {
		sysf_messageBox("등록번호를 입력하세요.", "E");
		return;
	}
	
	if(utlf_isNull(drugdd)) {
		sysf_messageBox("적용일자를 입력하세요.", "E");
		return;
	}
	
	if(utlf_isNull(drugno)) {
		sysf_messageBox("약번호를 입력하세요.", "E");
		return;
	}
	
	if(utlf_isNull(drugcd) && argflag =="mapping") {
		sysf_messageBox("약품코드를 입력하세요.", "E");
		return;	
	}
	
	var rtn = sysf_messageBox(str + " 하시겠습니까?", "Q");
	
	if(rtn == "7") {
		return;
	}
	
	var oParam = {};
		oParam.id          = "TXADT12271";
		oParam.service     = "pharmacydrugsumapp.NarcManagent";
		oParam.method      = "reqSetCnclMappingInfo";
		oParam.inds        = "req=ds_send_search";
		oParam.outds       = "ds_stoclist=stoclist";
		oParam.async       = false;
		oParam.callback    = "cf_TXADT12271";

	tranf_submit(oParam);	
	
	
	sysf_messageBox(str + " 하였습니다.", "I");
	fSearch();
}

function cf_TXADT12271(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
]]></Script>
  </Form>
</FDL>