//abrir ventana
function abrir(fichero,altura,anchura)
{
var propiedades="resizable=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0, height="+altura+",width="+anchura+",screenX=0,screenY=0,left=0,top=0";
	//alert(propiedades);		
   we=window.open(fichero,'wenvio',propiedades);		
}

//cargar ficheros en un frame
function presenta(fichero,frame){
         //alert("FRAME"+frame);
         //alert("FICHERO"+fichero);
         //funciona tambien sin poner window
         parent.frames[frame].document.location=fichero;
}

//parseo de las cajas de texto y de los textareas
function parsea(variable,car,cambio) 
{
	 //Sustituye el caracter "car"  por "cambio" en "variable"
	 //alert()
	 var salida = new Array();
	 salida = variable.value;
		
	longitud=salida.length;
	while(longitud>0)
	{
		salida = salida.replace(car,cambio);
		longitud--;
	}
	variable.value = salida;
}



//VALIDACION DE EMAIL
function checkMail(cadena_mail)
  {
  	var validado=true;
	ext=cadena_mail.substring(cadena_mail.lastIndexOf("."),cadena_mail.length);
	if(ext.length<5 && ext.length>1)
	{
		var Template = /^[a-z][a-z-_0-9.]+@[a-z-_=>0-9.]+.[a-z]{2,3}$/i //Formato de direccion de correo electronico
		//return (Template.test(cadena_mail)) ? 1 : 0 //Compara "cadena_mail" con el formato "Template" y si coincidevuelve verdadero si no devuelve falso
		if (Template.test(cadena_mail) == 0)
		{
			//errStr = "El campo Email es incorrecto.\r ";
			validado=false;
		}
	}
	else
	{
	//errStr = "El campo Email es incorrecto.\r ";
		validado=false;
	}

	return validado;
  }


//VALIDACION DE ELECCION DE UN RADIOBUTTON
function Comprobarradio(radio) //version nueva
{ 
var seleccionados=0;
 longitud=eval(radio+'.length');
 lon=parseInt(longitud); 
 for(i=0;i<lon;i++)
 {  
  if(eval(radio+'[i].checked'))
  	 {seleccionados=eval(radio+'[i].value');}
 	 
 }
 return seleccionados;   
}

//VALIDACION DEL NIF
function letraNif(dni) //calculo letra del nif
{
  var asc
	asc= dni % 23;
	if ( asc == 0) { letra="T"; };
	if ( asc == 1) { letra="R"; };
	if ( asc == 2) { letra="W"; };
	if ( asc == 3) { letra="A"; };
	if ( asc == 4) { letra="G"; };
	if ( asc == 5) { letra="M"; };
	if ( asc == 6) { letra="Y"; };
	if ( asc == 7) { letra="F"; };
	if ( asc == 8) { letra="P"; };
	if ( asc == 9) { letra="D"; };
	if ( asc == 10) { letra="X"; };
	if ( asc == 11) { letra="B"; };
	if ( asc == 12) { letra="N"; };
	if ( asc == 13) { letra="J"; };
	if ( asc == 14) { letra="Z"; };
	if ( asc == 15) { letra="S"; };
	if ( asc == 16) { letra="Q"; };
	if ( asc == 17) { letra="V"; };
	if ( asc == 18) { letra="H"; };
	if ( asc == 19) { letra="L"; };
	if ( asc == 20) { letra="C"; };
	if ( asc == 21) { letra="K"; };
	if ( asc == 22) { letra="E"; };
	if ( asc == 23) { letra="T"; };
	return letra;
}


function nifok(nif) //nif correcto
{
 lon=nif.length
 if (lon<6) return false
 letraDNI=nif.charAt(lon-1)
 letraDNI=letraDNI.toUpperCase()
 dni=nif.substring(0,lon-1)
 if(isNaN(dni)){
	return(false)
 }else{
 		letraCorrecta=letraNif(dni)
	   if (letraDNI!=letraCorrecta)
		 {
		  return(false)
		 }
		 else
		 {
		  return(true)
		 }
	}
}


//QUITAR ESPACIOS EN BLANCO

function ltrim(cadena)
{
	for(i=0; i<cadena.length; )
	{
		if(cadena.charAt(i)==" ")
			cadena=cadena.substring(i+1, cadena.length);
		else
			break;
	}
	return cadena;
}

function rtrim(cadena)
{
	for(i=cadena.length-1; i>=0; i=cadena.length-1)
	{
		if(cadena.charAt(i)==" ")
			cadena=cadena.substring(0,i);
		else
			break;
	}
	return cadena;	
}

function trim(cadena)
{
	cadena1=ltrim(cadena);
	cadena2=ltrim(cadena1);
	return cadena2;
}