SlotCount: Integer;
The SlotCount property returns the number of columns in the table with repository accounts.
Sub Main;
Var
MB: IMetabase;
LoS: ILogonSession;
Sc: ISecurityConnection;
Cr: ICredentials;
i: Integer;
Begin
MB:=MetabaseClass.Active;
LoS:=mb.LogonSession;
Sc:=LoS.PrimaryConnection;
Cr:=Sc.Credentials;
i:=Cr.SlotCount;
End Sub Main;
After executing the example the "i" variable will contain the number of columns of the credentials table of the active repository.
See also: