Benutzerspezifisches Berechtigungsprüfungsprogramm (optionale Funktion) > Beispielcode

Zurück zu

Benutzerspezifisches Berechtigungsprüfungsprogramm (optionale Funktion)

Ebenfalls in diesem Abschnitt

Eine benutzerspezifische Funktionsgruppe erstellen

Ein Funktionsmodul zur benutzerspezifischen Prüfung erstellen

Kennzeichen zur Aktivierung der benutzerspezifischen Berechtigungsprüfung verwalten

Beispielcode

Mit den folgenden Code wird die Tabelle MACKV für alle Anwender gesperrt, wenn von Winshuttle Query aus zugegriffen wird.

FUNCTION Z_WINSHUTTLE_CHECK_ACCESS.

*"----------------------------------------------------------------------

*"*"Local Interface:

*" IMPORTING

*" VALUE(TABLE) TYPE DD02L-TABNAME

*" EXPORTING

*" VALUE(ALLOWED) TYPE BOOLEAN

*" EXCEPTIONS

*" ERROR

*"----------------------------------------------------------------------

*Return access allowed ('X'=True or '-'=False) for current user

ALLOWED = ''. "Initialize

IF TABLE = 'MACKV'. "For any user

ALLOWED = '-'.

ELSE.

ALLOWED = 'X'.

ENDIF.

ENDFUNCTION.

*"----------------------------------------------------------------------

Zusätzlich ruft die Berechtigungsprüfung Ihre eigenen Berechtigungsobjekte auf, die zu den Bedingungen für den aktuellen Benutzer hinzugefügt werden können (Systemfeld SY-UNAME).