function configurar_ofi(){
	alert("Recuerde Configurar la Impresion en hoja tamaño oficio");
	}
/////////////////////////////////////////////
function pop_recibode(cod){
	var ventana=false
if (typeof ventana.document == "object") {
		ventana.close()
	}
ventana=window.open("declaraciones/imp_recibo_declarado.php?cod="+cod,"P"," width=1500, height=900, scrollbars=yes,location=no,directories=no,status=no,menubar=no,toolbar=no,resizable=no");
}
////////////////////////////////////////////////////////////////////
function mostrar(){
		document.getElementById("encabezado").style.display='block';
		document.getElementById("pie").style.display='block';
		document.getElementById("botones").style.display='block';
		//document.getElementById("aceptar").style.display='block';
		//document.getElementById("corregir").style.display='block';
		//document.getElementById("imprimir").style.display='block';
	}
///////////////////////////////
function ocultar(){
		document.getElementById("encabezado").style.display='none';
		document.getElementById("pie").style.display='none';
		document.getElementById("botones").style.display='none';
		//document.getElementById("aceptar").style.display='none';
		//document.getElementById("corregir").style.display='none';
		//document.getElementById("imprimir").style.display='none';
		
	}
///////////////////////////////
function page_print(){
		alert("Recuerde Imprimir 2 copias en hoja tamaño oficio");
		ocultar();
		window.print();
		setTimeout("mostrar()",200);
	}
//////////////////////////////////////CALCULA DIGITO DE VERIFICACION/////////////////////
/*function CalcularDv()
{ 
 var vpri, x, y, z, i, nit1, dv1; //VPRI Arreglo nit, x=temporal de calculo valor arrelog , y=sustrae el valor del arreglo
 nit1=document.form.nit.value;
	if (isNaN(nit1))
	{
 	document.form.dv.value="X";
  alert('El valor digitado no es un numero valido');		
	} else {
  vpri = new Array(16); 
 	x=0 ; y=0 ; z=nit1.length ;
 	vpri[1]=3;
 	vpri[2]=7;
 	vpri[3]=13; 
 	vpri[4]=17;
 	vpri[5]=19;
 	vpri[6]=23;
 	vpri[7]=29;
 	vpri[8]=37;
 	vpri[9]=41;
 	vpri[10]=43;
 	vpri[11]=47;  
 	vpri[12]=53;  
 	vpri[13]=59; 
 	vpri[14]=67; 
 	vpri[15]=71;
  for(i=0 ; i<z ; i++)
 	{ 
 	 y=(nit1.substr(i,1));
 		//document.write(y+"x"+ vpri[z-i] +":");
   x+=(y*vpri[z-i]);
 		//document.write(x+"<br>");		
 	} 
  y=x%11
 	//document.write(y+"<br>");
  if (y > 1)
 	{
   dv1=11-y;
 	} else {
   dv1=y;
 	}
 	//document.form.dv.value=dv1;
	document.form.dvoculto.value=dv1;
	
	}
}*/

function calcularDV(nit){
	var vpri, x, y, z, i,dv;
	vpri=new Array(16);
	x=0;
	y=0;
	z=nit.length;
	if(isNaN(nit)){
		alert("El nit no es valido");
		return "";	
	}else{
		vpri[1]=3;
		vpri[2]=7;
		vpri[3]=13; 
		vpri[4]=17;
		vpri[5]=19;
		vpri[6]=23;
		vpri[7]=29;
		vpri[8]=37;
		vpri[9]=41;
		vpri[10]=43;
		vpri[11]=47;  
		vpri[12]=53;  
		vpri[13]=59; 
		vpri[14]=67; 
		vpri[15]=71;
	for(i=0; i<z;i++){
			y=(nit.substr(i,1));
			x+=(y*vpri[z-i]);
		}
	y=x%11;
	if(y>1){
			dv=11-y;
		}else{
			dv=y;
		}
	return dv;
	}
}
/////////////////////////////////////////////////////
function sentarIca(){
		var confirmar=confirm('Usted est\xe1 a punto de sentar la declaraci\xf3n, ¿Est\xe1 seguro de continuar?');
		if(confirmar){
			FAjax('aplicacion/sentado.php','botones','','post');
		}else{
		}
	}
/////////////////////////////////////////////////////
function validar_formulario3(f){
	
	//alert(Extract(f.net_gra.value)+"=="+Extract(f.total_act.value));
	//return false;
	if(f.actividad.value<1){
		alert("Por favor seleccione el tipo de actividad principal");
		f.actividad.focus();
		return false;
		
	}
	if(f.list_act_1.value<1){
		alert("Por favor seleccione el codigo de  la actividad");
		f.list_act_1.focus();
		return false;
	}
	/*for (i=0;i<f.length;i++)
	 	{
		 	if(f.elements[i].type=="select")
				{
					alert(f.elements[i].type);
					for(j=0;j<f.num_act.value;j++)
					{
						if(f.elements[i].value==f.elements[j].value){
							
							alert("Existen Actividades Iguales");
							f.elements[i].focus();
							return false;
							}
					}
				}
		 }*/
	if(f.total_act.value!=f.net_gra.value){
			alert("La suma de bases gravables no coincide con los ingresos netos gravables");
			f.act_1.focus();
			return false;
		}
	FAjax('aplicacion/formulario_borrador.php','cuerpo','','post');
	
	}
////////////////////////////////////////////////////
function validar_formulario2(f){
		if(f.nom_decla.value.length<3){
				alert("Escriba el nombre del declarante");
				f.nom_decla.focus();
				return false;
			}
		if(f.ape_decla.value.length<3){
				alert("Escriba el apellido del declarante");
				f.ape_decla.focus();
				return false;
			}
		if(f.ced_decla.value.length<7){
				alert("Escriba el numero de identificacion");
				f.ced_decla.focus();
				return false;
			}
		/*if(f.nom_cont.value.length<3){
				alert("Escriba el nombre del Contador o revisor fiscal");
				f.nom_cont.focus();
				return false;
			}
		if(f.ape_cont.value.length<3){
				alert("Escriba el apellido del contador o revisor fiscal");
				f.ape_cont.focus();
				return false;
			}
		if(f.tp_cont.value.length<7){
				alert("Escriba el numero de tarjeta profesional del contador o revisor fiscal");
				f.tp_cont.focus();
				return false;
			}*/
		FAjax('aplicacion/form_ica1.php','cuerpo','','post');
	}
///////////////////////////////////////////////////
function validar_formulario2r(f){
	if(f.nom_decla.value.length<3){
			alert("Escriba el nombre del declarante");
			f.nom_decla.focus();
			return false;
		}
	if(f.ape_decla.value.length<3){
			alert("Escriba el apellido del declarante");
			f.ape_decla.focus();
			return false;
		}
	if(f.ced_decla.value.length<7){
			alert("Escriba el numero de identificacion");
			f.ced_decla.focus();
			return false;
		}
	/*if(f.nom_cont.value.length<3){
			alert("Escriba el nombre del Contador o revisor fiscal");
			f.nom_cont.focus();
			return false;
		}
	if(f.ape_cont.value.length<3){
			alert("Escriba el apellido del contador o revisor fiscal");
			f.ape_cont.focus();
			return false;
		}
	if(f.tp_cont.value.length<7){
			alert("Escriba el numero de tarjeta profesional del contador o revisor fiscal");
			f.tp_cont.focus();
			return false;
		}*/
	FAjax('datos_reteica.php','cuerpo','','post');
}
//////////////////////////////////////////////////////
function red_reteica(f){
	FAjax('reteica/datos_reteica.php','cuerpo','','post');
	
}

////////////////////////////////////////////////////

function valEmail(valor){
    re=/^[_a-z0-9-]+(.[_a-z0-9-]+)*@[a-z0-9-]+(.[a-z0-9-]+)*(.[a-z]{2,3})$/
    if(!re.exec(valor))    {
        return false;
    }else{
        return true;
    }
}
///////////////////////////////////////////////////
function validar_formulario1(f){
	if(f.ord_ext.value.length<2){
		alert("Escriba el total de ingresos del predio");
		f.ord_ext.focus();
		return false;
	}
	if(f.periodo_gravable.value.length<1){
	 	  alert("Seleccion Periodo Gravable");
	     f.periodo_gravable.focus();	  
	    return false;
	}
	if(f.inc_tri[0].checked)
	{
			if(f.inc_res.value.length<1)
			{
				alert("Ingrese Numero de Resolucion");
				f.inc_res.focus();
				return false;
			}
			if(f.inc_fecha.value.length<10)
			{
				alert("Ingrese la fecha de la resolucion");
				f.inc_fecha.focus();
				return false;
			}
	}
	if(f.rep_legal.value.length<10){
		alert("Por favor ingrese el nombre del representante legal");
		f.rep_legal.focus();
		return false;
	}
	if(f.razon_social.value.length<5){
		alert("Por favor ingrese la razon social");
		f.razon_social.focus();
		return false;
	}
	if(f.dir_notificacion.value.length<10){
		alert("Por favor ingrese la direccion de notificacion");
		f.dir_notificacion.focus();
		return false;
	}
	if(f.fecha_ini.value.length<1){
		alert("Por favor ingrese la fecha de iniciacion de actividades");
		f.fecha_ini.focus();
		return false;
	}
	if(!valEmail(f.mail.value) || f.mail.value.length<6){
			alert("La direccion de correo electronico no es valida.");
			f.mail.focus();
			return false;
		}
	if(f.tel_cel.value.length<7){
	 	  alert("Ingrese un numero de telefono valido");
	     f.tel_cel.focus();	  
	    return false;
	}
	FAjax('aplicacion/form_ica2.php','cuerpo','','post');
}

///////////////////////////////////////////////////
function validar_formularioreteica(f){
	if(f.rep_legal_r.value.length<10){
		alert("Por favor ingrese el nombre del representante legal");
		f.rep_legal_r.focus();
		return false;
	}
	if(f.razon_social_r.value.length<5){
		alert("Por favor ingrese la razon social");
		f.razon_social_r.focus();
		return false;
	}
	if(f.dir_notificacion_r.value.length<10){
		alert("Por favor ingrese la direccion de notificacion");
		f.dir_notificacion_r.focus();
		return false;
	}
	if(f.fecha_ini_r.value.length<1){
		alert("Por favor ingrese la fecha de iniciacion de actividades");
		f.fecha_ini_r.focus();
		return false;
	}
	if(!valEmail(f.mail_r.value) || f.mail_r.value.length<6){
			alert("La direccion de correo electronico no es valida.");
			f.mail_r.focus();
			return false;
		}
	if(f.tel_cel_r.value.length<7){
	 	  alert("Ingrese un numero de telefono valido");
	     f.tel_cel_r.focus();	  
	    return false;
	}
	if(f.ano_gravable.value.length<1){
	 	  alert("Seleccione el Año a declarar");
	     f.periodo_gravable.focus();	  
	    return false;
	}
	if(f.periodo_gravable.value.length<1){
	 	  alert("Seleccione el periodo gravable");
	     f.periodo_gravable.focus();	  
	    return false;
	}
	if(f.rete_ser.value.length<2 && f.rete_co.value.length<2){
		alert("Escriba la base de retención actividad comercial");
		f.rete_co.focus();
		return false;
	}
	if(f.rete_ser.value.length<2 && f.rete_co.value.length<2){
		alert("Escriba la base de retención actividad de servicios");
		f.rete_ser.focus();
		return false;
	}
	if(f.rete_co.value.length>2 && f.rete_prac_pe_co.value.length<2){
		alert("Escriba las retenciones practicadas en el periodo actividad comercial");
		f.rete_prac_pe_co.focus();
		return false;
	}
	if(f.rete_ser.value.length>2 && f.rete_prac_pe_ser.value.length<2){
		alert("Escriba las retenciones practicadas en el periodo actividad de servicio");
		f.rete_prac_pe_ser.focus();
		return false;
	}
	
	
	FAjax('borrador_reteica.php','cuerpo','','post');
}

///////////////////////////////////////////////////////
function calcular_cargo(f){
		
		var num_act=new Number();
		var total=new Number();
		num_act=f.num_act.value;
		for(i=1;i<=num_act;i++){
				id_act="act_"+i;
				id_imp="impuesto_"+i;
				id_tar="tarifa_"+i;
				act=document.getElementById(id_act);
				tar=document.getElementById(id_tar);
				imp=document.getElementById(id_imp);
				imp.value=formatCurrency((eval(Extract(act.value))*eval(tar.value))/eval(1000));
				//if(imp.value is NAN)
				total+=eval(Extract(imp.value));
			}
			f.imp_ind_com.value=formatCurrency(total);
		calcular_avisos();
		calcular_pago_oportuno(f);
		calcular_ambiental(f);
		calcular_tributario(f);
		calcular_subtotal(f);
	}
///////////////////////////////////////////////
function calcular_pago_oportuno(f)
	{
		if(f.aprobo.value==1){
		f.pag_opo.value=formatCurrency(eval(eval(Extract(f.imp_car.value))*eval(3))/eval(100));
		}
		else{
			f.pag_opo.value=0;
		}
	}
///////////////////////////////////////////////////
function calcular_ambiental(f)
	{	
		if(parseInt(f.inc_amb.value)==1){
			f.des_inc_amb.value=formatCurrency(eval(eval(Extract(f.imp_car.value))*eval(2))/eval(100));
		}
	}
////////////////////////////////////////////////////	
function calcular_tributario(f)
	{
		var amb=new Number();
		var opo=new Number();
		var subtotal=new Number();
		//total=eval(Extract(f.sub_total.value));
		subtotal=eval(Extract(f.imp_car.value));
		amb=Extract(f.des_inc_amb.value);
		opo=Extract(f.pag_opo.value);
		if(parseInt(f.inc_tri.value)==1){
			f.des_inc_tri.value=formatCurrency(eval((subtotal-amb-opo)/2));
		}
		
	}
//////////////////////////////////////////////	
function calcular_avisos(){
		var valor=Extract(document.form.imp_ind_com.value);
		var avisos=new Number();
		avisos=(eval(valor)*15)/100;
		if(document.form.avi_tab.value==1){
			document.form.imp_avi_tab.value=formatCurrency(avisos);
		}else{
			avisos=0;	
		}
		
		document.form.imp_car.value=formatCurrency(eval(valor)+eval(avisos));
	}
	
////////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////////
function set_valor_tarifa(valor){
	var id_list="list_act_"+valor;
	var id_tarifa="tarifa_"+valor;
	var id_ciiu="ciiu_"+valor;
	//var id_ciiu="ciiu_"+valor;
	//alert(id_tarifa+" "+id_list);
	//if(valor==1){
			document.getElementById(id_tarifa).value=document.getElementById(id_list).value;
			document.getElementById(id_ciiu).value=document.getElementById(id_list).options[document.getElementById(id_list).selectedIndex].text;		
		//}else{
			
			//document.getElementById(id_tarifa).value=6.5;
		//}
	calcular_cargo(document.form);
	
	
	}

////////////////////////////////////////////////////
function abrir_pagina(direccion, pantallacompleta, herramientas, direcciones, estado, barramenu, barrascroll, cambiatamano, ancho, alto, izquierda, arriba, sustituir){
     var opciones = "fullscreen=" + pantallacompleta +
                 ",toolbar=" + herramientas +
                 ",location=" + direcciones +
                 ",status=" + estado +
                 ",menubar=" + barramenu +
                 ",scrollbars=" + barrascroll +
                 ",resizable=" + cambiatamano +
                 ",width=" + ancho +
                 ",height=" + alto +
                 ",left=" + izquierda +
                 ",top=" + arriba;
     var ventana = window.open(direccion,"venta",opciones,sustituir);

}


////////////////////////////////////////////////////
function Extract(Obj){
		var str=Obj.replace(/,/g, "");
		if(str==""){
				return "0";
		}else{
			var iNumero=new Number(parseInt(str,10));
			return(iNumero);
		}
		
	}
/////////////////////////////////////////////////////	
function Extracttarifa(Obj){
		var str=Obj;
		return(str.replace(/./, ""));
	}

///////////////////////////////////////////////
function formatCurrency(num)
    {
		  num = miles(num.toString().replace(/ |,/g,''));
		  if(isNaN(num)) 
		   	num = "0";
		  cents = Math.floor((num*100+0.5)%100);
		  num = Math.floor((num*100+0.5)/100).toString();
		  if(cents < 10) 
		   cents = "0" + cents;
		  for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
			num = num.substring(0,num.length-(4*i+3))+','+num.substring(num.length-(4*i+3));
		 return (num);
    }

///////////////////////////////////////////////////////////////////
function numeros(e) 
	{//Inicio De La Función
		tecla = (document.all) ? e.keyCode : e.which;
		if (tecla<= 13 ||  tecla >= 48 && tecla <= 57) return true;
		patron = /\d/;
		te = String.fromCharCode(tecla);
		return patron.test(te); 
	}

/////////////////////////////////////////////////////////////////

function calcular_tota(f)
	{
		var total=new Number();
		total=eval(Extract(f.sub_total.value))+eval(Extract(f.int_mora.value));
		f.total_pagar.value=formatCurrency(total);
		if(eval(Extract(f.total_pagar.value))<1)
		f.total_pagar.value=0;
	}

////////////////////////////////////////////////////////////////////
function calcular_subtotal(f)
    {
		var sub_total=new Number();
		var imp_car=new Number();
		var pag_opo=new Number();
		var des_inc_amb=new Number();
		var des_inc_tri=new Number();
		var reteica=new Number();
		var sanci=new Number;
		reteica=Extract(f.reteica.value);
		imp_car=Extract(f.imp_car.value);
		pag_opo=Extract(f.pag_opo.value);
		des_inc_amb=Extract(f.des_inc_amb.value);
		des_inc_tri=Extract(f.des_inc_tri.value);
		sanci=Extract(f.sanci.value);
		//alert(imp_car+"+"+sanci+"-"+pag_opo+"-"+des_inc_amb+"-"+des_inc_tri+"-"+reteica);
		sub_total=(eval(imp_car)+eval(sanci))-(eval(pag_opo)+eval(des_inc_amb)+eval(des_inc_tri)+eval(reteica));
		//alert(sub_total);
		f.sub_total.value=formatCurrency(sub_total);
		if(eval(Extract(f.sub_total.value))<1)
		f.sub_total.value=0;
		calcular_tota(f);
    }

//////////////////////////////////////////////////
function ingresos_netos_gravables(f){
		var net_gra=new Number();
		var descuentos=new Number();
		descuentos=eval(Extract(f.reb_des.value))+eval(Extract(f.fue_mun.value))+eval(Extract(f.exe_act.value));
		net_gra=eval(Extract(f.ord_ext.value))-eval(descuentos);
		f.net_gra.value=formatCurrency(net_gra);
		if(eval(Extract(f.net_gra.value))<0){
			///alert("eeeee");
			f.net_gra.value=0;
		}
		//calcular_subtotal(f);
	}
	
//////////////////////////////////////////////////
//-------------------------------------------calculoreteica-------------------------------
function calret(obj){
	var rete_co=Extract(obj.rete_co.value);
	var rete_ser=Extract(obj.rete_ser.value);
	var rete_prac_pe_co=Extract(obj.rete_prac_pe_co.value);
	var rete_prac_pe_ser=Extract(obj.rete_prac_pe_ser.value);
var totalvalrete = ((parseInt(rete_prac_pe_co))+(parseInt(rete_prac_pe_ser)));
obj.total_val_rete.value = formatCurrency(totalvalrete);


var total_val_rete=Extract(obj.total_val_rete.value);
var desc_devo=Extract(obj.desc_devo.value);
var totalretedecla = ((parseInt(total_val_rete))-(parseInt(desc_devo)));
obj.total_rete_decla.value = formatCurrency(totalretedecla);

var total_rete_decla=Extract(obj.total_rete_decla.value);
var val_sanci=Extract(obj.val_sanci.value);
var valorpagar = ((parseInt(total_rete_decla))+(parseInt(val_sanci)));
obj.valor_pagar.value = formatCurrency(valorpagar);

var valor_pagar=Extract(obj.valor_pagar.value);
var int_mora=Extract(obj.int_mora.value);
var totalpagar = ((parseInt(valor_pagar))+(parseInt(int_mora)));
obj.total_pagar.value = formatCurrency(totalpagar);

}

function miles(numero){
	var original=parseFloat(numero);
	var result=Math.round(original/1000)*1000;
	//alert(numero+" "+result);
	return result;
}