ILogonSession.Groups

Syntax

Description

The Groups property returns the groups of users including the current repository user.

Example

Sub UserProc;
Var
    MB: IMetabase;
    LogSes: ILogonSession;
    Groups: IMetabaseGroups;
    Group: IMetabaseGroup;
Begin
    MB := MetabaseClass.Active;
    LogSes := MB.LogonSession;
    Groups := LogSes.Groups;
    For Each Group In Groups Do
        Debug.WriteLine(Group.Name);
    End For;
End Sub UserProc;

After executing the example the development environment console displays names of all groups of users, in which the current repository user is included.