//ABCversionCBA
//version=20060803173549#Z:/VOB_ODPPUB/ODPPUB/Web Content/ODPPUB/docs/ODP/js/pres_hipoteca.js@@/main/RSUidamr2006080302/1;
//XYZversionZYX


//___________________________________________________________________
var iHipoteca="150000";
var iMensual="1000";
var rTpoIntrs="3,75";
var qPrdo="35";

var errorPeriodoAnos="El periodo debe de estar comprendido entre 1-35 años.";
var errorPeriodoMeses="El periodo debe de estar comprendido entre 1-420 meses.";

//comprueba si el periodo es válido 1<=periodo<=35 años o 1<=oeruidi<=420 meses
//devuelve "" si el periodo es valido y el mensaje de error en caso contrario
function siPeriodoValido(periodo, tipoPeriodo){
     periodomax=(tipoPeriodo=="a")?35:420;
	 tError=(tipoPeriodo=="a")?errorPeriodoAnos:errorPeriodoMeses;
	 if ( (periodo>=1)&& (periodo<=periodomax)){
	 	return "";
	 }else{
 	    return tError;  
	 }
}


//calcula la cuota para pedir una hipoteca donde
// importe: es la hipoteca que se solicita
//intereses: es el tanto de interes (en tanto por cienteo)
//plazo: es el número de meses de la hipoteca
function cuotaMensual(importe,interes,plazo) {
	   importe=StrReplace(importe, ".", "");
	   interes=StrReplace(interes, ",", ".");	   
	   interes=interes/100;
	// plazo en meses, interes en tanto por uno
        var numerador   = importe*interes/12*Math.pow((1+interes/12),plazo);
        var denominador = Math.pow((1+interes/12),plazo)-1;
        return redondear(numerador/denominador, 2);
}

//cuota para comprar ahora (pago inicial solo de intereses)
// importe: es la hipoteca que se solicita
//intereses: es el tanto de interes (en tanto por ciento)
//plazo: es el número de meses de la hipoteca
function cuotaComprarAhora(importe,interes,plazo) {
	   importe=StrReplace(importe, ".", "");
	   interes=StrReplace(interes, ",", ".");	   
	   interes=interes/100;

	    // plazo en meses, interes en tanto por uno
        var numerador   = importe*30*interes;
        var denominador = 360;
        return redondear(numerador/denominador, 2);
}


//calcula la hipoteca a solicitar
// importe: es la cuota que se desa pagar
//intereses: es el tanto de interes (en tanto por ciento)
//plazo: es el número de meses de la hipoteca
function hipotecaCalcular(importe,interes,plazo) {
	   importe=StrReplace(importe, ".", "");
	   importe=StrReplace(importe, ",", ".");	   
	   interes=StrReplace(interes, ",", ".");	   
	   interes=interes/100;
	// plazo en meses, interes en tanto por uno
        var numerador   = importe*(Math.pow((1+interes/12),plazo)-1);
        var denominador = interes/12*Math.pow((1+interes/12),plazo);
        return redondear(numerador/denominador, 2);
}




//  Redondea un número a un determinado número de decimales.
function redondear(number,X) {
//  X = (!X ? 2 : X);
  var result= Math.round(number*Math.pow(10,X))/Math.pow(10,X);
  return result;
}