[firebase-br] Problema casas decimais

[Samuel M. Basso]

Muito Obrigado, vou analisar seu material que mandou e qualquer coisa entro
em contato.

Mais uma vez muito obrigado.


2011/7/15 Tecnobyte Informática <temp2 em tecnobyte.com.br>

> Olá Samuel
>
> Já palestrei sobre este assunto e o material da palestra está disponível
> através do link abaixo:
>
> http://www.tecnobyte.com.br/**palestras/numeros.zip<http://www.tecnobyte.com.br/palestras/numeros.zip>
>
> O arredondamento do Delphi é diferente do arredondamento das calculadoras
> financeiras. Na unit dpgMath.pas existem funções que fazem arredondamento e
> truncamento da mesma forma que as calculadoras financeiras.
>
> Talvez possa te ajudar a resolver o problema.
>
> Atenciosamente.
>
> Daniel P. Guimarães
> Tecnobyte Informática
> www.tecnobyte.com.br
>
>
>
> -----Mensagem Original----- From: Samuel M. Basso
> Sent: Friday, July 15, 2011 7:18 AM
> To: FireBase
> Subject: [firebase-br] Problema casas decimais
>
> Bom dia.
>
> Estou tendo problemas com casas decimais, diferença de centavos, utilizo
> Delphi 7 e Firebird.
>
> Os campos:
> ALQ_IPI NUMERIC(5,3)
> VLR_B_CAL_IPI NUMERIC(11,2)
> VLR_IPI NUMERIC(11,2)
>
> O calculo no delphi:
> ItensVLR_IPI.Value := ItensVLR_B_CAL_IPI.Value * (ItensALQ_IPI.Value /
> 100);
>
> ItensVLR_IPI.Value := 2.857,50 * 0,15
> ItensVLR_IPI.Value = 428,62
>
> Agora se eu fizer na calculadora:
> 2.857,50 * 0,15 = 428,63
>
>
> Diferença de 1(UM) centavo.
>
>
> Alguém tem idéia do motivo do delphi dar essa diferença? Como os campos no
> banco de dados estão com 2 casas decimais o delphi não deveria arredondar?
>
> --
>
>
> Atenciosamente,
>
> *Samuel M. Basso*
> Fone: (54) 3462-5522
> Cel: (54) 8135-3723
> Skype: samuelbasso
> Twitter: @samuelbasso
> E-mail/MSN: samuelbasso em gmail.com
> Web site: www.otimizy.com.br
>
> ______________________________**________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/**artigo.php?id=1107<http://www.firebase.com.br/fb/artigo.php?id=1107>
> Para consultar mensagens antigas: http://firebase.com.br/**pesquisa<http://firebase.com.br/pesquisa>
>



-- 


Atenciosamente,

*Samuel M. Basso*
Fone: (54) 3462-5522
Cel: (54) 8135-3723
Skype: samuelbasso
Twitter: @samuelbasso
E-mail/MSN: samuelbasso em gmail.com
Web site: www.otimizy.com.br