Вызов стандартного диалога пакетного экспорта регламентного отчета.
Параметры команды передаются в свойстве Data. Для работы команды в данном свойстве необходимо указать регламентный отчет, описываемый интерфейсом IPrxReport, либо массив типа Variant, элементы которого содержат следующие значения:
Тип значения | Описание |
Элемент 1: IPrxReport | Регламентный отчет, для которого вызывается диалог пакетного экспорта. |
Элемент 2: Boolean | Флаг, определяющий будет ли производиться экспорт скрытых листов. |
Команда может применяться только для регламентных отчетов. После указания в диалоге необходимых параметров и нажатия кнопки «Готово» будет произведен пакетный экспорт.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием "Button1", компонента ReportBox и компонента UiReport с наименованием «UiReport1», являющегося источником данных для ReportBox. Компонент «UiReport1» подключен к какому-либо регламентному отчету, для которого доступен пакетный экспорт.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Data: Array;
Begin
Target := WinApplication.Instance.GetPluginTarget("Report");
Context := Target.CreateExecutionContext;
Data := New Variant[2];
Data[0] := UiReport1.Instance;
Data[1] := False;
Context.Data := Data;
Target.Execute("ShowBulkExportDialog", Context);
End Sub Button1OnClick;
При нажатии на кнопку будет открыт диалог пакетного экспорта отчета. Скрытые листы экспортироваться не будут.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента ReportBoxNet и компонента UiReportnet с наименованием «UiReportNet1», являющегося источником данных для ReportBoxNet. Компонент «UiReportNet1» подключен к какому-либо регламентному отчету, для которого доступен пакетный экспорт.
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Ui;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
WinApp: WinApplication = New WinApplicationClass_2();
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Data: Array;
Begin
Target := WinApp.GetPluginTarget("Report");
Context := Target.CreateExecutionContext();
Data := New Object[2];
Data[0] := UiReportNet1.ReportUi.Report;
Data[1] := False;
Context.Data := Data;
Target.Execute("ShowBulkExportDialog", Context, Null);
End Sub;
При нажатии на кнопку будет открыт диалог пакетного экспорта отчета. Скрытые листы экспортироваться не будут.
См. также: