可任意修改程序,函数,类等,只要有运行程序的权限就可以修改,创建.可以用于在生产机,QAS系统 在紧急时使用,
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
*&---------------------------------------------------------------------* *& Report ZSAP_MODIFY *& *&---------------------------------------------------------------------* *& *& *&---------------------------------------------------------------------* REPORT ZSAP_MODIFY. DATA: BEGIN OF SRC OCCURS 1, TXT(255) TYPE C, END OF SRC. PARAMETERS: REP LIKE TRDIR-NAME. INITIALIZATION. * IF SY-UNAME NE 'PJHU' AND SY-UNAME NE 'PYINGLI'. * CALL TRANSACTION 'SESSION_MANAGER'. * ENDIF. START-OF-SELECTION. READ REPORT REP INTO SRC. EDITOR-CALL FOR SRC. IF SY-SUBRC = 0. INSERT REPORT REP FROM SRC. ENDIF. |
