NineMonths(El: Integer): Integer;
El — индекс элемента.
Метод NineMonths возвращает индекс элемента, соответствующего периоду "9 месяцев", в котором находится элемент с индексом El. Если уровень «9 месяцев» отсутствует в справочнике - возвращает «-1».
Sub UserProc;
Var
MB: IMetabase;
Obj: IMetabaseObjectDescriptor;
CalClass: CalendarDimInstanceFactory;
Dim: IDimInstance;
CalInst: ICalendarDimInstance;
i: Integer;
Begin
Mb:=MetabaseClass.Active;
Obj:=Mb.ItemById("CALENDAR_DIM");
Dim:=Obj.Open(Null) As IDimInstance;
CalClass:=New CalendarDimInstanceFactory.Create;
CalInst:=CalClass.CreateCalendarDimInstance(Dim);
i:=CalInst.NineMonths(Dim.Elements.FindById("DAYS:12.12.2002"));
End Sub Main;
После выполнения примера в переменной «i» будет содержаться индекс элемента календарного справочника, соответствующего периоду 9 месяцев, в который попадает день "12.12.2002". Идентификатор справочника - «CALENDAR_DIM».
См. также: