REPORT ZEXAMPLE.
DATA: BEGIN OF P_EXTAB OCCURS 0,
FCODE LIKE SY-PFKEY,
END OF P_EXTAB.
PARAMETERS P_FCODE LIKE SY-PFKEY.
P_EXTAB-FCODE = P_FCODE.
APPEND P_EXTAB.
INITIALIZATION.
CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
EXPORTING
P_STATUS = 'Z_SELSCREEN'"自定义的GUI STATUS
TABLES
P_EXCLUDE = P_EXTAB
EXCEPTIONS
OTHERS = 1.
IF SY-SUBRC EQ 0.
WRITE:/ 'FUNCTION', P_FCODE, 'HAS BEEN DISABLED'.
ELSE.
WRITE:/ 'COULD NOT DISABLE', P_FCODE.
ENDIF.
阅读(2969) | 评论(0) | 转发(0) |
