Packs: IScPacks;
The Packs property returns the collection of packages of the platform security.
Sub UserProc;
Var
Man: IMetabaseManager;
Packs: IScPacks;
Pack: IScPack;
Begin
Man := MetabaseManagerFactory.Active;
Packs := Man.Packs;
For Each Pack In Packs Do
Debug.WriteLine(Pack.Id + " " + Pack.Name);
End For;
End Sub UserProc;
After executing the example the list of security packages available in the platform will be displayed in the development environment console.
See also: