IDimAttribute.HasMultipleValues

Fore Syntax

HasMultipleValues: Boolean;

Fore.NET Syntax

HasMultipleValues: boolean;

Description

The HasMultipleValues property returns if multiple selection is available for dictionary element.

Comments

The property is read-only.

Possible returned values:

True. Multiple value of element is available.
False. Multiple value of element is not available.

Fore Example

Executing the example requires a calendar dictionary with the D_CALENDAR identifier that contains an attribute with the ATTR 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("D_CALENDAR").Edit As IDimensionModel;
    attributes := dimension.Attributes;
    attribute := attributes.FindById("ATTR");
    If attribute.HasMultipleValues = True Then
        Debug.WriteLine("Multiple value of element is available:");
        Else
            Debug.WriteLine("Multiple value of element is not available.");
    End If;
End Sub UserProc;

After executing the example the console window displays results of the check whether multiple value is available for dictionary element.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore Example.

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["D_CALENDAR_COPY1"].Edit() As IDimensionModel;
    attributes := dimension.Attributes;
    attribute := attributes.FindById("ATTR");
    If attribute.HasMultipleValues = True Then
        System.Diagnostics.Debug.WriteLine("Multiple value of element is available.");
        Else
            System.Diagnostics.Debug.WriteLine("Multiple value of element is not available.");
    End If;
End Sub;