Code: Alles auswählen.
data subrc type syst-subrc.
if ztest_injection=>self->injection_is_activ( 'authority_check') = abap_true.
* injektion wurde aktiviert
* kann nur während eines unit test ausgeführt werden
* wir lassen jetzt die Berechtigungsprüfung fehlschlagen
subrc = 4.
else.
* dies ist der produktive code, wird außerhalb von unit-tests ausgeführt
authority-check 'S_CTS_ADMFCT' id 'CTS_ADMFCT' field 'TABL'.
subrc = sy-subrc.
endif.