ABAP直接修改程序代码

*&---------------------------------------------------------------------*
*& 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.