Edit: IPrxDataIsland;
Edit(): Prognoz.Platform.Interop.Report.IPrxDataIsland;
Метод Edit открывает область данных на редактирование.
Для сохранения изменений используйте метод IPrxDataIsland.Save.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «REPORT», который содержит область данных. Добавьте ссылки на системные сборки: Metabase, Report.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
DI: IPrxDataIsland;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("REPORT").Edit;
DI := (MObj As IPrxReport).DataIslands.Item(0).Edit;
// Задаем параметры
подгонки ячеек.
DI.AdjustMode := PrxAdjustMode.None;
DI.Save;
// Сохраняем отчет.
MObj.Save;
End Sub UserProc;
После выполнения примера будут изменены и сохранены параметры подгонки ячеек области данных регламентного отчета «REPORT».
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
…
Sub Main(Params: StartParams);
Var
MB: IMetabase;
MObj: IMetabaseObject;
DI: IPrxDataIsland;
Begin
MB := Params.Metabase;
MObj := MB.ItemById["REPORT"].Edit();
DI := (MObj As IPrxReport).DataIslands.Item[0].Edit();
// Задаем параметры
подгонки ячеек.
DI.AdjustMode := PrxAdjustMode.pamNone;
DI.Save();
// Сохраняем отчет.
MObj.Save();
End Sub;
См. также: