1. DATA: abap_callstack_line TYPE abap_callstack_line,
  2.       callstack TYPE  abap_callstack,
  3.       et_callstack TYPE sys_callst.
  4.  
  5. CALL FUNCTION 'SYSTEM_CALLSTACK'
  6. *  EXPORTING
  7. *    max_level    = 4
  8.   IMPORTING
  9.     callstack    = callstack
  10.     et_callstack = et_callstack.
  11.  
  12. read table callstack into abap_callstack_line
  13.              with key BLOCKNAME = 'JUMP_TO_OFFICE'.
[$[Get Code]]