ISecurityDescriptor.AccessSecured

Синтаксис

AccessSecured: Boolean;

Описание

Свойство AccessSecured возвращает признак использования дискреционных прав доступа для элементов справочника НСИ.

Комментарии

Возможные значения:

• True. Для элементов справочника НСИ применяется дискреционный контроль доступа;

• False. Дискреционный контроль доступа не используется для элементов справочника НСИ.

Значение данного свойства соответствует значению IRdsDictionary.Secured.

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

Пример

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

Sub UserProc;

Var

MB : IMetabase;

Object : IMetabaseObjectDescriptor;

SD : ISecurityDescriptor;

AOS : IAccessObjectSecurity;

Begin

MB := MetabaseClass.Active;

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

SD := Object.SecurityDescriptor;

If SD.AccessSecured Then

AOS := Object.GetSecurity;

AOS.RevokeAccessSecured;

End If;

End Sub UserProc;

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

См. также:

ISecurityDescriptor