WHO IS USING THIS TCODE

 

REPORT  YSDTEST NO STANDARD PAGE HEADING.
TABLES: tstc,tstct.
DATA opcode TYPE x.
DATA: BEGIN OF itab OCCURS 10.
        INCLUDE STRUCTURE uinfo2.
DATA: END OF itab.
SELECT-OPTIONS: s_tcode FOR tstc-tcode.
START-OF-SELECTION.
  opcode = 32.
  CALL FUNCTION 'TH_LONG_USR_INFO'
    EXPORTING
      user      = '*'
    TABLES
      user_info = itab.
  DELETE itab WHERE NOT tcode IN s_tcode.
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_structure_name = 'UINFO2'
    TABLES
      t_outtab         = itab
    EXCEPTIONS
      program_error    = 1
      OTHERS           = 2.
  FREE MEMORY.