ISecurityDescriptor.AccessSecured

Syntax

AccessSecured: Boolean;

Description

The AccessSecured property returns the attribute of usage of the discretionary access for the MDM dictionary elements.

Comments

Available values:

True. The discretionary access control is applied for the MDM dictionary elements.
False. The discretionary access control is not applied for the MDM dictionary elements.

The value of this property corresponds to the value IRdsDictionary.Secured.

The sign of the fact whether the mandatory access control is applied the MDM dictionary elements is determined by the ISecurityDescriptor.HasAccessMandatory property.

Example

Executing the example requires that the scheme contains an MDM repository with the MDMBASE identifier and an MDM dictionary with the Dict_1 identifier. The "Change of the security label and of the access control list of any object" privilege should be given to the user who executes the example.

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;

After executing the example the use of the access permissions is disabled for the MDM dictionary, if it was enabled before.