La tabla que se muestre en el ALV tiene que tener un campo donde se guarde el indicador de selección.
TYPES: BEGIN OF T_SALIDA,
MBLNR TYPE MSEG-MBLNR,
MJAHR TYPE MSEG-MJAHR,
ZEILE TYPE MSEG-ZEILE,
BUDAT_MKPF TYPE MSEG-BUDAT_MKPF,
MATNR TYPE MSEG-MATNR,
TXZ01 TYPE EKPO-TXZ01,
BSTMG TYPE MSEG-BSTMG,
MEINS TYPE MSEG-MEINS,
DMBTR TYPE MSEG-DMBTR,
EBELN TYPE MSEG-EBELN,
EBELP TYPE MSEG-EBELP,
NETWR TYPE EKPO-NETWR,
MENGE2 TYPE EKPO-MENGE,
KBETR_DEP TYPE NETWR,
KBETR_DEL TYPE NETWR,
TOT_DEP TYPE NETWR,
TOT_DEL TYPE NETWR,
LIQUIDADO(1),
CHECK(1). ” este es el campo que se usa para indicar que esta marcada
TYPES: END OF T_SALIDA.
En los parametros del ALV se indica cual es el campo donde se guarda el valor
* ALV REQUIRED DATA OBJECTS.
DATA: W_TITLE TYPE LVC_TITLE,
W_REPID TYPE SYREPID,
W_COMM TYPE SLIS_FORMNAME,
W_STATUS TYPE SLIS_FORMNAME,
X_LAYOUT TYPE SLIS_LAYOUT_ALV,
T_EVENT TYPE SLIS_T_EVENT,
T_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
T_SORT TYPE SLIS_T_SORTINFO_ALV.
* LAYOUT
X_LAYOUT-ZEBRA = ‘X’.
X_LAYOUT-BOX_FIELDNAME = ‘CHECK’.
X_LAYOUT-BOX_TABNAME = ”.
* DISPLAYS THE ALV GRID
CALL FUNCTION ‘REUSE_ALV_GRID_DISPLAY’
EXPORTING
I_CALLBACK_PROGRAM = W_REPID
IT_FIELDCAT = T_FIELDCAT
IS_LAYOUT = X_LAYOUT
IT_SORT = T_SORT
I_CALLBACK_PF_STATUS_SET = W_STATUS
I_CALLBACK_USER_COMMAND = W_COMM
I_SAVE = ‘X’
IT_EVENTS = T_EVENT
I_GRID_TITLE = W_TITLE
I_GRID_SETTINGS = LC_GLAY
“IS_REPREP_ID = W_REPID
TABLES
T_OUTTAB = T_DATA
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
No responses yet