
//___________________________________________________________________
var HipCuotaImporte="6000.00";
var HipCuotaTipo1="3.00";
var HipCuotaTipo2="4.00";
var HipCuotaTipo3="5.00";
var HipCuotaTipo4="6.00";
var HipCuotaAnos1="15";
var HipCuotaAnos2="20";
var HipCuotaAnos3="25";
var moneda=claveEuro;			// cualquiera que no sea ESP se tratará con 2 decimales.
//___________________________________________________________________
var importe=HipCuotaImporte;
var a1=HipCuotaAnos1;
var a2=HipCuotaAnos2;
var a3=HipCuotaAnos3;
var por1=HipCuotaTipo1;
var por2=HipCuotaTipo2;
var por3=HipCuotaTipo3;
var por4=HipCuotaTipo4;
decimales=(moneda==clavePeseta?0:2);
var res1=0;
var res12=0;
var res13=0;
var res14=0;
var res15=0;
var res16=0;
var res17=0;
var res18=0;
var res19=0;
var res110=0;
var res111=0;
var res112=0;
var elForm;

//.....
function ValoresPorDefecto() {
	elForm=((navigator.appName.toLowerCase() == "netscape")?document.layers['elformul'].document.forms[0]:document.forms[0])
	LlenaCampos();
	HazCalculo();
}
//.....
function HazCalculo() {

	importe=ValidaYDimeElValor(elForm.importe,"Importe incorrecto");
	por1=ValidaYDimeElValor(elForm.por1,2,"Tipo de interés incorrecto");
	por2=ValidaYDimeElValor(elForm.por2,2,"Tipo de interés incorrecto");
	por3=ValidaYDimeElValor(elForm.por3,2,"Tipo de interés incorrecto");
	por4=ValidaYDimeElValor(elForm.por4,2,"Tipo de interés incorrecto");
	a1=ValidaYDimeElValor(elForm.a1,0,"Número de años incorrecto");
	a2=ValidaYDimeElValor(elForm.a2,0,"Número de años incorrecto");
	a3=ValidaYDimeElValor(elForm.a3,0,"Número de años incorrecto");

	res1=cuota12Pagos(importe,por1/100,a1*12);
	res12=cuota12Pagos(importe,por2/100,a1*12);
	res13=cuota12Pagos(importe,por3/100,a1*12);
	res14=cuota12Pagos(importe,por4/100,a1*12);
	res15=cuota12Pagos(importe,por1/100,a2*12);
	res16=cuota12Pagos(importe,por2/100,a2*12);
	res17=cuota12Pagos(importe,por3/100,a2*12);
	res18=cuota12Pagos(importe,por4/100,a2*12);
	res19=cuota12Pagos(importe,por1/100,a3*12);
	res110=cuota12Pagos(importe,por2/100,a3*12);
	res111=cuota12Pagos(importe,por3/100,a3*12);
	res112=cuota12Pagos(importe,por4/100,a3*12);

	LlenaCampos() ;
}
function LlenaCampos() {
	elForm.importe.value=presenta(importe,decimales);
	elForm.a1.value=presenta(a1 ,0);
	elForm.a2.value=presenta(a2 ,0);
	elForm.a3.value=presenta(a3 ,0);
	elForm.por1.value=presenta(por1 ,2);
	elForm.por2.value=presenta(por2 ,2);
	elForm.por3.value=presenta(por3 ,2);
	elForm.por4.value=presenta(por4 ,2);
	elForm.res1.value=presenta(res1,decimales);
	elForm.res12.value=presenta(res12,decimales);
	elForm.res13.value=presenta(res13,decimales);
	elForm.res14.value=presenta(res14,decimales);
	elForm.res15.value=presenta(res15,decimales);
	elForm.res16.value=presenta(res16,decimales);
	elForm.res17.value=presenta(res17,decimales);
	elForm.res18.value=presenta(res18,decimales);
	elForm.res19.value=presenta(res19,decimales);
	elForm.res110.value=presenta(res110,decimales);
	elForm.res111.value=presenta(res111,decimales);
	elForm.res112.value=presenta(res112,decimales);
}
