multiplicar campo currency

[Sistemas ATH]

Buenos días Foro,

Cómo puedo multiplicar un campo currency (bsak-wrbtr) por -1 ?
es decir convertirlo en negativo si está en el debe (bsak-shkzg = 'S')

Gracias por vuestra ayuda.
un saludo.

[J e f f]

Buenas. Simplemente multiplicalo por -1.

if SHKZG eq 'S'
tu_variable = tu_variable * -1.
endif.

Slds,

[Sistemas ATH]

Gracias Jeff, pero al hacerlo así da error al ser un campo currency. (valor demasiado grande).

Lo solucioné asi:

DATA impabono(15) type p.
impabono = bsak-wrbtr.

if bsak-shkzg = 'S'.
impabono = impabono * -1.
else.
endif.
write impabono.

un saludo.