Obtain terminal information

1. Obtain the computer name:

1 Data pcname type string.2 call method cl_gui_frontend_services => get_computer_name3 changing4 computer_name = pcname.5 call method cl_gui_cfw => update_view.6 translate pcname to lower case.

 

2. Obtain the terminal IP Address:

1 Data lv_name type char40. 2 Data lv_ip type char20. 3 data v_terminal type xuterminal. 4 call function 'terminal _ id_get '5 exporting 6 username = sy-uname 7 importing 8 Terminal = v_terminal 9 predictions10 multiple_terminal_id = 111 no_terminal_found = 212 others = 3.13 14 if v_terminal is initinot al. 15 split v_terminal at '-'into lv_ip lv_name. 16 translate lv_name to lower case. 17 endif.

 

To be continued ......