Code: Alles auswählen.
parameter: s_para(10) type c.
at selection-screen on value-request for s_para.
data:
repid type sy-repid,
retfield type dfies-fieldname,
dynprofield type help_info-dynprofld,
begin of tab occurs 100,
f1 type char30,
f2 type char30,
end of tab,
tab_line like line of tab.
repid = sy-repid.
dynprofield = S_PARA. *groß schreiben
retfield = 'PARANAME'. "Parametername "funktioniert bei mir aber nicht!??
tab_line-f1 = 'Beschreibung1'.
tab_line-f2 = 'WERT1'.
append tab_line to tab.
tab_line-f1 = 'Beschreibung2'.
tab_line-f2 = 'WERT2'.
append tab_line to tab.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
retfield = retfield
window_title = 'Choice'
value_org = 'S'
dynpprog = repid
dynpnr = '1000'
dynprofield = dynprofield
tables
value_tab = tab.