function validar_alta2(){
   validado = true

   var msg1 = 'Fatan por introducir los siquientes datos: \n\n';
   var msg = '';
   var msg2 = '';
   var msg3 = '';
   var msg4 = '';
	
//----------FIN DEFINICIÓN MENSAJES DE ERROR-----------------

//---Compruebo campos vacios y corrijo el error de la comilla simple al atacar la base de datos.
//if (document.formlistar2.referencia.value==""){validado = false; msg=msg+'- Referencia \n';}

   if (document.formlistar2.fecha.value==""){validado = false; msg=msg+'- Fecha de la Pérdida/Encuentro \n';}
   if (document.formlistar2.tipo_animal.value==0){validado = false; msg=msg+'- Tipo de animal \n';}
//if (document.formlistar2.estado.value==0){validado = false; msg=msg+'- Estado \n';}
//if (document.formlistar2.situacion.value==0){validado = false; msg=msg+'- Situación \n';}
   if (document.formlistar2.poblacion.value==""){validado = false; msg=msg+'- Población \n';}
//if (document.formlistar2.zona.value==""){validado = false; msg=msg+'- Zona \n';}
   if (document.formlistar2.provincia.value==0){validado = false; msg=msg+'- Provincia \n';}
   if (document.formlistar2.sexo.value==0){validado = false; msg=msg+'- Sexo \n';}
   if (document.formlistar2.tamano.value==0){validado = false; msg=msg+'- Tamaño \n';}
   if (document.formlistar2.edad.value==0){validado = false; msg=msg+'- Edad \n';}
   if (document.formlistar2.color_pelo.value==0){validado = false; msg=msg+'- Color del pelo \n';}
   if (document.formlistar2.tipo_pelo.value==0){validado = false; msg=msg+'- Tipo de pelo \n';}
   if (document.formlistar2.cola.value==0){validado = false; msg=msg+'- Tipo de Cola \n';}
//if (document.formlistar2.color_ojos.value==0){validado = false; msg=msg+'- Color de los ojos \n';}
   if (document.formlistar2.orejas.value==0){validado = false; msg=msg+'- Orejas \n';}
//if (document.formlistar2.collar.value==0){validado = false; msg=msg+'- Collar \n';}
   if (document.formlistar2.caracter.value==0){validado = false; msg=msg+'- Carácter \n';}
   if (document.formlistar2.nombre_contacto.value==""){validado = false; msg=msg+'- Nombre Contacto \n';}
//if (document.formlistar2.apellidos_contacto.value==""){validado = false; msg=msg+'- Apellidos Contacto \n';}
   if (document.formlistar2.provincia_contacto.value==0){validado = false; msg=msg+'- Provincia Contacto \n';}
   if (document.formlistar2.telefono.value==""){validado = false; msg=msg+'- Teléfono Contacto \n';}

   if ( fecha_no_valida( formlistar2.fecha.value ) ) {
      alert ( "La Fecha no es correcta.\nUtilice el formato DD/MM/YY.\nPor ejemplo 09/05/92. (Poniendo 0 en cifras inferiores a 10)." );
      formlistar2.fecha.focus ();
      return false;
   }


//-- COMPRUEBO CAMPO COMENTARIO NO SUPERIOR A 250 CARACTERES
   if ( document.formlistar2.observaciones.value.length > 250) {
      document.formlistar2.observaciones.value = document.formlistar2.observaciones.value.substring( 0,250 );
      validado = false;	
      msg2 = 'El campo observaciones no puede sobrepasar los 250 carácteres';
   }

//---COMPRUEBO EMAIL CORRECTO
   if ( !validar_email ( document.formlistar2.email.value ) ) {
      msg2 = msg2 + 'Por favor, introduzca una dirección de correo válida. \n';
      document.formlistar2.email.focus();
      validado = false;
   }

//--------------------FIN DE COMPROBACIÓN DE ERRORES. SI NO QUEDAN ERRORES SE PASA EL FORMULARIO AL ASP.
   if ( validado ){
      document.formlistar2.action = 'alta2.asp';
      document.formlistar2.submit();
//alert('DATOS CORRECTOS');
   } else {
      if ( msg != "" ) {
         msg4 = msg1 + msg
      } else {
         if ( msg2 != "" ) {
            msg4 = msg2 + msg
         } else {
            if ( msg3 != "" ) {
               msg4 = msg3 + msg
            }
         }
      }
      alert ( msg4 );
   }
}


function validar_altaent(){
   validado = true

   var msg1 = 'Fatan por introducir los siquientes datos: \n\n';
   var msg = '';
   var msg2 = '';
   var msg3 = '';
   var msg4 = '';

   if ( document.formlistar2.tipo_ent.value == 0 ) { validado = false; msg=msg+'- Tipo de entidad \n'; }
   if ( document.formlistar2.provincia.value == 0 ) { validado = false; msg=msg+'- Provincia \n'; }
   if ( document.formlistar2.localidad.value == "" ) { validado = false; msg=msg+'- Localidad \n'; }
   if ( document.formlistar2.telefono.value == "" ) { validado = false; msg=msg+'- Teléfono \n'; }

   if ( !validar_email ( document.formlistar2.mail.value ) ) {
      msg2 = msg2 + 'Por favor, introduzca una dirección de correo válida. \n';
      document.formlistar2.mail.focus();
      validado = false;
   }

   if ( !document.formlistar2.Perro.checked &&
        !document.formlistar2.Gato.checked &&
        !document.formlistar2.Otro.checked ) {
      validado = false;
      msg=msg+'- Animales \n';
   }

   if ( document.formlistar2.Otro.checked && document.formlistar2.especies.value == "" ) {
      validado = false;
      msg = msg + '- Otras especies \n';
   }


   if ( validado ){
      document.formlistar2.action = 'altaent.asp';
      document.formlistar2.submit();
//alert('DATOS CORRECTOS');
   } else {
      if ( msg != "" ) {
         msg4 = msg1 + msg
      } else {
         if ( msg2 != "" ) {
            msg4 = msg2 + msg
         } else {
            if ( msg3 != "" ) {
               msg4 = msg3 + msg
            }
         }
      }
      alert ( msg4 );
   }
}

function validar_altatrob(){
   validado = true

   var msg1 = 'Fatan por introducir los siquientes datos: \n\n';
   var msg = '';
   var msg2 = '';
   var msg3 = '';
   var msg4 = '';

   if ( document.formlistar2.especie.value == 0 ) { validado = false; msg=msg+'- Animal \n'; }
   if ( document.formlistar2.sexo.value == 0 ) { validado = false; msg=msg+'- Sexo \n'; }
   if ( document.formlistar2.provincia.value == 0 ) { validado = false; msg=msg+'- Provincia \n'; }
   if ( document.formlistar2.localidad.value == "" ) { validado = false; msg=msg+'- Localidad \n'; }
   if ( document.formlistar2.fecha.value == 0 ) { validado = false; msg=msg+'- Fecha \n'; }
   if ( document.formlistar2.imagen.value == 0 ) { validado = false; msg=msg+'- Fotografía \n'; }
   if ( document.formlistar2.telefono.value == "" ) { validado = false; msg=msg+'- Teléfono \n'; }

   if ( fecha_no_valida( formlistar2.fecha.value ) ) {
      alert ( "La Fecha no es correcta.\nUtilice el formato DD/MM/YY.\nPor ejemplo 09/05/92. (Poniendo 0 en cifras inferiores a 10)." );
      formlistar2.fecha.focus ();
      return false;
   }


//-- COMPRUEBO CAMPO COMENTARIO NO SUPERIOR A 250 CARACTERES
   if ( document.formlistar2.observaciones.value.length > 250) {
      document.formlistar2.observaciones.value = document.formlistar2.observaciones.value.substring( 0,250 );
      validado = false;	
      msg2 = 'El campo observaciones no puede sobrepasar los 250 carácteres';
   }

   if ( !validar_email ( document.formlistar2.mail.value ) ) {
      msg2 = msg2 + 'Por favor, introduzca una dirección de correo válida. \n';
      document.formlistar2.mail.focus();
      validado = false;
   }

   if ( validado ){
      document.formlistar2.action = 'altatrob.asp';
      document.formlistar2.submit();
// alert('DATOS CORRECTOS');
   } else {
      if ( msg != "" ) {
         msg4 = msg1 + msg
      } else {
         if ( msg2 != "" ) {
            msg4 = msg2 + msg
         } else {
            if ( msg3 != "" ) {
               msg4 = msg3 + msg
            }
         }
      }
      alert ( msg4 );
   }
}

function fecha_no_valida(str) {
   var val = str;
   var dec_dies="0123"
   var uns_dies="01"
   var dec_mesos="01"
   var uns_mesos="012"
   var val = str;
   var num1=0;
   var num2=0;
   var num3=0;
   var num4=0;

   dia = val.charAt(0)+val.charAt(1);
   mes = val.charAt(3)+val.charAt(4);

   ch = val.charAt(0);
   for (j = 0;  j < dec_dies.length;  j++) {
      if ( ch == dec_dies.charAt ( j ) ) {
         break;
      } else {
         num1++;
      }
   }
   if ( dec_dies.length-num1 == 0 )
      return true;		

   if (val.charAt(0) == "3") {
      ch = val.charAt(1);
      for (j = 0;  j < uns_dies.length;  j++) {
         if (ch == uns_dies.charAt(j)) {
            break;
         } else {
            num2++;
         }
      if ( uns_dies.length-num2 == 0 )
         return true;
      }
   }

   ch = val.charAt(3);
   for (j = 0;  j < dec_mesos.length;  j++) {
      if (ch == dec_mesos.charAt(j)) {
         break;
      } else {
         num3++;
      }
   }
   if (dec_mesos.length-num3 == 0)
      return true;	

   if (val.charAt(3)=="1") {
      ch = val.charAt(4);
      for (j = 0;  j < uns_mesos.length;  j++) {
         if (ch == uns_mesos.charAt(j)) {
            break;
         } else {
            num4++;
         }
      }
      if (uns_mesos.length-num4 == 0)
         return true;
   }
   if (mes=="04" && dia=="31")
      return true;
   if (mes=="06" && dia=="31")
      return true;
   if (mes=="09" && dia=="31")
      return true;
   if (mes=="11" && dia=="31")
      return true;

   if (mes=="02" && dia=="31")
      return true;
   if (mes=="02" && dia=="30")
      return true;
   if (mes=="02" && dia=="29")
      return true;
   else
      return false;
} // FIN rollo de la fecha-------------------------------



function validar_email( email ) {
   if ( email != "" ) {
      if (email.length < 5) {
         return false;
      }

      if ( email.indexOf ( "@", 1 ) == -1 ) {
         return false;
      }

      if ( email.indexOf( ".", email.indexOf ( "@" ) + 1 ) == -1 ) {
         return false;
      }
   }
   return true;
}