IMetabaseObjectSecurity.GetAccessSecurity

Синтаксис

GetAccessSecurity(Options: Integer): IAccessObjectSecurity;

Параметры

Options - параметр не используется. Зарезервирован на будущее. На данный момент для работы метода необходимо передавать любое значение.

Описание

Метод GetAccessSecurity получает политику доступа к объекту. Имеется в виду получение пользователей/групп, элементов доступа и прав по элементам.

Пример

Для выполнения примера необходимо наличие в схеме репозитория НСИ с идентификатором «RDSBASE» и справочника НСИ - «Dict_1». Для пользователя, выполняющего пример, должна быть выдана привилегия «Изменение метки безопасности и списка контроля доступа любого объекта».

Sub UserProc;

Var

MB : IMetabase;

Object : IMetabaseObjectDescriptor;

MS : IMetabaseObjectSecurity;

AOS : IAccessObjectSecurity;

Begin

MB := MetabaseClass.Active;

Object := MB.ItemByIdNamespace("Dict_1", MB.ItemById("RDSBASE").Key);

MS := Object As IMetabaseObjectSecurity;

Debug.WriteLine(MS.AccessSecured.ToString);

If MS.AccessSecured Then

AOS := MS.GetAccessSecurity(1);

AOS.RevokeAccessSecured;

End If;

End Sub UserProc;

После выполнения примера для справочника НСИ будет отключено использование прав доступа для элементов, если ранее оно было включено.

См. также:

IMetabaseObjectSecurity