//*****************************************************************************
// Do not remove this notice.
//
// Copyright 2006 by Virtualdata Ltda.
// http://www.virtualdata.com.br
//*****************************************************************************


function Tecla(e)
{
	if (document.all) 
	{
		var tecla=event.keyCode;
	}
	else if(document.layers) 
	{
		var tecla=e.which;
	}
	
	if (tecla > 47 && tecla < 58)
	{
		return true;
	}
	else
	{
		if (tecla != 8)
		{
			event.keyCode = 0;
			return false;
		}
		else
		{
			return true;
		}
	}
}

function TaxaJuros(e) 
{
	var lo_ddlGrupo=document.getElementById("ddlGrupo");
	var lo_txtTaxaJuro=document.getElementById("txtTaxaJuros");

	if (lo_ddlGrupo.value == 'C')
	{
		lo_txtTaxaJuro.value=3;
	}
	else if (lo_ddlGrupo.value == 'D')
	{
		lo_txtTaxaJuro.value=3;
	}
	else if (lo_ddlGrupo.value == 'E')
	{
		lo_txtTaxaJuro.value=7.25;
	}
ValorFinanciado(true);	
return false;
}

function ParcelasAnuais(e)
{
	var lo_txtParcelasAnuais=document.getElementById("txtParcelasAnuais");
	var lo_txtTotalMeses=document.getElementById("txtTotalMeses");
	var lo_ddlGrupo=document.getElementById("ddlGrupo");

	if 	(lo_txtParcelasAnuais.value > 0 && lo_txtParcelasAnuais.value < 9)
	{
		lo_txtTotalMeses.value=lo_txtParcelasAnuais.value*12;
		return true;
	}
	else
	{
		alert('Grupo ' + lo_ddlGrupo.value + ': Prazo de até 8 anos.');
		lo_txtParcelasAnuais.value="8";
		lo_txtTotalMeses.value=96;
		return false;
	}	
}

function ValorFinanciado(e)
{

	var lo_ddlGrupo=document.getElementById("ddlGrupo");
	var lo_txtValorFinanciado=document.getElementById("txtValorFinanciado");
	var lf_ValorFinanciado=lo_txtValorFinanciado.value;

	if (lo_ddlGrupo.value == 'C')
	{
		if 	(lf_ValorFinanciado > 9000)
		{
			alert('Grupo C: Limite de R$ 6.000,00 + 50% de sobreteto.');
			lo_txtValorFinanciado.value="9000";
		}
	}
	else if (lo_ddlGrupo.value == 'D')
	{
		if 	(lf_ValorFinanciado > 27000)
		{
			alert('Grupo D: Limite de R$ 18.000,00 + 50% de sobreteto.');
			lo_txtValorFinanciado.value="27000";
		}
	}
	else if (lo_ddlGrupo.value == 'E')
	{
		if 	(lf_ValorFinanciado > 60000)
		{
			alert('Grupo E: Limite de R$ 60.000,00.');
			lo_txtValorFinanciado.value="60000";
		}
	}

return false;
}

function VerificaCampos()
{

	var lo_txtValorFinanciado=document.getElementById("txtValorFinanciado");
	var lo_txtParcelasAnuais=document.getElementById("txtParcelasAnuais");
	
	if (lo_txtValorFinanciado.value != "" && lo_txtParcelasAnuais.value != "")
	{
	return true;
	}
	else
	{
	alert('Preencha os campos corretamente.');
	return false;
	}
	
}

function IT(id,texto)
{
	var lo_np=document.getElementById(id);
	lo_np.innerText=texto;
	return true;
}
 
function FormataDinheiro(valor) 
{
	var ls_centavos;
	var lb_sinal;
	var ll_i;
		
	if(isNaN(valor))
	{
		valor="0";
	}
	
	lb_sinal=(valor == (valor=Math.abs(valor)));
	valor=Math.floor(valor*100+0.50000000001);
	ls_centavos=valor%100;
	valor=Math.floor(valor/100).toString();
	
	if(ls_centavos<10)
	{
		ls_centavos="0" + ls_centavos;
	}
	
	for (ll_i=0; ll_i < Math.floor((valor.length-(1+ll_i))/3); ll_i++)
	{
		valor= valor.substring(0,valor.length-(4*ll_i+3))+'.'+valor.substring(valor.length-(4*ll_i+3));
	}
	
	return ('R$ ' + ((lb_sinal)?'':'-') + valor+ ',' + ls_centavos);
}

function Calcula(e)
{

	var lo_txtValorFinanciado=document.getElementById("txtValorFinanciado");
	var lo_txtParcelasAnuais=document.getElementById("txtParcelasAnuais");
	var lo_txtTaxaJuro=document.getElementById("txtTaxaJuros");
	var lo_txtTotalJurosPeriodo=document.getElementById("txtTotalJurosPeriodo");
	var lo_txtValorTotal=document.getElementById("txtValorTotal");
	var lf_Juro=lo_txtTaxaJuro.value/100;
	var lf_ValorTotalJuros=0;
	var lf_TotalJurosPeriodo=0;
	var lf_ValorTotal=0;
	var lf_Capital=0;
	var lf_Juros=0;
	var lf_TotalAno=0;
	var lf_TotalMes=0;
	var ll_i=0;
	var ld_Data=new Date();
	
	for (ll_i=0; ll_i < 8; ll_i++)
	{
		IT('Parcela' + (ll_i+1),' ');
		IT('Vencimento' + (ll_i+1),' ');
		IT('Capital' + (ll_i+1),' ');
		IT('Juros' + (ll_i+1),' ');
		IT('TotalAno' + (ll_i+1),' ');
		IT('TotalMes' + (ll_i+1),' ');
	}
	
	if (VerificaCampos() == true)
	{	
		for (ll_i=0; ll_i < lo_txtParcelasAnuais.value; ll_i++)
		{
			lf_Capital=lo_txtValorFinanciado.value/lo_txtParcelasAnuais.value;
			lf_ValorTotalJuros=lo_txtValorFinanciado.value-((lo_txtValorFinanciado.value/lo_txtParcelasAnuais.value)*ll_i+1);
			lf_Juros=lf_ValorTotalJuros*lf_Juro;
			lf_TotalAno=(lo_txtValorFinanciado.value/lo_txtParcelasAnuais.value)+(lf_ValorTotalJuros*lf_Juro);
			lf_TotalMes=((lo_txtValorFinanciado.value/lo_txtParcelasAnuais.value)+(lf_ValorTotalJuros*lf_Juro))/12;
			lf_TotalJurosPeriodo=lf_TotalJurosPeriodo+(lf_ValorTotalJuros*lf_Juro);
			lf_ValorTotal=lf_ValorTotal+((lo_txtValorFinanciado.value/lo_txtParcelasAnuais.value)+(lf_ValorTotalJuros*lf_Juro));
			
			IT('Parcela' + (ll_i+1),(ll_i+1)+' ª');
			IT('Vencimento' + (ll_i+1), parseInt(ld_Data.getDate())+"/"+parseInt(ld_Data.getMonth()+1)+"/"+parseInt(ld_Data.getFullYear()+ll_i+1));
			IT('Capital' + (ll_i+1),FormataDinheiro(lf_Capital));					
			IT('Juros' + (ll_i+1),FormataDinheiro(lf_Juros));		
			IT('TotalAno' + (ll_i+1),FormataDinheiro(lf_TotalAno));
			IT('TotalMes' + (ll_i+1),FormataDinheiro(lf_TotalMes));
		}
	
	lo_txtTotalJurosPeriodo.value=FormataDinheiro(lf_TotalJurosPeriodo);
	lo_txtValorTotal.value=FormataDinheiro(lf_ValorTotal);
	return true;
	}
	else
	{
	return false;
	}

}