Página 1 de 1

Super Funcao de Calculo de Financiamento

Enviado: 18 Dez 2006 00:51
por rochinha
Amiguinhos

Esta função dá como retorno o valor da parcela de um financiamento baseada numa tabela de coeficiente passada a ela.

Voce precisa dos parametros:

Valor da compra: exemplo R$ 125,00
Taxa de Abertura de Crédito: exemplo R$ 50,00
Numero de Parcelas: exemplo 3
Vetor com os Coeficientes( opcional )

Código: Selecionar todos

FUNCTION CalculoDeFinanciamento( nPrincipal, nTAC, nParcelas, aCoeficiente )
   DEFAULT aCoeficiente := { 1.03099,; // 0+1
                             0.52336,; // 0+2
                             0.35420,; // 0+3
                             0.26966,; // 0+4
                             0.21897,; // 0+5
                             0.18520,; // 0+6
                             0.16111,; // 0+7
                             0.14305,; // 0+8
                             0.12903,; // 0+9
                             0.11782,; // 0+10
                             0.10867,; // 0+11
                             0.10106,; // 0+12
                             0.09462,; // 0+13
                             0.08911,; // 0+14
                             0.08434,; // 0+15
                             0.08017,; // 0+16
                             0.07649,; // 0+17
                             0.07323,; // 0+18
                             0.07033,; // 0+19
                             0.06771,; // 0+20
                             0.06536,; // 0+21
                             0.06322,; // 0+22
                             0.06127,; // 0+23
                             0.05949 } // 0+24
   RETURN ((nPrincipal+nTAC)*aCoeficiente[nParcelas])
Como exemplo o valor retornado será respectivamente 180.42, 91,59 e 61.99 para 1 parcela, 2 parcelas e 3 parcelas.

Caso voces possuam outras tabelas com coeficientes basta passa-las no ultimo parametro como um Array.