////FUNCION PARA DETECTAR EXPLORER

var BrowserDetect = {
	init: function () {
		this.browser = this.searchString(this.dataBrowser) || "An unknown browser";
		this.version = this.searchVersion(navigator.userAgent)
			|| this.searchVersion(navigator.appVersion)
			|| "an unknown version";
		this.OS = this.searchString(this.dataOS) || "an unknown OS";
	},
	searchString: function (data) {
		for (var i=0;i<data.length;i++)	{
			var dataString = data[i].string;
			var dataProp = data[i].prop;
			this.versionSearchString = data[i].versionSearch || data[i].identity;
			if (dataString) {
				if (dataString.indexOf(data[i].subString) != -1)
					return data[i].identity;
			}
			else if (dataProp)
				return data[i].identity;
		}
	},
	searchVersion: function (dataString) {
		var index = dataString.indexOf(this.versionSearchString);
		if (index == -1) return;
		return parseFloat(dataString.substring(index+this.versionSearchString.length+1));
	},
	dataBrowser: [
		{ 	string: navigator.userAgent,
			subString: "OmniWeb",
			versionSearch: "OmniWeb/",
			identity: "OmniWeb"
		},
		{
			string: navigator.vendor,
			subString: "Apple",
			identity: "Safari"
		},
		{
			prop: window.opera,
			identity: "Opera"
		},
		{
			string: navigator.vendor,
			subString: "iCab",
			identity: "iCab"
		},
		{
			string: navigator.vendor,
			subString: "KDE",
			identity: "Konqueror"
		},
		{
			string: navigator.userAgent,
			subString: "Firefox",
			identity: "Firefox"
		},
		{
			string: navigator.vendor,
			subString: "Camino",
			identity: "Camino"
		},
		{		// for newer Netscapes (6+)
			string: navigator.userAgent,
			subString: "Netscape",
			identity: "Netscape"
		},
		{
			string: navigator.userAgent,
			subString: "MSIE",
			identity: "Explorer",
			versionSearch: "MSIE"
		},
		{
			string: navigator.userAgent,
			subString: "Gecko",
			identity: "Mozilla",
			versionSearch: "rv"
		},
		{ 		// for older Netscapes (4-)
			string: navigator.userAgent,
			subString: "Mozilla",
			identity: "Netscape",
			versionSearch: "Mozilla"
		}
	],
	dataOS : [
		{
			string: navigator.platform,
			subString: "Win",
			identity: "Windows"
		},
		{
			string: navigator.platform,
			subString: "Mac",
			identity: "Mac"
		},
		{
			string: navigator.platform,
			subString: "Linux",
			identity: "Linux"
		}
	]

};


////FIN FUNCION PARA DETECTAR EXPLORER


function ReplaceTexto(texto, taReemplazar, tSustituto) 
{
	var out = taReemplazar; // reemplazar la letra a
	var add = tSustituto;   // por la letra z
	var temp = "" + texto;
	var pos = 0;
	//var i = 0;

	//alert("Texto:" + texto);

	while (temp.indexOf(out)>-1)
	{
		pos= temp.indexOf(out);
		temp = "" + (temp.substring(0, pos) + add + temp.substring((pos + out.length), temp.length));
		//alert("temp.substring(0, pos):" + temp.substring(0, pos) + " temp.substring((pos + out.length), temp.length)):" + temp.substring((pos + out.length), temp.length)));
	}
	return temp;
}


function ComprobarProfesional()
{
	var cnjFORM = eval('document.forms.' + formulario + '.length');
	var valor =0;
	var pass="";
	var nombreError;
	for (var i=0; i<cnjFORM; i++) 
	{ 
		var cmp = eval('document.forms.' + formulario + '['+ i +'].value');
		var nombre=eval('document.forms.' + formulario + '['+ i + '].name');
		if (nombre=="USUARIO" && valor==0)
		{
	 		if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(cmp)){
			}
			 else
				 {
				   alert("El [Usuario] debe ser un email correcto");
				   valor=2;
			     }
		}
		else
		{
			if (nombre=="PASSWORD")
			{
				if (pass!="" )
				{
					if (pass!=cmp) {
						alert("Las [Contraseñas] deben coincidir");
						valor=2;
					}
				}
			else
			{
				pass=cmp
			}
		}
		if (nombre=="REPETIR_PASSWORD")
		{
				if (pass!="" )
			{
				if (pass!=cmp) {
					alert("Las [Contraseñas] deben coincidir");
					valor=2;
				}
			}
			else
			{
				pass=cmp
			}
		}
 		if (nombre=="FAX" || nombre=="NEWS" || nombre=="UsuarioRec")
		{
		}
		else
		{
	 	  if (cmp=="" && valor==0)
		 	{
				nombreError=nombre;
				
			  			valor=1;
		    }
		}
		}
	}
	if (valor==1)
	{
		alert("el campo " + nombreError +" no puede estar en blanco");
	}
	if (valor==0)
	{
		document.forms[formulario].submit();
	}
};


function ValidarProfesional(formulario)
{
	var cnjFORM = eval('document.forms.' + formulario + '.length');
	var valor =0;
	var pass="";
	var nombreError;
	var mensaje;
	
	for (var i=0; i<cnjFORM; i++) 
	{ 
	
		var cmp = eval('document.forms.' + formulario + '['+ i +'].value');
		var nombre=eval('document.forms.' + formulario + '['+ i + '].name');

		if ((nombre=="NOMBRE" || nombre=="APELLIDOS" || nombre == "EMPRESA" || nombre == "pais") && valor==0)
		{
			if (cmp.length == 0)
			{
				
				if (nombre=="NOMBRE")
					mensaje = "El [Nombre] es obligatorio";
				if (nombre=="APELLIDOS")
					mensaje = "Los [Apellidos] son obligatorios";
				if (nombre=="EMPRESA")
					mensaje = "La [Empresa] es obligatoria";
				if (nombre=="pais")
					mensaje = "El [País] es obligatorio";
				
				alert(mensaje);
				eval('document.forms.' + formulario + '['+ i + '].focus()');
				valor=2;
			} 
		}

		if (nombre=="USUARIO" && valor==0)
		{
	 		if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/.test(cmp)){
			}
			else
			{
				alert("El [Usuario] debe ser un email correcto");
				eval('document.forms.' + formulario + '['+ i + '].focus()');
				valor=2;
			 }
		}

		if (nombre=="PASSWORD" && valor==0)
		{
			pass=cmp;				
			if (cmp!="" )
			{
				if (cmp.length < 5)
				{
					alert('La longitud mínima de la [Contraseña] es de 5 caracteres');
					valor=2;
				}
			}
			else
			{
				alert('La [Contraseña] es obligatoria');
				valor=2;

			}
		}

		if (nombre=="REPETIR_PASSWORD" && valor==0)
		{
			if (cmp!="" )
			{
				if (cmp.length < 5)
				{
					alert('La longitud mínima de la [Contraseña] es de 5 caracteres');
					valor=2;
				}
				else
				{
					if (pass!=cmp) 
					{
						alert("Las [Contraseñas] deben coincidir");
						valor=2;
					}
				}
			}
			else
			{
				alert("La [Contraseña] es obligatoria");
				valor=2;
			}
		}

	}	// Fin del for

	if (valor==0)
	{
		document.forms[formulario].submit();
	}
};


function ValidarModRegistro(formulario)
{
	var cnjFORM = eval('document.forms.' + formulario + '.length');
	var valor =0;
	var pass="";
	var nombreError;
	
	for (var i=0; i<cnjFORM; i++) 
	{ 
	
		var cmp = eval('document.forms.' + formulario + '['+ i +'].value');
		var nombre=eval('document.forms.' + formulario + '['+ i + '].name');

		if (nombre=="USUARIO")
		{
	 		if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/.test(cmp)){
			}
			else
			{
				alert("El [Usuario] debe ser un email correcto");
				eval('document.forms.' + formulario + '['+ i + '].focus()');
				valor=2;
				i=99;
			 }
		}

		if ((nombre=="PSEUDONIMO") && (cmp == ""))
			{
				alert("El [PSeudónimo] es obligatorio");
				eval('document.forms.' + formulario + '['+ i + '].focus()');
				valor=2;
				i=99;
			}

		if ((nombre=="pais") && (cmp == ""))
			{
				alert("El [País] es obligatorio");
				eval('document.forms.' + formulario + '['+ i + '].focus()');
				valor=2;
				i=99;
			}

	}	// Fin del for

	if (valor==0)
	{
		document.forms[formulario].submit();
	}
};



function calcularNIF(dni) {
if (dni != null){
	var letra = dni.substr(dni.length-1,1);
	var numero = dni.substr(0,dni.length-1);
	var cadena  = 'TRWAGMYFPDXBNJZSQVHLCKET';
    var cadenap = 'trwagmyfpdxbnjzsqvhlcket';
    var posicion = numero % 23;
    var l = cadena.charAt(posicion);
    var lp = cadenap.charAt(posicion);
     if (letra != l)
	{
		if (letra != lp)
	   {
			return false;
	   }
	   else
	   {
			return true;
	   }
	}
	else
	{	
		return true;
	}
}
else
	return true;
};


function validarEmail(formulario,campo) {
var cmd=eval('document.forms.' + formulario + '.' + campo + '.value');
	 if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/.test(cmd)){
   document.forms[formulario].submit();
  } else {
   alert("La dirección de email es incorrecta.");
  }
 }

function EnviarAtencionCliente(formulario){
	alert('Entra');
	var cnjFORM = eval('document.forms.' + formulario + '.length');
	var valor =0;
	var pass="";
	var nombreError;
	for (var i=0; i<cnjFORM; i++) 
	{ 
		var cmp = eval('document.forms.' + formulario + '['+ i +'].value');
		var longitud = eval('document.forms.' + formulario + '['+ i +'].value.length');
		var nombre=eval('document.forms.' + formulario + '['+ i + '].name');
		if (nombre=="CORREO" && valor==0)
		{
	 		if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/.test(cmp)){
			}
			 else
				 {
				   alert("El [Usuario] debe ser un email correcto");
				   valor=2;
			     }
		}
		else
		{
			if (nombre=="PASSWORD")
			{
				if (pass!="" )
				{
					if (pass.length < 5)
					{
					alert('La longitud mínima de la [Contraseña] es de 5 caracteres');
					valor=2;
					}
					else
						{
						if (pass!=cmp) {
							alert('Las [Contraseñas] deben coincidir');
							valor=2;
						}
					}
				}
			else
			{
				pass=cmp
			}
		}
		if (nombre=="REPETIR_PASSWORD")
		{
			if (pass!="" )
			{
				if (pass.length < 5)
				{
				alert('La longitud mínima de la [Contraseña] es de 5 caracteres');
				valor=2;
				}
				else
				{				
					if (pass!=cmp) 
					{
						alert('Las [Contraseñas] deben coincidir');
						valor=2;
					}
				}
			}
			else
			{
				pass=cmp
			}
		}
 		if (nombre=="NIF") 
		{
			if (calcularNIF(cmp)==true)
			{
			}
			else
			{
				alert('El NIF Introducido es Incorrecto');
				valor=2;
			}
		}
		if (nombre=="FAX" || nombre=="NEWS" || nombre=="UsuarioRec" ||nombre="TELEFONO")
		{
		}
		else
		{
	 	  if (cmp=="" && valor==0 )
		 	{
				
					nombreError=nombre;
				
			  			valor=1;
		    }
		}
		}
	}
	if (valor==1)
	{
		if (nombreError=="Nick")
			nombreError="El [PSeudónimo] es obligatorio";
		if (nombreError=="CORREO")
			nombreError="El [Usuario] es obligatorio";
		if (nombreError=="PASSWORD")
			nombreError="La [Contraseña] es obligatoria";
		if (nombreError=="pais")
			nombreError="El [País] es obligatorio";
		alert(nombreError);
	}
	if (valor==0)
	{
		document.forms[formulario].submit();
	}

};
function EnviarConfirmacion(campo){
		var valor = eval('document.all.' + campo + '.value');
		if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/.test(valor)){
			document.location.href="formularios/UsuarioPrivado.asp?correo=" +valor + "&loc=2";
			}
			
			 else
				 {
				   alert("El [Usuario] debe ser un email correcto");
				   valor=2;
			     }
}

function EnviarConfirmacion2(campo,enlace,frm){
		var valor = eval('document.all.' + campo + '.value');
		var Mienlace = eval('document.forms.'+frm+'.' + enlace + '.value');
		if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,4})+$/.test(valor)){
			document.location.href="formularios/UsuarioPrivado.asp?correo=" +valor + "&loc=2&enlace="+Mienlace;
			}
			 else
				 {
				   alert("El [Usuario] debe ser un email correcto");
				   valor=2;
			     }
}


function EnviarPedidoProfesional(formulario){

	var cnjFORM = eval('document.forms.' + formulario + '.length');
	var valor =0;
	var pass="";
	var nombreError;
	var campo;

	
	campo = "RUso";
	var cmp = eval('document.' + formulario + '.' + campo + '[0].value');
	var chk = eval('document.forms.' + formulario + '.' + campo + '[0].checked');
		if (chk & cmp == "S")
			{
				//alert('Valor de Uso TOTAL');
			}
			else
			{
					campo = "TDuracion";			
					var cmp2 = eval('document.forms.' + formulario + '.' + campo + '.value');
					if (cmp2 == "")
					{
						alert('Códigos de tiempo no pueden ser vacios, para la licencia de uso parcial');
						valor = 1;
						eval('document.forms.' + formulario + '.' + campo + '.focus()');
					}
					campo = "Tinicio";			
					cmp2 = eval('document.forms.' + formulario + '.' + campo + '.value');
					if (cmp2 == "")
					{
						alert('Código de tiempo inicial no válido, para la licencia de uso parcial');
						valor = 2;
						eval('document.forms.' + formulario + '.' + campo + '.focus()');
					}
					campo = "Tfin";			
					cmp2 = eval('document.forms.' + formulario + '.' + campo + '.value');
					if (cmp2 == "")
					{
						alert('Códigos de tiempo final no válido, para la licencia de uso parcial');
						valor = 3;
						eval('document.forms.' + formulario + '.' + campo + '.focus()');
					}
	
			}

	campo = "RAmbito";
	cmp = eval('document.forms.' + formulario + '.' + campo + '[0].value');
	chk = eval('document.forms.' + formulario + '.' + campo + '[0].checked');
	if (chk & cmp == "S")
	{
		//alert('Ámbito España');
	}
	else
	{
	campo = "SPais";
	var indice = eval('document.forms.' + formulario + '.' + campo + '.selectedIndex');
    var qpais = eval('document.' + formulario + '.' + campo + '.options[' + indice + '].value');
    
    if (qpais == 0)
   		{
   				alert('Para uso internacional debe elegir país');
   				valor = 4;
   		}
    
    
	}
	
	campo = "RLicencia";
	cmp = eval('document.forms.' + formulario + '.' + campo + '[0].value');
	chk = eval('document.forms.' + formulario + '.' + campo + '[0].checked');
	if (chk & cmp == "I")
	{
		//alert('Uso Indefinido');
		
	}	
	else
	{
			//alert('Uso Parcial');
			campo = "TLicDesde";			
			var cmp3 = eval('document.forms.' + formulario + '.' + campo + '.value');
			if (cmp3 == "")
			{
					alert('Plazo desde no pueden estar vacio, para la licencia de uso parcial');
					valor = 5;
					eval('document.forms.' + formulario + '.' + campo + '.focus()');
			}
			campo = "TLicHasta";			
			 cmp3 = eval('document.forms.' + formulario + '.' + campo + '.value');
			if (cmp3 == "")
			{
					alert('Plazo hasta no puede estar vacío, para la licencia de uso parcial');
					valor = 6;
					eval('document.forms.' + formulario + '.' + campo + '.focus()');
			}
			
	}	
	
	
	if (valor==0)
	{
	//alert('Tutto bene');
		document.forms[formulario].submit();
	}



};

function ValidarCategorias(formulario){
	var campo;
	var campotexto;
	var valcampo;
	var valcampotexto;
	var ok = true;
	var valorcampo = "";
	var val1 = "";

	for (var i=1; i<5; i++) 
	{

		campo ="cat"+ i;
		campotexto ="cat"+ i+"Text";
		valcampo = eval('document.forms.' + formulario + '.' + campo + '.value');
		valcampotexto = eval('document.forms.' + formulario + '.' + campotexto + '.value');

		if ((valcampotexto != "") && (valcampo == "0")) {
			alert("Seleccione una categoría");
			ok=false;
			eval('document.forms.' + formulario + '.' + campotexto + '.focus()');
			i=5;
		}
	}

	if (ok) 
	{
		ok=false;
		for (var i=1; i<5; i++) 
		{
			campo ="cat"+ i;
			campotexto ="cat"+ i+"Text";
			valcampo = eval('document.forms.' + formulario + '.' + campo + '.value');
			valcampotexto = eval('document.forms.' + formulario + '.' + campotexto + '.value');
			val1 = ReplaceTexto(valcampotexto, "%", "");	
			val1 = ReplaceTexto(val1, "'", "");	

			if ((valcampotexto != "") && (valcampo != "0") && (val1 == "")) 
			{
				alert("Introduzca un texto válido");
				ok=false;
				eval('document.forms.' + formulario + '.' + campotexto + '.focus()');
				valcampotexto = "";
				i=99;
			}
			if ((valcampotexto != "") && (valcampo != "0") && (val1 != "")) {
				ok=true;
				i=5;
			}
			
		}
		
		if (ok == false) 
		{
			if (i != 100)
			{
			alert("Todos los campos están vacios. Ha de introducir al menos uno");
			eval('document.forms.' + formulario + '.cat1Text.focus()');
			}
		}
	}
	
	if (ok)
	{
		document.forms[formulario].submit();
	}

};

function LlamaCesta(guid_pol,id_usu,id_peli,enlace,codpagcesta,blAceptado,idioma){

///*****************************ROD*******
var blCon;
  if (blAceptado==1){
  //lIdioma = '<%=session("idioma")%>'
  //alert('avisoImportante'+idioma+'.htm');
  //window.open('AvisoPais'+idioma+'.htm','Aviso','width=550,height=500,Left=100,Top=100,Scrollbars=0,resizable=0,Toolbar=0,statusbar=0,Menubar=0,Location=0');
  if (id_usu==0){
  
		if (idioma=='E'){
			//document.all.btnAdd.src='images/AdvertenciaRegistro.jpg';
			window.open('AvisoSinRegistro.htm','MiEspacio','width=800,height=610,Left=100,Top=100,Scrollbars=0,resizable=0,Toolbar=0,statusbar=0,Menubar=0,Location=0,directories=no');
		}else{
			window.open('AvisoSinRegistroI.htm','MiEspacio','width=800,height=610,Left=100,Top=100,Scrollbars=0,resizable=0,Toolbar=0,statusbar=0,Menubar=0,Location=0,directories=no');
			//document.all.btnAdd.src='images/INGLES/AdvertenciaRegistroI.jpg';
			//document.all.btnRegistrarse.src='images/INGLES/bti_registrarse.jpg';
		}
		//document.all.btnRegistrarse.style.display='';
		//location.href='#Registro';
  }else{
	if (guid_pol==''){
		if (idioma=='E'){
			alert('Debes elegir un tipo de descarga antes de continuar con la compra.');
		}else{
			alert('You must choose a type of download to continue.');
		}
	}else{
		//alert('fil_AddCesta.asp?cod_pel=' + id_peli + '&guid_pol=' + guid_pol + '&id_usu=' + id_usu +'&enlace=' +enlace+'&codpagcesta='+codpagcesta);
			location.href='fil_AddCesta.asp?cod_pel=' + id_peli + '&guid_pol=' + guid_pol + '&id_usu=' + id_usu +'&enlace=' +enlace+'&codpagcesta='+codpagcesta;
	   }
	}
  }else{
	//alert("La película que intenta descargar no tiene permitido el visionado en su país. Disculpe las molestias");
	window.open('AvisoPais'+idioma+'.htm','Aviso','width=550,height=500,Left=100,Top=100,Scrollbars=0,resizable=0,Toolbar=0,statusbar=0,Menubar=0,Location=0');
  }
};


function CompruebaRegistroEnGratuito(id_usu){

  if (id_usu==0){
  	//alert('Debes estar registrado para realizar una compra.');
	document.all.btnAdd.src='images/AdvertenciaRegistro.jpg';
	document.all.btnRegistrarse.style.display='';
	location.href='#Registro';
  }else{
	frmContenidoGratuito.submit();
  }
}

//ruta_img1: Es la ruta de la imagen cuando el div está oculto
//ruta_img2: Es la ruta de la imagen cuando el div está visible

function ManejoDiv(div_id,ruta_img1,ruta_img2){
	
	if (eval('div'+div_id).style.display=='none'){
		eval('div'+div_id).style.display = '';
	}else{
		eval('div'+div_id).style.display = 'none';
	}
	
	if (ruta_img1 != ''){
		if (eval('div'+div_id).style.display=='none'){
			document.getElementById('img'+div_id).src=ruta_img1;
		}else{
			document.getElementById('img'+div_id).src=ruta_img2;
		}
	}
};

function CompruebaTam(obj,tam){
	if (obj.value.length >= tam){ 
		alert("Has superado el tamaño máximo permitido para este campo."); 
		obj.value = obj.value.substring(0,tam-1);
		return false;
	}
};

function CompruebaOpinarOLD(div_id, usu_id,blPendiente){
	if (usu_id==0) {
		alert('Debes estar registrado para opinar');
	}else{
		if (blPendiente==1){
			alert('Tu opinión sobre esta película está pendiente de aprobación. Vuelve más tarde.');
		}else{
			ManejoDiv(div_id,'','');
		}
	}
};

function CompruebaOpinar(div_id, usu_id,intIdioma){

	if (usu_id==0) {
		if (intIdioma==1){
			alert('Debes estar registrado para opinar');
		}else{
			alert('You must be registered to give comments');
		}
	}else{
			ManejoDiv(div_id,'','');
	}
};

function VaciaCesta(blcontrol,intIdioma)
{

	if (intIdioma==1){ 
		if (confirm('¿ Desea vaciar la cesta ?')) {
			window.location.href='aplicaciones/cesta/CestaAcc.asp?op=BT&fil=1&enlace=visorPagina.asp?cod_pag=10005&blcesta=1&blcontrol='+blcontrol;
		}
	}else{
		if (confirm('Would you like to empty your shopping cart?')) {
			window.location.href='aplicaciones/cesta/CestaAcc.asp?op=BT&fil=1&enlace=visorPagina.asp?cod_pag=10005&blcesta=1&blcontrol='+blcontrol;
		}
	}
}

function QuitarDeCesta(titulo,cesta,blcontrol,intIdioma)
{
	if (intIdioma==1){ 
		if (confirm('¿Desea borrar de la cesta la película ' + titulo +' ?')) {
			window.location.href='aplicaciones/cesta/CestaAcc.asp?op=B1&fil=1&id_cesta=' + cesta + '&enlace=visorPagina.asp?cod_pag=10005&blcesta=1&blcontrol='+blcontrol;
		}
	}else{
		if (confirm('Would you like remove the film ' + titulo +' from your shopping cart?')) {
			window.location.href='aplicaciones/cesta/CestaAcc.asp?op=B1&fil=1&id_cesta=' + cesta + '&enlace=visorPagina.asp?cod_pag=10005&blcesta=1&blcontrol='+blcontrol;
		}
	}
}

function CompruebaLetraTitulo(sLetra) {
var str;
	str = document.getElementById('Titulo'+sLetra).src;
	str = str.substring(str.lastIndexOf('/')+1,str.length);	

	if(str == (sLetra.toLowerCase()+'_on.jpg')){
		//Lo pongo a off
		document.getElementById('Titulo'+sLetra).src = 'images/'+sLetra.toLowerCase()+'_off.jpg';
		document.getElementById('Check'+sLetra).checked = false;
	}else{
		//Lo pongo a on
		document.getElementById('Titulo'+sLetra).src = 'images/'+sLetra.toLowerCase()+'_on.jpg';
		document.getElementById('Check'+sLetra).checked = true;
	}
}


   // Determina si un carácter es un número
   function es_numero(car)
   {
   var NUMEROS="0123456789";
   return (NUMEROS.indexOf(car) >= 0)
   }
   
   // Determina si un año es bisiesto
   function es_bisiesto(anio) 
   {
   if (((anio % 4 == 0) && anio % 100 != 0) ||
       anio % 400 == 0) 
      return true;
   return false;
   }


   // Comprueba si una fecha es correcta
   function comprobar_fecha(contenido)
   {

   var separador_fecha="/";
   var numero_separadores=0;

   if ((contenido.length == 0))
      return false;

   // Comprobación de la sintáxis de una fecha 
   for (var i=0; i < contenido.length; i++)
      {
      var caracter=contenido.charAt(i);
      if (!es_numero(caracter) && caracter != separador_fecha)
         return false;
      if (caracter == separador_fecha)
        numero_separadores++ 
      }
   if (numero_separadores != 2)
      return false;
    
   // Comprobación de la semántica de una fecha
 
   datos = contenido.split("/");
   var dia = datos[0];
   var mes = datos[1];
   var anio = datos[2];
   //alert (dia+" "+mes+" "+anio);
   if (anio.length != 4)
      return false;
   if (mes < 1 || mes > 12)
      return false;
   if ((dia < 1 || dia > 31) || (mes == 4 && dia > 30) ||
       (mes == 6 && dia > 30) || (mes == 9 && dia > 30) ||
       (mes == 11 && dia > 30) || (mes == 2 && es_bisiesto(anio) && dia > 29) ||
       (mes == 2 && !es_bisiesto(anio) && dia > 28))
      return false;
   return true 
   } 
   
 
 function comprobarcif(cif){
	mal=false;
	letras="ABCDEFGHKLMNPQS"
	caracteres=[];

	for(a=0;a<cif.length;a++){
		caracteres[a]=cif.charAt(a);
	}
	if(letras.indexOf(caracteres[0])==-1){
		esto=cif;
		validar(esto);
		return false;
	}
	resultadoImpares=0;
	for(a=1;a<8;a=a+2){
		numero=caracteres[a]*2;
		numero=parseInt(numero/10)+numero%10;
		resultadoImpares+=numero
	}

	resultadoImpares=parseInt(resultadoImpares/10)+resultadoImpares%10;

	numeroPar=0;
	for(a=2;a<8;a=a+2){
		numeroPar+=parseInt(caracteres[a]);
	}
	total=resultadoImpares+numeroPar;
	total=11-(total%10)+1;
	if(total!=caracteres[8]){mal=true;}
	if(mal){
		pepe=alert("Parece ser que el C.I.F. no es correcto.\nPor favor corrijalo.");
		document.introducir.CIF.focus();return false
	}}

function ValidaCIF(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 CompruebaEmail(campo) {
  valor= campo.value;
  if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(valor)){
	   return (true)
  }else{
   	alert("La dirección de email es incorrecta.");
   	campo.value='';
   	campo.focus();
   return (false);
  }
}

function enviaMail(mail,titulo,texto)
{
mail_str = "mailto:"+ mail + "?subject=" + titulo;
mail_str += "&body=" + texto;
//mail_str += ". Enlace: " + location.href; 
alert(mail_str);
location.href = mail_str;
}

function VerFactura(blMuestraFactura,idfactura)
{
        // Desactivada por ANTONIO. Pendiente temas de ABONOS. Si el usuario la quiere que la pida
	//if (blMuestraFactura=='True'){
	//	
	//	window.open('fil_Factura.asp?0x10001110='+ idfactura ,'Factura','width=860,height=740,scrollbars=YES,toolbar=NO');
	//}else{
	//	alert("Debes introducir los datos de facturación para acceder a las facturas.");
	//}
}


// Abre una ventana nueva con los parametros pasados.
function AbrirVentana(NuevaVentana,Nombre,Ancho,Alto,Left,Top,Scroll,Resize,Tool,Status,Menu,Location)
{
var Ventana;
var Opciones;
	if((Ancho > screen.width) || (Ancho == 0)){
		Ancho = screen.width - 2;
	}
	if((Alto > screen.height) || (Alto == 0)){
		Alto = screen.height - 2;
	}
	if(Left == 0)
	{
		Left	= ((screen.width - Ancho)/2);
	}
	if(Top == 0)
	{
		Top			= ((screen.height - Alto)/2);
	}
	Opciones	= 'width='+Ancho+',height='+Alto+',top='+Top+',left='+Left+',toolbar='+Tool+',scrollbars='+Scroll+',location='+Location+',statusbar='+Status+',menubar='+Menu+',resizable='+Resize;
	Ventana	= window.open(NuevaVentana,Nombre,Opciones);
	Ventana.focus();
}


function LlamaPagoConCodigo (cod){
	window.open('FT_PagoConCodigo.asp?cod='+cod+'&version=1','','width=550,height=350,Left=100,Top=100,Scrollbars=0,resizable=0,Toolbar=0,statusbar=0,Menubar=0,Location=0');
}