/* Desarrollo realizado por Asesores Bancarios y Financieros Prohibida la reproducción total o parcial de dicha aplicación sin la autorización escrita de Asesores Bancarios y Financieros. Tel. 034 965 106 380

Fichero asociado ce0bcab
*/

function calculos(form) 
{
// Comprobaciones
if(form.importe.value =="" || esNumero(form.importe.value)=="false"){alert("Revise el importe de la operación financiera");return(false);}
if(form.plazo1.value ==""||form.plazo1.value<2){alert("Revise el plazo de la operación");return(false);}
if(form.frecuencia1.value=="f10"){alert("Debe seleccionar la frecuenca de pago.");}
if(form.interes1.value=="" || esNumero(form.interes1.value)=="false"){alert("Revise el importe del tipo de interés.");return(false);}

if(form.moneda[0].checked){moneda=0;}
if(form.moneda[1].checked){moneda=1;}

var importe1=form.importe.value*1;
var frecuencia1=form.frecuencia1.value*1;
var plazo1=((form.plazo1.value *1)+1) * frecuencia1;
var interes1=form.interes1.value/(100*frecuencia1);

cuotapres = cuota (importe1,interes1,plazo1);
cuotaleas = cleasing(importe1,interes1,plazo1);
form.cuota1.value= formatodec(cuotapres,moneda);
form.cuota2.value= formatodec(cuotaleas,moneda);

// Publicidad refresca la publicidad en el caso de que se trate de abanfin.
if (top.location.href == "http://www.abanfin.com/modules.php?name=Simuladores&fid=ce0bcab")
{ parent.publicidad.location.href="http://www.abanfin.com/publicidad/abanfin_general728.php";}

}


// Realiza la comparación y análisis
function analisis(form)
{
// Comprobaciones
if(form.pamortizacion.value =="" || esNumero(form.pamortizacion.value)=="false"){alert("Revise el periodo de amortización introducido.");return(false);}
if(form.pamortizacion.value > 10 ){alert("El máximo período de amortización admitido es de 10 ejercicios");return(false);}
if(form.facturacion.value =="f0"){alert("Debe seleccionar el tramo de facturación adecuado de su empresa.");}
if(form.moneda[0].checked){moneda=0;}
if(form.moneda[1].checked){moneda=1;}

var imamortizable = form.importe.value*1;
var pamortizacion = form.pamortizacion.value;
if (pamortizacion.indexOf(".") < 0){}else{alert("El período de amortización no puede ser fraccionario.");return(false);}

var clineal = 1/pamortizacion;

if(form.facturacion.value=="f1"){ajuste=3; tisociedades=0.25;}
if(form.facturacion.value=="f2"){ajuste=2; tisociedades=0.30;}


//Cálculo datos préstamo e introducción de la identificación de los ejercicios
var ejercicios = new Array(10);
var dotap = new Array(10);
var fiscp = new Array(10);

	for (i=0; i<=10; i++)
	{
		if (i<pamortizacion)
			{
			z=1+i; 
			ejercicios [i] = "Ej. "+z;
			dotap [i] = formatodec(clineal * imamortizable, moneda);
			fiscp [i] = formatodec(clineal * imamortizable * tisociedades, moneda);
			}
			
		else	
			{
			ejercicios [i] = "--";
			dotap [i] = "--";
			fiscp [i] = "--";			
			}
	}

//Cálculo amortizacion leasing
var importe1 = form.importe.value*1;
var frecuencia1 = form.frecuencia1.value*1;
var plazo1 = form.plazo1.value;
var interes1 = form.interes1.value/(100*frecuencia1);
var cuotaleas = cleasing(importe1,interes1,plazo1*frecuencia1);

var amortizadol1 = cuotaleas - (importe1*interes1);
//alert(amortizadol1);
var dotal = new Array(10);
var fiscl = new Array(10);
var acumulado;
acumulado = 0;


for (i=0; i<=10; i++)
	{
	if (i==0)
		{
		dotal[i] = pagado(amortizadol1,interes1,frecuencia1);
		fiscl[i] = formatodec(dotal[i]*tisociedades,moneda);

		
		}
	if (i>0 & i<plazo1)
		{
		acumulado = acumulado + dotal[i-1];
		
		dotal[i] = pagado(amortizadol1,interes1,frecuencia1*(1+i))-acumulado;
		fiscl[i] = formatodec(dotal[i]*tisociedades, moneda);
		//alert(dotal[i]);
		//alert(fiscl[i]);
		}	
	if (i>=plazo1)
		{
		dotal [i] = "--";
		fiscl [i] = "--";			
		}	
	
	}

// Aplicación de formatos
for (i=0; i<plazo1; i++)
	{
		dotal[i] = formatodec(dotal[i], moneda);
	
	}
form.ejer1.value = ejercicios [0];
form.ejer2.value = ejercicios [1];
form.ejer3.value = ejercicios [2];
form.ejer4.value = ejercicios [3];
form.ejer5.value = ejercicios [4];
form.ejer6.value = ejercicios [5];
form.ejer7.value = ejercicios [6];
form.ejer8.value = ejercicios [7];
form.ejer9.value = ejercicios [8];
form.ejer10.value = ejercicios [9];

form.dp1.value = dotap [0];
form.dp2.value = dotap [1];
form.dp3.value = dotap [2];
form.dp4.value = dotap [3];
form.dp5.value = dotap [4];
form.dp6.value = dotap [5];
form.dp7.value = dotap [6];
form.dp8.value = dotap [7];
form.dp9.value = dotap [8];
form.dp10.value = dotap [9];

form.ap1.value = fiscp [0];
form.ap2.value = fiscp [1];
form.ap3.value = fiscp [2];
form.ap4.value = fiscp [3];
form.ap5.value = fiscp [4];
form.ap6.value = fiscp [5];
form.ap7.value = fiscp [6];
form.ap8.value = fiscp [7];
form.ap9.value = fiscp [8];
form.ap10.value = fiscp [9];

form.dl1.value = dotal [0];
form.dl2.value = dotal [1];
form.dl3.value = dotal [2];
form.dl4.value = dotal [3];
form.dl5.value = dotal [4];
form.dl6.value = dotal [5];
form.dl7.value = dotal [6];
form.dl8.value = dotal [7];
form.dl9.value = dotal [8];
form.dl10.value = dotal [9];

form.al1.value = fiscl [0];
form.al2.value = fiscl [1];
form.al3.value = fiscl [2];
form.al4.value = fiscl [3];
form.al5.value = fiscl [4];
form.al6.value = fiscl [5];
form.al7.value = fiscl [6];
form.al8.value = fiscl [7];
form.al9.value = fiscl [8];
form.al10.value = fiscl [9];


// Publicidad refresca la publicidad en el caso de que se trate de abanfin.
if (top.location.href == "http://www.abanfin.com/modules.php?name=Simuladores&fid=ce0bcab")
{parent.publicidad.location.href="http://www.abanfin.com/publicidad/abanfin_general728.php";}


}



//-->