公众号:matinal
*&---------------------------------------------------------------------*
*& Report Y_MOD_PRG
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT y_mod_prg.
DATA: BEGIN OF srctab1 OCCURS 1,
txt(255) TYPE c,
END OF srctab1.
PARAMETERS: rep LIKE trdir-name.
AT SELECTION-SCREEN.
START-OF-SELECTION.
READ REPORT rep INTO srctab1.
EDITOR-CALL FOR srctab1.
IF sy-subrc = 0.
INSERT REPORT rep FROM srctab1.
ENDIF.