RestDays: DayOfWeekSet;
RestDays: Prognoz.Platform.Interop.Dimensions.DayOfWeekSet;
The RestDays property sets rest days in the week.
This property is relevant for series with daily calendar frequency.
This example displays the custom vector calculation method. Add links to the Dimensions, Ms, Transform system assemblies to execute the example.
Function RestDays(Input: ITimeSeries): ITimeSeries;
Var
TsCalc: TsCalculation;
pContext: ITsCalculationContext;
i: Integer;
pSeries: ITimeSeries;
CalendSett: ITsCalendarSettings;
Begin
TsCalc := New TsCalculation.Create;
pContext := TsCalc.Current;;
pSeries := pContext.CreateTimeSeries;
CalendSett := Input.CalendarSettings;
If CalendSett.RestDays = DayOfWeekSet.SaturdaySunday Then
For i := Input.StartIndex To Input.EndIndex Do
pSeries.Item(i) := 1 + Input.Item(i);
End For;
End If;
Return pSeries;
End Function RestDays;
This method increases value of the input series if Saturday and Sunday are the weekends.
Custom vector calculation method is given in this example.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Ms;
Imports Prognoz.Platform.Interop.Transform;
Function RestDays(Input: ITimeSeries): ITimeSeries;
Var
TsCalc: TsCalculation;
pContext: ITsCalculationContext;
i: Integer;
pSeries: ITimeSeries;
CalendSett: ITsCalendarSettings;
Begin
TsCalc := New TsCalculation.Create();
pContext := TsCalc.Current[Null];
pSeries := pContext.CreateTimeSeries(-1 As DimCalendarLevel, Null) As ITimeSeries;
CalendSett := Input.CalendarSettings;
If CalendSett.RestDays = DayOfWeekSet.dowsSaturdaySunday Then
For i := Input.StartIndex To Input.EndIndex Do
pSeries.Item[i] := 1 + (Input.Item[i] As double);
End For;
End If;
Return pSeries;
End Function RestDays;
This method increases value of the input series if Saturday and Sunday are the weekends.
See also: