IEaxDataAreaSliceProperties.DimCalendarViewMode

Fore Syntax

DimCalendarViewMode (Dimkey: Integer): EaxCalendarViewMode;

Fore.NET Syntax

DimCalendarViewMode [Dimkey: uinteger]: Prognoz.Platform.Interop.Express.EaxCalendarViewMode;

Description

The DimCalendarViewMode determines setup of calendar dimension display mode.

Fore Example

Executing this example requires an express report with the EXPRESS identifier. In express report there is a data source containing the dimension with the 0 index. It is required that the form contains the Button component with the Button1 identifier.

Add links to the Metabase, Express and Dimensions system assembles.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Eax: IEaxAnalyzer;
    dimI: IDimInstance;
Begin
    //Get express report
    Eax := MetabaseClass.Active.ItemById("EXPRESS").Edit As IEaxAnalyzer;
    //Get data of calendar dimension
    dimI := Eax.Pivot.Dimensions.Item(0).DimInstance;
    //Determine calendar dimension display mode
    Eax.DataArea.Slices.Item(0).Properties.DimCalendarViewMode(dimI.Key) := EaxCalendarViewMode.Levels;
    (Eax As IMetabaseObject).Save;
End Sub Button1OnClick;

After executing the example clicking the button set the display mode by levels for calendar dimension.

Fore.NET Example

The requirements and result of the Fore.NET Example execution match with those in the Fore Example. Use Fore.NET analogs instead of Fore components.

Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Metabase;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Eax: IEaxAnalyzer;
    dimI: IDimInstance;
Begin
    //Get express report
    Eax := Self.Metabase.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
    //Get data of calendar dimension
    dimI := Eax.Pivot.Dimensions.Item[0].DimInstance;
    //Determine calendar dimension display mode
    Eax.DataArea.Slices.Item[0].Properties.DimCalendarViewMode[dimI.Key] := EaxCalendarViewMode.ecvmLevels;
    (Eax As IMetabaseObject).Save();
End Sub;