Count: Integer;
Свойство Count возвращает количество уровней табличного справочника.
Sub UserProc;
Var
MB: IMetabase;
Dim: IStandardDimension;
DimLevels: IStandardDimLevels;
i: Integer;
Begin
MB:=MetabaseClass.Active;
Dim:=MB.ItemById("TAB_DIM").Bind As IStandardDimension;
DimLevels:=Dim.Levels;
i:=DimLevels.Count;
End Sub UserProc;
После выполнения примера в переменной «i» будет содержаться количество уровней справочника. Идентификатор табличного справочника - «TAB_DIM».
См. также: