Report: IPrxReport;
Свойство Report определяет экспортируемый регламентный отчет.
Для выполнения примера предполагается наличие в репозитории регламентного отчёта с идентификатором REPORT.
Добавьте ссылки на системные сборки Metabase, Report.
Sub UserProc;
Var
Mb: IMetabase;
Report: IPrxReport;
Export: IPrxReportExporter;
Begin
Mb := MetabaseClass.Active;
// Экспортируемый регламентный отчёт
Report := Mb.ItemById("REPORT").Bind As IPrxReport;
// Экспорт
Export := New PrxReportExporter.Create;
If Export.IsExportToPdfAvailable Then
Export.Report := Report;
Export.ExportToFile("D:\Отчет.pdf", "pdf");
End If;
End Sub UserProc;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Public Shared Sub Main(Params: StartParams);
Var
Mb: IMetabase;
Report: IPrxReport;
Export: IPrxReportExporter = New PrxReportExporterClass();
Begin
Mb := Params.Metabase;
// Экспортируемый регламентный отчёт
Report := Mb.ItemById["REPORT"].Bind() As IPrxReport;
// Экспорт
If Export.IsExportToPdfAvailable() Then
Export.Report := Report;
Export.ExportToFile("D:\Отчет.pdf", "pdf");
End If;
End Sub;
При выполнении примера осуществляется проверка возможности экспорта в формат PDF. Если экспорт возможен, то указанный отчёт будет экспортирован в указанный файл в формате PDF.
См. также: