Ab und zu will man wissen, was vorher geschah... mit dem Funktionsbaustein SYSTEM_CALLSTACK kann zur Laufzeit der Callstack gelesen und ausgewertet werden.

METHODS get_blockname
      IMPORTING
           level TYPE i
     RETURNING
           VALUE(rv_blockname) TYPE string.

METHOD get_blockname.

DATA: lt_callstack TYPE abap_callstack.

CALL FUNCTION 'SYSTEM_CALLSTACK'

       EXPORTING

             max_level = Level

       IMPORTING

            callstack = lt_callstack.

IF lines( lt_callstack ) = level.

       rv_blockname = lt_callstack[ level ]-blockname.

ENDIF.

ENDMETHOD.

SAP, ABAP

ADventas Consulting GmbH
Peter Langner
Kattjahren 8
22359 Hamburg

Tel.  +49 (40) 6055 9401
Fax  +49 (40) 6055 9400

Mail info@adventas.de