Como fazer um Computed by com valores 0

Delphi

03/10/2005

Galera é o seguinte eu tenho um campo chamando valor_unitario que faz o calculo através das informaços dos campos:

QUANTIDADE numeric(15,5)
VLR_Total (numeric 15,8)

cujo o Computed by fica (VLR_Total / QUANTIDADE)

Blz dá certo, mais como fazer o cálculo se os campos estiverem zerados coisa que pode acontecer...

precisaria algo tipo um IF o erro que dá é esse:

----------------------------------------
Arithmetic overflow or division by zero has occurred.
arithmetic exception, numeric overflow, or string truncation.

----------------------------------------

Grato


Marcos Fernando

Marcos Fernando

Curtidas 0

Respostas

Macario

Macario

03/10/2005

Conforme fala minha professora de Calculo Diferencial,

´Não dividiras por Zero, senão queimaras no fogo do inferno´



Por que voce não trata com um bloco try except?

Acho que ajudaria. 8)


GOSTEI 0
Marcos Fernando

Marcos Fernando

03/10/2005

boa citação,


Pois é não procuro uma forma onde o Fb mesmo faça isso, mais pede ser uma alternativa,

thanks


GOSTEI 0
Marcos Fernando

Marcos Fernando

03/10/2005

Blz então se eu não posso fazer via Fb vai ser o jeito de usar ´try except´

mais onde eu posso usar na aplicação, pois grande parte faz referencia as tabela do campo que contém o Computed by,
tenho viversas IBquerys, IBdataset...

Grato


GOSTEI 0
Firekiller

Firekiller

03/10/2005

Tente deixar seu Computed By assim:

(Case
When ( (VLR_TOTAL IS NULL) OR (QUANTIDADE IS NULL) OR (VLR_TOTAL = 0) OR (QUANTIDADE = 0)) THEN 0
Else (VLR_TOTAL/QUANTIDADE)
End)

Da forma acima, defini que, se VLR_TOTAL ou QUANTIDADE forem Nulos ou 0 (zero), ele retorna 0 (zero), senão, faz o cálculo.


GOSTEI 0
Marcos Fernando

Marcos Fernando

03/10/2005

Amen valeu amigo fechou batata...


Thanks...


GOSTEI 0
POSTAR