1.US21维护权限对象,新增两个自定义权限对象spa
2.pfcg权限角色分布对象
3.在ABAP中的应用blog
AUTHORITY-CHECK OBJECT 'ZS_MAKT'
ID 'MATKL' FIELD S_MATKL-LOW.
IF sy-subrc <> 12. "表明有此权限class
LOOP AT S_MATKL.
AUTHORITY-CHECK OBJECT 'ZS_MAKT'
ID 'MATKL' FIELD S_MATKL-LOW.
IF sy-subrc <> 0.
MESSAGE s398(00) DISPLAY LIKE 'E' WITH '您的选择项有权限错误,会影响显示结果集!' ''.
delete S_MATKL.
IF S_MATKL[] is INITIAL.
tmppdstatus = tmppdstatus + 1.
ENDIF.
* EXIT.
ENDIF.
ENDLOOP.权限
ENDIF.
IF tmppdstatus <> 0.
MESSAGE s398(00) DISPLAY LIKE 'E' WITH '没有选择数据'.
EXIT.
ENDIF.im