Module: IMetabaseObjectDescriptor;
Module: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor;
Свойство Module возвращает описание модуля, в котором реализован класс для обработки процесса формирования запроса на извлечение данных.
Установка модуля и класса для обработки процесса формирования запроса на извлечение данных осуществляется методом SetCallback.
Для выполнения примера предполагается наличие в репозитории стандартного куба с идентификатором «STD_CUBE». Подключите системные сборки: Cubes, Metabase.
Sub UserProc;
Var
MB: IMetabase;
Cube: IStandardCube;
CubeDataset: IStandardCubeDataset;
Begin
MB := MetabaseClass.Active;
Cube := MB.ItemById("STD_CUBE").Edit As IStandardCube;
CubeDataset := Cube.Destinations.Item(0).Datasets.Item(0);
If Not IsNull(CubeDataset.Module) Then
CubeDataset.SetCallback(Null, "");
End If;
(Cube As IMetabaseObject).Save;
End Sub UserProc;
При выполнении примера, если для первого источника куба установлен модуль и класс для обработки процесса формирования запроса на извлечение данных, то он будет сброшен.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Cubes;
Imports Prognoz.Platform.Interop.Metabase;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Cube: IStandardCube;
CubeDataset: IStandardCubeDataset;
Begin
MB := Params.Metabase;
Cube := MB.ItemById["STD_CUBE"].Edit() As IStandardCube;
CubeDataset := Cube.Destinations.Item[0].Datasets.Item[0];
If CubeDataset.Module <> Null Then
CubeDataset.SetCallback(Null, "");
End If;
(Cube As IMetabaseObject).Save();
End Sub;
См. также: