DATA: it_sel_range TYPE STANDARD TABLE OF bapiussrge.
DATA: it_users TYPE STANDARD TABLE OF bapiusname.
DATA: it_ret TYPE STANDARD TABLE OF bapiret2.
* ungesperrte Dialoguser ermitteln
INSERT VALUE #( parameter = 'LOGONDATA'
field = 'USTYP'
sign = 'I'
option = 'EQ'
low = 'A'
high = '' ) INTO TABLE it_sel_range.
INSERT VALUE #( parameter = 'LOGONDATA'
field = 'UFLAG'
sign = 'I'
option = 'EQ'
low = '0'
high = '' ) INTO TABLE it_sel_range.
CALL FUNCTION 'BAPI_USER_GETLIST'
EXPORTING
with_username = abap_true
TABLES
selection_range = it_sel_range
userlist = it_users
return = it_ret.
LOOP AT it_users ASSIGNING FIELD-SYMBOL(<fs_line>).
WRITE: / <fs_line>-username, <fs_line>-firstname, <fs_line>-lastname, <fs_line>-fullname.
ENDLOOP.