//--------------------------------------------------------------------------------------------------------------------------------------------
//			FUNCIONES GENERALES DEL FORMULARIO PARA EJECUTAR ACCIONES
//--------------------------------------------------------------------------------------------------------------------------------------------

//.....................................................................................
// funcion que envia formulario y ejecuta una accion
// necesario: <form action=""  name="form">
//			  <input type=hidden name=accion>
//.....................................................................................
function ejecutar(pagina,accion){
	document.form.accion.value=accion
	document.form.action =pagina
	document.form.submit()
}

function enviar_pag(pagina,accion){
	//document.form.accion.value=accion
	window.open(pagina);
	//document.form.submit()
}

function ejecutar_campo(pagina,accion,campo){
	document.form.accion.value=accion
	document.form.action =pagina
	document.form.auxiliar.value=campo
	document.form.submit()
}

function enviar(pagina){
	document.form.action =pagina
	document.form.submit()
}


function validar_eliminar(pagina,accion,tabla, id_reg){
	if (confirm("Are you sure you want to remove this service?."))
	{
		document.form.accion.value=accion;

		switch(tabla){
			case "bautismos":
				document.form.id_bautismo.value = id_reg;
				break;
			case "matrimonios":
				document.form.id_matrimonio.value = id_reg;
				break;
			case "difuntos":
				document.form.id_difunto.value = id_reg;
		}
		document.form.action =pagina;
		document.form.submit();
	}
}


function validar_no_micro(pagina,accion){
	if(document.form.no_micro.value == 't' && (document.form.t_servicio.value == '1' || document.form.t_servicio.value == '2')){
		alert("Photocopy service can not be selected because this register is not microfilmed. Please, choose any other type of service.");
		return false;
	}
	
	if(document.form.no_img.value == 't' && (document.form.t_servicio.value=='4' || document.form.t_servicio.value=='3')){
		alert("Digital image service can not be selected because this register is not digitalized. Please, choose any other type of service.");
		return false;
	}
	
	if(document.form.t_motivo.value == '0' || document.form.t_servicio.value == '0' || document.form.cantidad.value == ''  ){
		alert("You have to select all the values");
		return false;
	}
	
	ejecutar(pagina,accion);		
	
}
function validar_envio(pagina,accion){
	
	if(document.form.t_envio.value == '0' || document.form.t_forma_pago.value == '0'){
		alert("You must select all the values");
		return false;
}

	ejecutar(pagina,accion);		

}
//--------------------------------------------------------------------------------------------------------------------------------------------
//			FUNCIONES QUE ABREN POP UPS
//--------------------------------------------------------------------------------------------------------------------------------------------

function abrir_pop_up(pagina){
	window.open(pagina,'PopUp','width=600,height=500,screenX=0,screenY=0,top=100,left=200,scrollbars=YES, resizable=YES')
}

function abrir_pop_up2(pagina,ventana){
	window.open(pagina,ventana,'width=600,height=500,screenX=0,screenY=0,top=100,left=200,scrollbars=YES, resizable=YES')
}


//.....................................................................................
//funciones que COMBINADAS abren un pop up  y devuelven en el campo anterior, un valor.
//.....................................................................................


function abrir_ventana_1_col(query,nombre,pag_actual){
	window.open('n_ventana_1_col.php?q='+query+'&nombre='+nombre+'&pag_ant='+pag_actual,'PopUp','width=300,height=400,screenX=500,screenY=700,top=200,left=400,scrollbars=YES, resizable=YES')
}

function cargar_anterior(nombre,valor){
	window.opener.document.form[nombre].value=valor;
	window.close();
}
//cierra el pop up actual y envia el link a la ventana principal
function cerrar_enviar(href){
	window.opener.location.href=href;
	window.close();
}

//--------------------------------------------------------------------------------------------------------------------------------------------
//   FUNICONES GENERALES DE LOS CAMPOS DE LOS FORMULARIOS
//--------------------------------------------------------------------------------------------------------------------------------------------
function focus_next(campo,num,ste){
	// *num* caracteres como maximo
	if (campo.value.length>num-1){
	//alert(ste);
	document.form[ste].focus();
	}
}

function copiar_datos(campo1,campo2){
var valor=document.form[campo1].value;
document.form[campo2].value=valor;
}

function checknumber(name){
var anum=/(^\d+$)|(^\d+\.\d+$)/
	if (anum.test(name.value)){
testresult=true
	}else{
	alert("You must introduce a number")
testresult=false
}
return (testresult)
}

function check_date(name){
	//alert("esta es  la prueba"+name.value);
	var dia=name.value.substr(0,2);
	var guion1=name.value.substr(2,1);
	var mes=name.value.substr(3,2);
	var guion2=name.value.substr(5,1);
	var anho=name.value.substr(6,4);
	
	if ((dia>'0' && dia<'32' ) &&( guion1=='-' || guion1=='/') && (mes>'0' && mes <'13')&& ( guion2=='-' || guion2=='/' ) && (anho >'1900') )
	{
		return 1;
	}else{
		alert("You must introduce a correct date, according to the format dd-mm-yyyy.");
		name.value='';
		name.focus();
	}
}
function check_email(name){
	var anum=/^\w[._\-\w]+@+\w+.+\w+$/
	if (anum.test(name.value))
	{
		return 1;
	}
	else{
		alert("You must introduce a correct e-mail address");
		name.value='';
		name.focus();
	}
}
function check_claves()
{
  var c1=document.form.clave.value;
  var c2=document.form.clave2.value;
  if (c1!=c2)
  {
  	alert("The keys introduced are not equal.");
	document.form.clave.value='';
	document.form.clave2.value='';
	document.form.clave.focus();
  }
}

function fecha_hoy(campo)
{
	var fecha =new Date();
	var dia=fecha.getDay();
	var mes=fecha.getMonth();
	var anho=fecha.getYear();
	mes=mes+1;
	var	fecha_completa=""+dia+"-"+mes+"-"+anho;
	//alert(fecha_completa);
	document.form[campo].value=fecha_completa;
}
function set_valor(campo,valor)
{
	if(document.form[campo].value!=''){
		var texto=" "+document.form[campo].value;
	}else var texto='';
	document.form[campo].value=valor+texto;
}
//--------------------------------------------------------------------------------------------------------------------------------------------
//  FUNCIONES ESPECIFICAS DE CADA FORMULARIO
//--------------------------------------------------------------------------------------------------------------------------------------------
function validar_entrada(pagina){
	if(document.form.id_us.value=='' || document.form.psw.value==''){
		alert ("Debe introducir el numero y clave de usuario.");
	}else{
		enviar(pagina);
	}
}


function validar_usuario(pagina,accion){
	if( document.form.t_usuario.value==3 || document.form.t_usuario.value==4)
	{
		if(document.form.institucion.value=='')
		{ 
		//alert("usuario institucion"+form.t_usuario.value);
		var valores=false;
		}
	}
	if( document.form.nombre.value=='' || document.form.apellido1.value=='' 
	   || document.form.direccion.value=='' || document.form.codigo_postal.value=='' 
	   ||document.form.provincia.value=='' || document.form.t_pais.value=='' 
	   || document.form.email.value=='' )
	{
	 	valores=false;
	}else{
		valores=true;
	}
	
	if(!document.form.privacidad.checked)
	{
		alert("You must accept our data privacy clause to be registered as archive user.");
		valores=false;
	}
	if (valores==true )
	{
		ejecutar(pagina,accion);
	}else{
		alert("You must introcude the files with (*)");
	}
}
function validar_formulario_solicitud(pagina,accion){
	var valores=true;

	if ((document.form.sacramento.value==0)||(document.form.f4_desc_ca.value=='')||(document.form.nombre_persona1.value=='') || (document.form.id_localidad.value=='')|| (document.form.apellido1_persona1.value=='') ||(document.form.fecha_desde.value ==''))
	{
		alert("Debe seleccionar los datos del registro sacramental");
		valores=false;
	}else if ( (document.form.t_motivo.value==0)|| (document.form.t_servicio.value==0))
		{
			alert("Debe seleccionar los datos del servicio");
			valores=false;
		}else if(document.form.usuario_valido.value==''){ 
					if ((document.form.nombre_usuario.value=='')|| (document.form.codigo_postal_usuario.value=='')|| (document.form.localidad_usuario.value=='')|| (document.form.provincia_usuario.value=='')|| (document.form.t_pais.value=='')|| (document.form.email_usuario.value==''))
					{
						alert("Debe seleccionar los datos del usuario");
						valores=false;
					}
			  }else {
					if((document.form.fecha_desde.value !='') && (document.form.fecha_hasta.value ==''))
					{
						document.form.fecha_hasta.value=document.form.fecha_desde.value;
					}
					var fecha_desde=document.form.fecha_desde.value;
					var fecha_hasta=document.form.fecha_hasta.value;
					var dif=fecha_hasta-fecha_desde;
					if(dif>5)
					{
						alert("The dates value must be a 5 years interval.");
						valores=false;
					}
				}
	
	if (valores)
	{
		ejecutar(pagina,accion);
	}
}

function fin_temas(cadena){
	window.opener.document.form.temas.value='si';
	window.opener.document.form.cadena_temas.value=cadena;
	window.close();

}

function validar_pf(campo)
{
	 if (campo.value!='p.' && campo.value!='f.')
	 {
	 alert("El campo debe ser p. o f.  ");
	 campo.focus();
	 }
}

function validar_bautismos(pagina,accion){
//alert("por aqui ha pasado")
	var	valores1= false;
	var valores2= false;
	//alert(document.form[4].name);
	
	
	for (i=4; i<13; i++)
	{
		if ((document.form[i].value!='') && document.form[i].name!='sexo')
		{
			//alert(document.form[i].name);
			valores1=true;
		}
	}
	if (valores1!= true)
	{
	alert("You must introduce, at least, some data about sacramental register location, preferably surname.");
	}
	for (i=13; i<30; i++)
	{
		if(i!=18)//bautismos
		{
			if (document.form[i].value!=''&& document.form[i].value!=0 && document.form[i].name!='bautismo')
			{
			 //alert(document.form[i].name);
			 valores2=true;
			}
		}
	}
	
	if (valores2!=true)
	{
		alert("You must introduce, at least, some data about sacramental register location, preferably concrete date or interval.");
	}
	
	if (document.form.num_dig1.value!='' && document.form.sig_caja.value=='')
	{
		alert("La signatura digital debe ser completa, si la desconoce utilice otras signaturas.");
		valores2=false;	
	}
	if (valores1==true && valores2==true)
	{
		//alert(valores1);
		//alert(valores2);
		ejecutar(pagina,accion);
	}
}
function validar_indexacion(pagina,accion){
	var	valores1= false;
	var valores2= false;

	if(document.form.id_sacramento.value != ''){
		valores1 = true;
		valores2 = true;
	}
	if(document.form.sacramento.value=='bautismo'){
		if(document.form.nombre.value!='' ||  document.form.apellido1.value!=''|| document.form.apellido2.value!='' ||
	   document.form.padre_nombre.value!='' ||  document.form.padre_apellido1.value!='' || document.form.padre_apellido2.value!='' ||
	   document.form.madre_nombre.value!='' ||  document.form.madre_apellido1.value!='' || document.form.madre_apellido2.value!=''){
			valores1=true;
			}	
	}	
	
	if(document.form.sacramento.value=='difunto'){
		if(document.form.nombre.value!='' ||  document.form.apellido1.value!=''|| document.form.apellido2.value!=''){
			valores1 = true;
		}
	}
		
	if(document.form.sacramento.value=='matrimonio'){
		if(document.form.esposo_nom.value!='' ||  document.form.esposo_apellido1.value!='' || document.form.esposo_apellido2.value!='' ||
   	   document.form.esposa_nom.value!='' ||  document.form.esposa_apellido1.value!='' || document.form.esposa_apellido2.value!=''){
			valores1=true;
			}
	}
	
	
	if (valores1== false)
	{
	alert("Debe consignar al menos algun dato de la persona que busca, preferiblemente algun apellido.");
	}
	if(document.form.id_localidad.value!='0' ||  document.form.div_loc.value!='' || document.form.f4_desc_ca.value!='0' ||
   	   document.form.fecha_form_ini.value!='' ||  document.form.fecha_form_fin.value!='' ||
	   document.form.sig_caja.value!='' ||  document.form.sig_orden.value!='' || document.form.sig_parte.value!='' ||
	   document.form.sig_caja_ant.value!='' ||  document.form.sig_orden_ant.value!='' || document.form.sig_parte_ant.value!='' ||
   	   document.form.sig_mic1_tipo.value!='' ||  document.form.sig_mic1_caja.value!='' || document.form.sig_mic1_orden.value!='' ||
	   document.form.num_dig1.value!=''){
			valores2=true;
	}
	
	if (valores2==false)
	{
		alert("Debe consignar al menos algun dato de localización del registro sacramental, preferiblemente la fecha concreta o intervalo de fechas");
	}
	
	if (document.form.num_dig1.value!='' && document.form.sig_caja.value=='')
	{
		alert("La signatura digital debe ser completa, si la desconoce utilice otras signaturas.");
		valores2=false;	
	}
	if (valores1==true && valores2==true)
	{
	    if(document.getElementById('cargando')) {
			document.getElementById('cargando').style.display = 'block';
			document.getElementById('cargando').innerHTML = document.getElementById('cargando').innerHTML;
		}
	    ejecutar(pagina,accion);
	}
}

function validar_indexacion_simple(pagina,accion){
	var	valores1= false;
	var valores2= false;

	if(document.form.sacramento.value=='bautismo' || document.form.sacramento.value=='difunto'){
		if(document.form.nombre.value!='' ||  document.form.apellido1.value!=''|| document.form.apellido2.value!='' ){
				valores1=true;
			}	
	}	
		
	if(document.form.sacramento.value=='matrimonio'){
		if(document.form.esposo_nom.value!='' ||  document.form.esposo_apellido1.value!='' || document.form.esposo_apellido2.value!='' ||
   	   document.form.esposa_nom.value!='' ||  document.form.esposa_apellido1.value!='' || document.form.esposa_apellido2.value!=''){
			valores1=true;
			}
	}
	
	
	if (valores1== false)
	{
	alert("Debe consignar al menos algun dato de la persona que busca, preferiblemente algun apellido.");
	}
	if(document.form.id_localidad.value!='0' ||  document.form.fecha_form_ini.value!='' ||  document.form.fecha_form_fin.value!=''){
			valores2=true;
	}
	
	if (valores2==false)
	{
		alert("Debe consignar al menos algun dato de localización del registro sacramental, preferiblemente la fecha concreta o intervalo de fechas");
	}
	if (valores1==true && valores2==true)
	{
	    if(document.getElementById('cargando')) {
			document.getElementById('cargando').style.display = 'block';
			document.getElementById('cargando').innerHTML = document.getElementById('cargando').innerHTML;
		}
	    ejecutar(pagina,accion);
	}
}
function validar_indexacion_especial(pagina,accion){


	if(document.form.id_localidad.value=='0' || document.form.fecha_form_ini_esp.value==''){
		alert("Para realizar este tipo de búsquedas, debe consignar datos de localización e intervalo de fechas menor que 25 años");
	}else{
	    if(document.getElementById('cargando')) {
			document.getElementById('cargando').style.display = 'block';
			document.getElementById('cargando').innerHTML = document.getElementById('cargando').innerHTML;
		}
	    ejecutar(pagina,accion);
	}
}

function validar_bautismos_indexacion(pagina,accion){
	var valores=true;
	if( document.form.id_reg.value=='' || document.form.fecha_reg.value=='' || document.form.analista.value=='' )
	{
		alert("Debe introducir el nº de registro, la fecha de registro y el nombre del analista.");
		var valores=false;
	}
	if( document.form.sig_caja.value=='' || document.form.sig_orden.value=='' || document.form.sig_parte.value=='')
	{
		alert("Debe introducir la signatura");
		var valores=false;
	}
	
	if (valores==true )
	{
		ejecutar(pagina,accion);
	}
}




function completar_signatura(campo){
//alert("por aqui ha pasado")
campo.value=document.form.sig_caja.value+document.form.sig_orden.value+document.form.sig_parte.value;
}

function separar_signaturas(){
var sig=document.form.sig_dig.value;
document.form.sig_caja.value=sig.substr(0,4);
document.form.sig_orden.value=sig.substr(4,3);
document.form.sig_parte.value=sig.substr(7,2);
}


function completar_fecha_form_fin(){
//alert("por aqui ha pasado")
document.form.fecha_form_fin.value=document.form.fecha_form_ini.value
document.form.fecha_form_fin.focus()
}

function iniciar(){
document.form.analista.focus()
}

function validar_signaturas(){
if ((document.form.sig_caja =='')){
alert ("el campo signatura es obligatorio")
document.form.sig_caja.focus()
}
}

function Pulsada(DnEvents,desde) 
{ 
K = navigator.appName=="Netscape" ? DnEvents.which : DnEvents.keyCode 
/*
43--> + //Nuevo
161--> ¡ //Duplicar
125--> } //Guardar
*/
window.document.form.blur()//para que no se escriba el caracter en cuestion
//alert(K);
if (K==43)//
{
ejecutar('','nuevo');
}
if (K==161)
{
ejecutar('','duplicar')
}
if (K==125)
{
validar_bautismos_indexacion('','guardar')
}
/* //PARA NESTCAPE 
if (navigator.appName=="Netscape" && navigator.appVersion.charAt(0)>=4)  
{ 
document.onkeydown = Pulsada 
document.captureEvents(Event.KEYDOWN) 
} */
}
function mover_cab(pagina,ini,fin,accion){
document.form.ini_visual.value=ini
document.form.fin_visual.value=fin
document.form.accion.value=accion

document.form.action =pagina
document.form.submit()
}
// abril 2009
function f_comprobar_servicios(pagina, numero){
	 if(numero>=5){
		 alert("Solo se pueden solicitar 5 servicios por solicitud. Finalice la solicitud actual y comience una nueva.");
	 }else{
		ejecutar(pagina,'');	 
	 }

}