Foro de programación ABAP

Código abierto => Reports => Mensaje iniciado por: Enrique.Borroni en 03 de Noviembre de 2007, 10:30:37 am

Título: Como Crear ListBox en Reportes
Publicado por: Enrique.Borroni en 03 de Noviembre de 2007, 10:30:37 am

REPORT Y_ListBox_en_Reportes.

TYPE-POOLS: vrm.
DATA: name TYPE vrm_id, list TYPE vrm_values, value LIKE LINE OF list.
PARAMETERS: ps_parm(10) AS LISTBOX VISIBLE LENGTH 10.

AT SELECTION-SCREEN OUTPUT.
  name = 'PS_PARM'.
  value-key = '1'. value-text = 'Linea 1'. APPEND value TO list.
  value-key = '2'. value-text = 'Linea 2'. APPEND value TO list.
  value-key = '3'. value-text = 'Linea 3'. APPEND value TO list.
  value-key = '4'. value-text = 'Linea 4'. APPEND value TO list.
  value-key = '5'. value-text = 'Linea 5'. APPEND value TO list.
  value-key = '6'. value-text = 'Linea 6'. APPEND value TO list.

  CALL FUNCTION 'VRM_SET_VALUES'
       EXPORTING
            id     = name
            values = list.

START-OF-SELECTION.
  WRITE: / 'Parametros : ', ps_parm.

Título: Re:Como Crear ListBox en Reportes
Publicado por: molaci en 26 de Agosto de 2014, 09:42:26 am

Muchas gracias Enrique, me sirvió de mucho tu código.

Gracias por compartirlo.