function js_redirecccionar(strURL){
   top.document.location.href=strURL;
}
function js_mensaje(mensaje){
   alert(mensaje);
}
function js_solo_numeros(cadena, obj, e){
   opc = false;
   tecla = (document.all) ? e.keyCode : e.which;
   if ((tecla >= 48 && tecla <= 57) || tecla==8 || tecla==0)
   opc = true;   
   return opc;
}
function js_solo_fecha(cadena, obj, e){
   opc = false;
   tecla = (document.all) ? e.keyCode : e.which;
   if(tecla==8 || tecla==0 || tecla==47) return true;
   if (tecla >= 48 && tecla <= 57) opc = true;
   return opc;
}
function js_solo_documento(cadena, obj, e){
   opc = false;
   tecla = (document.all) ? e.keyCode : e.which;
   if(tecla==8 || tecla==0) return true;
   if ((tecla >= 65 && tecla <= 90) || (tecla >= 97 && tecla <= 122) || (tecla >= 48 && tecla <= 57)) opc = true;
   return opc;
}
function js_solo_telefono(cadena, obj, e){
   opc = false;
   tecla = (document.all) ? e.keyCode : e.which;
   if ((tecla >= 48 && tecla <= 57) || tecla==8 || tecla==0  || tecla==40 || tecla==41 || tecla==43 || tecla==45)
   opc = true;   
   return opc;
}
function js_solo_letras_persona(cadena, obj, e){
   opc = false;
   tecla = (document.all) ? e.keyCode : e.which;
   if(tecla==8 || tecla==0 || tecla==32 || tecla==241 || tecla==209) return true;
   if ((tecla >= 65 && tecla <= 90) || (tecla >= 97 && tecla <= 122)) opc = true;
   return opc;
}
function js_trim(cadena){
   cadena = js_rTrim(cadena);
	cadena = js_lTrim(cadena);	
	return cadena;
}
function js_rTrim(cadena){
    for (i = 0; i <= cadena.length -1 ; i++){
		if (cadena.charAt(i) != " "){
			return cadena.substring(i,cadena.length);
		}
	}
	return "";
}
function js_lTrim(cadena){
    for (i = cadena.length -1 ; i >= 0; i--){
		if (cadena.charAt(i) != " "){
			return cadena.substring(0,i + 1);
		}
	}
	return cadena;
}
function js_valida_fecha(cadena){   
   var Fecha= new String(cadena)   
   var RealFecha= new Date()
   var Ano= new String(Fecha.substring(Fecha.lastIndexOf("/")+1,Fecha.length))
   var Mes= new String(Fecha.substring(Fecha.indexOf("/")+1,Fecha.lastIndexOf("/")))
   var Dia= new String(Fecha.substring(0,Fecha.indexOf("/")))
   
   if(Ano == "" || Mes == "" || Dia == "") return false;
   
   if(isNaN(Ano) || Ano.length<4 || parseFloat(Ano)<1900) return false;
   if(isNaN(Mes) || parseFloat(Mes)<1 || parseFloat(Mes)>12) return false;
   if(isNaN(Dia) || parseInt(Dia, 10)<1 || parseInt(Dia, 10)>31) return false;
   if(Mes==2 && (Ano % 4) == 0 && Dia <= 29)return true;    
   if (Mes==4 || Mes==6 || Mes==9 || Mes==11 || Mes==2){      
      if (Mes==2 && Dia > 28 || Dia>30) return false;
   }
   return true;
}
function js_valida_mail(email){
	var re  = /^([a-zA-Z0-9])+([\.a-zA-Z0-9_-])*@([a-zA-Z0-9])+(\.[a-zA-Z0-9_-]+)+$/;
	if (!re.test(email)) {
		return false;
	}
	return true;
}
function js_login(){
   if(js_trim(document.getElementById("l_documento_numero").value) == ""){
      alert("Ingrese su número de documento por favor.");
      document.getElementById("l_documento_numero").focus();
      return false;
   }
   if(js_trim(document.getElementById("l_contrasena").value) == ""){
      alert("Ingrese su número de documento por favor.");
      document.getElementById("l_documento_numero").focus();
      return false;
   }
   document.frm_login.submit();   
   //FAjax('ajax_login.php','div_login','accion=USUARIO_LOGIN&accion_id=<?php echo $_SESSION["accion_id"];?>&documento_tipo='+document.getElementById("l_documento_tipo").value+'&documento_numero='+document.getElementById("l_documento_numero").value+'&contrasena='+document.getElementById("l_contrasena").value,'POST');
}
function js_imprimir(vista,accion){
   if(vista == "V"){
      var cabecera = "";
      var criterio = "";
      if(document.getElementById("div_cabecera") != null) cabecera = document.getElementById("div_cabecera").innerHTML;
      if(document.getElementById("div_criterio") != null) criterio = document.getElementById("div_criterio").innerHTML;
      
      ifrm_impresion.document.getElementById("impresion_cabecera").innerHTML = cabecera + criterio;
      ifrm_impresion.document.getElementById("impresion_contenido").innerHTML = document.getElementById("div_contenido").innerHTML;
      ifrm_impresion.focus();
      ifrm_impresion.print();
   }
   if(vista == "R"){
      js_impresion_capa_carga_mostrar();
      FAjax('ajax.php','impresion_contenido','accion='+accion+'&imprimir=TRUE','POST','','js_impresion_cargar();js_impresion_capa_carga_ocultar();');
   }
}
function js_impresion_cargar(){
   var cabecera = "";
   var criterio = "";
   if(document.getElementById("div_cabecera") != null) cabecera = document.getElementById("div_cabecera").innerHTML;
   if(document.getElementById("div_criterio") != null) criterio = document.getElementById("div_criterio").innerHTML;

   ifrm_impresion.document.getElementById("impresion_cabecera").innerHTML = cabecera + criterio;
   ifrm_impresion.document.getElementById("impresion_contenido").innerHTML = document.getElementById("impresion_contenido").innerHTML;
   ifrm_impresion.focus();
   ifrm_impresion.print();
}
function js_impresion_capa_carga_ocultar(){
   document.getElementById("impresion_capa_carga").style.display = 'none';
}
function js_impresion_capa_carga_mostrar(){
   document.getElementById("impresion_capa_carga").style.display = 'block';
}