Code: Alles auswählen.
at selection-screen.
p_user = sy-uname.
Da reichen 0 zusätzliche Zeilen.Shortcut IT hat geschrieben: ↑07.09.2020 13:58Da es hier um ein Z-Programm geht, würde ich mir ehrlich gesagt nicht groß überlegen, ob und wie das ohne Programmanpassung gehen könnte. 2 Zeilen im Codingund fertig.Code: Alles auswählen.
at selection-screen. p_user = sy-uname.
Code: Alles auswählen.
PARAMETERS uname TYPE sy-uname DEFAULT sy-uname.
Code: Alles auswählen.
INITIALIZATION.
DATA:
l_report TYPE raldb_repo,
l_variante TYPE raldb_vari,
BEGIN OF t_info OCCURS 0,
typ(1),
null(1),
line(120),
END OF t_info.
** Lade Variante sy-uname
l_report = sy-repid.
l_variante = sy-uname.
CALL FUNCTION 'RS_COVERPAGE_SELECTIONS'
EXPORTING
report = l_report
variant = l_variante
TABLES
infotab = t_info
EXCEPTIONS
OTHERS = 3.
Folgende Benutzer bedankten sich beim Autor Tron für den Beitrag:
black_adept
Code: Alles auswählen.
CALL FUNCTION 'RS_SUPPORT_SELECTIONS'
EXPORTING
report = i_reportname
variant = i_user_name
EXCEPTIONS
variant_not_existent = 1
variant_obsolete = 2
OTHERS = 3.