function mostrar2(mos,cual)
{
	if(mos=='entre')
	{ 
		if(cual==1) 
			document.consulta.f3.style.display='block'; 
		else 
	 		document.consulta.p3.style.display='block'; 
	} 
	else 
	{
		if(cual==1)
			document.consulta.f3.style.display='none'; 
		else 
			document.consulta.p3.style.display='none'; 
	}
}

function combrobarNumero(caja)
{
	var patt=/^[0-9.,]*$/;
	if(!patt.test(document.getElementById(caja).value))
		document.getElementById(caja).value ="";
}

function valida_mail()
{
	var pattern=/^[_a-zA-Z0-9-]+(\.[_a-zA-Z0-9-]+)*@[a-zA-Z0-9-]{1,200}(\.[a-zA-Z]{1,200})*(\.[a-zA-Z]{2,6})$/;
	var cadea = "Dirección de correo no válida: " + document.form1.mail.value
      + "\nPor favor, introduce bien la dirección";
	if (document.form1.mail.value=="") // pode ser branco
	  return (false);
	else  
	  if (pattern.test(document.form1.mail.value))
	    return (true);
	  else 
	  {
	    alert(cadea);
	    return (false);
	  }  
}

function valida(Form)
{	
  return(valida_mail(Form.email.value) && nif(Form.cif.value));
}

function valida_mailr(email)
{
	var pattern=/^[_a-zA-Z0-9-]+(\.[_a-zA-Z0-9-]+)*@[a-zA-Z0-9-]{1,200}(\.[a-zA-Z]{1,200})*(\.[a-zA-Z]{2,6})$/;
	var cadea = "Dirección de correo no válida: " + email
      + "\nPor favor, introduce bien la dirección";
	if (email=="") // pode ser branco
	  return (false);
	else  
	  if (pattern.test(email))
	    return (true);
	  else 
	  {
	    alert(cadea);
	    return (false);
	  }  
}

function validar(Form)
{	
  return(valida_mailr(Form.mail.value) && valida_mailr(Form.temail.value));
}

function nif(dni){
  numero = dni.substr(0,dni.length-1);
  let = dni.substr(dni.length-1,1);
  numero = numero % 23;
  letra='TRWAGMYFPDXBNJZSQVHLCKET';
  letra=letra.substring(numero,numero+1);
  if (letra!=let) 
    {
	  alert('Dni erroneo');
	  return (false);	
	}
}