function validadata(Data,Campodata){
if (Data == "")
   {
   return false;
   }
Data_valida = true
if (Data.length > 10)
   {
   Data_valida = false;
   }
if (!isNaN(Data))
   {
   Data_valida = false;
   }
for (i=0;i<=Data.length;i++)
   {
   if (isNaN(Data.charAt(i)))
      {
      Separador = Data.charAt(i)
      if (Separador != "/")
         {
         Data_valida = false;
         }
      Dia = Data.substring(0,Data.indexOf(Separador));
      Mes = Data.substring(eval(Data.indexOf(Separador) + 1),Data.lastIndexOf(Separador));
      Ano = Data.substring(eval(Data.lastIndexOf(Separador) + 1),Data.length);
      } //End if
   } // End For
   
if (isNaN(Dia))
   {
   Data_valida = false; 
   }
if (Dia.length < 1 || Dia.length > 2)
   {
   Data_valida = false; 
   }
if (isNaN(Mes))
   {
   Data_valida = false; 
   }
if (Mes.length < 1 || Mes.length > 2 )
   {
   Data_valida = false; 
   }
if (isNaN(Ano))
   {
   Data_valida = false;
   }
if (Ano.length < 2 || Ano.length > 4)
   {
   Data_valida = false; 
   }
if (Dia < 1 || Dia > 31 || Mes < 1 || Mes > 12)
   {
   Data_valida = false; 
   }
if (Data_valida==false) 
   {
   alert(Campodata);
   return false;
   }
}

function changeURL(nome) 
{ 
 strWannaChange = "Têm certeza que deseja excluir "+nome+"?" 
return(confirm(strWannaChange)) ;
}

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&&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;
}

function MM_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}

function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}

function MM_openBrWindowNovo(theURL,parametro1,parametro2,parametro3,parametro4,parametro5,winName,largura,altura) { //v2.0
window.showModalDialog('redir_popup.asp?pagina='+theURL+'&parametro1='+parametro1+'&parametro2='+parametro2+'&parametro3='+parametro3+'&parametro4='+parametro4+'&parametro5='+parametro5,'Popup','status:no; resizable:no; dialogHeight: '+altura+'px; dialogWidth: '+largura+'px; dialogTop: 20px');
//window.showDialog(theURL,'Popup','resizable:no; dialogHeight: '+altura+'px; dialogWidth: '+largura+'px; dialogTop: 0px');
}

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 MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' deve conter um endereço de e-mail.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' deve conter um número.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' deve conter um número entre '+min+' e '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' é requerido.\n'; }
  } if (errors) alert('Erro:\n'+errors);
  document.MM_returnValue = (errors == '');
}

function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}

function atualiza()
{
window.open("emails.asp","corpo");
this.window.close();
}

function newwin1() {
largura = window.screen.availWidth
altura = window.screen.availHeight
imp = window.open('newsletter_fundo_pop1.asp', 'Fundo1', 'scrollbars=yes,resizable=yes');
imp.moveTo(0,0) 
imp.resizeTo(largura,altura) 
}

function newwin2() {
largura = window.screen.availWidth
altura = window.screen.availHeight
imp = window.open('newsletter_fundo_pop2.asp', 'Fundo2', 'scrollbars=yes,resizable=yes');
imp.moveTo(0,0) 
imp.resizeTo(largura,altura) 
}

function newwin3() {
largura = window.screen.availWidth
altura = window.screen.availHeight
imp = window.open('newsletter_fundo_pop3.asp', 'Fundo3', 'scrollbars=yes,resizable=yes');
imp.moveTo(0,0) 
imp.resizeTo(largura,altura) 
}

function mudatopo(valor){
parent.frames["topo"].document.form1.descricao.value=valor;
}

function AbrePagina(Foto, tamx, tamy)
{
window.open(Foto,"","resizable=no,toolbar=no,status=no,menubar=no,scrollbars=no,width=" + tamx + ",height=" + tamy)
}