获取用户的授权值

REPORT  z_barry_test.

DATA: it_values TYPE TABLE OF usvalues WITH HEADER LINE.

CALL FUNCTION 'SUSR_USER_AUTH_FOR_OBJ_GET'
  EXPORTING
    user_name           = 'TZ_SD002'
*    sel_object          = 'S_TCODE'
  TABLES
    values              = it_values
  EXCEPTIONS
    user_name_not_exist = 1
    not_authorized      = 2
    internal_error      = 3
    OTHERS              = 4.
IF sy-subrc = 0.
  LOOP AT it_values.
    WRITE it_values.
  ENDLOOP.
ENDIF.