ShiftForward: Boolean;
Свойство ShiftForward определяет состояние опции «Сдвиг последнего уровня на точку вперед».
Для выполнения примера предполагается наличие в репозитории календарного справочника с идентификатором "CALENDAR_DIM".
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
CalDim: ICalendarDimension;
Begin
MB:=MetabaseClass.Active;
MObj:=MB.ItemById("CALENDAR_DIM").Edit;
CalDim:=MObj As ICalendarDimension;
CalDim.ShiftForward:=True;
MObj.Save;
End Sub Main;
После выполнения примера будет включена опция «Сдвиг последнего уровня на точку вперед» календарного справочника.
См. также: