AddDescriptor (Desc: IMetabaseObjectDescriptor) : IEaxDataSource;
AddDescriptor (Desc: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor) : Prognoz.Platform.Interop.Express.IEaxDataSource;
Метод AddDescriptor осуществляет добавление метаданных источника данных в экспресс-отчет.
Для выполнения предполагается наличие кнопки на форме с наименованием «Button1», экспресс-отчета с идентификатором «EXPRESS_REPORT» и куба с идентификатором «CUBE_1». Добавьте ссылки на системные сборки «Express» и «Metabase».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
MB: IMetabase;
Expr: IEaxAnalyzer;
ExprDS: IEaxDataSources;
Cube: IMetabaseObjectDescriptor;
Begin
MB := MetabaseClass.Active;
Expr := MB.ItemById("EXPRESS_REPORT").Edit As IEaxAnalyzer;
ExprDS := Expr.DataSources;
Cube := MB.ItemById("CUBE_1");
ExprDs.AddDescriptor(Cube);
(Expr As IMetabaseObject).Save;
End Sub Button1OnClick;
В результате выполнения примера после нажатия кнопки для экспресс-отчета «EXPRESS_REPORT» будет добавлен источник данных «CUBE_1».
Необходимые требования и результат выполнения примера Fore.NET совпадают
с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Express;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
MB: IMetabase;
Expr: IEaxAnalyzer;
ExprDS: IEaxDataSources;
Cube: IMetabaseObjectDescriptor;
Begin
MB := Self.Metabase;
Expr := MB.ItemById["EXPRESS_REPORT"].Edit() As IEaxAnalyzer;
ExprDS := Expr.DataSources;
Cube := MB.ItemById["CUBE_1"];
ExprDs.AddDescriptor(Cube);
(Expr As IMetabaseObject).Save();
End Sub;
См. также: