ReadAccess: Integer;
The ReadAccess property determines value of a security label that determines users who have permissions to read values of dictionary elements by this attribute. Security label is set in a decimal mode. This property is used if it is necessary to distribute access for 32 or less security subjects.
Executing the example requires the MDM repository NSI_1 that contains an MDM dictionary with the Dict_1 identifier.
Sub UserProc;
Var
MB: IMetabase;
Dict: IRdsDictionary;
Attrs: IRdsAttributes;
Attr: IRdsAttribute;
Begin
MB := MetabaseClass.Active;
Dict := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Bind As IRdsDictionary;
Attrs := Dict.Attributes;
For Each Attr In Attrs Do
Debug.WriteLine(Attr.ReadAccess);
End For;
End Sub UserProc;
After executing the example a value of a security label, that determines permissions to read elements values by this attribute, is displayed in a decimal mode for each element of a dictionary.
See also: