UrmPermElementGet

Mit dieser Anweisung können die eigenen Rechte überprüft werden. In (int1) wird der Elementtyp und in (alpha2) der Name des Elementes (siehe Benutzerpflege) übergeben. In (bigint3) wird eine beliebige Kombination von Berechtigungsflags angegeben. Die übergebene Kombination aus Berechtigungsflags kann mit folgenden Konstanten zusammengestellt werden:

• _UrmPermRead: Berechtigung zum Lesen
• _UrmPermCreate: Berechtigung zum Erzeugen
• _UrmPermModify: Berechtigung zum Ändern
• _UrmPermModifyOwner: Berechtigung zum Ändern bei Objektbesitz
• _UrmPermDelete: Berechtigung zum Löschen
• _UrmPermDeleteOwner: Berechtigung zum Löschen bei Objektbesitz
• _UrmPermExecute: Berechtigung zum Ausführen
• _UrmPermConfig: Berechtigung zur Änderung der Datenstruktur
• _UrmPermElmGroupRead: Berechtigung Elementgruppen lesen
• _UrmPermElmGroupInsert: Berechtigung Element zur Gruppe hinzufügen
• _UrmPermElmGroupDelete: Berechtigung Element aus Gruppe löschen
• _UrmPermElmGroupRead: Berechtigung Benutzer zu Benutzergruppe hinzufügen
• _UrmPermElmGroupInsert: Berechtigung Benutzer aus Benutzergruppe entfernen

Der Programmierer kann eigene Rechte definieren. Dazu stehen ihm die _UrmPermUser-Konstanten zur Verfügung.

Ist der aktuelle Benutzer im Besitz aller übergebenen Rechte, gibt der Befehl true zurück. Ist mindestens eines der übergebenen Rechte nicht vorhanden, wird false zurück gegeben.

Ist das übergebene Element nicht vorhanden, wird false zurück gegeben.

Beispiel

// Darf ich eine Prozedur ausführen?
if (UrmPermElementGet(_UrmTypeElmProcedure, 'LibDbServices', _UrmPermExecute))
{
  LibDbServices:RecReorg();
  ...
}

// Benutzerdefiniertes Element abfragen
if (UrmPermElementGet(_UrmTypeElmCustom, 'ModuleCustomer', _UrmPermRead | _UrmPermModify))
{
  // Kundenmodul aufrufen
  ...
}

Mögliche Laufzeitfehler:

• _ErrStringOverflow: Es wurde ein zu langer (mehr als 80 Zeichen) Elementname angegeben.
• _ErrValueInvalid: Es wurde eine unbekannte Berechtigung (bigint2) übergeben.