/*
  Função para validação de Campos do Tipo Data.
  Esta função tem por objetivo verificar se um dado fornecido é composto
  por caracteres inteiros e /.
  Autores : Marcus Paulo Albanez Andrade

*/


 function isData(vValor)
  {
   var vParametro         = eval(vValor +".value");
   var vConjuntoValido    = "1234567890/";
   var vIsConjuntoValido  = true
   if (vParametro.length == 10)
      {
       for (vContador=0; vContador < vParametro.length; vContador++)
           {
            vIntTemp= vParametro.substring (vContador, vContador+1);
            if (vConjuntoValido.indexOf (vIntTemp, 0)==-1)
               {
                vIsConjuntoValido =  false;
               }
           }
      }
   else
       {
        vIsConjuntoValido =  false;
       }

   if (vIsConjuntoValido == false)
      {
       alert("Data inválida!");
       return(false);
      }
   else
       {
        var vDia = mid(eval(vValor +".value"),0,2);
        var vMes = mid(eval(vValor +".value"),3,2);
        var vAno = mid(eval(vValor +".value"),6,4);
        if (vAno<=1900)
           {
            alert("Data inválida!");
            return(false);
           }
        else
            {
            if ((vMes<=0) || (vMes>12))
                 {
                  alert("Data inválida!");
                  return(false);
                 }
            else
                {
                  if ((vMes==1) || (vMes==3) || (vMes==5) || (vMes==7) || (vMes==8) || (vMes==10) || (vMes==12))
                     {
                      if ((vDia<=0) || (vDia>31))
                         {
                          alert("Data inválida!");
                          return(false);
                          }
                     }
                  else
                      {
                       if ((vMes==4) || (vMes==6) || (vMes==9) || (vMes==11))
                        {
                         if ((vDia<=0) || (vDia>30))
                            {
                             alert("Data inválida!");
                             return(false);
                            }
                        }
                        else
                            if (vAno % 4 == 0)
                               {
                                if ((vDia<=0) || (vDia>29))
                                   {
                                    alert("Data inválida!");
                                    return(false);
                                    }
                               }
                            else
                                {
                                if ((vDia<=0) || (vDia>28))
                                   {
                                    alert("Data inválida!");
                                    return(false);
                                    }
                                }
                      }

                }

            }


       }
   return (true);
  }