目录
1. SU20 创建 权限字段
2. SU21 创建 对象类 / 权限对象
3. PFCG 创建 角色
4. SU01 创建 用户并分配角色
代码测试:
REPORT d.
PARAMETERS p_x LIKE marc-zzykf.
AUTHORITY-CHECK OBJECT 'ZMM'
ID 'ZZZYKF' FIELD p_x.
IF sy-subrc <> 0.
MESSAGE '没有权限' TYPE 'S' DISPLAY LIKE 'E'.
ELSE.
MESSAGE '有权限' TYPE 'S'.
ENDIF.
以上就完成了。