IUserDimBlocks.Add

Syntax

Add: IUserDimBlock;

Description

The Add method adds a calculated dictionary's block.

Example

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

UsDim: IUserDimension;

UsDimBlocks: IUserDimBlocks;

UsDimBlock: IUserDimBlock;

Begin

MB:=MetabaseClass.Active;

MObj:=MB.ItemById("USER_DIM").Edit;

UsDim:=MObj As IUserDimension;

UsDimBlocks:=UsDim.Blocks;

UsDimBlock:=UsDimBlocks.Add;

UsDimBlock.Id:="New_block";

UsDimBlock.Name:="New block";

MObj.Save;

End Sub Main;

After executing the example a calculated dictionary contains a new block. Calculated dictionary identifier: USER_DIM.

See also:

IUserDimBlocks