Add: IPrxDataIsland;
Метод Add осуществляет добавление новой области данных на листе регламентного отчета.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
DIs: IPrxDataIslands;
DI: IPrxDataIsland;
Range: ITabRange;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("Report").Edit;
Report := MObj As IPrxReport;
DIs := Report.DataIslands;
DI := DIs.Add;
DI.Sheet := Report.Sheets.Item(Report.Sheets.Count-1);
DI.Slice := Report.DataSources.Item(0).Slices.Item(0);
Range := Report.ParseCell(DI.Sheet.Name+"!A0").Range;
DI.Range := Range;
DI.ReadOnly := False;
DI.OutputPart := PrxDataIslandPart.Full;
DI.AdjustMode := PrxAdjustMode.RowsThenColumns;
MObj.Save;
End Sub Main;
После выполнения примера на последнем листе регламентного отчета, в ячейке «А0» будет создана область данных. Источник данных - первый срез, первого источника данных регламентного отчета. Идентификатор регламентного отчета - «Report».
См. также: