Code: Alles auswählen.
REPORT ztest3.
PARAMETERS: p_pa0001 TYPE pa0001-pernr.
TYPES: BEGIN OF t_pa0001,
pernr TYPE pa0001-pernr,
sname TYPE pa0001-sname,
END OF t_pa0001.
DATA: it_pa0001 TYPE STANDARD TABLE OF t_pa0001 INITIAL SIZE 0,
wa_pa0001 TYPE t_pa0001,
it_return TYPE STANDARD TABLE OF ddshretval,
wa_return LIKE LINE OF it_return.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_pa0001.
SELECT *
FROM pa0001
INTO CORRESPONDING FIELDS OF TABLE it_pa0001
.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'PERNR'
value_org = 'S'
MULTIPLE_CHOICE = 'X' "allows you select multiple entries from the popup
TABLES
value_tab = it_pa0001
return_tab = it_return.
LOOP AT it_return INTO wa_return.
MESSAGE wa_return-fieldval TYPE 'I'.
ENDLOOP.
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag:
Embryo