PARAMETERS: p_dev TYPE char50 DEFAULT 'Marcus Kaschowitz'.
DATA: gv_always_true TYPE xfeld VALUE 'X'.
START-OF-SELECTION.
PERFORM authority_check CHANGING gv_always_true.
IF gv_always_true = 'X'.
PERFORM kontaktieren_sie USING p_dev.
ENDIF.
WRITE: / 'Es freut mich das sie mich im Internet besucht haben!'
