IPrxTableIslandGroupings.Add

Syntax

Add : IPrxTableIslandGrouping;

Description

The Add method adds a group to the collection.

Example

Sub Main;

Var

MB: IMetabase;

MObj : IMetabaseObject;

Report : IPrxReport;

TabIs : IPrxTableIslands;

TI : IPrxTableIsland;

Grs : IPrxTableIslandGroupings;

Gr : IPrxTableIslandGrouping;

Begin

MB := MetabaseClass.Active;

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

Report := MObj As IPrxReport;

TabIs := Report.TableIslands;

TI := TabIs.Item(0);

TI := Ti.Edit;

Grs := TI.Groupings;

Gr := Grs.Add;

Gr.Field.FieldName := "ORDERS";

Gr.Caption.AsString := "VALUE";

TI.Save;

MObj.Save;

End Sub Main;

After executing the example a group is created for the relational data area and the group parameters are set. Report - identifier of the regular report, which sheet contains a relational data area.