data : lv_client type sy-mandt,
       lv_user type sy-uname,
       lv_check_gui type sy-index,
       lv_hostaddr type msxxlist-hostadr,
       lv_terminal type string,
       lv_act_sessions type sm04dic-counter,
       lv_max_sessions type sm04dic-counter,
       lv_my_session type sm04dic-counter,
       lv_my_internal_session type sm04dic-counter,
       lv_task_state type sm04dic-counter,
       lv_update_rec_exist type thfb_bool,
       lv_tid type sy-index,
       lv_gui_check_failed type sy-index,
       lv_addrstr type ni_nodeaddr,
       lv_rc type i.

 call function 'TH_USER_INFO'
   exporting
     client              = lv_client
     user                = lv_user
     check_gui           = lv_check_gui "0
   importing
     hostaddr            = lv_hostaddr
     terminal            = lv_terminal
     act_sessions        = lv_act_sessions
     max_sessions        = lv_max_sessions
     my_session          = lv_my_session
     my_internal_session = lv_my_internal_session
     task_state          = lv_task_state
     update_rec_exist    = lv_update_rec_exist
     tid                 = lv_tid
     gui_check_failed    = lv_gui_check_failed
     addrstr             = lv_addrstr
     rc                  = lv_rc.
Serkan AKKAVAK
Computer Engineer
ABAP Developer & SAP MM SD Consultant
Contact : serkurumsal@yandex.com