//-------------------------------------------------	
function calcular_onclick() {

	// Pasamos todos los campos a nº antes de operar con ellos
  textbox_to_number(document.formu.importeh);
  textbox_to_number(document.formu.inicial);
  textbox_to_number(document.formu.comision);

  valor1 = parseInt(document.formu.importeh.value);
  valor2 = parseInt(document.formu.inicial.value);
  comision = parseInt(document.formu.comision.value);
  
  if (comision == 0) {
  	document.formu.comision.value = 1;
    comision = 1;
  }
	
  if (valor1 > valor2) {
	  alert ("El importe a cancelar no puede superar al préstamo inicial.");
	  return;
	}

	if (comision > 3) {
		alert ("La comisión máxima es de un 3%");
		return;
  }

	buscarvalor3(valor2);

  textbox_to_euros(document.f_result.notario);
  textbox_to_euros(document.f_result.gestion);
  textbox_to_euros(document.f_result.registro);
  textbox_to_euros(document.f_result.iva);
  textbox_to_euros(document.f_result.impuesto);
  textbox_to_euros(document.f_result.comision_r);

	if (document.formu.tipo[0].checked) { // Cancelación total
		document.f_result.impuesto.value = Math.round(parseInt(valor2) * 0.01125);
		document.f_result.comision_r.value = Math.round(parseInt(valor1) * (comision / 100));
  } else { // Cancelación parcial
		document.f_result.impuesto.value = 0;
		document.f_result.comision_r.value = Math.round(parseInt(valor1) * (comision / 100));
		// Ponemos estos valores a 0, ya que los hemos puesto en buscavalor3 y no son aplicables
		document.f_result.notario.value = 0;
		document.f_result.registro.value = 0;
		document.f_result.gestion.value = 0;
		document.f_result.iva.value	= 0;
  }

	// Pasamos todos los campos a nº antes de sumarlos
  textbox_to_number(document.f_result.notario);
  textbox_to_number(document.f_result.gestion);
  textbox_to_number(document.f_result.registro);
  textbox_to_number(document.f_result.iva);
  textbox_to_number(document.f_result.impuesto);
  textbox_to_number(document.f_result.comision_r);
  
  // Suma
  suma = 0;
  suma = suma + parseInt(document.f_result.notario.value);
  suma = suma + parseInt(document.f_result.gestion.value);
  suma = suma + parseInt(document.f_result.registro.value);
  suma = suma + parseInt(document.f_result.iva.value);
  suma = suma + parseInt(document.f_result.impuesto.value);
  suma = suma + parseInt(document.f_result.comision_r.value);
  document.f_result.total.value = suma;

/*
  if (!EsNumerico(document.formu.comision.value)) {
    alert ("EL valor introducido no es un número");
    document.formu.comision.focus();
    return;
  }

  if (document.formu.comision.value > 3) {
	  alert ("La comisión máxima es de un 3%");
	  document.formu.comision.focus();
	  return;
	}
	
  if (document.formu.comision.value < 0) {
		alert ("No introduzca intereses negativos");
		document.formu.comision.focus();
	  return;
	}
		
  if (document.formu.comision.value == "") {
		document.formu.comision.value = 1; 
	}

  var suma;
  buscarvalor3(valor2);

  if (document.formu.radio[0].checked) {
	  if (document.formu.tipo[0].checked) {
		  document.f_result.impuesto.value = 0; //parseInt(valor2) * 0.01125;
		  document.f_result.comision_r.value = Math.round(parseInt(valor1) * (document.formu.comision.value / 100));
			suma = parseInt(document.f_result.comision_r.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.iva.value);
			document.f_result.total.value = suma;	
			document.f_result.total.value = Formato_numero(document.f_result.total.value);
			document.f_result.impuesto.value = 0; //Formato_numero(Math.round(document.f_result.impuesto.value));
			document.f_result.notario.value = Formato_numero(document.f_result.notario.value);
			document.f_result.registro.value = Formato_numero(document.f_result.registro.value);
			document.f_result.gestion.value = Formato_numero(document.f_result.gestion.value);
			document.f_result.iva.value	= Formato_numero(document.f_result.iva.value);	
			document.f_result.comision_r.value = Formato_numero(document.f_result.comision_r.value);
	  } else {
			document.f_result.impuesto.value = 0;
			document.f_result.comision_r.value = Math.round(parseInt(valor1) * (document.formu.comision.value / 100));
			suma = document.f_result.comision_r.value;
			document.f_result.total.value = suma;	
			document.f_result.total.value = Formato_numero(document.f_result.total.value);
			document.f_result.comision_r.value = Formato_numero(document.f_result.comision_r.value);
			document.f_result.impuesto.value = 0;
			document.f_result.notario.value = 0;
			document.f_result.registro.value = 0;
			document.f_result.gestion.value = 0;
			document.f_result.iva.value	= 0;	
  	}
  } else {
		if (document.formu.tipo[0].checked) {
			document.f_result.impuesto.value = Math.round(parseInt(valor2) * 0.01125);
			document.f_result.comision_r.value = Math.round(parseInt(valor1) * (document.formu.comision.value / 100));
			document.f_result.notario.value = Math.round(document.f_result.notario.value / 166.386);
			document.f_result.registro.value = Math.round(document.f_result.registro.value / 166.386);
			document.f_result.gestion.value = Math.round(document.f_result.gestion.value / 166.386);
			document.f_result.iva.value	= Math.round(document.f_result.iva.value / 166.386);
			suma = parseInt(document.f_result.comision_r.value) + parseInt(document.f_result.notario.value) + parseInt(document.f_result.impuesto.value) + parseInt(document.f_result.registro.value) + parseInt(document.f_result.gestion.value) + parseInt(document.f_result.iva.value);
			document.f_result.total.value = Math.round(suma);
			document.f_result.impuesto.value = Formato_numero(Math.round(document.f_result.impuesto.value));
			document.f_result.notario.value = Formato_numero(document.f_result.notario.value);
			document.f_result.registro.value = Formato_numero(document.f_result.registro.value);
			document.f_result.gestion.value = Formato_numero(document.f_result.gestion.value);
			document.f_result.iva.value = Formato_numero(document.f_result.iva.value);
			document.f_result.total.value = Formato_numero(document.f_result.total.value);
			document.f_result.comision_r.value = Formato_numero(document.f_result.comision_r.value);
	  } else {
			document.f_result.impuesto.value = 0;
			document.f_result.comision_r.value = Math.round(parseInt(valor1) * (document.formu.comision.value / 100));
			document.f_result.notario.value = 0;
			document.f_result.registro.value = 0;
			document.f_result.gestion.value = 0;
			document.f_result.iva.value	= 0;
			suma = document.f_result.comision_r.value;
			document.f_result.total.value = Math.round(suma);
			document.f_result.total.value = Formato_numero(document.f_result.total.value);
			document.f_result.comision_r.value = Formato_numero(document.f_result.comision_r.value);
	  }
  }
*/
}

//-------------------------------------------------	
function buscarvalor3(v1) {
v1 = v1 * 166.386;
if (v1 > "50000000") {document.f_result.notario.value = 100000;document.f_result.registro.value = 50500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;
for (i=50000000;i<v1;i+=1000000){document.f_result.notario.value = parseInt(document.f_result.notario.value) + 1000;document.f_result.registro.value = parseInt(document.f_result.registro.value) + 500;}}
if (v1 > "45000000" && v1 <= "50000000"){document.f_result.notario.value = 100000;document.f_result.registro.value = 50500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;document.f_result.impuesto.value = 562500;}
if (v1 > "40000000" && v1 <= "45000000"){document.f_result.notario.value = 95000;document.f_result.registro.value = 48000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;document.f_result.impuesto.value = 506250;}
if (v1 > "35000000" && v1 <= "40000000"){document.f_result.notario.value = 90000;document.f_result.registro.value = 45500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;document.f_result.impuesto.value = 450000;}
if (v1 > "30000000" && v1 <= "35000000"){document.f_result.notario.value = 85000;document.f_result.registro.value = 43000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;document.f_result.impuesto.value = 393750;}
if (v1 > "29000000" && v1 <= "30000000"){document.f_result.notario.value = 80000;document.f_result.registro.value = 40500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;document.f_result.impuesto.value = 337500;}
if (v1 > "28000000" && v1 <= "29000000"){document.f_result.notario.value = 79000;document.f_result.registro.value = 40000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;document.f_result.impuesto.value = 326250;}
if (v1 > "27000000" && v1 <= "28000000"){document.f_result.notario.value = 78000;document.f_result.impuesto.value = 315000;document.f_result.registro.value = 39500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "26000000" && v1 <= "27000000"){document.f_result.notario.value = 77000;document.f_result.impuesto.value = 303750;document.f_result.registro.value = 39000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "25000000" && v1 <= "26000000"){document.f_result.notario.value = 76000;document.f_result.impuesto.value = 292500;document.f_result.registro.value = 38500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "24000000" && v1 <= "25000000"){document.f_result.notario.value = 75000;document.f_result.impuesto.value = 281250;document.f_result.registro.value = 38000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "23000000" && v1 <= "24000000"){document.f_result.notario.value = 74000;document.f_result.impuesto.value = 270000;document.f_result.registro.value = 37500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "22000000" && v1 <= "23000000"){document.f_result.notario.value = 73000;document.f_result.impuesto.value = 258750;document.f_result.registro.value = 37000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "21000000" && v1 <= "22000000"){document.f_result.notario.value = 72000;document.f_result.impuesto.value = 247500;document.f_result.registro.value = 36500;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "20000000" && v1 <= "21000000"){document.f_result.notario.value = 71000;document.f_result.impuesto.value = 236250;document.f_result.registro.value = 36000;document.f_result.gestion.value = 63000;document.f_result.iva.value = 10080;}
if (v1 > "19000000" && v1 <= "20000000"){document.f_result.notario.value = 70000;document.f_result.impuesto.value = 225000;document.f_result.registro.value = 35500;document.f_result.gestion.value = 43750;document.f_result.iva.value = 7000;}
if (v1 > "18000000" && v1 <= "19000000"){document.f_result.notario.value = 69000;document.f_result.impuesto.value = 213750;document.f_result.registro.value = 35000;document.f_result.gestion.value = 43750;document.f_result.iva.value = 7000;}
if (v1 > "17000000" && v1 <= "18000000"){document.f_result.notario.value = 68000;document.f_result.impuesto.value = 202500;document.f_result.registro.value = 35000;document.f_result.gestion.value = 43750;document.f_result.iva.value = 7000;}
if (v1 > "16000000" && v1 <= "17000000"){document.f_result.notario.value = 67000;document.f_result.impuesto.value = 191250;document.f_result.registro.value = 34000;document.f_result.gestion.value = 43750;document.f_result.iva.value = 7000;}
if (v1 > "15000000" && v1 <= "16000000"){document.f_result.notario.value = 66000;document.f_result.impuesto.value = 180000;document.f_result.registro.value = 34000;document.f_result.gestion.value = 43750;document.f_result.iva.value = 7000;}
if (v1 > "14000000" && v1 <= "15000000"){document.f_result.notario.value = 65000;document.f_result.impuesto.value = 168750;document.f_result.registro.value = 33000;document.f_result.gestion.value = 38000;document.f_result.iva.value = 6080;}
if (v1 > "13000000" && v1 <= "14000000"){document.f_result.notario.value = 64000;document.f_result.impuesto.value = 157500;document.f_result.registro.value = 33000;document.f_result.gestion.value = 38000;document.f_result.iva.value = 6080;}
if (v1 > "12000000" && v1 <= "13000000"){document.f_result.notario.value = 63000;document.f_result.impuesto.value = 146250;document.f_result.registro.value = 32000;document.f_result.gestion.value = 38000;document.f_result.iva.value = 6080;}
if (v1 > "11000000" && v1 <= "12000000"){document.f_result.notario.value = 62000;document.f_result.impuesto.value = 135000;document.f_result.registro.value = 32000;document.f_result.gestion.value = 38000;document.f_result.iva.value = 6080;}
if (v1 > "10000000" && v1 <= "11000000"){document.f_result.notario.value = 61000;document.f_result.impuesto.value = 123750;document.f_result.registro.value = 31000;document.f_result.gestion.value = 38000;document.f_result.iva.value = 6080;}
if (v1 > "9000000" && v1 <= "10000000"){document.f_result.notario.value = 59000;document.f_result.impuesto.value = 112500;document.f_result.registro.value = 31000;document.f_result.gestion.value = 32000;document.f_result.iva.value = 5120;}
if (v1 > "8000000" && v1 <= "9000000"){document.f_result.notario.value = 57000;document.f_result.impuesto.value = 101250;document.f_result.registro.value = 30000;document.f_result.gestion.value = 32000;document.f_result.iva.value = 5120;}
if (v1 > "7000000" && v1 <= "8000000"){document.f_result.notario.value = 56000;document.f_result.impuesto.value = 90000;document.f_result.registro.value = 28000;document.f_result.gestion.value = 32000;document.f_result.iva.value = 5120;}
if (v1 > "6000000" && v1 <= "7000000"){document.f_result.notario.value = 52000;document.f_result.impuesto.value = 78750;document.f_result.registro.value = 26000;document.f_result.gestion.value = 32000;document.f_result.iva.value = 5120;}
if (v1 > "5000000" && v1 <= "6000000"){document.f_result.notario.value = 51000;document.f_result.impuesto.value = 67500;document.f_result.registro.value = 25000;document.f_result.gestion.value = 32000;document.f_result.iva.value = 5120;}
if (v1 > "4000000" && v1 <= "5000000"){document.f_result.notario.value = 48000;document.f_result.impuesto.value = 56250;document.f_result.registro.value = 24000;document.f_result.gestion.value = 25500;document.f_result.iva.value = 4080;}
if (v1 > "3000000" && v1 <= "4000000"){document.f_result.notario.value = 46000;document.f_result.impuesto.value = 45000;document.f_result.registro.value = 22000;document.f_result.gestion.value = 25500;document.f_result.iva.value = 4080;}
if (v1 > "2000000" && v1 <= "3000000"){document.f_result.notario.value = 40000;document.f_result.impuesto.value = 33750;document.f_result.registro.value = 19000;document.f_result.gestion.value = 25500;document.f_result.iva.value = 4080;}
if (v1 > "1000000" && v1 <= "2000000"){document.f_result.notario.value = 31000;document.f_result.impuesto.value = 22500;document.f_result.registro.value = 17000;document.f_result.gestion.value = 25500;document.f_result.iva.value = 4080;}
if (v1 <= "1000000"){document.f_result.notario.value = 26000;document.f_result.impuesto.value = 11250;document.f_result.registro.value = 15000;document.f_result.gestion.value = 25500;document.f_result.iva.value = 4080;}
}