function validaBancoOficinaDC(banco,oficina,DC,cuenta)
{
// Chequea que el numero de banco, oficina y DC es correcto 
//(tanto de BBVA como otro diferente).

var Sbanco	 = new String(banco);
var Soficina = new String(oficina);
var SDC		 = new String(DC);
var Scuenta	 = new String(cuenta);
//alert("banco="+Sbanco);
//alert("oficina="+Soficina);
//alert("DC="+SDC);
//alert("cuenta="+Scuenta);
//Creamos un string nuevo que tendrá ademas de los 
//cuatro numeros del banco los 4 de oficina.

var string = new String(Sbanco + Soficina);
//alert(string);
		
//Multiplicas cada uno de los elementos del string resultante por la secuencia
//4,8,5,10,9,7,3 y 6 y lo almaceno en otro string. Como multiplico el 
//string será un entero que se corresponde con la suma de todos.

var Ssuma= new String ((string.charAt(0)*4)+(string.charAt(1)*8)+(string.charAt(2)*5)+(string.charAt(3)*10)+(string.charAt(4)*9)+(string.charAt(5)*7)+(string.charAt(6)*3)+(string.charAt(7)*6));

resto = Ssuma % 11;
resultado = 11 - resto;

//alert("res="+resultado)
if (resultado == 10) 
	{resultado = 1;}
 if (resultado == 11)
	{resultado = 0;}
  if (resultado > 11)
	{
 return false;}



//Compruebas si el resultado es igual al numero mas a la izq de DC.
//Si no es asi devuelves false, en caso afirmativo pones izquierda a true.



var aux = "" + resultado;
var aux21 = "" + SDC.charAt(0);
//alert("aux="+aux);
//alert("aux21="+aux21);

if (aux == aux21)
    	{izquierda = true;}
else  
	{return false;}
//alert("izq="+izquierda);
//Creamos un string nuevo que tendrá ademas de los 
//cuatro numeros del banco los 4 de oficina.

var string = new String(Sbanco + Soficina);
		
//Multiplicas cada uno de los elementos del string resultante por la secuencia
//4,8,5,10,9,7,3 y 6 y lo almaceno en otro string. Como multiplico el 
//string será un entero que se corresponde con la suma de todos.

var Ssuma1= new String ((Scuenta.charAt(0)*1)+(Scuenta.charAt(1)*2)+(Scuenta.charAt(2)*4)+(Scuenta.charAt(3)*8)+
(Scuenta.charAt(4)*5)+(Scuenta.charAt(5)*10)+(Scuenta.charAt(6)*9)+(Scuenta.charAt(7)*7)+
(Scuenta.charAt(8)*3)+(Scuenta.charAt(9)*6));

resto1 = Ssuma1 % 11;
resultado1 = 11 - resto1;
//alert("res1="+resultado1);
 
if (resultado1 == 10) 
	{resultado1 = 1;}
if (resultado1 == 11) 
	{resultado1 = 0;}
if (resultado1 > 11)
	{

	return false;}

//Compruebas si el resultado es igual al numero mas a la derecha de DC.
//Si no es asi devuelves false, en caso afirmativo pones derecha a true.



var aux2 = "" + resultado1;
var aux22 = "" + SDC.charAt(1);
//alert("aux2="+aux2);
//alert("aux22="+aux22);
if (aux2 == aux22)
    	{
     derecha = true;}
else  
	{

	return false;}

//Si ambos valores son true la función devuelve true.

if ((derecha==true)&&(izquierda==true))
	{
	return true;}
 else {
 return false;}
}
//Fin Función-------------------------------------------------------------------------

function validaCuenta(cuenta,DC)
{
// Chequea que el numero de cuenta de cualquier banco (incluido el BBVA) sea correcto.

var Scuenta = new String(cuenta);
var SDC = new String(DC);
var i=0;

//Si cuenta o DC tienen menos números por la izq de los necesarios,
//rellenamos con 0.

relleno = 10 - Scuenta.length;
var S0 = new String ("0");
var longitud = Scuenta.length;
if (longitud!=10)
	{
	for (i=0; i<=relleno-1; i++)
		{Scuenta = S0 + Scuenta;}
	}

rellenoDC = 2 - SDC.length;
var longitudDC = SDC.length;
if (longitudDC!=2)
	{
	for (i=0; i<=rellenoDC-1; i++)
		{SDC = S0 + SDC;}
	}
		
//Multiplico cada uno de los elementos del string resultante por la secuencia
//1,2,4,8,5,10,9,7,3 y 6 y lo almaceno en otro string. Como multiplico el 
//string será un entero que se corresponde con la suma de todos.

var Ssuma= new String ((Scuenta.charAt(0)*1)+(Scuenta.charAt(1)*2)+(Scuenta.charAt(2)*4)+(Scuenta.charAt(3)*8)+
(Scuenta.charAt(4)*5)+(Scuenta.charAt(5)*10)+(Scuenta.charAt(6)*9)+(Scuenta.charAt(7)*7)+
(Scuenta.charAt(8)*3)+(Scuenta.charAt(9)*6));

 //Opero con la suma según lo definido en el algoritmo y obtenemos un número llamado resultado. 

resto = Ssuma % 11;
resultado = 11 - resto;

if (resultado == 10) 
	{resultado = 1;}
if (resultado == 11) 
	{resultado = 0;}

//Compruebas si el resultado es igual al numero mas a la dcha de DC.
//Si es asi devuelves true, sino false.

var auxr = "" + resultado;
var auxdc = "" + SDC.charAt(1);


if (auxr == auxdc)

   	{
	return true;
	}
else  
	{
	return false;
	}
}

//Fin Función-------------------------------------------------------------------------

function validaCuentaBBVA(cuenta,oficina)
{
// Chequea que el numero de cuenta de BBVA sea correcto. No validara 
//un numero de cuenta de otro banco.

var Scuenta = new String(cuenta);
var Soficina = new String(oficina);

//Si cuenta o oficina tiene menos números por la izq de los necesarios,
//rellenamos con 0.

relleno = 10 - Scuenta.length;
var S0 = new String ("0");
var longitud = Scuenta.length;

if (longitud!=10)
	{
	for (i=0; i<=relleno-1; i++)
		{
		Scuenta = S0 + Scuenta;}
		}


rellenoO = 4 - Soficina.length;
var longitudO = Soficina.length;

if (longitudO!=4)
	{
	for (i=0; i<=rellenoO-1; i++)
		{
		Soficina = S0 + Soficina;}
		}

//Creamos un string nuevo que tendrá ademas de los 
//cuatro numeros de la oficina, los 8 que hay que coger 
//de cuenta.

var string = new String(Soficina + Scuenta.slice(1,9));

//Multiplicas cada uno de los elementos del string resultante por la secuencia
//1,3,9,7, y lo almaceno en otro string. Como multiplico el string será un 
//entero que se corresponde con la suma de todos.

var Ssuma= new String
((string.charAt(0)*1)+(string.charAt(1)*3)+(string.charAt(2)*9)+(string.charAt(3)*7)+
(string.charAt(4)*1)+(string.charAt(5)*3)+(string.charAt(6)*9)+(string.charAt(7)*7)+(string.charAt(8)*1)+ (string.charAt(9)*3)+(string.charAt(10)*9)+(string.charAt(11)*7));

//Cojo el digito que esté más a la dcha de la suma y
//lo comparo con el que está mas a la dch de cuenta. 
//Si coinciden devuelvo true, si no devuelvo false.


if (Ssuma.charAt(Ssuma.length-1)==Scuenta.charAt(9))
	{
	return true;
	}
else 
	{
	return false;
	}
}

//Fin Función-------------------------------------------------------------------------

function validaCuentaCont(codigo)
{
 var string	 = new String(codigo);

 //Multiplicas cada uno de los elementos del string resultante por la secuencia
 //0,1,3,0,0,9,7,1,3,9 y 7 y lo almaceno en otro string. 
 var Ssuma= new String((string.charAt(4)*0)+(string.charAt(5)*1)+(string.charAt(6)*3)+(string.charAt(7)*0)+(string.charAt(8)*0)+(string.charAt(9)*9)+(string.charAt(10)*7)+(string.charAt(11)*1)+(string.charAt(12)*3)+(string.charAt(13)*9)+(string.charAt(14)*7));
 resto = Ssuma % 10;

 // Comprobamos que coincide con el ultimo caracter del string pasado a la funcion
 if (string.charAt(15) == resto)
 {
  return true;
 }
 else  
 {
  return false;
 }
}

function abrir2(pagina){ 
    vent=window.open(pagina,'vent','toolbar=no,location=no,directories=no,status=no,scrollbars=yes,resizable=yes,copyhistory=no,width=590,height=400,top=0,left=0'); 
}

// **************************
// esAlfanumerico(cadena)
// **************************
function esAlfanumerico(cadena){
var es=true;
//recibe un string y comprueba que es alfanumerico
      if (cadena==null)
          es=false;

      for (var i=0; i < cadena.length; i++)
       {
       var ch=cadena.substring(i,i+1);
       

       if ((ch >= "A" && ch <= "Z") || (ch >= "a" && ch <= "z") || (ch >= "0" && ch <= "9"))
      {

          es= true;
      }
      else
      {

          es=false;

          break;
      }
  }//del for

   return(es);       
      
 }     

function validaNif4(strNif){
  if (strNif == "undefined" || strNif=="")
    return false;
else { return true;}
}



function validacod(objcp, objprov, numpais) {
  var cp=objcp.value;
  var ssv= ""+objprov.value;
  //alert("prov "+ssv);
  ssv= ssv.toUpperCase();
  //alert("prov "+ssv+ "codpais "+ numpais);
  var pa= numpais;  //objpa.options[objpa.selectedIndex].text;

  var dospri=cp.substring(0,2);


  
  if (!Numerico2(objcp,cp.length)) {
    alert("El código postal debe tener una longitud de 5 caracteres numéricos");
    objcp.value="";
    objcp.focus();
    return(false);
  }
  if (cp.length!=5) {
    alert("El código postal debe tener una longitud de 5 caracteres numéricos");
    objcp.value="";
    objcp.focus();
    return(false);
  }
  //si pais es España
  if (pa=="72" && ssv != "") {
        /* Validamos en Codigo Postal de la provincia */
  if 
    (((dospri=="01") && (ssv=="ALAVA")) ||
     ((dospri=="02") && (ssv=="ALBACETE")) ||                 
     ((dospri=="03") && (ssv=="ALICANTE")) ||                 
     ((dospri=="04") && (ssv=="ALMERIA")) ||                 
     ((dospri=="05") && (ssv=="AVILA")) ||                 
     ((dospri=="06") && (ssv=="BADAJOZ")) ||                 
     ((dospri=="07") && (ssv=="BALEARES")) ||                 
     ((dospri=="08") && (ssv=="BARCELONA")) ||                 
     ((dospri=="09") && (ssv=="BURGOS")) ||                 
     ((dospri=="10") && (ssv=="CACERES")) ||                 
     ((dospri=="11") && (ssv=="CADIZ")) ||                 
     ((dospri=="12") && (ssv=="CASTELLON")) ||                 
     ((dospri=="13") && (ssv=="CIUDAD REAL")) ||                 
     ((dospri=="14") && (ssv=="CORDOBA")) ||                 
     ((dospri=="15") && (ssv=="CORUÑA, LA")) ||                 
     ((dospri=="16") && (ssv=="CUENCA")) ||                 
     ((dospri=="17") && (ssv=="GIRONA")) ||                 
     ((dospri=="18") && (ssv=="GRANADA")) ||                 
     ((dospri=="19") && (ssv=="GUADALAJARA")) ||                 
     ((dospri=="20") && (ssv=="GUIPUZCOA")) ||                 
     ((dospri=="21") && (ssv=="HUELVA")) ||                 
     ((dospri=="22") && (ssv=="HUESCA")) ||                 
     ((dospri=="23") && (ssv=="JAEN")) ||                 
     ((dospri=="24") && (ssv=="LEON")) ||                 
     ((dospri=="25") && (ssv=="LLEIDA")) ||                 
     ((dospri=="26") && (ssv=="LOGROÑO")) ||                 
     ((dospri=="27") && (ssv=="LUGO")) ||                 
     ((dospri=="28") && (ssv=="MADRID")) ||                 
     ((dospri=="29") && (ssv=="MALAGA")) ||                 
     ((dospri=="30") && (ssv=="MURCIA")) ||                 
     ((dospri=="31") && (ssv=="PAMPLONA")) ||                 
     ((dospri=="32") && (ssv=="ORENSE")) ||                 
     ((dospri=="33") && (ssv=="OVIEDO")) ||                 
     ((dospri=="34") && (ssv=="PALENCIA")) ||                 
     ((dospri=="35") && (ssv=="PALMAS, LAS")) ||                 
     ((dospri=="36") && (ssv=="PONTEVEDRA")) ||                 
     ((dospri=="37") && (ssv=="SALAMANCA")) ||                 
     ((dospri=="38") && (ssv=="SANTA CRUZ DE TENERIFE")) ||                 
     ((dospri=="39") && (ssv=="SANTANDER")) ||                 
     ((dospri=="40") && (ssv=="SEGOVIA")) ||                 
     ((dospri=="41") && (ssv=="SEVILLA")) ||                 
     ((dospri=="42") && (ssv=="SORIA")) ||                 
     ((dospri=="43") && (ssv=="TARRAGONA")) ||                 
     ((dospri=="44") && (ssv=="TERUEL")) ||                 
     ((dospri=="45") && (ssv=="TOLEDO")) ||                 
     ((dospri=="46") && (ssv=="VALENCIA")) ||                 
     ((dospri=="47") && (ssv=="VALLADOLID")) ||                 
     ((dospri=="48") && (ssv=="VIZCAYA")) ||                 
     ((dospri=="49") && (ssv=="ZAMORA")) ||                 
     ((dospri=="50") && (ssv=="ZARAGOZA")) ||                 
     ((dospri=="51") && (ssv=="CEUTA")) ||                 
     ((dospri=="52") && (ssv=="MELILLA")))  {
    return(true);
      }
  else {
    alert("El código postal es incorrecto para esa provincia");
    objprov.value="";
    objprov.focus();
    return(false);
  }
  } /* Fin del If que examina el pais */
  else { // no es España o provincia es blanco
        return(true);
  }
 return(true); 
} //Fin de Codshiperroneo



function Numerico2(objeto, longitud){
  cadena=objeto.value
  var convertir=true

  if (longitud != 0 && cadena.length != longitud && cadena.length != 0){
      convertir = false

  }else {
    for (var i=0; i< cadena.length; i++){
      var ch= cadena.substring(i,i+1)
      if (ch < "0" || ch > "9"){
        convertir=false
      }
    }
  }

 return convertir;
}
function valfecha_tarjeta(objmes,objano)
{
      var mescli=parseInt(objmes.value);
      var anocli=parseInt(objano.value);
      var val=1;
      var men="";
     // alert("entro anocli "+anocli+ " mescli "+ mescli);
      if (anocli > 99 || anocli < 00)
      {
        //alert("ano cli incorre "+ anocli);
        val=0;
        men="Año incorrecto"
      }
      if (mescli > 12 || mescli < 1)
      {
          //alert("mes cli incorre "+ mescli);
          val=0;
          men="Mes incorrecto"
      }
      var meshoy= hoy.getMonth()+1;
      var anohoy= parseInt(calcula_ano());
      var anocli4=parseInt("20"+ objano.value+"");

      if (anocli4 < anohoy)
      {
         //alert("año menor hoy "+ anohoy +"  ano cli "+ anocli4)
         val=0;
         men="Fecha incorrecta";
      }
      else if (anocli4== anohoy)
      {
             if (mescli < meshoy )
             {
                //alert("año igual y mes menor");
                men="Fecha Incorrecta"
                val=0;
             }
      }
      if (val==0)
      {
        objmes.value="";
        objano.value="";
        alert(men);
        objmes.focus();
      }

return;

}
/* Abre una ventana nueva para solicitar el email en la gestion de carteras*/
function abrirgc(pagina)
{ 
	ven=window.open(''+pagina,'ven','toolbar=no,location=no,directories=no,status=no,scrollbars=no,resizable=yes,copyhistory=no,width=450,height=250,top=200,left=150'); 
}

function abrir(pagina)
{ 
    vent=window.open(pagina,'vent','toolbar=no,location=no,directories=no,status=no,scrollbars=yes,resizable=yes,copyhistory=no,width=500,height=400,top=0,left=0'); 
}


function redondeo2dec(valor) {
//redondea a la alza dos decimales al 0,05
cad = "" + valor;
pto = cad.indexOf(".");
pos=0;
if (pto != -1) {

  mile = parseInt(cad.substring(pto+2,pto+3));
  cad_entera = cad.substring(0,pto);
  cad_decimal = cad.substring(pto+1,pto+3);
  
  // si el segundo decimal es mayor e igual a 5 le sumo 0.01 para redondearlo
  //write("entera "+ cad_entera +"\n");
  //write("decimal "+ cad_decimal + "\n");
  //write("mile"+ mile);
  
  if (mile > 5 && mile <= 9) {
   // write(" 1 ");
     
     
     var decimal=parseInt(cad_decimal.substring(0,1))+1;
     
     if (decimal<=9 )
     {  total_decimal= cad_entera+"." + decimal.toString();    
     	
       }
     else 
     {	//suma 1 a la parte entera
        var entera= parseInt(cad_entera)+1;
     	total_decimal= entera.toString()+".0";
     }
     
     numero_e =  total_decimal;
    
  }
  else if (mile == 5)
  {
  // write(" 2 ");
  total_decimal= cad_entera + "." + cad_decimal.substring(0,2);
  numero_e= total_decimal;
  
  
  }
  else if ((mile < 5) && (mile > 0 ))
  {	// write(" 3 ");
  	total_decimal = cad_entera + "." + parseInt(cad_decimal.substring(0,1)).toString() +"5";
	numero_e = total_decimal;
  }
  else  //0 o nada 
  {	// write(" 4 ");
        total_decimal = cad_entera + "." + parseInt(cad_decimal.substring(0,1)).toString();
	numero_e = total_decimal;
  
  }
  //write("totaldecimal "+ total_decimal);
  //write(" parseFloat de total dec "+ parseFloat(total_decimal)+ "\n");
  //write("numero_e " + numero_e);
}  
else
{

 numero_e= valor;  //no tenia decimales
}  


return numero_e;
}

function PresentaEuros(valor) 
{
	//Saco los euros con dos decimales solo
	cad = "" + valor;
	pto = cad.indexOf(".");
	if (pto != -1) 
	{
		mile = cad.substring(pto+3,pto+4);
	// si el tercer decimal es mayor e igual a 5 le sumo 0.01 para redondearlo
		if (mile >= "5") 
		{
			cad_entera = cad.substring(0,pto);
			cad_decimal = cad.substring(pto+1,pto+3);
			total_decimal = cad_entera + "." + cad_decimal;
			numero_e =  parseFloat(total_decimal) + 0.011111111111111;
		}
		else
		{
			numero_e = valor;
		}
		numero_eu ="" + numero_e;
		punto = numero_eu.indexOf(".");
		if (punto != -1) 
		{
			parte_entera = numero_eu.substring(0,punto);
			parte_decimal = numero_eu.substring(punto+1,punto+3)
			numero_decimal = parte_entera + "." + parte_decimal;
		}
		else
		{
			numero_decimal = numero_e;
		}
	}
	else
	{
		numero_decimal = valor;
	}

	return numero_decimal
}

// FUNCION PRESENTACION DE CADENAS PARA SACAR PUNTOS Y COMAS EN RESULTADOS
function Cambiar(valor) {
		cadena = "" + valor;
      punto1 = cadena.indexOf(".");
      if (punto1 != -1){
        for( var r=0; r<=cadena.length; r++){
           if (cadena.charAt(r)=="."){
               cadena=cadena.substring(0,r)+","+cadena.substring(r+1,cadena.length);
           }
        }
	cadena = cadena;
      }

      var cont = 0;
      var punto;
      punto = cadena.indexOf(",");
      if (punto == -1){
                punto = cadena.length;
      }
      for (var n=punto; n>=1; n--){
        if (cont == 3){
        cadena = cadena.substring(0,n) + "." + cadena.substring(n,cadena.length);
        cont = 0;
        }
         cont ++; 
      }
        return cadena;
}

//FUNCION QUE SIMULA EL Math.round
function Math_luis (luis) {
cad_round = "" + luis;
pto_round = cad_round.indexOf(".");
if (pto_round != -1) {
mile_round = cad_round.substring(pto_round+1,pto_round+2);
parte_entera_round = cad_round.substring(0,pto_round);

// Si el primer decimal es mayor e igual a 5 le sumo 1 a la parte entera
	if (mile_round >= 5) {
    	num_round = parseFloat(parte_entera_round) + 1;  
	}
	else {
    	num_round = parseFloat(parte_entera_round);
	}
euro_round = num_round;
}
else
{
euro_round = luis;
}
return euro_round 
}

// Calcula la edad del individuo
hoy = new Date();

function calcula_ano(){
  anohoy=""+hoy.getYear()

  if (navigator.appName.indexOf("Netscape") != -1){
    if (anohoy > 99)
      anohoy=eval("20"+anohoy.substring(1,anohoy.length))
    else
      anohoy=eval("19"+anohoy.substring(0,anohoy.length))
  }

  return anohoy
}




//funcion HazFecha() para formularioSecretaria
function HazFecha()
{
var d=new Date();
var dia=d.getDay();

var Fecha;
switch (dia)
        {
        case 0: Fecha="Domingo";
        break;
        case 1: Fecha="Lunes";
        break;
        case 2: Fecha="Martes";
        break;
        case 3: Fecha="Miércoles";
        break;
        case 4: Fecha="Jueves";
        break;
        case 5: Fecha="Viernes";
        break;
        case 6: Fecha="Sábado";
        break;
        }            
Fecha=Fecha + ", " + d.getDate() + " de ";
var mes=d.getMonth();
switch (mes)
        {
        case 0: Fecha+="Enero ";
        break;
        case 1: Fecha+="Febrero ";
        break;
        case 2: Fecha+="Marzo ";
        break;
        case 3: Fecha+="Abril ";
        break;
        case 4: Fecha+="Mayo ";
        break;
        case 5: Fecha+="Junio ";
        break;
        case 6: Fecha+="Julio ";
        break;
        case 7: Fecha+="Agosto ";
        break;
        case 8: Fecha+="Septiembre ";
        break;
        case 9: Fecha+="Octubre ";
        break;
        case 10: Fecha+="Noviembre";
        break;
        case 11: Fecha+="Diciembre ";
        break;
        }
Fecha= Fecha + " de " + d.getFullYear();
return Fecha;
}
//Funcion para validar el nif
function validanif2(f, obj)
{
  
  var cerosquefaltan=0;
  var ceros="";
  var i;
  
  if (obj.value.length==0)
    {
      bien=1;
      return(false);
    }
  
  cerosquefaltan=9-obj.value.length;
  for(i=1;i<=cerosquefaltan;i++) {
    ceros=ceros+"0";
  }
  obj.value=ceros+obj.value;
  
  var nrodni = obj.value.substring(0,8);
  var letradni = obj.value.substring(8,9).toUpperCase();
  var cociente23        = 0;
  
  if (letradni.length==0 || letradni==null){
    alert( "Por favor, escriba la letra del NIF" );
   f.obj.focus();
    return(true);
  }

  if (Numerico(nrodni,nrodni.length)){
    cociente23  = nrodni % 23;
    if (((cociente23==0) && (letradni=="T")) ||
        ((cociente23==1) && (letradni=="R")) ||
        ((cociente23==2) && (letradni=="W")) ||
        ((cociente23==3) && (letradni=="A")) ||
        ((cociente23==4) && (letradni=="G")) ||
        ((cociente23==5) && (letradni=="M")) ||
        ((cociente23==6) && (letradni=="Y")) ||
        ((cociente23==7) && (letradni=="F")) ||
        ((cociente23==8) && (letradni=="P")) ||
        ((cociente23==9) && (letradni=="D")) ||
        ((cociente23==10) && (letradni=="X")) ||
        ((cociente23==11) && (letradni=="B")) ||
        ((cociente23==12) && (letradni=="N")) ||
        ((cociente23==13) && (letradni=="J")) ||
        ((cociente23==14) && (letradni=="Z")) ||
        ((cociente23==15) && (letradni=="S")) ||
        ((cociente23==16) && (letradni=="Q")) ||
        ((cociente23==17) && (letradni=="V")) ||
        ((cociente23==18) && (letradni=="H")) ||
        ((cociente23==19) && (letradni=="L")) ||
        ((cociente23==20) && (letradni=="C")) ||
        ((cociente23==21) && (letradni=="K")) ||
        ((cociente23==22) && (letradni=="E"))) {
      bien=1;
      return(false);
    }
    alert( "La letra del NIF es incorrecta" );
	f.obj.focus();
    return(true);
  }
  else  {
    alert("El NIF debe ser numérico menos la letra final");
	f.obj.focus();
    return(true);
  }
}   // Fin de ValidaNIF


// Funcion para abrir una ventana desde otra
function openWin(html,name,w,h){
    myWin= open(html, name, "width="+w+",height="+h+",status=no,titlebar=yes,toolbar=no,menubar=no,screenX=100,screenY=50,scrollbars=yes");
}

// Funcion para referenciar una ventana con otra
function eligeOpcion(nombre,valor){
  minombre=eval("window.opener.document.forms[0]."+nombre)
  minombre.value=valor
  window.close();
}

// Calcula la edad del individuo
function calcula_edad(dianac, mesnac, anonac){
  valida_fecha(dianac, mesnac, anonac)
  var fecha = new Date();
  var diahoy = fecha.getDate()
  var meshoy = fecha.getMonth()+1;
  var anohoy;

  mifecha=fecha.toGMTString();

  /*if (mifecha.indexOf("2000")!= -1)
    anohoy=2000
  else if (mifecha.indexOf("1999") != -1)
    anohoy=1999*/
    anohoy=fecha.getFullYear();

  edad=anohoy-anonac

  if (meshoy < mesnac){
    edad= edad - 1
  }else if (meshoy == mesnac){
    if (diahoy < dianac){
      edad = edad -1
    }
  }
  return edad
}


// calcula si el mes y el dia son correctos
function f_rango(dia, mes, ano){
  var mes_valido=0
  var nobisiesto
  if (mes > 12)
    mensajeFecha="Fecha no válida, el mes debe ser < 12"

  else
  if ((mes==4 || mes==6 || mes==9 || mes==11) && (dia > 30))
     mensajeFecha="Ese mes solo tiene 30 días"

  else
  if (mes==2 && dia > 28){
    nobisiesto=parseInt(ano % 4)
    if(!nobisiesto)
      mes_valido=1
    else
      mensajeFecha="Febrero solo tiene 28 días (o 29 en bisiesto)"

  }else
  if (dia > 31)
      mensajeFecha="Este mes solo tiene 31 días"

  else
     mes_valido=1
  return mes_valido
}

function valida_fecha(dia, mes, ano){
  valido=0
  mensajeFecha=""
  var diahoy = hoy.getDate()
  var meshoy = hoy.getMonth()+1;

  anohoy=calcula_ano()

  fecha=ano+"/"+mes+"/"+dia
  fechahoy=anohoy+"/"+meshoy+"/"+diahoy


  if (dia=="00" || mes=="00" || ano=="0000"){
    mensajeFecha="Introduzca valores válidos para la fecha, no ceros"
    valido=0

  }else
  if (fecha > fechahoy){
     mensajeFecha="La fecha no puede ser mayor que el día de hoy"
     
     valido=0

  }else{ 
    valido=f_rango(dia, mes, ano)
  }

  if (mensajeFecha!=""){
    alert (mensajeFecha)
  }
return valido;
} 

/*
function valida_fecha(dia, mes, ano){
  valido=0
  mensajeFecha=""
  if (dia=="00" || mes=="00" || ano=="0000"){
    mensajeFecha="Introduzca valores válidos para la fecha, no ceros"
    valido=0

  }else{ 
    valido=f_rango(dia, mes, ano)
  }

  if (mensajeFecha!=""){
    alert (mensajeFecha)
  }
return valido;
} 
*/

function validaNif(obj){
  minif=obj.value
  var cerosquefaltan=0;
  var ceros="";
  var convertir_nif=true
  var hayLetra=true
  var valido=0;

  if (minif.length == 0)
    return; 

  if (minif.charAt(minif.length-1)< "0" || minif.charAt(minif.length-1)> "9"){
    cerosquefaltan=9-minif.length;
    for(var i=1;i<=cerosquefaltan;i++) {
      ceros=ceros+"0";
    }
  }

  minif=ceros+minif;
  
  var nrodni    = minif.substring(0,8);
  var letradni  = minif.substring(8,9).toUpperCase();
  var cociente23        = 0;

  // comprueba que el nif sea numerico
  for (var i=0; i< nrodni.length; i++){
    var ch = nrodni.substring(i,i+1)
    if (ch < "0" || ch > "9")
      convertir_nif=false
  }

  if (letradni.length==0 || letradni==null){
    alert( "Por favor, escriba la letra del NIF" );
    hayLetra= false;
    obj.value="";
    obj.focus();
    return;
  }

  if (convertir_nif && hayLetra){
    cociente23  = nrodni % 23;
    if (((cociente23==0) && (letradni=="T")) ||
        ((cociente23==1) && (letradni=="R")) ||
        ((cociente23==2) && (letradni=="W")) ||
        ((cociente23==3) && (letradni=="A")) ||
        ((cociente23==4) && (letradni=="G")) ||
        ((cociente23==5) && (letradni=="M")) ||
        ((cociente23==6) && (letradni=="Y")) ||
        ((cociente23==7) && (letradni=="F")) ||
        ((cociente23==8) && (letradni=="P")) ||
        ((cociente23==9) && (letradni=="D")) ||
        ((cociente23==10) && (letradni=="X")) ||
        ((cociente23==11) && (letradni=="B")) ||
        ((cociente23==12) && (letradni=="N")) ||
        ((cociente23==13) && (letradni=="J")) ||
        ((cociente23==14) && (letradni=="Z")) ||
        ((cociente23==15) && (letradni=="S")) ||
        ((cociente23==16) && (letradni=="Q")) ||
        ((cociente23==17) && (letradni=="V")) ||
        ((cociente23==18) && (letradni=="H")) ||
        ((cociente23==19) && (letradni=="L")) ||
        ((cociente23==20) && (letradni=="C")) ||
        ((cociente23==21) && (letradni=="K")) ||
        ((cociente23==22) && (letradni=="E"))){
      valido=1
    }else{
      alert( "La letra del NIF es incorrecta" );
      obj.value="";
      obj.focus();
      return;
    }
  } else 
  if (!convertir_nif) {
    alert("El NIF debe ser numérico menos la letra final");
    obj.value="";
    obj.focus();
  }
}   // Fin de validaNif


function validaEmail(objeto){
  cadena=objeto.value
 if (cadena=="atclientes.unico@grupobbva.com" || cadena=="atencion.clientes@grupobbva.com" || 
 cadena=="admin2.unico@grupobbva.com" || cadena=="admin3.unico@grupobbva.com"
 || cadena=="privanza.unico@grupobbva.com")
 	{
 	alert("El e-mail es incorrecto");
 	objeto.value="";
 	objeto.focus()
 	}
  if (cadena.indexOf("@") != -1){
    dominio=cadena.substring(cadena.indexOf("@")+1,cadena.length)
    if (dominio.indexOf(".") ==-1){
      alert("El e-mail es incorrecto")
      objeto.value="";
      objeto.focus()
    }
  }else 
  if (cadena.length != 0  && cadena.indexOf("@") == -1){
    alert("El e-mail es incorrecto")
    objeto.value="";
    objeto.focus()
  }
}
/********************************************************************
valida_email(f)
@param un formulario con un campo email(chapuzilla)
************************************************************************/
function valida_email(f) {
    if (f.email.value.indexOf('@',0)==-1 || f.email.value.indexOf(';',0) !=-1 
	  || f.email.value.indexOf('.',0)==-1
      || f.email.value.indexOf(' ',0) !=-1 || f.email.value.indexOf('/',0) !=-1
      || f.email.value.indexOf(';',0) !=-1 || f.email.value.indexOf('<',0) !=-1 
      || f.email.value.indexOf('>',0) !=-1 || f.email.value.indexOf('*',0) !=-1 
      || f.email.value.indexOf('|',0) !=-1 || f.email.value.indexOf('`',0) !=-1 
      || f.email.value.indexOf('&',0) !=-1 || f.email.value.indexOf('$',0) !=-1 
      || f.email.value.indexOf('!',0) !=-1 || f.email.value.indexOf('"',0) !=-1 
      || f.email.value.indexOf(':',0) !=-1) {
	alert('La direccion E-MAIL no es correcta.');
	f.email.focus();   
    return(false);
    }
    else
    return(true);
} 

function Numerico(objeto, longitud){
  cadena=objeto.value
  var convertir=true

  if (longitud != 0 && cadena.length != longitud && cadena.length != 0){
      convertir = false

  }else {
    for (var i=0; i< cadena.length; i++){
      var ch= cadena.substring(i,i+1)
      if (ch < "0" || ch > "9"){
        convertir=false
      }
    }
  }

  if (!convertir){
    mensajeNum="Introduzca "
    //if (longitud != "undefined"){
    if (longitud != 0){
      mensajeNum+=longitud
    }
    mensajeNum+=" caracteres numéricos"
    alert(mensajeNum)
    objeto.value=""
    objeto.focus();
  }
}
function NumericoMoby(objeto, longitud){
  cadena=objeto.value
  var convertir=true

  if (longitud != 0 && cadena.length != longitud && cadena.length != 0){
      convertir = false

  }else {
    for (var i=0; i< cadena.length; i++){
      var ch= cadena.substring(i,i+1)
      if (ch < "0" || ch > "9"){
        convertir=false
      }
    }
  }
 var tele2=cadena.charAt(0);
     //alert(tele2);
  if ((!convertir) || (tele2!="6")){
    mensajeNum="Introduzca "
    //if (longitud != "undefined"){
    if (longitud != 0){
      mensajeNum+=longitud
    }
    mensajeNum+=" caracteres numéricos y un número de teléfono móvil correcto (debe empezar por 6)";
    alert(mensajeNum)
    objeto.value=""
    objeto.focus();
  }
}

function NumericoSolo(objeto)
{
  cadena=objeto.value
  var convertir=true

    for (var i=0; i< cadena.length; i++)
	{
      var ch= cadena.substring(i,i+1)
      if (ch < "0" || ch > "9")
        convertir=false
     }
    
   if (!convertir)
   {
    mensajeNum="Introduzca "
     
    mensajeNum+=" caracteres numéricos"
    alert(mensajeNum)
    objeto.value=""
    objeto.focus();
	}
  
}
function Validaextension(objeto,ext)
{
cadena=objeto.value;
if (cadena!="")
	if (cadena.substring(cadena.length-4,cadena.length)!=ext)
	{
		mensajeNum=" La extension debe ser " +ext;
		alert(mensajeNum);
		objeto.focus();
	}
}
function GeneraPaises()
{
  var paises = "";
  paises = "<OPTION VALUE='Abu-Dhabi'>Abu-Dhabi (Uae)</OPTION><OPTION VALUE='Afganistan'>Afganistan</OPTION><OPTION VALUE='Albania'>Albania</OPTION>";
  paises += "<OPTION VALUE='Alemania'>Alemania</OPTION><OPTION VALUE='American Samoa'>American Samoa</OPTION><OPTION VALUE='Andorra'>Andorra</OPTION>";
  paises += "<OPTION VALUE='Angola'>Angola</OPTION><OPTION VALUE='Anguilla'>Anguilla</OPTION><OPTION VALUE='Antartica'>Antartica</OPTION>";
  paises += "<OPTION VALUE='Antigua y Barbuda'>Antigua y Barbuda</OPTION><OPTION VALUE='Antillas Neerlandesas'>Antillas Neerlandesas</OPTION><OPTION VALUE='Arabia Saudita'>Arabia Saudita</OPTION>";
  paises += "<OPTION VALUE='Argelia'>Argelia</OPTION><OPTION VALUE='Argentina'>Argentina</OPTION><OPTION VALUE='Armenia'>Armenia</OPTION>";
  paises += "<OPTION VALUE='Aruba'>Aruba</OPTION><OPTION VALUE='Australia'>Australia</OPTION><OPTION VALUE='Austria'>Austria</OPTION>";
  paises += "<OPTION VALUE='Autonomia Palestina'>Autonomia Palestina</OPTION><OPTION VALUE='Azerbaiyan'>Azerbaiyan</OPTION><OPTION VALUE='Bahamas'>Bahamas</OPTION>";
  paises += "<OPTION VALUE='Bahrain'>Bahrain</OPTION><OPTION VALUE='Bangladesh'>Bangladesh</OPTION><OPTION VALUE='Barbados'>Barbados</OPTION>";
  paises += "<OPTION VALUE='Belgica'>Belgica</OPTION><OPTION VALUE='Belize'>Belize</OPTION><OPTION VALUE='Benin'>Benin</OPTION>";
  paises += "<OPTION VALUE='Bermudas'>Bermudas</OPTION><OPTION VALUE='Bhoutan'>Bhoutan</OPTION><OPTION VALUE='Bielorrusia'>Bielorrusia</OPTION>";
  paises += "<OPTION VALUE='Bolivia'>Bolivia</OPTION><OPTION VALUE='Bosnia Herzegovina'>Bosnia Herzegovina</OPTION><OPTION VALUE='Botswana'>Botswana</OPTION>";
  paises += "<OPTION VALUE='Bouvet Island (Noruega)'>Bouvet Island (Noruega)</OPTION><OPTION VALUE='Brasil'>Brasil</OPTION><OPTION VALUE='British Antartic'>British Antartic</OPTION>";
  paises += "<OPTION VALUE='Brunei'>Brunei</OPTION><OPTION VALUE='Bulgaria'>Bulgaria</OPTION><OPTION VALUE='Burkina-Faso'>Burkina-Faso</OPTION>";
  paises += "<OPTION VALUE='Burundi'>Burundi</OPTION><OPTION VALUE='Camerun'>Camerun</OPTION><OPTION VALUE='Canada'>Canada</OPTION>";
  paises += "<OPTION VALUE='Chile'>Chile</OPTION><OPTION VALUE='China'>China</OPTION><OPTION VALUE='Chipre'>Chipre</OPTION>";
  paises += "<OPTION VALUE='Christmas Islands'>Christmas Islands</OPTION><OPTION VALUE='Ciudad Vaticano'>Ciudad Vaticano</OPTION><OPTION VALUE='Cocos (Keeling) Islands'>Cocos (Keeling) Islands</OPTION>";
  paises += "<OPTION VALUE='Colombia'>Colombia</OPTION><OPTION VALUE='Comores'>Comores</OPTION><OPTION VALUE='Congo'>Congo</OPTION>";
  paises += "<OPTION VALUE='Cook Islands'>Cook Islands</OPTION><OPTION VALUE='Corea Del Norte'>Corea Del Norte</OPTION><OPTION VALUE='Corea Del Sur'>Corea Del Sur</OPTION>";
  paises += "<OPTION VALUE='Costa De Marfil'>Costa De Marfil</OPTION><OPTION VALUE='Costa Rica'>Costa Rica</OPTION><OPTION VALUE='Croacia'>Croacia</OPTION>";
  paises += "<OPTION VALUE='Cuba'>Cuba</OPTION><OPTION VALUE='Daguistan'>Daguistan</OPTION><OPTION VALUE='Dinamarca'>Dinamarca</OPTION>";
  paises += "<OPTION VALUE='Djibouti'>Djibouti</OPTION><OPTION VALUE='Dronning Mau Dland (Nor)'>Dronning Mau Dland (Nor)</OPTION>";
  paises += "<OPTION VALUE='Dubai (Uae)'>Dubai (Uae)</OPTION><OPTION VALUE='East Timor'>East Timor</OPTION><OPTION VALUE='Ecuador'>Ecuador</OPTION>";
  paises += "<OPTION VALUE='Egipto'>Egipto</OPTION><OPTION VALUE='El Salvador'>El Salvador</OPTION><OPTION VALUE='Emiratos Arabes Unidos'>Emiratos Arabes Unidos</OPTION>";
  paises += "<OPTION VALUE='Eritrea'>Eritrea</OPTION><OPTION VALUE='Eslovaquia'>Eslovaquia</OPTION><OPTION VALUE='Eslovenia'>Eslovenia</OPTION>";
  paises += "<OPTION SELECTED VALUE='España'>España</OPTION><OPTION VALUE='Estados Unidos America'>Estados Unidos America</OPTION><OPTION VALUE='Estonia'>Estonia</OPTION>";
  paises += "<OPTION VALUE='Etiopia'>Etiopia</OPTION><OPTION VALUE='Fiji'>Fiji</OPTION><OPTION VALUE='Filipinas'>Filipinas</OPTION>";
  paises += "<OPTION VALUE='Finlandia'>Finlandia</OPTION><OPTION VALUE='Francia'>Francia</OPTION><OPTION VALUE='French Southern (Polinesia)'>French Southern (Polinesia)</OPTION>";
  paises += "<OPTION VALUE='Gabon'>Gabon</OPTION><OPTION VALUE='Gambia'>Gambia</OPTION><OPTION VALUE='Gaza y Jerico'>Gaza y Jerico</OPTION>";
  paises += "<OPTION VALUE='Georgia'>Georgia</OPTION><OPTION VALUE='Ghana'>Ghana</OPTION><OPTION VALUE='Gibraltar'>Gibraltar</OPTION>";
  paises += "<OPTION VALUE='Granada'>Granada</OPTION><OPTION VALUE='Grecia'>Grecia</OPTION><OPTION VALUE='Groenlandia'>Groenlandia</OPTION>";
  paises += "<OPTION VALUE='Guadalupe'>Guadalupe</OPTION><OPTION VALUE='Guam'>Guam</OPTION><OPTION VALUE='Guatemala'>Guatemala</OPTION>";
  paises += "<OPTION VALUE='Guernesey'>Guernesey</OPTION><OPTION VALUE='Guinea'>Guinea</OPTION><OPTION VALUE='Guinea Bissau'>Guinea Bissau</OPTION>";
  paises += "<OPTION VALUE='Guinea Ecuatorial'>Guinea Ecuatorial</OPTION><OPTION VALUE='Guyana (Georgetown)'>Guyana (Georgetown)</OPTION><OPTION VALUE='Guyana Francesa'>Guyana Francesa</OPTION>";
  paises += "<OPTION VALUE='Haiti'>Haiti</OPTION><OPTION VALUE='Heard & Mcdonald Islands'>Heard & Mcdonald Islands</OPTION><OPTION VALUE='Honduras'>Honduras</OPTION>";
  paises += "<OPTION VALUE='Hong-Kong'>Hong-Kong</OPTION><OPTION VALUE='Hungria'>Hungria</OPTION><OPTION VALUE='India'>India</OPTION>";
  paises += "<OPTION VALUE='Indonesia'>Indonesia</OPTION><OPTION VALUE='Iran'>Iran</OPTION><OPTION VALUE='Iraq'>Iraq</OPTION>";
  paises += "<OPTION VALUE='Irlanda'>Irlanda</OPTION><OPTION VALUE='Isl.Sur Georgia y Sur Sand'>Isl.Sur Georgia y Sur Sand</OPTION><OPTION VALUE='Isla De Man'>Isla De Man</OPTION>";
  paises += "<OPTION VALUE='Islandia'>Islandia</OPTION><OPTION VALUE='Islas Cayman'>Islas Cayman</OPTION><OPTION VALUE='Islas Feroe'>Islas Feroe</OPTION>";
  paises += "<OPTION VALUE='Islas Maldivas'>Islas Maldivas</OPTION><OPTION VALUE='Islas Malvinas (Falklands)'>Islas Malvinas (Falklands)</OPTION><OPTION VALUE='Islas Marianas Del Norte'>Islas Marianas Del Norte</OPTION>";
  paises += "<OPTION VALUE='Islas Pitcairn'>Islas Pitcairn</OPTION><OPTION VALUE='Islas Salomon'>Islas Salomon</OPTION><OPTION VALUE='Islas Turcas y Caicos'>Islas Turcas y Caicos</OPTION>";
  paises += "<OPTION VALUE='Islas Virgenes Britanicas'>Islas Virgenes Britanicas</OPTION><OPTION VALUE='Islas Virgenes De EEUU.'>Islas V&iacute;rgenes De EEUU.</OPTION><OPTION VALUE='Israel'>Israel</OPTION>";
  paises += "<OPTION VALUE='Italia'>Italia</OPTION><OPTION VALUE='Jamaica'>Jamaica</OPTION><OPTION VALUE='Japon'>Japon</OPTION>";
  paises += "<OPTION VALUE='Jersey, C.I.'>Jersey, C.I.</OPTION><OPTION VALUE='Jordania'>Jordania</OPTION><OPTION VALUE='Kampuchea (Camboya)'>Kampuchea (Camboya)</OPTION>";
  paises += "<OPTION VALUE='Kazakhstan'>Kazakhstan</OPTION><OPTION VALUE='Kenya'>Kenya</OPTION><OPTION VALUE='Kirguizistan'>Kirguizistan</OPTION>";
  paises += "<OPTION VALUE='Kiribati (Ant.Islas Gilbert)'>Kiribati (Ant.Islas Gilbert)</OPTION><OPTION VALUE='Kuwait'>Kuwait</OPTION><OPTION VALUE='Laos'>Laos</OPTION>";
  paises += "<OPTION VALUE='Lesotho'>Lesotho</OPTION><OPTION VALUE='Letonia'>Letonia</OPTION><OPTION VALUE='Libano'>Libano</OPTION>";
  paises += "<OPTION VALUE='Liberia'>Liberia</OPTION><OPTION VALUE='Libia'>Libia</OPTION><OPTION VALUE='Liechtenstein'>Liechtenstein</OPTION>";
  paises += "<OPTION VALUE='Lituania'>Lituania</OPTION><OPTION VALUE='Luxemburgo'>Luxemburgo</OPTION><OPTION VALUE='Macao'>Macao</OPTION>";
  paises += "<OPTION VALUE='Macedonia'>Macedonia</OPTION><OPTION VALUE='Madagascar'>Madagascar</OPTION><OPTION VALUE='Malasia'>Malasia</OPTION>";
  paises += "<OPTION VALUE='Malawi'>Malawi</OPTION><OPTION VALUE='Mali'>Mali</OPTION><OPTION VALUE='Malta'>Malta</OPTION>";
  paises += "<OPTION VALUE='Marruecos'>Marruecos</OPTION><OPTION VALUE='Marshall Island'>Marshall Island</OPTION><OPTION VALUE='Martinica'>Martinica</OPTION>";
  paises += "<OPTION VALUE='Mauricio'>Mauricio</OPTION><OPTION VALUE='Mauritania'>Mauritania</OPTION><OPTION VALUE='Mayotte'>Mayotte</OPTION>";
  paises += "<OPTION VALUE='Mexico'>Mexico</OPTION><OPTION VALUE='Micronesia Fed De Estados'>Micronesia Fed De Estados</OPTION><OPTION VALUE='Moldavia'>Moldavia</OPTION>";
  paises += "<OPTION VALUE='Monaco'>Monaco</OPTION><OPTION VALUE='Mongolia'>Mongolia</OPTION><OPTION VALUE='Montserrat'>Montserrat</OPTION>";
  paises += "<OPTION VALUE='Mozambique'>Mozambique</OPTION><OPTION VALUE='Myanmar'>Myanmar</OPTION><OPTION VALUE='Namibia'>Namibia</OPTION>";
  paises += "<OPTION VALUE='Nauru'>Nauru</OPTION><OPTION VALUE='Nepal'>Nepal</OPTION><OPTION VALUE='Nicaragua'>Nicaragua</OPTION>";
  paises += "<OPTION VALUE='Niger'>Niger</OPTION><OPTION VALUE='Nigeria'>Nigeria</OPTION><OPTION VALUE='Niue'>Niue</OPTION>";
  paises += "<OPTION VALUE='Norfolk Island'>Norfolk Island</OPTION><OPTION VALUE='Noruega'>Noruega</OPTION><OPTION VALUE='Nueva Caledonia'>Nueva Caledonia</OPTION>";
  paises += "<OPTION VALUE='Nueva Zelanda'>Nueva Zelanda</OPTION><OPTION VALUE='Oceania Australiana'>Oceania Australiana</OPTION><OPTION VALUE='Oceania Neo-Zelandesa'>Oceania Neo-Zelandesa</OPTION>";
  paises += "<OPTION VALUE='Oman'>Oman</OPTION><OPTION VALUE='Ominica'>Ominica</OPTION><OPTION VALUE='3'>Paisesbajos</OPTION><OPTION VALUE='Pakistan'>Pakistan</OPTION>";
  paises += "<OPTION VALUE='Palau'>Palau</OPTION><OPTION VALUE='Panama'>Panama</OPTION><OPTION VALUE='Panama Canal Zone'> Panama Canal Zone</OPTION>";
  paises += "<OPTION VALUE='Papua Nueva Guinea'>Papua Nueva Guinea</OPTION><OPTION VALUE='Paraguay'>Paraguay</OPTION><OPTION VALUE='Peru'>Peru</OPTION>";
  paises += "<OPTION VALUE='Polinesia Francesa'>Polinesia Francesa</OPTION><OPTION VALUE='Polonia'>Polonia</OPTION><OPTION VALUE='Portugal'>Portugal</OPTION>";
  paises += "<OPTION VALUE='Puerto Rico'>Puerto Rico</OPTION><OPTION VALUE='Qatar'>Qatar</OPTION><OPTION VALUE='Reino Unido'>Reino Unido</OPTION>";
  paises += "<OPTION VALUE='Rep. Cabo Verde'>Rep. Cabo Verde</OPTION><OPTION VALUE='Rep. Centro Africana'>Rep. Centro Africana</OPTION><OPTION VALUE='Rep. Dominicana'>Rep. Dominicana</OPTION>";
  paises += "<OPTION VALUE='Rep. Checa'>Rep. Checa</OPTION><OPTION VALUE='Rep. Dem. De Congo'>Rep. Dem. De Congo</OPTION><OPTION VALUE='Rep. Fed. Yugoslavia'>Rep. Fed. Yugoslavia</OPTION>";
  paises += "<OPTION VALUE='Reunion'>Reunion</OPTION><OPTION VALUE='Rumania'>Rumania</OPTION><OPTION VALUE='Rusia'>Rusia</OPTION>";
  paises += "<OPTION VALUE='Rwanda'>Rwanda</OPTION><OPTION VALUE='Samoa Occidental'>Samoa Occidental</OPTION><OPTION VALUE='S. Cristobal y Nevis'>S. Cristobal y Nevis</OPTION>";
  paises += "<OPTION VALUE='S. Marino'>S. Marino</OPTION><OPTION VALUE='S. Pedro y Miquelon'>S. Pedro y Miquelon</OPTION><OPTION VALUE='S. Vicente'>S. Vicente</OPTION>";
  paises += "<OPTION VALUE='Sta. Elena'>Sta. Elena</OPTION><OPTION VALUE='Sta. Lucia'>Sta. Lucia</OPTION><OPTION VALUE='Senegal'>Senegal</OPTION>";
  paises += "<OPTION VALUE='Seychelles'>Seychelles</OPTION><OPTION VALUE='Sierra Leona'>Sierra Leona</OPTION><OPTION VALUE='Singapur'>Singapur</OPTION>";
  paises += "<OPTION VALUE='Siria'>Siria</OPTION><OPTION VALUE='Somalia'>Somalia</OPTION><OPTION VALUE='Srilanka'>Srilanka</OPTION>";
  paises += "<OPTION VALUE='Sto.Tome y Principe'>Sto.Tome y Principe</OPTION><OPTION VALUE='Sudafrica'>Sudafrica</OPTION><OPTION VALUE='Sudan'>Sudan</OPTION>";
  paises += "<OPTION VALUE='Suecia'>Suecia</OPTION><OPTION VALUE='Suiza'>Suiza</OPTION><OPTION VALUE='Surinam'>Surinam</OPTION>";
  paises += "<OPTION VALUE='Svalbard & Jan Mayen'>Svalbard & Jan Mayen</OPTION><OPTION VALUE='Swaziland'>Swaziland</OPTION><OPTION VALUE='Taiwan'>Taiwan</OPTION>";
  paises += "<OPTION VALUE='Tajikistan'>Tajikistan</OPTION><OPTION VALUE='Tanzania'>Tanzania</OPTION><OPTION VALUE='Tchad'>Tchad</OPTION>";
  paises += "<OPTION VALUE='Terr. Britanico Del Oc.Ind.'>Terr. Britanico Del Oc.Ind.</OPTION><OPTION VALUE='Thailandia'>Thailandia</OPTION><OPTION VALUE='Togo'>Togo</OPTION>";
  paises += "<OPTION VALUE='Tokelau'>Tokelau</OPTION><OPTION VALUE='Tonga'>Tonga</OPTION><OPTION VALUE='Trinidad y Tobago'>Trinidad y Tobago</OPTION>";
  paises += "<OPTION VALUE='Tunez'>Tunez</OPTION><OPTION VALUE='Turkmenistan'>Turkmenistan</OPTION><OPTION VALUE='Turquia'>Turquia</OPTION>";
  paises += "<OPTION VALUE='Tuvalu'>Tuvalu</OPTION><OPTION VALUE='U.S. Minor Outlying Island'>U.S. Minor Outlying Island</OPTION><OPTION VALUE='Ucrania'>Ucrania</OPTION>";
  paises += "<OPTION VALUE='Uganda'>Uganda</OPTION><OPTION VALUE='Uruguay'>Uruguay</OPTION><OPTION VALUE='Uzbekistan'>Uzbekistan</OPTION>";
  paises += "<OPTION VALUE='Vanuatu'>Vanuatu</OPTION><OPTION VALUE='Venezuela'>Venezuela</OPTION><OPTION VALUE='Vietnam'>Vietnam</OPTION>";
  paises += "<OPTION VALUE='Wakeisland'>Wakeisland</OPTION><OPTION VALUE='Wallisy Fortuna'>Wallisy Fortuna</OPTION><OPTION VALUE='Western Sahara'>Western Sahara</OPTION>";
  paises += "<OPTION VALUE='Yemen'>Yemen</OPTION><OPTION VALUE='Zambia'>Zambia</OPTION><OPTION VALUE='Zimbabwe'>Zimbabwe</OPTION>";

  document.write(paises);
}

//recibe un string y comprueba que es alfanumerico
function esAlfanumerico(cadena){
var es=true;
	if (cadena==null){
		es=false;
	}
	for (var i=0; i < cadena.length; i++){
		var ch=cadena.substring(i,i+1);
        if ((ch >= "A" && ch <= "Z") || (ch >= "a" && ch <= "z") || (ch >= "0" && ch <= "9")){
			es= true;
		}else{
	        es=false;
		    break;
		}
	}
   return(es);        
 }

 function validaDocumento(obj)
{
  documento=obj.value;
  var es_nif=false;
  var es_tarjeta=false;
  var convertir_tarjeta=true;
  var no_longitud=true;

  if (documento.length == 0)
    return; 


  var inidocumento = documento.substring(0,1);

  // comprueba si es nif (si el primer carácter es numérico)
//    if (inidocumento < "0" || inidocumento > "9")
//      es_nif=false;
  // comprueba si es tarjeta de residente (si el primer carácter es X)
    if (inidocumento == "x" || inidocumento == "X")
      es_tarjeta=true;
	else
      es_nif=true;


  if (es_nif){
	  validaNif(obj);
  }

  if (es_tarjeta){
	  var nrodocumento = documento.substring(1,8);
	  // comprueba que sea numérico
	  for (var i=0; i< nrodocumento.length; i++){
		var ch = nrodocumento.substring(i,i+1)
		if (ch < "0" || ch > "9")
		  convertir_tarjeta=false;
	  }
	  if (nrodocumento.length == 7)
	  {
		  no_longitud=false;
	  }
	  if (!convertir_tarjeta || no_longitud) {
		alert("La Tarjeta de Residente debe llevar siete números después de la letra X");
		obj.value="";
		obj.focus();
	  }
  }

} // Fin validaDocumento

function irInicio()
{
	this.location.hash='inicio';
}

function validaDocumentoConTipo(obj,tipo)
{
  documento=obj.value;
  var convertir_tarjeta=true;
  var no_longitud=true;

  if (documento.length == 0)
    return; 


  if (tipo == "2")
  {
	var inidocumento = documento.substring(0,1);
	// comprueba si es tarjeta de residente (si el primer carácter es X)
	if (inidocumento != "x" && inidocumento != "X")
	{
		alert("La Tarjeta de Residente debe empezar por la letra X");
		obj.value="";
		obj.focus();
	}
	else
	{
	  // comprueba que sea numérico
	  var nrodocumento = documento.substring(1,8);
	  for (var i=0; i< nrodocumento.length; i++){
		var ch = nrodocumento.substring(i,i+1)
		if (ch < "0" || ch > "9")
		  convertir_tarjeta=false;
	  }
	  if (nrodocumento.length == 7)
	  {
		  no_longitud=false;
	  }
	  if (!convertir_tarjeta || no_longitud) {
		alert("La Tarjeta de Residente debe llevar siete números después de la letra X");
		obj.value="";
		obj.focus();
	  }
	}
  }
  else if (tipo == "1")
  {
	  validaNif(obj);
  }

} // Fin validaDocumentoConTipo