[ABAP] Code der aufrufenden Transaktion ausgeben

Variante 1 (GET_PARAMETER_TCOD)

DATA: lv_ctc TYPE sy-tcode.

* liefert Namen der gestarteten/aufgerufenen Parameter-Transaktion
CALL FUNCTION 'GET_PARAMETER_TCOD'
IMPORTING
  ptcod = lv_ctc.
  
WRITE: / lv_ctc.

Variante 2 (SYTEM_CALL)

DATA: lv_calling_tcode TYPE sy-tcode.

CALL 'GET_PARAM_TCOD' ID 'PTCOD' FIELD lv_calling_tcode.

WRITE: / lv_calling_tcode.