<!--

/**
 * Procura um objeto. Função da Macromedia.
 * @param string n Nome do ID ou NOME de um objeto qualquer
 * @param string d Scopo de procura, por padrão 'document'
 * @return Object
 * @version 4.01
 */


function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&(d.forms)&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

/**
 * Procura um objeto. Função da Macromedia.
 * @param string n Nome do ID ou NOME de um objeto qualquer
 * @param string d Scopo de procura, por padrão 'document'
 * @return Object
 * @version 4.01
 */

function achaObjeto(n, d) { // atalho
    return MM_findObj(n, d);
    //return getElement(n, d);
}

function getElement(e,f){
    if(document.layers){
        f=(f)?f:self;
        if(f.document.layers[e]) {
            return f.document.layers[e];
        }
        for(W=0;i<f.document.layers.length;W++) {
            return(getElement(e,fdocument.layers[W]));
        }
    }
    if(document.all) {
        return document.all[e];
    }
    return document.getElementById(e);
}

function MM_setTextOfLayer(objName,x,newText) { //v4.01
  if((obj=MM_findObj(objName))!=null) with (obj)
    if(document.layers) {document.write(unescape(newText)); document.close();}
    else innerHTML = unescape(newText);
}

/**
 * Escreve um texto dentro da layer especificada
 * @param string nomeLayer Nome do ID da layer
 * @param string msg Mensagem a ser escrita
 * @return void
 */

function setaValorLayer(nomeLayer, msg) { // atalho
    MM_setTextOfLayer(nomeLayer,'',msg);
}

/**
 * Cria uma mensagem animada na barra de status do navegador
 * @param string msg Mensagem a ser escrita
 * @param integer pontos Argumento para controle interno da função durante o looping
 * @return void
 */

var parar = true;

function windowstatusAndamento(msg, pontos) {

  if(!pontos) parar = false;

  if(!pontos || pontos > 3) pontos = 0;

  window.status = msg+' ';
  for(var i = 0; i < pontos; i++) {
     window.status += '.';
  }
  pontos++;

  if(!parar) setTimeout("windowstatusAndamento('"+msg+"',"+pontos+")", 250);

}

/**
 * Retira espaço no ínicio e final de uma string
 * @param string strValor Valor a ser analizado
 * @return string
 */

function trim(strValor)
{
    var semIni=true;
    var semFim=true;

    if(strValor.length > 0 ) {
        while((semIni) || (semFim)) {
          if(strValor.charAt(0) == ' ') {
            strValor = strValor.substring(1,strValor.length);
          }else{
            semIni=false;
          }
          if(strValor.charAt(strValor.length-1) == ' ') {
              strValor = strValor.substring(0,strValor.length-1);
          }else{
              semFim=false;
          }
       }
    }
    return(strValor);
}


function numval(strValor) {
  strValor.toString();
  var out = '';
  for(var x = 0; x < strValor.length; x++) {
      var ch = strValor.charAt(x);
      switch(ch) {
          case '1' : case '2' : case '3' : case '4' : case '5' :
          case '6' : case '7' : case '8' : case '9' : case '0' :
          out += ch; break;
      }
      //if(ord($ch)>=48 && ord($ch)<=57) $out .= $ch;
  }
  return out;
}


/**
 * Recarrega a página para reposicionar os layer no caso do browser Netscape 4
 * @param bool init Flag que indica se inicia a função
 * @return string
 */

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);


function topPage()  {

  var x = 0;
  var y = (topPos) ? topPos : 0;

  window.scrollTo(x, y);

}

function exibirLayer(id) {
   var obj = achaObjeto(id);
   if(obj) {
	   obj.style.display = 'block';
   }else{
		alert('exibirLayer() : Layer '+id+' não foi encontrado.');
   }
}

function ocultarLayer(id) {
   var obj = achaObjeto(id);
   if(obj) {
	   obj.style.display = 'none';
   }else{
		alert('ocultarLayer() : Layer '+id+' não foi encontrado.');
   }
}

function invertLayer(id) {
   var obj = achaObjeto(id);
   if(obj) {
	   obj.style.display = (obj.style.display == 'none') ? 'block' : 'none';
   }else{
		alert('ocultarLayer() : Layer '+id+' não foi encontrado.');
   }
}

function displayLayer(id,test) {
	if(test == true) {
		exibirLayer(id);
	}else{
		ocultarLayer(id);
	}
}

function ehVisivelLayer(id) {
   var obj = achaObjeto(id);
   if(obj) {
	  return (obj.style.display == 'block');
   }else{
     alert('ehVisivelLayer() : Layer '+id+' não foi encontrado.');
	 return false;
   }
}

//-->