IRdsAttributes.ReadAccess

Syntax

ReadAccess: IRdsAttribute;

Description

The ReadAccess property returns a system attribute of a dictionary, which assignment is Permission to View.

Comments

This attribute has string data type, cannot contain empty and multiple values. It is hidden by default. The attribute identifier is READACCESS. 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 view values of 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.ReadAccess.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 view elements, is displayed in a decimal mode for each dictionary element.

See also:

IRdsAttributes