Quarter(Calendar: IDimInstance; El: Integer): Integer;
Calendar. Data of the calendar dictionary, by which calculation is executed.
El. Index of the element, relative to which calculation is executed.
The Quarter method returns index of the element corresponding to a quarter containing the specified element.
For correct calculation the calendar dictionary must contain the Quarters level. If the level is missing, the method throws an exception.
For example, if the calendar dictionary contains Years, Quarters, Days levels and the calculation is executed for:
Element of the annual frequency, the Quarter method returns the element corresponding to the first quarter of the year.
Element of the daily frequency, the Quarter method returns the element corresponding to the month, which includes the day.
The example is the function that is used to calculate the relation in a standard cube.
To execute the example, add links to the Cubes and Dimensions system assemblies.
Function Quarter(T: Variant): Integer;
Var
Cube: ICubeInstance;
CubeDest: ICubeInstanceDestination;
DimInsts: ICubeInstanceDimensions;
DimInst: IDimInstance;
i: Integer;
Result: Integer;
Begin
// Get the current cube
Cube := CubeClass.CurrentCube;
CubeDest := Cube.Destinations.DefaultDestination;
// Get calendar dimension
DimInsts := CubeDest.Dimensions;
For i := 0 To DimInsts.Count - 1 Do
If (DimInsts.Item(i).Dimension Is ICalendarDimension) Then
DimInst := DimInsts.Item(i);
End If;
End For;
// Execute calculation
If CalendarDimension.Level(DimInst, t) = DimCalendarLevel.Year Then
Result := CalendarDimension.Quarter(DimInst, t);
Else
Result := -1;
End If;
// Return result
Return Result;
End Function Quarter;
The result of using the relation in the formula of the calculated fact: the value for the element of the annual frequency will be taken from the first quarter of the year.
See also: