var dragapproved=false
var minrestore=0
var initialwidth,initialheight
var ie5=document.all&&document.getElementById
var ns6=document.getElementById&&!document.all

function loadwindow(vetana,framex,url,width,height,top, left){
if (!ie5&&!ns6)
window.open(url,"","width=width,height=height,scrollbars=1");
else{
document.getElementById(vetana).style.display='' 
document.getElementById(vetana).style.width=initialwidth=width
document.getElementById(vetana).style.height=initialheight=height
document.getElementById(vetana).style.left=left
document.getElementById(vetana).style.top=top
document.body.scrollTop*1+10
document.getElementById(framex).src=url
}
}

function closeit(){
document.getElementById("vetana").style.display="none"
}


function MM_reloadPage(init) {//reloads the window if Nav4 resizedif (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();}MM_reloadPage(true);
}


function MM_findObj(n, d) { //v3.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document); return x;
}
/* Functions that swaps images. */
function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

/* Functions that handle preload. */
function MM_preloadImages() { //v3.0
 var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
   var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
   if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_showHideLayers() { //v3.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
    obj.visibility=v; }
}

function MM_displayStatusMsg(msgStr) { 
status=msgStr;
document.MM_returnValue = true;
}

function pantallas() {
 var posicion;
 posicion = document.F1.selerror.value; 
 if (posicion == 1){ 
   MM_showHideLayers('personales1','','show','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','hide' ,'discrepantes','','hide' );
 } else if (posicion == 3) {
   MM_showHideLayers('personales1','','hide','personales2','','show','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','hide','discrepantes','','hide'  );
 } else if (posicion == 2) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','show','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','hide','discrepantes','','hide'  );
 } else if (posicion == 4) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','show','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','hide','discrepantes','','hide'  );
 } else if (posicion == 5) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','show','noafectan','','hide','territorial','','hide','fvariacion','','hide','discrepantes','','hide'  );
 } else if (posicion == 6) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','show','territorial','','hide','fvariacion','','hide','discrepantes','','hide'  );
 } else if (posicion == 7) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','show','fvariacion','','hide','discrepantes','','hide'  );
 } else if (posicion == 8) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','show','discrepantes','','hide'  );
 } else if (posicion == 9) {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','hide','discrepantes','','show'  );
 } else {
   MM_showHideLayers('personales1','','hide','personales2','','hide','domicilio1','','hide','domicilio2','','hide','afectan','','hide','noafectan','','hide','territorial','','hide','fvariacion','','hide','discrepantes','','hide'  );
}
return true;
} 

function pantallas_calle(posicion) {
 alert(posicion);
 if (posicion == 1){ 
   MM_showHideLayers('ayuda_calle','','show','ver_ficheros','','hide' );
 } else {
   MM_showHideLayers('ayuda_calle','','hide','ver_ficheros','','show' );
}
return true;
} 

function comprueba_err()  { 
if(document.F1.cnia.value != "" && (document.F1.Cmunx.value == "" || document.F1.Cprox.value == "")) {  
  alert("Ha introducido el NUMERO DE IDENTIFICACIÓN DEL AYUNTAMIENTO. Es necesario el codigo de PROVINCIA y de MUNICIPIO"); 
  document.F1.cnia.focus(); 
  return false; 
} 
if (document.F1.mesref.value != "" && (document.F1.anoref.value == "")) { 
  alert("Ha introducido MES de REFERENCIA, pero no tiene contenido el AÑO de REFERENCIA"); 
  document.F1.cnhop.focus(); 
  return false; 
}  
if (document.F1.cfnac.value != "" && (document.F1.ape12.value == "")) {  
  alert("Ha introducido la FECHA DE NACIMIENTO, pero es imprescindible el PRIMER APELLIDO."); 
  document.F1.ape12.focus(); 
  return false; 
}  
if (document.F1.ccpron.value != "" && (document.F1.ape22.value == "")) {  
  alert("Ha introducido la PROVINCIA DE NACIMIENTO, pero es imprescindible el SEGUNDO APELLIDO."); 
  document.F1.ape12.focus(); 
  return false; 
} 
if (document.F1.ccmunn.value != "" && (document.F1.ccpron.value == "")) {  
  alert("Ha introducido la MUNICIPIO/PAIS DE NACIMIENTO, pero es imprescindible la PROVINCIA/(66-Extranjero)."); 
  document.F1.ccpron.focus(); 
  return false; 
}  				
if (document.F1.ape22.value != "" && (document.F1.ape12.value == "")) {  
  alert("Ha introducido el APELLIDO SEGUNDO, pero es imprescindible el PRIMER APELLIDO."); 
  document.F1.ape12.focus(); 
  return false; 
} 
if (document.F1.nombre22.value != "" && (document.F1.ape12.value == "")) {  
  alert("Ha introducido el NOMBRE, pero es imprescindible el PRIMER APELLIDO."); 
  document.F1.ape12.focus(); 
  return false; 
}  
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {  
  alert("Ha introducido el CODIGO DE MUNICIPIO pero es imprescindible el codigo de PROVINCIA"); 
  document.F1.Cprox.focus(); 
  return false; 
}  
return true;  
} 

function com_con()  { 
var bdev;

if(document.F1.Cprox.value =="" && document.F1.Cmunx.value =="" && document.F1.ape12.value ==""  && document.F1.ape22.value =="" 
   && document.F1.nombre22.value ==""  && document.F1.cfnac.value =="" && document.F1.ciden.value =="" && document.F1.cnia.value =="" 
   && document.F1.cdist.value =="" && document.F1.csec.value =="" && document.F1.cnhop.value =="") {  
  alert("No hay suficientes datos para hacer la búsqueda, debe introducir al menos el campo de Primer Apellido"); 
  document.F1.ape12.focus(); 
  return false;
}  

if(document.F1.Cprox.value !="" && isNaN(document.F1.Cprox.value)) {
  alert("La provincia no es numérica"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(isNaN(document.F1.Cmunx.value)) {
  alert("Municipio no numérico"); 
  document.F1.Cmunx.focus(); 
  return false;
}

if(document.F1.ccpron.value !="" && isNaN(document.F1.ccpron.value)) {
  alert("La PROVINCIA DE NACIMIENTO  no es numérica"); 
  document.F1.ccpron.focus(); 
  return false;
}  
if(document.F1.ccmunn.value !="" && isNaN(document.F1.ccmunn.value)) {
  alert("El MUNICIPIO DE NACIMIENTO no es numérico"); 
  document.F1.ccmunn.focus(); 
  return false;
}  
if(document.F1.cfnac.value !="" && isNaN(document.F1.cfnac.value)) {
  alert("La FECHA DE NACIMIENTO no es numérica <formato FECHA:aaaammdd>"); 
  document.F1.cfnac.focus(); 
  return false;
} 
 
if(document.F1.cnia.value != "" && (document.F1.Cmunx.value == "" || document.F1.Cprox.value == "")) {  
  alert("Ha introducido el NUMERO DE IDENTIFICACIÓN DEL AYUNTAMIENTO. Es necesario el codigo de PROVINCIA y de MUNICIPIO"); 
  document.F1.cnia.focus(); 
  return false; 
} 
if(document.F1.cnhop.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "" || document.F1.csec.value == "")) {
  alert("Ha introducido NÚMERO DE HOJA PADRONAL, pero son imprescindibles los siguientes: PROVINCIA, MUNICIPIO, DISTRITO y SECCION para este tipo de busqueda");
  document.F1.cnhop.focus();
  return false;
}
if(document.F1.csec.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "")) {
   alert("Ha introducido la SECCION, pero son imprescindibles los siguientes: PROVINCIA, MUNICIPIO y DISTRITO para este tipo de busqueda");
   document.F1.csec.focus();
   return false;
}

if(document.F1.cdist.value != "" && isNaN(document.F1.cdist.value)) {
  alert("Distrito no numérico\r\rIntroducta datos numéricos"); 
  document.F1.cdist.focus(); 
  return false;
}

if (document.F1.cdist.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "")) {
   alert("Ha introducido el DISTRITO, pero son imprescindibles los siguientes: PROVINCIA y MUNICIPIO para este tipo de busqueda");
   document.F1.cdist.focus();
   return false;
} 


if(document.F1.cfnac.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido la FECHA DE NACIMIENTO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.ccpron.value != "" && (document.F1.ape22.value == "")) {
   alert("Ha introducido la PROVINCIA DE NACIMIENTO, pero es imprescindible intoducir ambos APELLIDOS para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.ccmunn.value != "" && (document.F1.ccpron.value == "")) { 
   alert("Ha introducido la MUNICIPIO/PAIS DE NACIMIENTO, pero es imprescindible la PROVINCIA/(66-Extranjero) para este tipo de busqueda");
   document.F1.ccpron.focus();
   return false;
}				
if (document.F1.ape22.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido el APELLIDO SEGUNDO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.nombre22.value != "" && (document.F1.ape12.value == "")) {
    alert("Ha introducido el NOMBRE, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
    document.F1.ape12.focus();
    return false;
}
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {
   alert("Ha introducido el CODIGO DE MUNICIPIO pero es imprescindible el codigo de PROVINCIA");
   document.F1.Cprox.focus();
   return false;
}
return true;
}


function com_con_n3()  { 
var bdev;

if(document.F1.Cprox.value =="" && document.F1.Cmunx.value =="" && document.F1.ape12.value ==""  && document.F1.ape22.value =="" 
   && document.F1.nombre22.value ==""  && document.F1.cfnac.value =="" && document.F1.ciden.value =="" && document.F1.cnia.value =="" 
   && document.F1.cdist.value =="" && document.F1.csec.value =="" && document.F1.cnhop.value =="") {  
  alert("No hay suficientes datos para hacer la búsqueda, debe introducir al menos el campo de Primer Apellido"); 
  document.F1.ape12.focus(); 
  return false;
}  

if(document.F1.Cprox.value !="" && isNaN(document.F1.Cprox.value)) {
  alert("La provincia no es numérica"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(isNaN(document.F1.Cmunx.value)) {
  alert("Municipio no numérico"); 
  document.F1.Cmunx.focus(); 
  return false;
}

if(document.F1.ccpron.value !="" && isNaN(document.F1.ccpron.value)) {
  alert("La PROVINCIA DE NACIMIENTO  no es numérica"); 
  document.F1.ccpron.focus(); 
  return false;
}  
if(document.F1.ccmunn.value !="" && isNaN(document.F1.ccmunn.value)) {
  alert("El MUNICIPIO DE NACIMIENTO no es numérico"); 
  document.F1.ccmunn.focus(); 
  return false;
}  
if(document.F1.cfnac.value !="" && isNaN(document.F1.cfnac.value)) {
  alert("La FECHA DE NACIMIENTO no es numérica <formato FECHA:aaaammdd>"); 
  document.F1.cfnac.focus(); 
  return false;
} 
 
if(document.F1.cnia.value != "" && (document.F1.Cmunx.value == "" || document.F1.Cprox.value == "")) {  
  alert("Ha introducido el NUMERO DE IDENTIFICACIÓN DEL AYUNTAMIENTO. Es necesario el codigo de PROVINCIA y de MUNICIPIO"); 
  document.F1.cnia.focus(); 
  return false; 
} 
if(document.F1.cnhop.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "" || document.F1.csec.value == "")) {
  alert("Ha introducido NÚMERO DE HOJA PADRONAL, pero son imprescindibles los siguientes: PROVINCIA, MUNICIPIO, DISTRITO y SECCION para este tipo de busqueda");
  document.F1.cnhop.focus();
  return false;
}
if(document.F1.csec.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "")) {
   alert("Ha introducido la SECCION, pero son imprescindibles los siguientes: PROVINCIA, MUNICIPIO y DISTRITO para este tipo de busqueda");
   document.F1.csec.focus();
   return false;
}

if(document.F1.cdist.value != "" && isNaN(document.F1.cdist.value)) {
  alert("Distrito no numérico\r\rIntroduzca datos numéricos"); 
  document.F1.cdist.focus(); 
  return false;
}

if (document.F1.cdist.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "")) {
   alert("Ha introducido el DISTRITO, pero son imprescindibles los siguientes: PROVINCIA y MUNICIPIO para este tipo de busqueda");
   document.F1.cdist.focus();
   return false;
} 


if (document.F1.ccmunn.value != "" && (document.F1.ccpron.value == "")) { 
   alert("Ha introducido la MUNICIPIO/PAIS DE NACIMIENTO, pero es imprescindible la PROVINCIA/(66-Extranjero) para este tipo de busqueda");
   document.F1.ccpron.focus();
   return false;
}				
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {
   alert("Ha introducido el CODIGO DE MUNICIPIO pero es imprescindible el codigo de PROVINCIA");
   document.F1.Cprox.focus();
   return false;
}
return true;
}


function volver2() {
                            var sInfo = navigator.appName.toLowerCase();
                            if (sInfo=="netscape"){
                            	window.history.go(-2);
                            }	
                            else{
                            	window.history.back();
                            	window.history.back();
                            }
                            return;
                    } 
                   
function com_con_coter()  { 
var bdev;

if ( document.F1.descri.options[document.F1.descri.selectedIndex].value=="0" ) {
   alert("Es obligatorio introducir la descripción");
   document.F1.descri.focus();
   return false;		   
  }

if(document.F1.Cprox.value =="" && document.F1.Cmunx.value =="" && document.F1.ape12.value ==""  && document.F1.ape22.value =="" 
   && document.F1.nombre22.value ==""  && document.F1.cfnac.value =="" && document.F1.ciden.value =="") {  
  alert("No hay suficientes datos para hacer la búsqueda, debe introducir al menos los campos: PRIMER APELLIDO y SEGUNDO APELLIDO"); 
  document.F1.ape12.focus(); 
  return false;
}  

if (document.F1.Cprox.value !="" && (document.F1.Cprox.value <1 || document.F1.Cprox.value >52))
{    
document.F1.Cprox.focus(); 
alert("Seleccione un CÓDIGO de PROVINCIA válido");
return false;
}

if(document.F1.Cprox.value !="" && document.F1.Cmunx.value =="" && document.F1.ape12.value =="") 
{  
  alert("No hay suficientes datos para realizar la búsqueda.\nDebe introducir al menos los campos: PROVINCIA y MUNICIPIO"); 
  document.F1.Cprox.focus(); 
  return false;
 }
 

    
if (document.F1.Cprox.value =="" && (document.F1.Cmunx.value !=""))
{
alert("Seleccione un CÓDIGO de PROVINCIA");
document.F1.Cprox.focus(); 
return false;
}
    

if(document.F1.Cprox.value !="" && isNaN(document.F1.Cprox.value)) {
  alert("La PROVINCIA no es numérica"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(isNaN(document.F1.Cmunx.value)) {
  alert("El MUNICIPIO no es numérico"); 
  document.F1.Cmunx.focus(); 
  return false;
}

if(document.F1.ccpron.value !="" && isNaN(document.F1.ccpron.value)) {
  alert("La PROVINCIA DE NACIMIENTO no es numérica"); 
  document.F1.ccpron.focus(); 
  return false;
}  
if(document.F1.ccmunn.value !="" && isNaN(document.F1.ccmunn.value)) {
  alert("El MUNICIPIO DE NACIMIENTO no es numérico"); 
  document.F1.ccmunn.focus(); 
  return false;
}  
if(document.F1.cfnac.value !="" &&  isNaN(document.F1.cfnac.value)) {
  alert("La FECHA DE NACIMIENTO no es numérica <formato FECHA:aaaammdd>"); 
  document.F1.cfnac.focus(); 
  return false;
}
if(document.F1.cvia_e.value !="" && isNaN(document.F1.cvia_e.value)) {
alert("El campo CÓDIGO de VÍA debe ser numérico"); 
document.F1.cvia_e.focus(); 
return false;
}    

if(document.F1.cpsvia_e.value !="" && isNaN(document.F1.cpsvia_e.value)) {
alert("El campo CÓDIGO de PSEUDOVÍA debe ser numérico");
document.F1.cpsvia_e.focus();
return false;
}      

if(document.F1.centco_e.value !="" && isNaN(document.F1.centco_e.value)) {
alert("El campo CÓDIGO de ENTIDADES COLECTIVAS debe ser numérico");
document.F1.centco_e.focus();
return false;
}

if(document.F1.centsi_e.value !="" && isNaN(document.F1.centsi_e.value)) {
alert("El campo CÓDIGO de ENTIDADES SINGULARES debe ser numérico"); 
document.F1.centsi_e.focus();
return false;
}

if(document.F1.cnucle_e.value !="" && isNaN(document.F1.cnucle_e.value)) {
alert("El campo CÓDIGO de NUCLEO/DISEMINADO debe ser numérico"); 
document.F1.cnucle_e.focus(); 
return false;
}
    
if(document.F1.csec.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "")) {
   alert("Ha introducido la SECCION, pero son imprescindibles los siguientes campos: PROVINCIA, MUNICIPIO y DISTRITO para este tipo de búsqueda");
   document.F1.csec.focus();
   return false;
}
if (document.F1.cdist.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "")) {
   alert("Ha introducido el DISTRITO, pero son imprescindibles los siguientes campos: PROVINCIA y MUNICIPIO para este tipo de búsqueda");
   document.F1.cdist.focus();
   return false;
} 
if(document.F1.cfnac.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido la FECHA DE NACIMIENTO, pero es imprescindible el PRIMER APELLIDO para este tipo de búsqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.ccpron.value != "" && (document.F1.ape22.value == "")) {
   alert("Ha introducido la PROVINCIA DE NACIMIENTO, pero son imprescindibles los siguientes campos: PRIMER APELLIDO y SEGUNDO APELLIDO para este tipo de búsqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.ccmunn.value != "" && (document.F1.ccpron.value == "")) { 
   alert("Ha introducido la MUNICIPIO/PAIS DE NACIMIENTO, pero es imprescindible la PROVINCIA/(66-Extranjero) para este tipo de búsqueda");
   document.F1.ccpron.focus();
   return false;
}				
if (document.F1.ape22.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido el SEGUNDO APELLIDO, pero es imprescindible el PRIMER APELLIDO para este tipo de búsqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.nombre22.value != "" && (document.F1.ape12.value == "")) {
    alert("Ha introducido el NOMBRE, pero es imprescindible el PRIMER APELLIDO para este tipo de búsqueda");
    document.F1.ape12.focus();
    return false;
}
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {
   alert("Ha introducido el CÓDIGO DE MUNICIPIO pero es imprescindible el CÓDIGO de PROVINCIA para este tipo de búsqueda");
   document.F1.Cprox.focus();
   return false;
}

}



function com_con_cati()  { 
var bdev;

if ( document.F1.descri.options[document.F1.descri.selectedIndex].value=="0" ) {
   alert("Es obligatorio introducir la descripción");
   document.F1.descri.focus();
   return false;		   
  }

if(document.F1.Cprox.value =="" && document.F1.Cmunx.value =="" && document.F1.ape12.value ==""  && document.F1.ape22.value =="" 
   && document.F1.nombre22.value =="") {  
  alert("No hay suficientes datos para hacer la búsqueda, debe introducir al menos el campo PRIMER APELLIDO"); 
  document.F1.ape12.focus(); 
  return false;
}  

if(document.F1.Cprox.value !="" && isNaN(document.F1.Cprox.value)) {
  alert("La PROVINCIA no es numérica"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(isNaN(document.F1.Cmunx.value)) {
  alert("MUNICIPIO no numérico"); 
  document.F1.Cmunx.focus(); 
  return false;
}
if (document.F1.ape22.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido el SEGUNDO APELLIDO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.nombre22.value != "" && (document.F1.ape12.value == "")) {
    alert("Ha introducido el NOMBRE, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
    document.F1.ape12.focus();
    return false;
}
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {
   alert("Ha introducido el CODIGO DE MUNICIPIO pero es imprescindible el codigo de PROVINCIA");
   document.F1.Cprox.focus();
   return false;
}

}



function com_con_ex()  { 
var bdev;

if(document.F1.Cprox.value =="" && document.F1.Cmunx.value =="" && document.F1.ape12.value ==""  && document.F1.ape22.value =="" 
   && document.F1.nombre22.value ==""  && document.F1.cfnac.value =="" && document.F1.ciden.value =="" && document.F1.cnia.value =="" 
   && document.F1.cdist.value =="" && document.F1.csec.value =="" && document.F1.cnhop.value =="") {  
  alert("No hay suficientes datos para hacer la búsqueda, debe introducir al menos el campo PRIMER APELLIDO"); 
  document.F1.ape12.focus(); 
  return false;
}  

if(((document.F1.ape12.value =="" || document.F1.sel12.value == "empieza por") && (document.F1.ape22.value =="" || document.F1.sel22.value == "empieza por"))  && document.F1.ciden.value =="" && document.F1.cnia.value =="") {  
  alert("No hay suficientes datos para hacer la búsqueda, debe introducir al menos el campo PRIMER APELLIDO"); 
  document.F1.ape12.focus(); 
  return false;
}  

if(document.F1.cpais.value < 100  && document.F1.cpais.value !=0 && document.F1.cpais.value !="" ) {  
  alert("CÓDIGO DE NACIONALIDAD inválido"); 
  document.F1.cpais.focus(); 
  return false;
}

if(document.F1.cpais.value != document.F1.npais.value) {  
  alert("CÓDIGO/NOMBRE DE NACIONALIDAD inconsistentes"); 
  document.F1.cpais.focus(); 
  return false;
} 

if(document.F1.Cprox.value !="" && isNaN(document.F1.Cprox.value)) {
  alert("La PROVINCIA no es numérica"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(isNaN(document.F1.Cmunx.value)) {
  alert("MUNICIPIO no numérico"); 
  document.F1.Cmunx.focus(); 
  return false;
}
if(document.F1.cnia.value != "" && (document.F1.Cmunx.value == "" || document.F1.Cprox.value == "")) {  
  alert("Ha introducido el NUMERO DE IDENTIFICACIÓN DEL AYUNTAMIENTO. Es necesario el codigo de PROVINCIA y de MUNICIPIO"); 
  document.F1.cnia.focus(); 
  return false; 
} 
if(document.F1.cnhop.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "" || document.F1.csec.value == "")) {
  alert("Ha introducido NÚMERO DE HOJA PADRONAL, pero son imprescindibles los siguientes: PROVINCIA, MUNICIPIO, DISTRITO y SECCION para este tipo de busqueda");
  document.F1.cnhop.focus();
  return false;
}
if(document.F1.csec.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "" || document.F1.cdist.value == "")) {
   alert("Ha introducido la SECCION, pero son imprescindibles los siguientes: PROVINCIA, MUNICIPIO y DISTRITO para este tipo de busqueda");
   document.F1.csec.focus();
   return false;
}
if (document.F1.cdist.value != "" && (document.F1.Cprox.value == "" || document.F1.Cmunx.value == "")) {
   alert("Ha introducido el DISTRITO, pero son imprescindibles los siguientes: PROVINCIA y MUNICIPIO para este tipo de busqueda");
   document.F1.cdist.focus();
   return false;
} 
if(document.F1.cfnac.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido la FECHA DE NACIMIENTO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}

if (document.F1.ape22.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido el SEGUNDO APELLIDO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.nombre22.value != "" && (document.F1.ape12.value == "")) {
    alert("Ha introducido el NOMBRE, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
    document.F1.ape12.focus();
    return false;
}
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {
   alert("Ha introducido el CODIGO DE MUNICIPIO pero es imprescindible el codigo de PROVINCIA");
   document.F1.Cprox.focus();
   return false;
}

}


function comprueba_datos()  { 
var bdev;

if(document.F1.Cprox.value =="" && document.F1.Cmunx.value =="" && document.F1.ape12.value ==""  && document.F1.ape22.value =="" 
   && document.F1.nombre22.value ==""  && document.F1.cfnac.value =="" && document.F1.ciden.value =="" && document.F1.cnia.value =="" 
   && document.F1.anoref.value =="" && document.F1.mesref.value =="" && document.F1.ccpron.value =="" 
   && document.F1.ccmunn.value =="" ) {  
  alert("No hay suficientes datos para realizar la búsqueda.\n Debe introducir al menos lo campos de PROVINCIA y MUNICIPIO"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(document.F1.Cprox.value !="" && isNaN(document.F1.Cprox.value)) {
  alert("La PROVINCIA no es numérica"); 
  document.F1.Cprox.focus(); 
  return false;
}  

if(document.F1.Cmunx.value !="" && isNaN(document.F1.Cmunx.value)) {
  alert("MUNICIPIO no numérico"); 
  document.F1.Cmunx.focus(); 
  return false;
}

if(document.F1.anoref.value !="" && isNaN(document.F1.anoref.value)) {
  alert("AÑO DE REFERENCIA no numérico"); 
  document.F1.anoref.focus(); 
  return false;
}

if(document.F1.mesref.value !="" && isNaN(document.F1.mesref.value)) {
  alert("MES DE REFERENCIA no numérico"); 
  document.F1.mesref.focus(); 
  return false;
}

if(document.F1.cfnac.value !="" && isNaN(document.F1.cfnac.value)) {
  alert("La FECHA DE NACIMIENTO no es numérica <formato FECHA:aaaammdd>"); 
  document.F1.cfnac.focus(); 
  return false;
}

if(document.F1.ccpron.value !="" && isNaN(document.F1.ccpron.value)) {
  alert("PROVINCIA DE NACIMIENTO no numérica"); 
  document.F1.ccpron.focus(); 
  return false;
}

if(document.F1.ccmunn.value !="" && isNaN(document.F1.ccmunn.value)) {
  alert("MUNICIPIO DE NACIMIENTO no numérico"); 
  document.F1.ccmunn.focus(); 
  return false;
}


if(document.F1.cfnac.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido la FECHA DE NACIMIENTO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}

if (document.F1.ccpron.value != "" && (document.F1.ape22.value == "")) {
   alert("Ha introducido la PROVINCIA DE NACIMIENTO, pero es imprescindible el SEGUNDO APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}

if (document.F1.ccmunn.value != "" && (document.F1.ccpron.value == "")) { 
   alert("Ha introducido la MUNICIPIO/PAIS DE NACIMIENTO, pero es imprescindible la PROVINCIA/(66-Extranjero) para este tipo de busqueda");
   document.F1.ccpron.focus();
   return false;
}				
if (document.F1.ape22.value != "" && (document.F1.ape12.value == "")) {
   alert("Ha introducido el APELLIDO SEGUNDO, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
   document.F1.ape12.focus();
   return false;
}
if (document.F1.nombre22.value != "" && (document.F1.ape12.value == "")) {
    alert("Ha introducido el NOMBRE, pero es imprescindible el PRIMER APELLIDO para este tipo de busqueda");
    document.F1.ape12.focus();
    return false;
}
if(document.F1.Cmunx.value != "" && (document.F1.Cprox.value == "")) {
   alert("Ha introducido el CODIGO DE MUNICIPIO pero es imprescindible el codigo de PROVINCIA");
   document.F1.Cprox.focus();
   return false;
}



}

function resumen() {
if (comprueba_err()) {
   if (document.F1.Cmunx.value == "")  { 
	alert("Para presentación del resumen numérico son imprescindibles el codigo de PROVINCIA y el de MUNICIPIO");
	document.F1.Cprox.focus();
	} else{
	location.href="P4KERPE.RESUMEN?Cprox=" + document.F1.Cprox.value + "&Cmunx=" + document.F1.Cmunx.value;
	}
  }
}

function DM(msgStr) { 
  status=msgStr;
  document.RV = true;
}

function pon(a) {
   eval("d"+a+".style.backgroundColor='#4B4B4B'");
   eval("d"+a+".style.color='#FFFFFF'");
   return true;
   }
function quita(a) {
   eval("d"+a+".style.backgroundColor='#FFFFFF'");
   eval("d"+a+".style.color='#4B4B4B'");
   return true;
   }

function pon2(a) {
   eval("d"+a+".style.backgroundColor='#D4D0C8'");
   return true;
   }
function quita2(a) {
   eval("d"+a+".style.backgroundColor='#FFFFFF'");
   return true;
   }


function comprueba_sofi()
 {
  if(document.F1.TSELECC[0].checked &&	(document.F1.v_Cpro0.value == "" || 
	document.F1.v_Cmun0.value == "" ||
	document.F1.v_FechaRef0.value == "" ))
 { 
  alert("TIPO DE SOLICITUD 1 \r \rProvincia\rMunicipio\rFecha de Referencia\r\r Deben estar cumplimentadas");
  document.F1.v_Cpro0.focus();
  return false;
 }  
   if (document.F1.TSELECC[1].checked && ( document.F1.v_Cpro1.value == "" || 
						   document.F1.v_Cmun1.value == "" || 
						   document.F1.v_FechaRef1.value == "" || 
						   document.F1.v_Dist1.value == "" || 
						   document.F1.v_Secc1.value == ""))
 { 
  alert("TIPO DE SOLICITUD 2 \r\rProvincia\rMunicipio\rFecha de Referencia\rDistrito y Sección\r\rDeben estar cumplimentados");
  document.F1.v_Cpro1.focus();
  return false;
 } 
  if (document.F1.TSELECC[2].checked && ( document.F1.v_Cpro2.value == "" || 
						  document.F1.v_Cmun2.value == "" || 
						  document.F1.v_FechaRef2.value == "" || 
						  document.F1.v_UP2.value == ""))
 { 
  alert("TIPO DE SOLICITUD 3\r\rProvincia\rMunicipio\rFecha de Referencia\rUnidad Poblacional\r\rDeben estar cumplimentadas");
  document.F1.v_Cpro2.focus();
  return false;
 } 
   if (document.F1.TSELECC[3].checked &&  (document.F1.v_Cpro3.value == "" || 
						   document.F1.v_Cmun3.value == "" || 
						   document.F1.v_Fecha_Ini3.value == "" || 
						   document.F1.v_Fecha_Fin3.value == "" || 
						   document.F1.v_Cvar3.value == "" || 
						   document.F1.v_Cauv3.value == ""))
 { 
  alert("TIPO DE SOLICITUD 4 \r\rProvincia\rMunicipio\rFecha Inicial\rFecha Final\rClave y Causa de Variación\r\rDeben estar cumplimentadas");
  document.F1.v_Cpro3.focus();
  return false;
 } 
 } 
 
 function comprueba_municipio() {
 
 if(document.F1.Cprox.value =="" || isNaN(document.F1.Cprox.value)) {
   alert("Para búsquedas de datos territoriales es necesario el CÓDIGO DE PROVINCIA Y MUNICIPIO"); 
   document.F1.Cprox.focus(); 
   return false;
 }  
 
 if(document.F1.Cmunx.value =="" || isNaN(document.F1.Cmunx.value)) {
   alert("Para búsquedas de datos territoriales es necesario el CÓDIGO DE MUNICIPIO NUMÉRICO"); 
   document.F1.Cmunx.focus(); 
   return false;
 } 
 return true;
 }
 
 function comprueba_colectiva() {
 
 if(document.F1.centco_e.value !="" && isNaN(document.F1.centco_e.value)) {
   alert("Si introduce código de E.Colectiva, éste debe ser numérico."); 
   document.F1.centco_e.focus(); 
   return false;
 }  
 return comprueba_municipio();
 
}

function existe_colectiva() {
if(document.F1.centco_e.value =="" || isNaN(document.F1.centco_e.value)) {
  alert("Es necesario introducir el Código de E.Colectiva"); 
  document.F1.centco_e.focus(); 
  return false;
}
return comprueba_municipio();
}

function existe_singular() {

if(document.F1.centsi_e.value =="" || isNaN(document.F1.centsi_e.value)) {
  alert("Es necesario introducir el Código de E.Singular"); 
  document.F1.centsi_e.focus(); 
  return false;
}  
return existe_colectiva();
}

function comprueba_singular() {
if(document.F1.centsi_e.value !="" && isNaN(document.F1.centsi_e.value)) {
  alert("Si introduce código de E.Singular, éste debe ser numérico"); 
  document.F1.centsi_e.focus(); 
  return false;
}  

return existe_colectiva();

}

function comprueba_nucleo() {

if(document.F1.cnucle_e.value !="" && isNaN(document.F1.cnucle_e.value)) {
  alert("Si introduce código de Núcleo/Diseminado, éste debe ser numérico"); 
  document.F1.cnucle_e.focus(); 
  return false;
} 

return existe_singular();

}

function comprueba_vias() {


if(document.F1.cvia_e.value !="" && isNaN(document.F1.cvia_e.value)){
  alert("Código de Vía no numérico. \r\n Si introduce CÓDIGO DE VÍA, debe ser numérico"); 
  document.F1.cvia_e.focus(); 
  return false;
}

if(document.F1.cvia_e.value =="" && document.F1.nvia_e.value =="") {
  alert("Para búsquedas de VÍAS es necesario introducir el CÓDIGO  o parte del NOMBRE DE LA VÍA"); 
  document.F1.cvia_e.focus(); 
  return false;
}  


return comprueba_municipio();

}

function comprueba_vias_ex() {
if(document.F1.nvia_e.value =="") {
  alert("Para búsquedas de VÍAS es necesario introducir parte del NOMBRE DE LA VÍA"); 
  document.F1.nvia_e.focus(); 
  return false;
}  
return comprueba_municipio();

}


function comprueba_pseudovias() {


if(document.F1.cpsvia_e.value !="" && isNaN(document.F1.cpsvia_e.value)){
  alert("Código de Pseudo-Vía no numérico. \r\n Si introduce CÓDIGO DE Pseudi-Vía, debe ser numérico"); 
  document.F1.cpsvia_e.focus(); 
  return false;
}

if(document.F1.cpsvia_e.value =="" && document.F1.dpsvia_e.value =="") {
  alert("Para búsquedas de Pseudo-Vías es necesario introducir el CÓDIGO o parte del Nombre de la Pseudo-Vía"); 
  document.F1.cpsvia_e.focus(); 
  return false;
}  


return comprueba_municipio();

}



function damevalor( valor ) {
   window.status =  valor ; 
   return true;
}

function isDate(fecha) {
if (fecha.length != 8){return false;}

var ano=fecha.substr(0,4);
var mes=fecha.substr(4,2);
var dia=fecha.substr(6,2);

if ((dia < 1) || (dia > 31) || (mes < 1) || (mes > 12) || (ano < 0)) {return false;}
if (mes == 2) {
   if (dia > 29) {return false;}
   if ((dia == 29) && !((ano % 400 == 0) || ((ano % 4 == 0) && !(ano % 100 == 0)))){return false;}
}
else if ((dia == 31) && ((mes == 4) || (mes == 6) || (mes == 9) || (mes == 11))) {return false;}
return true;
}