@GetDBCurrentAccess

Es wird zur DB mit dem DBHANDLE DBHANDLE1 der aktuelle Access-Level (zur Ausführungszeit des Aufrufs) und optional die aktuell geltenden Flags (NUMBER NRETFLAGS) zurückgegeben.
Im Fehlerfall wird @Error zurückgegeben.

USERLEVEL’S:
Der jeweils zugehörige ACL-Level

6=(Manager)   Manager
5=(Developer)   Entwickler
4=(Editor)   Editor
3=(Author)   Autor
2=(Reader)   Leser
1=(Depositor)   Archivar
0=(No Access)   Kein Zugriff

NRETFLAGS:
Die zugehörigen Privilegien

ACC Author Can Create new documents
CPA Create Personal Agent erlaubt
CPF Create Personal Folder/View erlaubt
CD Can Delete (bei einem Level >= Author (in V3 Notes und Engine >= V2.04))
CF Create Folder erlaubt
CLS Create Lotus Script erlaubt
ASRV Admin Server Eintrag
SRV Server Eintrag
PRS Personen Eintrag
GRP Gruppen Eintrag
RPD Read Public Documents
WPD Write Public Documents

Beispiel @GetDBCurrentAccess(DBHANDLE1):

DBHANDLE1:=@OpenDB("TEST.NSF");
LEVEL:=@GetDBCurrentAccess(DBHANDLE1);
@LogReport(LEVEL;3);
DBHANDLE1:=@CloseDB(DBHANDLE1);

Der Variable LEVEL wird der aktuell geltende Access-Level (z.B. 6 für Manager) zugewiesen und ausgegeben.

Beispiel @GetDBCurrentAccess(DBHANDLE1;NRETFLAGS):

DBHANDLE1:=@OpenDB("TEST.NSF");
LEVEL:=@GetDBCurrentAccess(DBHANDLE1;NRETFLAGS);
@LogReport(LEVEL;3);
@LogReport(NRETFLAGS;3);
DBHANDLE1:=@CloseDB(DBHANDLE1);

Der Variable LEVEL wird der aktuell geltende Access-Level (z.B. 6 für Manager) zugewiesen und ausgegeben.
Der Variable NRETFLAGS werden die aktuell geltende Access-Flags (z.B. "CD,CPA" für "Can Delete" und "Create Personal Agent erlaubt") zugewiesen und ausgegeben.