[ABAP] User-Kenndaten auslesen

START-OF-SELECTION.
  DATA: wa_addr3_val TYPE addr3_val,
        wa_usr03     TYPE usr03.

  CALL FUNCTION 'SUSR_USER_ADDRESS_READ'
    EXPORTING
      user_name              = sy-uname     " akt. User auslesen
    IMPORTING
      user_address           = wa_addr3_val
      user_usr03             = wa_usr03
    EXCEPTIONS
      user_address_not_found = 1.

  WRITE: / wa_addr3_val.
  WRITE: / wa_usr03.