YNU_JEUS/app_home/himed/xpapps/emr/carerecxp/xp/SMMNR08100_특수혈액미불출리스트조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNR08100" position="absolute 0 0 1195 770" titletext="특수혈액미불출리스트조회" oninit="SMMNR08100_oninit" onload="SMMNR08100_onload" ontimer="SMMNR08100_ontimer">
    <Layouts>
      <Layout>
        <Div id="grp_sea" taborder="0" class="div_SA" position="absolute 0 25 1192 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="button3" taborder="1" text="조회" class="btn1" position="absolute 1125 9 1181 31" anchor="top right" onclick="grp_sea_button3_onclick"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1110 9 1116 31" anchor="top right"/>
              <Static id="caption2" text="병동 :" class="search_name" position="absolute 20 13 65 30" anchor="default"/>
              <Calendar id="ipt_refdd" taborder="2" class="input_search" position="absolute 541 11 628 32" anchor="default" onchanged="grp_sea_ipt_refdd_onchanged"/>
              <Combo id="cmb_ward" taborder="3" innerdataset="@ds_init_ward" codecolumn="wardcd" datacolumn="wardnm" class="combo_s_essential" position="absolute 68 11 207 32" anchor="default" onitemchanged="grp_sea_cmb_ward_onitemchanged"/>
              <Static id="caption9" text="예약일 :" class="search_name" position="absolute 480 13 538 30" anchor="default"/>
              <Combo id="cmb_settingrn" taborder="5" innerdataset="@ds_init_settingrn" codecolumn="settingrnid" datacolumn="settingrnnm" class="combo_search" position="absolute 743 11 828 32" anchor="default" onitemchanged="grp_sea_cmb_settingrn_onitemchanged"/>
              <Static id="caption1" text="내환자:" class="search_name" position="absolute 687 13 740 30" anchor="default"/>
              <Static id="caption3" text="혈액종류 :" class="search_name" position="absolute 256 13 327 30" anchor="default"/>
              <Combo id="cmb_blodcomcd" taborder="6" innerdataset="@ds_tmpcode_LB1101" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 330 11 430 32" anchor="default" onitemchanged="grp_sea_cmb_blodcomcd_onitemchanged"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_spclblodnodelivelist" taborder="1" binddataset="ds_main_spclblodnodelivelist" useinputpanel="false" position="absolute 0 97 1192 766" autofittype="col" anchor="all" oncellclick="grd_spclblodnodelivelist_oncellclick" onheadclick="grd_spclblodnodelivelist_onheadclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="22"/>
                <Column size="28"/>
                <Column size="63"/>
                <Column size="90"/>
                <Column size="96"/>
                <Column size="97"/>
                <Column size="51"/>
                <Column size="59"/>
                <Column size="110"/>
                <Column size="105"/>
                <Column size="105"/>
                <Column size="105"/>
                <Column size="22"/>
                <Column size="28"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox"/>
                <Cell col="2" displaytype="normal" edittype="none" style="align: ;" 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="처방일시"/>
                <Cell col="12" text="전송일시"/>
                <Cell col="13" displaytype="checkbox" edittype="checkbox"/>
                <Cell col="14" text="예약"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" colspan="2" displaytype="checkbox" edittype="checkbox" text="bind:rtnchk" taborder="undefined"/>
                <Cell col="3" text="bind:roomcd"/>
                <Cell col="4" text="bind:pid"/>
                <Cell col="5" text="bind:patnm"/>
                <Cell col="6" text="bind:blodkind"/>
                <Cell col="7" text="bind:prcpqty"/>
                <Cell col="8" text="bind:btype"/>
                <Cell col="9" text="bind:rgstno"/>
                <Cell col="10" text="bind:rsrvdt" mask="expr:utlf_isNull(rsrvdt) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="11" text="bind:prcpdt" mask="expr:utlf_isNull(prcpdt) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="12" text="bind:senddt" mask="expr:utlf_isNull(senddt) ? &quot;&quot; : &quot;####-##-## ##:##&quot;"/>
                <Cell col="13" colspan="2" displaytype="checkbox" edittype="checkbox" text="bind:rsrvchk" taborder="undefined"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line16" linetype="horizontal" class="line_10" position="absolute 0 94 1192 100" anchor="left top right"/>
        <Static id="caption26" text="특수혈액미불출 리스트" class="tit_2" position="absolute 0 76 159 93"/>
        <Button id="btn_signsave" taborder="2" text="저장" class="btn2" position="absolute 1147 70 1192 92" anchor="top right" onclick="btn_signsave_onclick"/>
        <Static id="caption6" text="특수혈액미불출리스트조회" class="tit_1" position="absolute 0 0 203 25"/>
        <Button id="button1" taborder="3" text="엑셀저장" class="btn7" position="absolute 1063 70 1143 92" anchor="top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_spclblodnodelivelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rtnchk" type="STRING"/>
          <Column id="roomcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="blodkind" type="STRING"/>
          <Column id="prcpqty" type="STRING"/>
          <Column id="btype" type="STRING"/>
          <Column id="rgstno" type="STRING"/>
          <Column id="rsrvdt" type="STRING"/>
          <Column id="prcpdt" type="STRING"/>
          <Column id="senddt" type="STRING"/>
          <Column id="rsrvchk" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="blodcomcd" type="STRING" size="256"/>
          <Column id="refdd" type="STRING" size="256"/>
          <Column id="settingrnid" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="wardcd"/>
            <Col id="blodcomcd"/>
            <Col id="refdd"/>
            <Col id="settingrnid"/>
            <Col id="userid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_tmpcode_LB1101" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="wardnm" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_settingrn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="settingrnid" type="STRING" size="256"/>
          <Column id="settingrnnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cmb_ward" propid="value" datasetid="ds_main_cond" columnid="wardcd"/>
      <BindItem id="item1" compid="grp_sea.cmb_blodcomcd" propid="value" datasetid="ds_main_cond" columnid="blodcomcd"/>
      <BindItem id="item2" compid="grp_sea.ipt_refdd" propid="value" datasetid="ds_main_cond" columnid="refdd"/>
      <BindItem id="item3" compid="grp_sea.cmb_settingrn" propid="value" datasetid="ds_main_cond" columnid="settingrnid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

var arErrorCode = new HashArray();
/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMMNR08100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMNR08100_onload(obj:Form, e:LoadEventInfo)
{
	ds_main_spclblodnodelivelist.clearData();
// 	grd_spclblodnodelivelist.fixedcellcheckbox(0, grd_spclblodnodelivelist.colRef("rtnchk")) = true;
// 	grd_spclblodnodelivelist.fixedcellcheckbox(0, grd_spclblodnodelivelist.colRef("rsrvchk")) = true;
	
	//혈액종류 조회(TRLZZ00101 참조)
	ds_send.clear();
	ds_send.addColumn("codeflag", "string", 256);
	ds_send.addColumn("basecdid", "string", 256);
	var nRow = ds_send.addRow();
	ds_send.setColumn(nRow, "codeflag", "1101|");
	ds_send.setColumn(nRow, "basecdid", "");
	
	var oParam = {};
		oParam.id          = "TRMNR08101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_tmpcode_LB1101=1101";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNR08101";

	tranf_submit(oParam);
		
	ds_main_cond.setColumn(0, "blodcomcd", ds_tmpcode_LB1101.getColumn(0, "cd"));
	ds_main_cond.setColumn(0, "wardcd", sysf_getUserInfo("dutplcecd"));		
	ds_main_cond.setColumn(0, "refdd", utlf_getCurrentDate());// 기준일에 현재날짜(디폴트)	
	ds_main_cond.setColumn(0, "userid", sysf_getUserId());

	ds_send.clear();
	ds_send.addColumn("wardcd", "string", 256);
	ds_send.setColumn(ds_send.addRow(), "wardcd", ds_main_cond.getColumn(0, "wardcd"));	

	var oParam = {};
		oParam.id          = "TRMNW00101";
		oParam.service     = "wardcareapp.WardCareMngt";
		oParam.method      = "reqGetWMInitData";
		oParam.inds        = "reqcond=ds_send";
		oParam.outds       = "ds_init_ward=ward ds_init_settingrn=settingrn";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNW00101";

	tranf_submit(oParam);

	grp_sea.cmb_settingrn.index = 0;
	for( var i = 0; i < ds_init_settingrn.rowcount; i++ ) {
		if( ds_main_cond.getColumn(0, "userid") == ds_init_settingrn.getColumn(i, "settingrnid")) {
			ds_main_cond.setColumn(0, "settingrnid", ds_main_cond.getColumn(0, "userid"));		
		}					
	}
	
	//리스트조회
	//fGetSpclBlodNoDeliveList();
	this.setTimer(0, 100);
}

/******************************************************************
 * Argument          : 
 * Description       : 특수혈액미불출 리스트 조회버튼
 ******************************************************************/
function fGetSpclBlodNoDeliveList(){
	ds_send.clear();
	ds_send.addColumn("wardcd", "string", 256);
	ds_send.addColumn("blodcomcd", "string", 256);
	ds_send.addColumn("refdd", "string", 256);
	ds_send.addColumn("settingrnid", "string", 256);
	var iRow = ds_send.addRow();
	
	ds_send.setColumn(iRow, "wardcd", ds_main_cond.getColumn(0, "wardcd"));
	ds_send.setColumn(iRow, "blodcomcd", ds_main_cond.getColumn(0, "blodcomcd"));
	ds_send.setColumn(iRow, "refdd", ds_main_cond.getColumn(0, "refdd"));
	ds_send.setColumn(iRow, "settingrnid", ds_main_cond.getColumn(0, "settingrnid"));
	
	var oParam = {};
		oParam.id          = "TRMNR08102";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqGetSpclBlodNoDeliveList";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_spclblodnodelivelist=spclblodnodelivelist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNR08102";

	tranf_submit(oParam);

// 	if(submit("TRMNR08102", false)){
// 		grd_spclblodnodelivelist.fixedcellischeck(0, grd_spclblodnodelivelist.colRef("rtnchk")) = true;	
// 	}
}

/******************************************************************
 * Argument          : 
 * Description       : 병동 combo event
 ******************************************************************/
function grp_sea_cmb_ward_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send.clear();
	ds_send.addColumn("", "string", 256);
	var iRow = ds_send.addRow();
	ds_send.setColumn(iRow, "wardcd", ds_main_cond.getColumn(0, "wardcd"));	
	var oParam = {};
		oParam.id          = "TRMNW00101";
		oParam.service     = "wardcareapp.WardCareMngt";
		oParam.method      = "reqGetWMInitData";
		oParam.inds        = "reqcond=ds_send";
		oParam.outds       = "ds_init_ward=ward ds_init_settingrn=settingrn";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNW00101";

	tranf_submit(oParam);

	fGetSpclBlodNoDeliveList();
}

/******************************************************************
 * Argument          : 
 * Description       : 혈액종류 combo event
 ******************************************************************/
function grp_sea_cmb_blodcomcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetSpclBlodNoDeliveList();
}

/******************************************************************
 * Argument          : 
 * Description       : 예약일 event
 ******************************************************************/
function grp_sea_ipt_refdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	fGetSpclBlodNoDeliveList();
}

/******************************************************************
 * Argument          : 
 * Description       : 혈액종류 combo event
 ******************************************************************/
function grp_sea_cmb_settingrn_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fGetSpclBlodNoDeliveList();
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function grp_sea_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetSpclBlodNoDeliveList();
}

/******************************************************************
 * Argument          : 
 * Description       : 저장 button event
 ******************************************************************/
function btn_signsave_onclick(obj:Button,  e:ClickEventInfo)
{
	fsave();
}

/******************************************************************
 * Argument          : fsave()
 * Description       : 저장
 ******************************************************************/
function fsave(){
	ds_main_spclblodnodelivelist.filter("rtnchk == '1'");
	var rtncnt = ds_main_spclblodnodelivelist.rowcount;
	ds_main_spclblodnodelivelist.filter("");
	ds_main_spclblodnodelivelist.filter("rsrvchk == '1'");
	var rsrvcnt = ds_main_spclblodnodelivelist.rowcount;
	ds_main_spclblodnodelivelist.filter("");
	
	var retMsg = messageBox("반환 "+ rtncnt + "건, 재예약 " + rsrvcnt + "건 입니다. 전송하시겠습니까?", "Q");	//yes=6, no=7
	if(retMsg != "6") {
		return;
	}
	
	dsf_createDsRow("ds_rtninfo",
				[{col:"pid", type:"string", size:256, val:""}
				, {col:"tnsreqacptno", type:"string", size:256, val:""}
				, {col:"blodcomcd", type:"string", size:256, val:""}
				, {col:"execprcpuniqno", type:"string", size:256, val:""}
				, {col:"preplog", type:"string", size:256, val:""}], true);
				
	dsf_createDsRow("ds_rsrvinfo",
				[{col:"pid", type:"string", size:256, val:""}
				, {col:"tnsreqacptno", type:"string", size:256, val:""}
				, {col:"blodcomcd", type:"string", size:256, val:""}
				, {col:"execprcpuniqno", type:"string", size:256, val:""}], true);
	
	
	for( var i = 0; i < ds_main_spclblodnodelivelist.rowcount; i++ ) {
		var rtnchk = ds_main_spclblodnodelivelist.getColumn(i, "rtnchk");
		var rsrvchk = ds_main_spclblodnodelivelist.getColumn(i, "rsrvchk");
		
		var pid = ds_main_spclblodnodelivelist.getColumn(i, "pid");
		var tnsreqacptno = ds_main_spclblodnodelivelist.getColumn(i, "tnsreqacptno");
		var blodcomcd = ds_main_spclblodnodelivelist.getColumn(i, "blodcomcd");
		var execprcpuniqno = ds_main_spclblodnodelivelist.getColumn(i, "execprcpuniqno");
		
		if(rtnchk == "1"){
			ds_rtninfo.setColumn(0, "pid", pid);						//등록번호
			ds_rtninfo.setColumn(0, "tnsreqacptno", tnsreqacptno);		//접수번호
			ds_rtninfo.setColumn(0, "blodcomcd", blodcomcd);			//성분제제
			ds_rtninfo.setColumn(0, "execprcpuniqno", execprcpuniqno);	//실시처방유일번호
			ds_rtninfo.setColumn(0, "preplog", "1");					//취소구분 ("1")
		}
		
		if(rsrvchk == "1"){
			ds_rsrvinfo.setColumn(0, "pid", pid);						//등록번호
			ds_rsrvinfo.setColumn(0, "tnsreqacptno", tnsreqacptno);		//접수번호
			ds_rsrvinfo.setColumn(0, "blodcomcd", blodcomcd);			//성분제제
			ds_rsrvinfo.setColumn(0, "execprcpuniqno", execprcpuniqno);	//실시처방유일번호
		}                  
	}
	
	var oParam = {};
		oParam.id          = "TRMNR08102";
		oParam.service     = "carerecapp.TnsCareRec";
		oParam.method      = "reqSetSpclBlodNoDeliveInfo";
		oParam.inds        = "rtnblodinfo=ds_rtninfo rsrvblodinfo=ds_rsrvinfo";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TRMNR08102";

	tranf_submit(oParam);

	
	if( arErrorCode.pop("TRMNR08102") > -1 ){
		sysf_messageBox("전송이 완료되었습니다,", "I");
		fGetSpclBlodNoDeliveList();
	}
}

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

/******************************************************************
 * Argument          : 
 * Description       : 특수혈액미불출리스트 onclick event
 ******************************************************************/
function grd_spclblodnodelivelist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var iCol = grd_spclblodnodelivelist.currentcol;
	var iRow = ds_main_spclblodnodelivelist.rowposition;
	
	for( var i = 0; i < ds_main_spclblodnodelivelist.rowcount; i++ ) {
		if( iCol == grd_spclblodnodelivelist.getBindCellIndex("Body", "rtnchk") ){
			if( ds_main_spclblodnodelivelist.getColumn(i, "rtnchk") == "1"){
				ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk", "");	
			}else if( utlf_isNull(ds_main_spclblodnodelivelist.getColumn(i, "rtnchk")) ){
				ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk", "1");	
			}
		} else if( iCol == grd_spclblodnodelivelist.getBindCellIndex("Body", "rsrvchk") ){
			if( ds_main_spclblodnodelivelist.getColumn(i, "rsrvchk") == "1" ){
				ds_main_spclblodnodelivelist.setColumn(i, "rtnchk", "");	
			}else if( utlf_isNull(ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk")) ){
				ds_main_spclblodnodelivelist.setColumn(i, "rtnchk", "1");	
			}
		}
	}
}

/******************************************************************
 * Argument          : 
 * Description       : list head onclick event
 ******************************************************************/
function grd_spclblodnodelivelist_onheadclick(obj:Grid, e:GridClickEventInfo)
{
	if( obj.getCellProperty("Head", 1, "displaytype") == "checkbox" ){
		if( utlf_isNull(obj.getCellProperty("Head", 1, "text")) ){
			obj.setCellProperty("Head", 1, "text","expr:1");
			for( var i = 0; i < ds_main_spclblodnodelivelist.rowcount; i++ ){
				ds_main_spclblodnodelivelist.setColumn(i, "rtnchk", "1");
				ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk", "");
			}
		} else {
			obj.setCellProperty("Head", 1, "text","");
			for( var i = 0; i < ds_main_spclblodnodelivelist.rowcount; i++ ){
				ds_main_spclblodnodelivelist.setColumn(i, "rtnchk", "");
				ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk", "1");
			}
		}
	} else if( obj.getCellProperty("Head", 13, "displaytype") == "checkbox" ){
		if( utlf_isNull(obj.getCellProperty("Head", 13, "text")) ){
			obj.setCellProperty("Head", 13, "text","expr:1");
			for( var i = 0; i < ds_main_spclblodnodelivelist.rowcount; i++ ){
				ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk", "1");
				ds_main_spclblodnodelivelist.setColumn(i, "rtnchk", "");
			}
		} else {
			obj.setCellProperty("Head", 13, "text","");
			for( var i = 0; i < ds_main_spclblodnodelivelist.rowcount; i++ ){
				ds_main_spclblodnodelivelist.setColumn(i, "rsrvchk", "");
				ds_main_spclblodnodelivelist.setColumn(i, "rtnchk", "1");
			}
		}
	}
}

function SMMNR08100_ontimer(obj:Form, e:TimerEventInfo)
{
	if( e.timerid == 0 ){
		this.killTimer(0);
		fGetSpclBlodNoDeliveList();
	}
}
]]></Script>
  </Form>
</FDL>