Ver Mensaje Individual
  #6  
Viejo 18/09/12, 16:08:04
CRISTINO.GARCIA CRISTINO.GARCIA is offline
Senior Member
 
Fecha de Ingreso: ago 2012
Mensajes: 101
ALV con montos Negativos

Hola Amigo
En mi programa hago la busqueda asi:

FORM IMPORTE_MON_LOCAL_CON_SIGNO.

DATA: AUX LIKE BSEG-FDWBT.
CLEAR: IMPORTEMONEDALOCAL,MONEDA.


SELECT SINGLE FDWBT INTO AUX
FROM BSEG
WHERE BUKRS = TABLA-BUKRS
AND BELNR = TABLA-BELNR
AND BUZEI = TABLA-BUZEI.


IF AUX < 0.
IMPORTEMONEDALOCAL = TABLA-DMBTR * -1.
IMPORTEMONEDADOC = TABLA-WRBTR * -1.
ELSE.
IMPORTEMONEDALOCAL = TABLA-DMBTR.
IMPORTEMONEDADOC = TABLA-WRBTR.
ENDIF.
MONEDA = 'VEF'. " Ultima Columna

ENDFORM.

Total General
W_POSI = W_POSI + 1.
gt_fieldcat-tabname = 'TABLA'.
gt_fieldcat-emphasize = 'C401'.
gt_fieldcat-fieldname = 'AUX'.
gt_fieldcat-ddictxt = 'L'.
gt_fieldcat-seltext_l = 'Total General'.
gt_fieldcat-col_pos = W_POSI.
gt_fieldcat-ref_tabname = 'BSEG'. "Tabla de Referencia
gt_fieldcat-ref_fieldname = 'FDWBT'. "Campo Referencia en Tabla
gt_fieldcat-do_sum = ' '. "Sumarizar (campo numerico)
APPEND gt_fieldcat.
CLEAR gt_fieldcat.

En la funcion si veo que trae el signo pero al llegar a este punto me imprime solo 0.00.

Gracias

Cristino

Responder Con Cita