Visible: Boolean;
Visible: boolean;
The Visible property determines whether attribute values are shown.
If Visible = True, attribute values are displayed.
Executing the example requires that repository contains a calendar dictionary with the DICT_CALEND identifier. Add links to the Metabase and Dimensions system assemblies.
Sub UserProc;
Var
mb: IMetabase;
dimension: IDimensionModel;
attribute: IDimAttribute;
attributes: IDimAttributes;
Begin
mb := MetabaseClass.Active;
dimension := mb.ItemById("DICT_CALEND").Edit As IDimensionModel;
attributes := dimension.Attributes;
attribute := attributes.FindById("BLOCK_TYPE");
If attribute <> Null Then
attribute.Visible := True;
(dimension As IMetabaseObject).Save;
End If;
End Sub UserProc;
After executing the example values of the Calendar Block Type attribute are displayed in open calendar dictionary.
Executing the example requires that repository contains a calendar dictionary with the DICT_CALEND identifier.
Imports Prognoz.Platform.Interop.Dimensions;
…
Public Shared Sub Main(Params: StartParams);
Var
mb: IMetabase;
dimension: IDimensionModel;
attribute: IDimAttribute;
attributes: IDimAttributes;
Begin
mb := Params.Metabase;
dimension := mb.ItemById["DICT_CALEND_TEST"].Edit() As IDimensionModel;
attributes := dimension.Attributes;
attribute := attributes.FindById("BLOCK_TYPE");
If attribute <> Null Then
attribute.Visible := True;
(dimension As IMetabaseObject).Save();
End If;
End Sub;
After executing the example values of the Calendar Block Type attribute are displayed in open calendar dictionary.
See also: