Code: Alles auswählen.
CALL FUNCTION 'ENQUEUE_E_TABLE'
Exporting
mode_rstable = 'E'
tabname = 'ZMeinReport'
varkey = 'Programm läuft gerade'
exceptions
others = 1.
if sy-subrc > 0.
message i000(vz)
with 'Programm ZMeinReport läuft gerade'.
stop.
else.
...
...
...
CALL FUNCTION 'DEQUEUE_E_TABLE'...
endif.