IRdsAttributes.DeleteAccess

Syntax

DeleteAccess: IRdsAttribute;

Description

The DeleteAccess property returns a system attribute of a dictionary that assignment is Permission to Delete.

Comments

This attribute has string data type, cannot contain empty and multiple values. It is hidden by default. The attribute identifier is DELETEACCESS. This attribute is available, if the Secured property is set to True. Value of this attribute is a security label that determines users who have permissions to delete dictionary elements.

Example

Executing the example requires the MDM repository NSI_1 that contains an MDM dictionary with the Dict_1 identifier. Control of access permissions is enabled for dictionary elements.

Sub Main;

Var

MB: IMetabase;

Dict: IRdsDictionary;

DictInst: IRdsDictionaryInstance;

Elements: IRdsDictionaryElements;

Attrs: IRdsAttributes;

i, j: Integer;

Begin

MB := MetabaseClass.Active;

Dict := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Bind As IRdsDictionary;

Attrs := Dict.Attributes;

j := Attrs.DeleteAccess.Key; // attribute key

DictInst := Dict.Open(Null);

Elements := DictInst.Elements;

For i := 1 To Elements.Count - 1 Do

Debug.WriteLine(Elements.Item(i).Attribute(j));

End For;

End Sub Main;

After executing the example a value of a security label, that determines permissions to delete elements, is displayed in a decimal mode for each dictionary element.

See also:

IRdsAttributes