WriteAccess: IDimAttribute;
The WriteAccess property returns the object, containing dictionary attribute,that restricts data change permission in OLAP.
If record access is not restricted, this property returns Null. When write access is limited, only the records with attribute value corresponding to 32-bit security mask can be edited.
Executing the example requires a repository object with the D_TO identifier.
Add links to the Metabase and Dimensions system assemblies.
Sub UserProc;
Var
MB: IMetabase;
DimModel: IDimensionModel;
DimAttrs: IDimAttributes;
DimAttr: IDimAttribute;
i: Integer;
Begin
MB:=MetabaseClass.Active;
DimModel:=MB.ItemById("D_TO").Bind As IDimensionModel;
DimAttrs:=DimModel.Attributes;
DimAttr:=DimAttrs.WriteAccess;
If DimAttr<>Null Then
i:=DimAttr.Key;
Debug.WriteLine(i);
End If;
End Sub UserProc;
After executing the example the console window displays key of the attribute that limits permissions to change dimension entries, if this attribute is selected.
See also: