Clear;
The Clear method clears the group collection.
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;
Grs.Clear;
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.
See also: