function ventanaSecundaria (URL){ 
   window.open(URL,"ventana1","width=420,height=400,scrollbars=YES") 
} 

function cambiaprovi3(pais){
	
	
	var idpais=pais.value;
	
	
	var pURL='../js/provincias2.php?id_pais='+idpais;

	var pFunc='makeList33';
	if (window.XMLHttpRequest) { // code for Mozilla, Safari, etc 
		xmlhttp=new XMLHttpRequest();
		//xmlhttp.onreadystatechange=makeList;
		eval('xmlhttp.onreadystatechange='+pFunc+';');
		xmlhttp.open("GET", pURL, true); // leave true for Gecko
		xmlhttp.send(null);
	} else if (window.ActiveXObject) { //IE 
		xmlhttp=new ActiveXObject('Microsoft.XMLHTTP'); 
		if (xmlhttp) {
			//xmlhttp.onreadystatechange=makeList33;
			eval('xmlhttp.onreadystatechange='+pFunc+';');
			xmlhttp.open('GET', pURL, false);
			xmlhttp.send();
		}
	}
}




function makeList33() {
	var textos=new Array();
	var valores=new Array();
	campo='document.ficha.provincia';
	
	
	if (xmlhttp.readyState==4) { 
		if (xmlhttp.status==200) { 
			var tmpArr=xmlhttp.responseText.split('\n');
			var tmp;
			var val;
			var txt;
			for (var idx=0;idx<tmpArr.length;idx++) {
				tmp=tmpArr[idx].split(';');
				val = tmp[0];
				txt = tmp[1];
			textos[idx]=txt;	
			valores[idx]=val;
			
			}

		cprovincia=eval(campo);
		cprovincia.length=valores.length;
		cprovincia.options[0].text = "Seleccione";
		cprovincia.options[0].value = 0;
		var i=1;
		
	for(i=1;i<valores.length;i++){
			cprovincia.options[i].text = textos[i-1];
			cprovincia.options[i].value = valores[i-1];
			
			

	
				}
			//xmlhttp.responseText;
		}
	}
}

//funciones de chekeo de campos

function compruebaCpProvinciaEspanola(p, cp){

var cps = new Array() 

cps['115']='15'; 
cps['114']='03'; 
cps['83']='01'; 
cps['116']='02'; 
cps['117']='04'; 
cps['118']='33'; 
cps['84']='05'; 
cps['105']='06'; 
cps['113']='07'; 
cps['104']='08'; 
cps['103']='09'; 
cps['102']='10'; 
cps['101']='11'; 
cps['109']='39'; 
cps['119']='12'; 
cps['134']='51'; 
cps['112']='13'; 
cps['120']='14'; 
cps['100']='16'; 
cps['111']='17'; 
cps['121']='18'; 
cps['99']='19'; 
cps['98']='20'; 
cps['122']='21'; 
cps['97']='22'; 
cps['110']='23'; 
cps['123']='26'; 
cps['132']='35'; 
cps['124']='24'; 
cps['85']='25'; 
cps['125']='27'; 
cps['126']='28'; 
cps['127']='29'; 
cps['133']='52'; 
cps['128']='30'; 
cps['96']='31'; 
cps['86']='32'; 
cps['129']='34'; 
cps['95']='36'; 
cps['94']='37'; 
cps['130']='38'; 
cps['131']='40'; 
cps['93']='41'; 
cps['92']='42'; 
cps['108']='43'; 
cps['91']='44'; 
cps['90']='45'; 
cps['107']='46'; 
cps['87']='47'; 
cps['106']='48'; 
cps['89']='49'; 
cps['88']='50'; 

   if(cp.substr(0,2)!=cps[p]) return false;
   return true;

}

function compruebaTelefonoProvinciaEspanola(p, tel){


var prefijos = new Array()    

prefijos['115']='981'; 
prefijos['114']='96'; 
prefijos['83']='945'; 
prefijos['116']='967'; 
prefijos['117']='950'; 
prefijos['118']='98'; 
prefijos['84']='920'; 
prefijos['105']='924'; 
prefijos['113']='97'; 
prefijos['104']='93'; 
prefijos['103']='947'; 
prefijos['102']='927'; 
prefijos['101']='956'; 
prefijos['109']='942'; 
prefijos['119']='964'; 
prefijos['134']='956'; 
prefijos['112']='926'; 
prefijos['120']='957'; 
prefijos['100']='969'; 
prefijos['111']='972'; 
prefijos['121']='958'; 
prefijos['99']='949'; 
prefijos['98']='943'; 
prefijos['122']='959'; 
prefijos['97']='974'; 
prefijos['110']='953'; 
prefijos['123']='941'; 
prefijos['132']='928'; 
prefijos['124']='987'; 
prefijos['85']='973'; 
prefijos['125']='982'; 
prefijos['126']='91'; 
prefijos['127']='95'; 
prefijos['133']='95'; 
prefijos['128']='968'; 
prefijos['96']='948'; 
prefijos['86']='988'; 
prefijos['129']='979'; 
prefijos['95']='986'; 
prefijos['94']='923'; 
prefijos['130']='922'; 
prefijos['131']='921'; 
prefijos['93']='95'; 
prefijos['92']='975'; 
prefijos['108']='977'; 
prefijos['91']='978'; 
prefijos['90']='925'; 
prefijos['107']='96'; 
prefijos['87']='983'; 
prefijos['106']='94'; 
prefijos['89']='980'; 
prefijos['88']='976'; 
   

var longitud = prefijos[p].length;    
var primero  = tel.substr(0,1);

  if(primero  == "1") return false;
  if(primero  == "2") return false;
	if(primero  == "3") return false;
	if(primero  == "4") return false;
	if(primero  == "5") return false;
	if(primero  == "6") return true;
	if(primero  == "7") return false;
	if(primero  == "8") return true;
	if(primero  == "0") return false;
	
		
   if((primero == "9")&&(tel.substr(0,longitud) != prefijos[p])) return false;
   return true;

}

function isEmail(string) {
if (string.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1)
return true;
else
return false;
}

function IsNumeric(strString)
   //  check for valid numeric strings	
   {
   var strValidChars = "0123456789.-";
   var strChar;
   var blnResult = true;

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

   //  test strString consists of valid characters listed above
   for (i = 0; i < strString.length && blnResult == true; i++)
      {
      strChar = strString.charAt(i);
      if (strValidChars.indexOf(strChar) == -1)
         {
         blnResult = false;
         }
      }
   return blnResult;
   }


function testform2(){

var inicialmen ='LOS SIGUIENTES CAMPOS HAN DE SER CUMPLIMENTADOS:\n';
var mensaje ='\nSE HAN DETECTADO LOS SIGUIENTES ERRORES: \n';
var check=0;
var check2=0;
var necesarios='';
var imprime='';

var campopai =document.getElementById('cup_pais');
var pai = campopai.value;

var obj = document.getElementById('cup_nombre');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "nombre,";
var check2=1;
}
var obj = document.getElementById('cup_direccion');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "dirección,";
var check2=1;
}
var obj = document.getElementById('cup_edad');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "edad,";
var check2=1;
}
var obj = document.getElementById('cup_poblacion');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "localidad,";
var check2=1;
}
var obj = document.getElementById('cup_telefono');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "telefono,";
var check2=1;
}
var obj = document.getElementById('cup_cp');
var campo =obj.value;
var numer =IsNumeric(campo);

if(pai == 8){
var campopro =document.getElementById('provincia');
var p = campopro.value;
var counttel = campo.length;
var pretel =compruebaCpProvinciaEspanola(p, campo);

if (!campo){var necesarios = necesarios + "c.p.,";var check2=1;}else{
if (!numer){var mensaje = mensaje + 'El campo C.P. ha de ser un valor numérico.\n';var check=1;}else{
if (counttel!=5){var mensaje = mensaje + 'El campo C.P. ha de ser un valor numérico de 5 cifras.\n';var check=1;}else{

if (!pretel){var mensaje = mensaje + 'C.P. no corresponde a la provincia selecionada.\n';var check=1;}else{
}}}
}
}
var obj = document.getElementById('cup_email');
var campo =obj.value;
var numer =isEmail(campo);

if(campo){

if(numer){
}else{
var mensaje = mensaje + 'El campo E-MAIL no tiene formato de E-mail valido.\n';
var check=1;
}


}else{
var necesarios = necesarios + "e-mail,";
var check2=1;
}

if(check2){var imprime=inicialmen + necesarios + '\n';}
if(check){var imprime=imprime + mensaje;}
if(imprime){
alert(imprime);
return false;
}


}
//fin testform2

function testform(){

var inicialmen ='LOS SIGUIENTES CAMPOS HAN DE SER CUMPLIMENTADOS:\n';
var mensaje ='\nSE HAN DETECTADO LOS SIGUIENTES ERRORES: \n';
var check=0;
var check2=0;
var necesarios='';
var imprime='';

var campopai =document.getElementById('cup_pais');
var pai = campopai.value;

var obj = document.getElementById('cup_nombre');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "nombre,";
var check2=1;
}

var obj = document.getElementById('cup_apellidos');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "apellidos,";
var check2=1;
}

var obj = document.getElementById('cup_direccion');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "dirección,";
var check2=1;
}

var obj = document.getElementById('cup_estudios');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "nivel de estudios,";
var check2=1;
}

var obj = document.getElementById('cup_poblacion');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "localidad,";
var check2=1;
}

var obj = document.getElementById('masc');
var campo =obj.checked;

var obj2 = document.getElementById('feme');
var campo2 =obj2.checked;

if(campo || campo2){
}else{
var necesarios = necesarios + "sexo,";
var check2=1;
}



var obj = document.getElementById('fecha[dia]');
var campo =obj.value;

var obj2 = document.getElementById('fecha[mes]');
var campo2 =obj2.value;

var obj3 = document.getElementById('fecha[anio]');
var campo3 =obj3.value;

if(campo && campo2 && campo3){
}else{
var necesarios = necesarios + "fecha de nacimiento,";
var check2=1;
}

var obj = document.getElementById('cup_email');
var campo =obj.value;
var numer =isEmail(campo);

if(campo){

if(numer){
}else{
var mensaje = mensaje + 'El campo E-MAIL no tiene formato de E-mail valido.\n';
var check=1;
}


}else{
var necesarios = necesarios + "e-mail,";
var check2=1;
}

var obj = document.getElementById('cup_tel1');
var campo =obj.value;
var campo=campo.replace(/ /g,'');
var numer =IsNumeric(campo);

if(pai == 8){
var campopro =document.getElementById('provincia');
var p = campopro.value;
var counttel = campo.length;
if(p==0){
var pretel = true;
}else{
var pretel =compruebaTelefonoProvinciaEspanola(p, campo);
}

if (!campo){var necesarios = necesarios + "teléfono,";var check2=1;}else{
if (!numer){var mensaje = mensaje + 'El campo TELÉFONO ha de ser un valor numérico.\n';var check=1;}else{
if (counttel!=9){var mensaje = mensaje + 'El campo TELÉFONO ha de ser un valor numérico de 9 cifras.\n';var check=1;}else{
if (!pretel){var mensaje = mensaje + 'TELÉFONO no corresponde a la provincia selecionada.\n';var check=1;}else{
}}}
}
}


var obj = document.getElementById('cup_cp');
var campo =obj.value;
var numer =IsNumeric(campo);

if(pai == 8){
var campopro =document.getElementById('provincia');
var p = campopro.value;
var counttel = campo.length;
var pretel =compruebaCpProvinciaEspanola(p, campo);

if (!campo){var necesarios = necesarios + "c.p.,";var check2=1;}else{
if (!numer){var mensaje = mensaje + 'El campo C.P. ha de ser un valor numérico.\n';var check=1;}else{
if (counttel!=5){var mensaje = mensaje + 'El campo C.P. ha de ser un valor numérico de 5 cifras.\n';var check=1;}else{

if (!pretel){var mensaje = mensaje + 'C.P. no corresponde a la provincia selecionada.\n';var check=1;}else{
}}}
}
}


var obj = document.getElementById('cup_pais');
var campo =obj.value;
if(campo){
}else{
var necesarios = necesarios + "pais,";
var check2=1;
}

var obj = document.getElementById('provincia');
var campo =obj.value;

if(campo==0){
var necesarios = necesarios + "provincia,";
var check2=1;
}

if(check2){var imprime=inicialmen + necesarios + '\n';}
if(check){var imprime=imprime + mensaje;}
if(imprime){
alert(imprime);
return false;
}
}