动态修改程序的源代码

REPORT ZD_CHANGE_CODE.
DATA: code(72) TYPE c OCCURS 0.
PARAMETERS: p_report LIKE progdir-name.
READ REPORT p_report INTO code.
EDITOR-CALL FOR code.

IF sy-subrc = 0.

  INSERT REPORT p_report FROM code.
ENDIF.

当修改后保存就行了。