Acá les dejo un código para realizarlo:
Código:
TYPE-POOLS: slis.
* Tabla interna para datos de la tabla de clientes
* c es un campo CHECK para la seleccion
DATA: BEGIN OF it_tabla OCCURS 0.
INCLUDE STRUCTURE kna1.
DATA: check TYPE c.
DATA: END OF it_tabla.
**********************************************
* Retorna si el usuario selecciono CANCEL *
**********************************************
DATA: cancel(1) TYPE c.
SELECT * FROM kna1 INTO TABLE it_tabla.
* Llamamos a la función que nos permite hacer esto
CALL FUNCTION ‘REUSE_ALV_POPUP_TO_SELECT’
EXPORTING
i_title = ‘ALV KNA1’
i_selection = ‘X’
i_zebra = ‘X’
i_checkbox_fieldname = ‘CHECK’
i_tabname = ‘IT_TABLA’
i_structure_name = ‘KNA1’
IMPORTING
e_exit = cancel
TABLES
t_outtab = it_tabla
EXCEPTIONS
program_error = 1
OTHERS = 2.
LOOP AT it_tabla WHERE check = ‘X’.
IF ti_tabla-kunnr > 50.
WRITE: / it_tabla-kunnr, it_tabla-txt40.
ENDIF.
ENDLOOP.
Comentario