SE16表权限控制

enhance FM:VIEW_AUTHORITY_CHECK


  DATA:LS_HRTAB TYPE ZHRTAB.
  DATA:LS_HRTAB_VIEWER TYPE ZHRTAB_VIEWER.
  CLEAR: LS_HRTAB,LS_HRTAB_VIEWER.
  SELECT SINGLE * FROM ZHRTAB INTO LS_HRTAB WHERE TABNM = VIEW_NAME.
  IF SY-SUBRC EQ 0.
    SELECT SINGLE * FROM ZHRTAB_VIEWER INTO LS_HRTAB_VIEWER WHERE UNAME = SY-UNAME.
    IF SY-SUBRC NE 0.
      MESSAGE E001(00) WITH '您没有表' VIEW_NAME '的查看权限'.
    ENDIF.

  ENDIF.

有个note

Note 1030838 - SM30: View Maintenance Authorization Enhancement
但是我做了没成功。