// JavaScript Document
var obj_importe,obj_plazo,obj_interes,obj_pagos,obj_cuota;var importe = 0;var plazo = 0;var interes = 0;var pagos = 12;var cuota = 0;var moneda = 0;var n = 0;var old_resp=0;function esNumero(cadena){var anum = /(^\d+$)|(^\d+\.\d+$)/;if (anum.test(cadena)) { return true; }
else { return false; }}
function Leer_campo(campo){var ind1 = 0;var valor = campo.value;var valor2 = valor.toString();if (valor2 == "") { return "0"; }
if (campo != document.forms.formCuotaPrestamo.interes){ind1 = valor2.indexOf(".");if (ind1 != -1){alert ("Por favor, introduzca una cantidad sin puntos.");valor2 = "0";}}
else{ind1 = valor2.indexOf(",");if (ind1 != -1){valor2 = valor2.replace(/\,/g,".");}}
if (campo == document.forms.formCuotaPrestamo.importe){ind1 = valor2.indexOf(",");if (ind1 != -1){valor2 = valor2.replace(/\,/g,".");}}
if (!esNumero(valor2)) { alert("El valor introducido debe ser un numero positivo, por favor introduzcalo de nuevo.");  valor2 = "0"; }
return valor2;}
function Escribir_campo(valor,nored){if(nored!=true)(moneda==1)? valor=Redondear(valor,2) : valor=Redondear(valor,0);if (valor == 0) { return ""; }
valor2 = valor.toString();valor2 = valor2.replace(/\./g, ",");if (valor2.substr(0, 1) == ",") { valor2 = "0" + valor2; }
pos_coma = valor2.indexOf(",");if (pos_coma == -1) { pos_coma = valor2.length; }
while (pos_coma > -1  &&  pos_coma > 3){valor2 = valor2.substr(0, pos_coma-3) + "." + valor2.substr(pos_coma-3);pos_coma = pos_coma - 3;}
valor3 = "" + valor2;valor3 = valor3.replace(/\,/g, ".");if (parseFloat(valor3) == 0.0) { valor2 = ""; }
return valor2.valueOf();}
function Redondear( number, numDec ) {if (numDec == 0){var roundNum = number.toString();var ind1 = roundNum.indexOf(".");if (ind1 == -1) { return roundNum; }
else{var returnNum = Math.round(roundNum);return returnNum;}}
else{var roundNum  = number * ( Math.pow(10,numDec) );roundNum  = Math.round(roundNum);var returnNum = roundNum / (Math.pow(10,numDec));return returnNum;}}
function eurosPtas(valor){var i = valor.indexOf( "." )
while ( i > 0 ) {valor = valor.substring( 0, i ) + valor.substring( i + 1 )
i = valor.indexOf( "." )}
var FactorCambio = 166.386;var euros = valor / FactorCambio;var eurosRed = Redondear(euros,3);return eurosRed;}
function ptasEuros(valor){var FactorCambio = 166.386;var euros = valor * FactorCambio;var eurosRed = Redondear(euros,3);return eurosRed;}
function cuotaPrestamo(){var a=0;var b=0;var c=0;if (interes>0){a = importe*((interes/100)/pagos);b = 1-(Math.pow(1+((interes/100)/pagos),-(plazo*pagos)));c = a/b;}
else{c=importe/(plazo*pagos);}
return c;}
function init(){obj_importe = document.forms.formCuotaPrestamo.importe;obj_plazo = document.forms.formCuotaPrestamo.plazo;obj_interes = document.forms.formCuotaPrestamo.interes;obj_pagos = document.forms.formCuotaPrestamo.pagos;obj_cuota = document.forms.formCuotaPrestamo.cuota;Actualizar_valores("");}
function calcula( cual ) {if ( importe > 0 && plazo > 0 && interes >= 0 && pagos > 0 ) {if ( ( cual == "importe" ) || ( cual == "plazo" ) || ( cual == "interes" ) || ( cual == "pagos" ) ) {cuota = cuotaPrestamo();obj_cuota.value = Escribir_campo( cuota );enviarRT()}}}
function Actualizar_valores( variable ) {switch( variable ) {case "importe":
importe = Leer_campo(obj_importe);  break;case "plazo":
plazo = Leer_campo(obj_plazo);if (plazo<=0){alert("Por favor, introduzca un plazo mayor que 0");plazo=0;}
break;case "interes":
interes = Leer_campo(obj_interes);break;case "pagos":
pagos = Leer_campo(obj_pagos);if (pagos<=0){alert("Por favor, introduzca un n?mero de pagos mayor que 0");pagos=0;}
break;}
obj_importe.value = Escribir_campo(importe);obj_plazo.value = Escribir_campo(plazo,true);if(obj_interes.value==0){obj_interes.value="0";}
else{obj_interes.value = Escribir_campo(interes,true);}
obj_pagos.value = Escribir_campo(pagos,true);obj_cuota.value = Escribir_campo(cuota,false);}
function enviarRT() {if ( ( ns && window.document.layers[ "divRT" ] != undefined ) || ( ( ie5 || ns6 ) && window.document.getElementById( "divRT" ) != undefined ) || window.document.all[ "divRT" ] != undefined ) {camposRT = "hipotecas*importe*plazo"
mapeoRT = "Hipotecas*Importe_Prestamo*Plazo_Prestamo"
urlRT = "/CajaMadrid/recubrimientoRT/RT_Evento_Informativo?camposRT=" + camposRT + "&mapeoRT=" + mapeoRT + "&importe=" + importe + "&plazo=" + document.forms.formCuotaPrestamo.plazo.value + "&hipotecas=1&nombreEvento=PerfilPrestamos"
/*
var aa = "<img src=\"" + urlRT + "\" width=\"1\" height=\"1\" border=\"0\">"if( ns ) {window.document.layers[ "divRT" ].document.open()
window.document.layers[ "divRT" ].document.write( aa )
window.document.layers[ "divRT" ].document.close()}else if ( ie5 || ns6 ) {window.document.getElementById( "divRT" ).innerHTML = aa}else {window.document.all[ "divRT" ].innerHTML = aa}
*/
}
}