//Funciones Javascript
var nc = (document.layers) ? true:false
var ie =   (document.all) ? true:false
var n6 = (document.getElementById) ? true:false
//Cambio de color de los TR 
function changeBgcolor_over(cell) {
	cell.style.backgroundColor = "E1295E";
}

function changeBgcolor_out(cell) {
	cell.style.backgroundColor = "DEDEDE";
}
function Picaso(who,encima,color,colorseleccion)
	{

	if(encima){
		colora=colorseleccion;
	} 
	else {
		colora=color;
	}

	who.style.cursor="hand";
	who.bgColor=colora;
}
/*script para permitir al usuario introducir en una caja de texto solo caracteres predefinidos*/
/***
* var global estado     >> variable booleana, true si el caracter introducido es correcto y false en caso contrario
* var global codigoTecla   >>  valor ASCII de la tacla pulsada para cada navegador (son diferentes)
* var global cadenaTecla  >>  cadena que representa a la tecla pulsada (igual para todos los navegadores)
*/
var estado=false;
var codigoTecla, cadenaTecla;  
/**
* function pulsada >> funcion principal  >> comprueba la tecla pulsada y la escribe o no
* si es correcta      >>  retorna true al manejador de eventos de la caja de texto >> se escribe el caracter
* si es incorrecta   >>  retorna false al manejador de eventos de la caja de texto >> no se escribe el caracter  
*/
function pulsada(e,cuales)
{
	if(cuales==1){var correctos = new Array("1","2","3","4","5","6","7","8","9","0");}
	else if(cuales==2){var correctos = new Array("1","2","3","4","5","6","7","8","9","0",".");}
	else if(cuales==3){var correctos = new Array("1","2","3","4","5","6","7","8","9","0","%");}
	else if(cuales==4){var correctos = new Array("1","2","3","4","5","6","7","8","9","0",".","%");}
	estado=false
	if(ie)
	{
		codigoTecla = event.keyCode
		cadenaTecla = (String.fromCharCode(event.keyCode));
	}
	else if(nc)
	{
		codigoTecla = e.which
		cadenaTecla = String.fromCharCode(e.which);
	}
	else if(n6)
	{
		codigoTecla = (window.Event) ? e.which : e.keyCode;
		cadenaTecla=(String.fromCharCode(codigoTecla));
	}

	if ((codigoTecla!=8)&&(codigoTecla!=0))
	{
		for(i=0;i<correctos.length;i++)
		{
			if(cadenaTecla==correctos[i])
			estado=true;
		}
		if(estado==false)
		{
			if(ie)
				event.returnValue = false;
			else
				return false;
		}
	}
}
/*fin del script de Luciano Moreno ( http://www.terra.es/personal6/morenocerro2*/
//Valida Longitud del Campo
function valida_lcampo(campo,minlen){
ag_campo=campo.value;
if(ag_campo.length<minlen){
alert("Mínimo "+minlen+" carácteres");
	//campo.focus();
return(2);
}


}

//Validar Fechas (Funcion en homenaje a los maravillosos años junto a nuestro amigo Miralles...aquellos maravillosos años...juas)
function valida_fecha(campo)
{	ag_fecha=campo.value;
	var fn_error=0;
	var fn_guion=0;
	var fn_dia="";
	var fn_mes="";
	var fn_ano="";
	var i=0;
	var fn_bisiesto=false;
	var fn_max=0;

	while((i<ag_fecha.length) && (fn_error==0)) 
	{
		car=ag_fecha.charAt(i);
		i++;

		if ((car=='/')||(car=='-'))
		{

			if(fn_dia=="")
			{
				fn_dia=ag_fecha.substring(0,i-1);
				fn_guion=i;
				
				if((isNaN(fn_dia))||(fn_dia<1))
				{
					alert("El dia no es correcto");
					fn_error=1;
				}
		
			}
			else if(fn_mes=="")
			{
							
				fn_mes=ag_fecha.substring(fn_guion,i-1);
				fn_guion=i;				
				if((isNaN(fn_mes))||(fn_mes>12)||(fn_mes<1))
				{
					alert("El mes no es correcto");
					fn_error=1;
				}
				
				
			}
		}//if(car=='/')
		if(i==ag_fecha.length)
			{	
				if (fn_mes=='')
					{
						alert("La fecha introducida en "+campo.name+" no es correcta\n El formato debe ser dd/mm/yyyy");				
						fn_error=1;
					}
				else
				{
					fn_ano=ag_fecha.substring(fn_guion,i);	
					if((isNaN(fn_ano))||(fn_ano<1))
					{
						alert("El año introducido no es correcto");
						fn_error=1;
					}
					
				}
			}
		
		//alert('i: '+i+'\ndia: '+fn_dia+' '+'\ncar: '+car+'\nlongitud: '+ag_fecha.length+'\nmes: '+fn_mes+'\nAño: '+fn_ano);
	}//end While

		if((!fn_error)&&(ag_fecha.length!=0))
	{
	var fn_ano_int=parseInt(fn_ano);
	
	if(fn_dia.length==1)fn_dia="0"+fn_dia;
	if(fn_mes.length==1)fn_mes="0"+fn_mes;
	campo.value=fn_dia+"/"+fn_mes+"/"+fn_ano;

	if(fn_ano_int<=99)
		{
		 fn_ano_int=fn_ano_int+1900;
		if(fn_ano.length==1)
		campo.value=fn_dia+"/"+fn_mes+"/200"+fn_ano;
		else
		campo.value=fn_dia+"/"+fn_mes+"/20"+fn_ano;
		//alert(fn_ano_int);
		}
	if(((fn_ano_int%4==0)&&(fn_ano_int%100!=0)) || (fn_ano_int%400==0))
		{
		fn_bisiesto=true;
		//alert ("Año bisiesto");
		}
	else
	//alert("Año no bisiesto");

	if(fn_guion==0)
		{fn_error=1;alert("Sintaxis de fecha incorrecta \nEl formato correcto es dd/mm/yyyy");
		}
	switch(parseInt(fn_mes,10))//ole toma ya joio
	{
		case 1:fn_max=31;
		break;
		case 2:fn_max=fn_bisiesto?29:28;
		break;
		case 3:fn_max=31;
		break;
		case 5:fn_max=31;
		break;
		case 7:fn_max=31;
		break;
		case 8:fn_max=31;
		break;
		case 10:fn_max=31;
		break;
		case 12:fn_max=31;
		break;
		default:fn_max=30;
	}
	//alert('dias maximos del mes '+fn_mes+': '+fn_max);
	if (fn_dia>fn_max)
		{
		alert("El dia no es correcto");
		fn_error=1;
		}
	}//end if(!fn_error)&&(ag_fecha...
if(fn_error)
	campo.focus();
return(fn_error);
}//End function