Jump to content

Archived

This topic is now archived and is closed to further replies.

dedindol

[Resolvido] Calculo de juros

By dedindol, in ASP Clássico

Recommended Posts

dedindol    0

dedindol
Posted

Pessoal,

 

A dúvida agora é como calcular os juros dos produtos de um ecommerce que to fazendo.

 

seguinte, achei um código pronto aqui no forum mesmo, o código é esse aqui...

 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
</head>

<body>

<%
'calcula o valor de cada parcela, e em quantas vezes o produto poderá ser parcelado e com quantas parcelas
'possui juros, e quantas não possui.
x = "2.550,00" 'Valor do Produto
y = "12" 'Nº total de Parcelas
cjuros = "0,05" 'Juros Cobrado a.m
juros = 12'"6" -1 +1 'Nº de Parcela C/ Juros
%>
<table border="0" width="200"cellspacing="1" cellpadding="0" bgcolor="#F2F2F2">
	<tr>
		<td width="197" align="center" colspan="3">
		<p align="left"><b><font face="Verdana" size="2">Parcelamento</font></b></td>
	</tr>
<%
For i = 1 To y
If (i-1) = Round(y/2,0) Then
End If
%>
	<tr>
		<td width="38"><font face="Verdana" size="2"><%=i%> x</font></td>
		<td width="90"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then valor = FormatCurrency(Round(x/i,1),2) else valor = FormatCurrency(x * (cjuros * (1+cjuros)^ i) / ((1+cjuros)^ i -1))%><%=valor%></font></td>
		<td width="67"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then juro = "sem juros" Else juro = "<font color='#FF0000'>com juros</font>"%><%=juro%></font></td>
	</tr>
<%Next%>
</table>
</body>
</html>

Esse código está em tabela e formatadinho já,

 

o problema é o seguinte!

O calculo não está batendo com o do banco central...

 

os juros informados no sistema são de 0,05 e deu um valor de parcela em 12 vezes de R$ 287,70.

 

No banco central para chegar no valor de R$ 287,70 eu tive que colocar uma taxa de juros de 5%,

 

ou seja, esse código tá transformando 0,05% em 5%...

 

tentei, mas não consegui resolver esse problema,

 

alguém sabe como resolvo isso...

 

se quizerem conferir os juros do banco central o link é esse:

 

http://www.bcb.gov.br/?PRESTFIXA

valeu galera!!!

Share this post

Link to post
Share on other sites

Célido    0

Célido
Posted

Pessoal,

 

A dúvida agora é como calcular os juros dos produtos de um ecommerce que to fazendo.

 

seguinte, achei um código pronto aqui no forum mesmo, o código é esse aqui...

 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>
</head>

<body>

<%
'calcula o valor de cada parcela, e em quantas vezes o produto poderá ser parcelado e com quantas parcelas
'possui juros, e quantas não possui.
x = "2.550,00" 'Valor do Produto
y = "12" 'Nº total de Parcelas
cjuros = "0,05" 'Juros Cobrado a.m
juros = 12'"6" -1 +1 'Nº de Parcela C/ Juros
%>
<table border="0" width="200"cellspacing="1" cellpadding="0" bgcolor="#F2F2F2">
	<tr>
		<td width="197" align="center" colspan="3">
		<p align="left"><b><font face="Verdana" size="2">Parcelamento</font></b></td>
	</tr>
<%
For i = 1 To y
If (i-1) = Round(y/2,0) Then
End If
%>
	<tr>
		<td width="38"><font face="Verdana" size="2"><%=i%> x</font></td>
		<td width="90"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then valor = FormatCurrency(Round(x/i,1),2) else valor = FormatCurrency(x * (cjuros * (1+cjuros)^ i) / ((1+cjuros)^ i -1))%><%=valor%></font></td>
		<td width="67"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then juro = "sem juros" Else juro = "<font color='#FF0000'>com juros</font>"%><%=juro%></font></td>
	</tr>
<%Next%>
</table>
</body>
</html>

Esse código está em tabela e formatadinho já,

 

o problema é o seguinte!

O calculo não está batendo com o do banco central...

 

os juros informados no sistema são de 0,05 e deu um valor de parcela em 12 vezes de R$ 287,70.

 

No banco central para chegar no valor de R$ 287,70 eu tive que colocar uma taxa de juros de 5%,

 

ou seja, esse código tá transformando 0,05% em 5%...

 

tentei, mas não consegui resolver esse problema,

 

alguém sabe como resolvo isso...

 

se quizerem conferir os juros do banco central o link é esse:

 

http://www.bcb.gov.br/?PRESTFIXA

valeu galera!!!

 

Brother, Boa Tarde:

 

O Problema esta nos códigos: aqui usa-se os parametros:

 

0,05 = 5%

0,50 = 50%

5,00 = 500%

 

No deles, usa-se normalmente, através de outra formula, ou seja:

 

0,05 = 0,5%

0,50 = 50,0%

5,00 = 500,0%

 

Espero ter ajudado.

 

Valeu

Share this post

Link to post
Share on other sites

dedindol    0

dedindol
Posted

Achoq ue entendi,

 

mas nao consegui achar como resolver isso no código...

 

o que eu tenho que fazer para arrumar isso nesse código, pois o cliente exigi que seja igual ao site que te passei!

 

Valeu!

Share this post

Link to post
Share on other sites

Mário Monteiro    179

Mário Monteiro
Posted

so divide por 100 ja que é porcentagem e ta resolvido

Share this post

Link to post
Share on other sites

dedindol    0

dedindol
Posted

Tentei quase a noite inteira e nao consegui...

 

não to entendendo esse código!

 

Por favor, onde está fazendo essa divisão???

 

Onde posso alterar a divisão pra dividir por 100????

 

valeu!

Share this post

Link to post
Share on other sites

Célido    0

Célido
Posted

Tentei quase a noite inteira e nao consegui...

 

não to entendendo esse código!

 

Por favor, onde está fazendo essa divisão???

 

Onde posso alterar a divisão pra dividir por 100????

 

valeu!

 

Brother.

 

O Problema está no Código que insere as parcelas (Inputs).

se voce digitar 0,05% no Input, ele considera 0,5% e fara a conta certa, depende do valor que esta no Campo (Input) (Formato).

se voce digitar 5,0 ele considera 5%

 

Outro fator, é se no input ele considera a pontuação (,) ou (.), isto faz a diferença.

 

espero ter ajudado

 

Valeu

Share this post

Link to post
Share on other sites

dedindol    0

dedindol
Posted

Cara,

 

o problema é que nao tem imput para inserção dos valores,

 

os valores estão direto no código ele está fazendo o calculo errado.

 

a idéia é inserir os imputs, mas antes preciso arrumar esse erro de calculo,

 

eu preciso saber como fazer para ele interpretar 0,5 como 0,5 e 5 como 5...

 

não entendi muito bem esse código, por isso não faço ideia de como e onde mexer para arrumar isso!

Share this post

Link to post
Share on other sites

xanburzum    169

xanburzum
Posted 

<%

' exemplo

Dim preco, parcela, juros, total

preco = 20

parcela = 5

juros = 10

 

 

total = (((preco * juros / 100) + preco) * parcela)

Response.Write "Total:" & FormatCurrency(total)

%>

Share this post

Link to post
Share on other sites

Célido    0

Célido
Posted

Cara,

 

o problema é que nao tem imput para inserção dos valores,

 

os valores estão direto no código ele está fazendo o calculo errado.

 

a idéia é inserir os imputs, mas antes preciso arrumar esse erro de calculo,

 

eu preciso saber como fazer para ele interpretar 0,5 como 0,5 e 5 como 5...

 

não entendi muito bem esse código, por isso não faço ideia de como e onde mexer para arrumar isso!

 

Tentou isto?

 

cjuros = "0,0005" 'Juros Cobrado a.m

Share this post

Link to post
Share on other sites

dedindol    0

dedindol
Posted

xanburzum, o resultado não bate com o do site do banco central cara...

 

simulei o valor de 200 parcelado em 4 X com juros de 5% o resultado no banco central foi

 

4 X de 56,4

 

A mesma situação no seu código resultou em

 

4X de 52,50

 

tentei com 0,05 no seu código e 5% no banco central e mesmo assim nao bateram os valores...

 

Célido, o problema de digitar 0,0005 é que o cliente quando for cadastrar o produto digitará apenas,

 

1% ou 0,5% ou 5%, enfim...

 

tem que fazer o calculo certo com o que estiver digitado no campo...

 

Valeu!

Share this post

Link to post
Share on other sites

xanburzum    169

xanburzum
Posted

tenta esse aqui

 

<%

npar=3 'Numero de Parcelas
juros=2'Taxa de juros
juros_cartao = ccur(juros)/100 ' Juros no cartao
valor=100 ' Valor
valor=ccur(valor)



resultado=(formatcurrency((valor*juros_cartao*(1+juros_cartao)^(npar-1))/((1+juros_cartao)^npar-1))&"")



Response.Write("<br>"&npar&" x  de "& resultado&" <br>") 
Response.Write("<br>Valor Total de "& formatcurrency (valor)&" <br>")
Response.Write("Taxa de juros "&juros_cartao * 100&" % a.m")
response.end
 %>

Share this post

Link to post
Share on other sites

dedindol    0

dedindol
Posted

Ainda nao bateu com o site do banco central.

 

http://www.bcb.gov.br/?PRESTFIXA

 

Banco central:

Valor: 200
taxa: 5%
numero de parcelas: 4
Valor das parcelas: 56,40

Seu código:

Valor: 200
taxa: 5%
numero de parcelas: 4
Valor das parcelas: 53,72

Tentei tbm fazer uma alteração no calculo mas me perdi nos ^ o que significa isso "^" em asp???

 

Valeu!

Share this post

Link to post
Share on other sites

xanburzum    169

xanburzum
Posted

o "^" é um numero elevado, ou seja

resultado2=(2)^(2)
será igual a 4

esta funcao nao deu certo ??

 

total = (((preco * juros / 100) + preco) * parcela)

Share this post

Link to post
Share on other sites
Go To Topic Listing ASP Clássico
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.

  I accept