function abre(name, url, left, top, width, height, toolbar, menubar, statusbar, scrollbar, resizable)
{
toolbar_str = toolbar ? 'yes' : 'no';
menubar_str = menubar ? 'yes' : 'no';
statusbar_str = statusbar ? 'yes' : 'no';
scrollbar_str = scrollbar ? 'yes' : 'no';
resizable_str = resizable ? 'yes' : 'no';
janela = window.open(url, name, 'left='+left+',top='+top+',width='+width+',height='+height+',toolbar='+toolbar_str+', menubar='+menubar_str+',status='+statusbar_str+',scrollbars='+scrollbar_str+',resizable='+resizable_str);
janela.focus();
}

/*
Funcao para abrir o banner 2005
*/
function Banner2005() {
//var abrepop = window.open (url,nome,tamanho);
var abrepop = window.open ('http://www.andima.com.br/fim_de_ano/homem-sem-cor.html','Mensagem','width=600,height=400,left=90,screenX=90,top=40,screenY=40');
abrepop.focus();
}

// inicio script homem sem cor
var isInternetExplorer = navigator.appName.indexOf("Microsoft") != -1;
// Handle all the FSCommand messages in a Flash movie.
function homem_sem_cor_DoFSCommand(command, args) {
	var homem_sem_corObj = isInternetExplorer ? document.all.homem_sem_cor : document.homem_sem_cor;

{if(command=="mensagem2006"){ openNewWindow()}}
function openNewWindow(){setTimeout(
homipb = window.open('http://www.andima.com.br/fim_de_ano/homem-sem-cor.html','mensagem',
'height=400,width=600,toolbar=no,left=90,screenX=90,top=40,screenY=40')),0}
homipb.focus();

}
// Hook for Internet Explorer.
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
	document.write('<script language=\"VBScript\"\>\n');
	document.write('On Error Resume Next\n');
	document.write('Sub homem_sem_cor_FSCommand(ByVal command, ByVal args)\n');
	document.write('	Call homem_sem_cor_DoFSCommand(command, args)\n');
	document.write('End Sub\n');
	document.write('</script\>\n');
}
// final script homem sem cor


/**
 *    Funcoes para o controle dos combos (indice de produtos e atalhos),
 *    para fecha-los pelo click do mouse (fora da área ou pelo botão)
 *    ctrlMouseOut , ctrlMouseIn , toggleCombo
 */
function ctrlMouseOut(divObj)   {   
   if (String(divObj.id) == "undefined") {
      divObj = Dhtml_obtemLayer(divObj,document);
   }
   document.body.onclick=function(){
      toggleCombo(divObj.id, false);
      document.body.onclick=null;
   }
}

function ctrlMouseIn(divObj)   {   
   document.body.onclick=null;
}

function toggleCombo(comboName, bShow)  {
   var mostra = true;
   
   if (String(bShow) == "undefined") { 
      if (String(document.getElementById(comboName).style.display) != "undefined") {
         mostra = (document.getElementById(comboName).style.display == 'none');
      }
   }
   else  {
      mostra = bShow;
   }
   document.getElementById(comboName).style.display = (mostra ? 'block' : 'none');
}

/**
 *    Armazena o endereço atual no bookmark do usuario
 *    solucao cross browser (NS6+, FFOX1+ and IE5+)
 *    from: www.dynamicdrive.com/dynamicindex9/addbook.htm
 *
 */
function bookmark_me(){
   var url = self.location.href;
   var title = document.title;

   if (window.external) {
      window.external.AddFavorite(url,title)
   } else if (window.sidebar) {
      window.sidebar.addPanel(title, url,"");
   } else {
      alert("Infelizmente, seu navegador não suporta o bookmarking automático.\n\nPara incluir esta página no seu bookmarks, pressione as teclas CTRL+D ao mesmo tempo.");
   }
}

/**
 *    Abre uma janela de popup centralizada
 *    (testar com programas anti-popup)
 *
 */
function openPopup(sUrl, sTarget) {

   windowFeatures ="menubar=no,scrollbars=yes,location=no,favorites=no,resizable=no,status=yes,toolbar=no,directories=no";
   width=400;
   height=475;
   
   // Centralize the popup window.
   winLeft = (screen.width-width)/2;
   winTop = (screen.height-(height+110))/2;
   return window.open(sUrl, sTarget, "width="+width+",height="+height+",left=" + winLeft + ",top=" + winTop + ","+windowFeatures);
}


/**
 *    Identifica e retorna um layer de uma janela
 *
 * Parametros
 *    - pObjLayer
 *       Objeto ou nome de um layer a ser identificado e retornado
 *
 *    - pDocument
 *       Documento a ser analisado na identificacao do layer
 *
 */
function Dhtml_obtemLayer(
                  pObjLayer
               ,  pDocument
               )  {

   // inicializa o retorno
   var objLayer = null;

   // define que o objeto informado eh o retorno
   if (typeof pObjLayer != "string") {
      objLayer = pObjLayer;
   }
   
   // identifica o objeto a ser retornado pelo nome informado
   else if (   String(pDocument) != "undefined"
            && (
                  String(pDocument.getElementById) != "undefined"
               || String(pDocument.layers)         != "undefined"
               || String(pDocument.all)            != "undefined"
            )
           )   {

      if (document.getElementById && pDocument.getElementById(pObjLayer) != null) {
         objLayer = pDocument.getElementById(pObjLayer);
      }
      else if (document.layers && pDocument.layers[pObjLayer] != null)  {
         objLayer = pDocument.layers[pObjLayer];
      }
      else if (document.all) {
         objLayer = pDocument.all[pObjLayer];
      }

   }

   // valida o retorno
   if (String(objLayer) == "undefined")   {
      objLayer = null;
   }

   // retorna
   return objLayer;   
}

/**
 *    Torna um layer visivel
 *
 * Parametros
 *    - pObjLayer
 *       Objeto ou nome de um layer a ser identificado e retornado
 *
 *    - pDocument
 *       Documento a ser analisado na identificacao do layer
 *
 */
function Dhtml_mostraLayer(
                  pObjLayer
               ,  pDocument
               )  {

   // identifica o objeto a ser tratado
   object = Dhtml_obtemLayer(pObjLayer, pDocument);
   
   // realiza a operacao
   if (object && String(object) != "undefined")  {
      
      if (     document.layers
            || String(object.style) == "undefined"
         )  {
        object.visibility = 'visible';
      }
      else if (document.getElementById)  {
         object.style.visibility = 'visible';
         object.style.display = 'block';
      }
      else if (document.all) {
         //object.style.zIndex = 100;
         object.style.visibility = 'visible';
         object.style.display = 'block';
      }      
   }   
}


/**
 *    Torna um objeto invisivel
 *
 * Parametros
 *    - pObjLayer
 *       Objeto ou nome de um layer a ser identificado e retornado
 *
 *    - pDocument
 *       Documento a ser analisado na identificação do layer
 *
 */
function Dhtml_escondeLayer(
                  pObjLayer
               ,  pDocument
               )  {

   // identifica o objeto a ser tratado
   object = Dhtml_obtemLayer(pObjLayer, pDocument);

   // realiza a operacao
   if (object && String(object) != "undefined")  {

      if (     document.layers
            || String(object.style) == "undefined"
         )  {
        object.visibility = 'hidden';
        object.style.display = 'none';
      }
      else if (document.getElementById)  {
         object.style.visibility = 'hidden';
         object.style.display = 'none';
      }
      else if (document.all)  {
         object.style.visibility = 'hidden';
         object.style.display = 'none';
      }      
   }
}


/**
 *    Inverte a situacao de visibilidade de um objeto
 *
 * Parametros
 *    - pObjLayer
 *       Objeto ou nome de um layer a ser identificado e retornado
 *
 *    - pDocument
 *       Documento a ser analisado na identificacao do layer
 *
 */
function Dhtml_inverteVisibilidadeLayer(
                  pObjLayer
               ,  pDocument
               )  {

   // identifica o objeto a ser tratado
   object = Dhtml_obtemLayer(pObjLayer, pDocument);
   
   // realiza a operacao
   if (object && String(object) != "undefined")  {

      // verifica se o objeto esta´ visivel
      display = true;
      if (     document.layers
            || String(object.style) == "undefined"
         )  {
         display = (object.visibility == 'visible');
      }
      else if (document.all)  {
         display = (object.style.visibility != 'visible');
      }
      
      // inverte a situacao de visibilidade do objeto
   	if (display) {
   		Dhtml_mostraLayer(object);
   	}
   	else {
   		Dhtml_escondeLayer(object);
   	}	   	
   }   
}


/**
 *    Identifica e mostra na janela atual um dado informado em uma Location
 */
function pegaDado(pesquisa) {
	document.write(pegaDadoSemWrite(pesquisa));
}

/**
 *    Identifica um dado informado em uma Location
 */
function pegaDadoSemWrite(pesquisa, bTemQueAchar) {
   return Global_obtemParametro(
         unescape(window.location.search).substring(1)
      ,  pesquisa, "&"
      ,  bTemQueAchar
   );
}

/**
 *    Retorna o conteudo de uma String
 *
 * Parametros
 *    - psDados
 *       Dados a serem analisados
 *
 *    - psChave
 *       Chave a ser identificada
 *
 *    - pSepDados
 *       Separador dos dados
 *
 *    - pbTemQueAchar
 *       Define se a inexistencia do parametro deve retornar "undefined"
 *
 */
function Global_obtemParametro(psDados, psChave, psSepDados, pbTemQueAchar)   {
   
   // inicializa variaveis
   var dado   = psDados;
	var pos    = psDados.indexOf(psChave);
	var posFin = psDados.indexOf(psSepDados, pos);
   
   // verifica se foi encontrada a chave e esta deve existir
   if (pos < 0 && pbTemQueAchar == true)   {
      return 'undefined';
   }
   
   // verifica o retorno
	if (posFin == -1) {
		dado = dado.slice(pos+psChave.length);
	}  
	else {
		dado = dado.slice(pos+psChave.length, posFin);
	}
	
	// return
	return dado;	
}

/**
 *  Retorna a String removendo um determinado caracter à esquerda
 */
function lTrimChar(pVlr, pChar)  {
   
   // inicializa variáveis
   bPassouZero    = false;
   sVlr           = String(pVlr);
   sRet_lTrimChar = "";
   sChar          = String(pChar);
   
   // precorre cada caracter
   for(  i_lTrimZeros=0
      ;  i_lTrimZeros < sVlr.length
      ;  i_lTrimZeros++
      )   {
         
      // adiciona o pedaço
      if (sVlr.substring(i_lTrimZeros, i_lTrimZeros+1) != sChar || bPassouZero)  {
         sRet_lTrimChar += sVlr.substring(i_lTrimZeros, i_lTrimZeros+1);

         // verifica se passou do zero
         if (!bPassouZero && sVlr.substring(i_lTrimZeros, i_lTrimZeros+1) != sChar) {
            bPassouZero = true;
         }
               
      }
      
   }
   
   // retorna
   return sRet_lTrimChar;
}


/**
 *  Retorna a String de um numero removendo espaços à esquerda
 */
function lTrim(pVlr)  {
   return lTrimChar(pVlr, " ");
}


/**
 *  Retorna a String de um numero removendo zeros à esquerda
 */
function lTrimZeros(pVlr)  {
   return lTrimChar(lTrimChar(pVlr, " "), "0");
}

/**
 *    Remove quaisquer variáveis armazenadas em um cookie
 */
function clearCookie(path, domain, secure)  {

	// hoje e ontem
	var now = new Date();
	var yesterday = new Date(now.getTime() - 1000 * 60 * 60 * 24);
	var expires = yesterday;

   // limpa os cookies
   asCookie = document.cookie.split(";");
   for(iCookie=0; iCookie < asCookie.length-1; iCookie++) {
      asCookieDados = asCookie[iCookie].split("=");
      if (asCookieDados.length > 1) {
         cookieName  = lTrim(asCookieDados[0]);
         cookieValue = "cookieValue";
      	document.cookie =
      		escape(cookieName) + '=' + escape(cookieValue)
      		+ (expires ? '; expires=' + expires.toGMTString() : '')
      		+ (path    ? '; path=' + path : '')
      		+ (domain  ? '; domain=' + domain : '')
      		+ (secure  ? '; secure' : '')
      	;
      }
   }
   
}


		function Limpa01() {
			if (document.busca.busca1.value == "Escreva as palavras-chaves") {
			   document.busca.busca1.value ='';
			   }
		}
		
		function Indice(url,nome,tamanho) {
		window.open (url,nome,tamanho);
		}

		function AbreInfo(newLoc) {
			Pagina = newLoc.options[newLoc.selectedIndex].value
			if (newLoc.selectedIndex!=0) {
				newLoc.selectedIndex=0;
				Nova = window.open()
				Nova.focus()
				if (Pagina != "") {
				Nova.window.location.href = Pagina
				}
			}
		}