erro no calculo?

[evaldo]

Meu sistema esta calculando 0,957 x 4,20 = 4.02 eu queria que o calcula fossem assim 0,957 x 4,20 = 4,0194, já alterei o set decimal para 4, na o sistema não muda nada, oque pode ser?

[Netavin]

amigo :
TRANSFORM(VARIAVEL,"@e 9,9999").

[]´s

Netavin

[Grings]

Estranho, testei aqui e funciona como vc precisa. Mas tente:

nVar:=Round(0.957 * 4.2,4)

[evaldo]

já tentei os dois post, e nada, o clipper tem um comando SET que faz isso, mas não lembro o nome dele, seu alguém souber.

[Ademir]

O SET FIXED tem que estar ON para o numero de casas decimais ser estabelecido por SET DECIMALS TO.

[Grings]

É o Set Decimals To 4. Será que vc não colocou Set Decimals To 2 em alguma parte do programa ? Já testou o código separado do seu programa ?

[sygecom]

Tche, posta como vc esta usando !!! se o SET DECIMALS TO e as dicas dos colegas tmb. não deu !!! posta ai..e vamos ver !!!

Abraços

[evaldo]

ja tentei assim.

FUNCTION FTOTAL(aGetVenda)

SET FIXED ON
SET DECIMALS TO 4

aGetVenda.vltotal := aGetVenda.qtde * aGetVenda.vlunitario

RETURN(.T.)

[sygecom]

Evaldo, de onde esta vindo esse aGetVenda ...vc esta pegando de algum DBF com algum campo numerico formato com algumas decimal ?

[Maligno]

A origem do número não faz diferença.
Mas ajudaria saber que código está sendo usado para apresentação do número, onde ele aparece com 2 casas decimais. Já que é aí que está o poblema, é a partir daí que ele deve ser analisado.

[diogenes_varela]

aGetVenda.vltotal

Estou tentando mas está dando erro nessa linha, deve ser o ponto?