IRdsAttributes.WriteAccess

Syntax

WriteAccess: IRdsAttribute;

Description

The WriteAccess property returns a system attribute of a dictionary, which assignment is Permission to Change.

Comments

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

See also:

IRdsAttributes