Cambio de Signo

[ABellamy]

Buenas tardes.
Estoy armando un ALV en el que al cumplirse cierta condición, el importe debe de presentarse con signo negativo.

Mi código (lo presento abajo) es este y cuando lv_dmbtr sale del modulo de funciones se presenta algo así como: -1000.

Lo paso al campo que quiero y en la tabla interna se pone como 1000-
Inclusive hago un WRITE para ver como se presenta y sale lo mismo (1000-).
Destaco que el lv_dmbtr es tipo string ya que definiendolo como el tipo de dmbtr es moneda y este FM me da problemas con ese tipo de dato.

* Cambio de Signo en Importe.
LOOP AT lt_bseg INTO wa_bseg.
IF wa_bseg-shkzg = 'H'.
MULTIPLY wa_bseg-dmbtr BY -1.

lv_dmbtr = wa_bseg-dmbtr.

CALL FUNCTION 'CLOI_PUT_SIGN_IN_FRONT'
CHANGING
value = lv_dmbtr.

wa_bseg-dmbtr = lv_dmbtr.
MODIFY lt_bseg FROM wa_bseg TRANSPORTING dmbtr.
ENDIF.
ENDLOOP.


Alguna idea que puedan proporcionarme, por favor?

Gracias.