Add: IStandardDimLevel;
The Add method adds a new level to the dictionary.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Dim: IStandardDimension;
DimLevels: IStandardDimLevels;
DimLevel: IStandardDimLevel;
Begin
MB:=MetabaseClass.Active;
MObj:=MB.ItemById("TAB_DIM").Edit;
Dim:=MObj As IStandardDimension;
DimLevels:=Dim.Levels;
DimLevel:=DimLevels.Add;
DimLevel.Name:=New level;
DimLevel.Id:="NEW_LEVEL";
MObj.Save;
End Sub Main;
After executing the example a dictionary contains a new level. Table dictionary identifier: TAB_DIM.
See also: