=?US-ASCII?Q?Re: [firebase-br] Pessoal, t=F4 perdendo as =3D?iso-8859-1?Q?esperan=3DE7as...?=3D?=

[Pha-Lista]

Fuzari,

Nao é bem assim que funciona, o metodo asFloat apenas vai receber um valor Double e converte para o valor do componente TField que o Delphi criou.

Falando nisso, qual o compomente TField que o Delphi criou? Qual tipo do value? Se nao quiser utilizar asFloat Converta o resultado para mesmo tipo do value.

Você nao está estourando o valor do campo, tente definir o campo como Numeric(15, 2), o tamanho interno no FB sera o mesmo, pois os tipos internos sao definido 0 a 4 ou 5 nao me lembro como SmallInt, 4 a 9 como integer, e acima de 9 como Int64.

PHA
Nova Odessa / SP - Brazil

-----Mensagem original-----
From: fuzari em task.com.br
Date: Thu,  7 Apr 2005 12:55:00 -0300
To: FireBase lista em firebase.com.br
Subject: Re: [firebase-br] Pessoal,tô perdendo as	=?iso-8859-1?Q?esperan=E7as...?=

> 
> Obrigado, Luis Carlos.
> 
> Porém, o campo tipo float não é recomendado por causa dos arredonda> mentos.
> 
> sds
> 
> Fuzari
> 
> > No delphi defina os campos com asfloat :
> >
> > ClientDataSetLoteLanctoMOVDEB_LOTELANCTO.asfloat :=
> > ClientDataSetLoteLanctoMOVDEB_LOTELANCTO.asfloat +
> > ClientDataSetLancamentoVLR_LANCTO.asfloat;
> >
> >
> > Espero ter Ajudado!
> >
> >
> > Luiz Carlos.
> >
> > fuzari em task.com.br escreveu:
> >
> >> Pessoal... criei a tabela abaixo com os campos NUMERIC e outro calcula> do.
> >> CREATE TABLE "LOTELANCTO"
> >> (
> >> "MA_LOTELANCTO"     CHAR(7) NOT NULL,
> >> "MOVDEB_LOTELANCTO"     NUMERIC(11,2),
> >> "MOVCRE_LOTELANCTO"     NUMERIC(11,2),
> >> "STATUS_LOTELANCTO"     CHAR(1),
> >> "DIFERENCA"     COMPUTED BY (MovDeb_LoteLancto -MovCre_LoteLancto),
> >> PRIMARY KEY ("MA_LOTELANCTO")
> >> );
> >> Em um formulário de lançamentos, eu preciso que a aplicação at> ualize os
> >> campos MOVDEV e MOVCRE, conforme abaixo.
> >> ClientDataSetLoteLanctoMOVDEB_LOTELANCTO.value :=
> >> ClientDataSetLoteLanctoMOVDEB_LOTELANCTO.value +
> >> ClientDataSetLancamentoVLR_LANCTO.value;
> >>        ClientDataSetLoteLanctoMOVCRE_LOTELANCTO.value :=
> >> ClientDataSetLoteLanctoMOVCRE_LOTELANCTO.value +
> >> ClientDataSetLancamentoVLR_LANCTO.value;
> >> Ao fazer a compilação, o Delphi envia um amensagem de tipos incomp> atíveis
> >> entre os campos MOVDEB_LOTELANCTO.value e MOVCRE_LOTELANCTO.value com > o
> >> campo VLR_LANCTO, que também é do tipo NUMERIC(11,2).
> >> Alguém já passou por isso?
> >> Uso Delphi6/FB/DBExpress.
> >> sds
> >> Fuzari.
>