var ERROR_CORREO = "ERROR! Debe RELLENAR el Campo 'E-Mail'";
var ERROR_CORREO_INC = "ERROR! El E-Mail introducido NO es VALIDO";
var ERROR_CAMPOS = "ERROR! Debe RELLENAR los Campos Obligatorios";
var ERROR_CIF = "ERROR! Debe RELLENAR el Campo 'CIF'";
var ERROR_CIF_INC = "ERROR! El texto introducido NO es un CIF ni un DNI VALIDO";
var ERROR_POLITICA = "ERROR! Debe ACEPTAR las Condiciones Relativas a la Proteccion de Datos";
var ERROR_LOC = "ERROR! Debe RELLENAR el Campo 'Locucion de Entrada: Nombre y Apellidos o Empresa'";
var ERROR_LOC_DIR = "ERROR! Debe RELLENAR el Campo 'Locucion de Entrada: Direccion Postal o Apdo de Correos'";
var ERROR_LOC_CIF = "ERROR! Debe RELLENAR el Campo 'CIF, NIF o Locucion'";

function Validar_CIF(texto)
{
	var pares = 0;
	var impares = 0;
	var suma;
	var ultima;
	var unumero;
	var uletra = new Array("J", "A", "B", "C", "D", "E", "F", "G", "H", "I");
	var xxx;
	//Pasar el CIF a mayúsculas
	texto = texto.toUpperCase();
	//Comprobar que "texto" tenga el formato de un CIF
	var regular = new RegExp(/^[ABCDEFGHKLMNPQS]\d\d\d\d\d\d\d[0-9,A-J]$/g);
	if (!regular.exec(texto)) return false;

	ultima = texto.substr(8,1);

	for (var cont = 1 ; cont < 7 ; cont ++)
	{
		xxx = (2 * parseInt(texto.substr(cont++,1))).toString() + "0";
		impares += parseInt(xxx.substr(0,1)) + parseInt(xxx.substr(1,1));
		pares += parseInt(texto.substr(cont,1));
	}

	xxx = (2 * parseInt(texto.substr(cont,1))).toString() + "0";
	impares += parseInt(xxx.substr(0,1)) + parseInt(xxx.substr(1,1));

	suma = (pares + impares).toString();
	unumero = parseInt(suma.substr(suma.length - 1, 1));
	unumero = (10 - unumero).toString();

	if(unumero == 10) unumero = 0;

	if ((ultima == unumero) || (ultima == uletra[unumero])) return true;
	else return false;
}

function Validar_NIF(texto)
{
	dni = texto.substring(0,texto.length-1);
	let = texto.charAt(texto.length-1);
	
	if (!isNaN(let)) return false;			//alert('Falta la letra');
	else
	{
		cadena = "TRWAGMYFPDXBNJZSQVHLCKET";
		posicion = dni % 23;
		letra = cadena.substring(posicion,posicion+1);

		if (letra != let.toUpperCase()) return false;	//alert("Nif no válido");
	}
	//alert("Nif válido")
	return true;
}

function Numeros(e)
{
	var tecla = (document.all) ? e.keyCode : e.which;
	
    if (tecla==8 || tecla == 0) return true; //Tecla de retroceso (para poder borrar) y Tecla Tabulación y Suprimir (0)
    patron = /\d/; //Solo acepta números
    var te = String.fromCharCode(tecla);
    
	return patron.test(te);
}

function Valida_Form_Contacto803(frmContacto_Lineas803)
{
	var correo = document.frmContacto_Lineas803.email.value;
	var acepto = document.frmContacto_Lineas803.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContacto_Lineas803.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContacto_Lineas803.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContacto_Lineas803.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContacto_Lineas803.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta803(frmAlta_Lineas803)
{
	var cif = document.frmAlta_Lineas803.Cif.value;
	var correo = document.frmAlta_Lineas803.email.value;
	var marcad = document.frmAlta_Lineas803.acepto.checked;
	
	var comp_cif = Validar_CIF(cif);
	var comp_dni = Validar_NIF(cif);
	
	if (cif == "" && correo == "" && !marcad)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_Lineas803.Cif.focus();
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_Lineas803.Cif.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_Lineas803.email.focus();
		return false;
	}
	/*else if (!comp_cif && !comp_dni)
	{
		alert(ERROR_CIF_INC);
		document.frmAlta_Lineas803.Cif.focus();
		return false;
	}*/
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_Lineas803.email.focus();
		return false;
	}
	else if (!marcad)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_Lineas803.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_Contratar803(frmContacto_Contratar803)
{
	var correo = document.frmContacto_Contratar803.email.value;
	var acepto = document.frmContacto_Contratar803.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContacto_Contratar803.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContacto_Contratar803.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContacto_Contratar803.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContacto_Contratar803.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_Contratar803(frmAlta_Contratar803)
{
	var cif = document.frmAlta_Contratar803.cif_empresa.value;
	var correo = document.frmAlta_Contratar803.email.value;
	var acepta = document.frmAlta_Contratar803.acepto.checked;
	
	if (cif == "" && correo == "" && !acepta)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_Contratar803.cif_empresa.value;
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_Contratar803.cif_empresa.value;
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_Contratar803.email.value;
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_Contratar803.email.value;
		return false;
	}
	else if (!acepta)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_Contratar803.acepto.value;
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_ContratarLineas803(frmContacto_ContratarLineas803)
{
	var correo = document.frmContacto_ContratarLineas803.email.value;
	var acepto = document.frmContacto_ContratarLineas803.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContacto_ContratarLineas803.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContacto_ContratarLineas803.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContacto_ContratarLineas803.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContacto_ContratarLineas803.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_ContratarLineas803(frmAlta_ContratarLineas803)
{
	var cif = document.frmAlta_ContratarLineas803.Cif.value;
	var correo = document.frmAlta_ContratarLineas803.email.value;
	var acepta = document.frmAlta_ContratarLineas803.acepto.checked;
	
	if (cif == "" && correo == "" && !acepta)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_ContratarLineas803.Cif.value;
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_ContratarLineas803.Cif.value;
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_ContratarLineas803.email.value;
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_ContratarLineas803.email.value;
		return false;
	}
	else if (!acepta)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_ContratarLineas803.acepto.value;
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_ContratarLineas806(frmContactar_ContratarLineas806)
{
	var correo = document.frmContactar_ContratarLineas806.email.value;
	var acepto = document.frmContactar_ContratarLineas806.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContactar_ContratarLineas806.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContactar_ContratarLineas806.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContactar_ContratarLineas806.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContactar_ContratarLineas806.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_ContratarLineas806(frmAlta_ContratarLineas806)
{
	var cif = document.frmAlta_ContratarLineas806.Cif.value;
	var correo = document.frmAlta_ContratarLineas806.email.value;
	var acepta = document.frmAlta_ContratarLineas806.acepto.checked;
	
	if (cif == "" && correo == "" && !acepta)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_ContratarLineas806.Cif.value;
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_ContratarLineas806.Cif.value;
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_ContratarLineas806.email.value;
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_ContratarLineas806.email.value;
		return false;
	}
	else if (!acepta)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_ContratarLineas806.acepto.value;
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_ContratarLineas807(frmContactar_ContratarLineas807)
{
	var correo = document.frmContactar_ContratarLineas807.email.value;
	var acepto = document.frmContactar_ContratarLineas807.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContactar_ContratarLineas807.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContactar_ContratarLineas807.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContactar_ContratarLineas807.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContactar_ContratarLineas807.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_ContratarLineas807(frmAlta_ContratarLineas807)
{
	var cif = document.frmAlta_ContratarLineas807.Cif.value;
	var correo = document.frmAlta_ContratarLineas807.email.value;
	var acepta = document.frmAlta_ContratarLineas807.acepto.checked;
	
	if (cif == "" && correo == "" && !acepta)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_ContratarLineas807.Cif.value;
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_ContratarLineas807.Cif.value;
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_ContratarLineas807.email.value;
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_ContratarLineas807.email.value;
		return false;
	}
	else if (!acepta)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_ContratarLineas807.acepto.value;
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_ContratarLineas902(frmContacto_ContratarLineas902)
{
	var correo = document.frmContacto_ContratarLineas902.email.value;
	var acepto = document.frmContacto_ContratarLineas902.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContacto_ContratarLineas902.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContacto_ContratarLineas902.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContacto_ContratarLineas902.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContacto_ContratarLineas902.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_ContratarLineas902(frmAlta_ContratarLineas902)
{
	var cif = document.frmAlta_ContratarLineas902.Cif.value;
	var correo = document.frmAlta_ContratarLineas902.email.value;
	var acepta = document.frmAlta_ContratarLineas902.acepto.checked;
	
	if (cif == "" && correo == "" && !acepta)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_ContratarLineas902.Cif.value;
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_ContratarLineas902.Cif.value;
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_ContratarLineas902.email.value;
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_ContratarLineas902.email.value;
		return false;
	}
	else if (!acepta)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_ContratarLineas902.acepto.value;
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_Linea902(frmContacto_Linea902)
{
	var correo = document.frmContacto_Linea902.email.value;
	var acepto = document.frmContacto_Linea902.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContacto_Linea902.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContacto_Linea902.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContacto_Linea902.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContacto_Linea902.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Contacto_Lineas902(frmContacto_Lineas902)
{
	var correo = document.frmContacto_Lineas902.email.value;
	var acepto = document.frmContacto_Lineas902.acepto.checked;
	
	if (correo == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmContacto_Lineas902.email.focus();
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmContacto_Lineas902.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmContacto_Lineas902.email.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmContacto_Lineas902.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_Lineas902(frmAlta_Lineas902)
{
	var cif = document.frmAlta_Lineas902.cif.value;
	var correo = document.frmAlta_Lineas902.email.value;
	var nom_loc = document.frmAlta_Lineas902.entrada1.value;
	var dir_loc = document.frmAlta_Lineas902.entrada2.value;
	var cif_loc = document.frmAlta_Lineas902.entrada3.value;
	var acepto = document.frmAlta_Lineas902.acepto.checked;
	
	if (cif == "" && correo == "" && nom_loc == "" && dir_loc == "" && cif_loc == "" && !acepto)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_Lineas902.cif.focus();
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_Lineas902.cif.value;
		return false;
	}
	else if (correo == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_Lineas902.email.focus();
		return false;
	}
	else if (!(correo.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_Lineas902.email.focus();
		return false;
	}
	else if (nom_loc == "")
	{
		alert(ERROR_LOC);
		document.frmAlta_Lineas902.entrada1.focus();
		return false;
	}
	else if (dir_loc == "")
	{
		alert(ERROR_LOC_DIR);
		document.frmAlta_Lineas902.entrada2.focus();
		return false;
	}
	else if (cif_loc == "")
	{
		alert(ERROR_LOC_CIF);
		document.frmAlta_Lineas902.entrada3.focus();
		return false;
	}
	else if (!acepto)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_Lineas902.acepto.focus();
		return false;
	}
	else return true;
}

function Valida_Form_Alta_Lineas902es(frmAlta_Lineas902es)
{
	var cif = document.frmAlta_Lineas902es.cif.value;
	var email = document.frmAlta_Lineas902es.email.value;
	var acept = document.frmAlta_Lineas902es.acepto.checked;
	
	if (cif == "" && email == "" && !acept)
	{
		alert(ERROR_CAMPOS);
		document.frmAlta_Lineas902es.cif.focus();
		return false;
	}
	else if (cif == "")
	{
		alert(ERROR_CIF);
		document.frmAlta_Lineas902es.cif.focus();
		return false;
	}
	else if (email == "")
	{
		alert(ERROR_CORREO);
		document.frmAlta_Lineas902es.email.focus();
		return false;
	}
	else if (!(email.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1))
	{
		alert(ERROR_CORREO_INC);
		document.frmAlta_Lineas902es.email.focus();
		return false;
	}
	else if (!acept)
	{
		alert(ERROR_POLITICA);
		document.frmAlta_Lineas902es.acepto.focus();
		return false;
	}
	else return true;
}