IExportRequestInstance.Consumer

Синтаксис Fore

Consumer: Object;

Синтаксис Fore.NET

Consumer: object;

Описание

Свойство Consumer возвращает объект, являющийся приёмником данных.

Комментарии

Для работы с возвращенным объектом приведите его к одному из интерфейсов приёмников данных.

Пример Fore

Для выполнения примера предполагается наличие базы данных временных рядов с идентификатором «FC_COMM», содержащим объект экспорта в текстовый файл с идентификатором «EXP_OBJ». Добавьте ссылки на системные сборки «Metabase», «Cubes», «Dt».

Sub UserProc;
Var
    mb: IMetabase;
    RubKey: Integer;
    Inst: IExportRequestInstance;
    Consumer: IDtTextConsumer;
Begin
    mb := MetabaseClass.Active;
    RubKey := mb.GetObjectKeyById("FC_COMM");
    Inst := mb.ItemByIdNamespace("EXP_OBJ", RubKey).Open(NullAs IExportRequestInstance;
    Consumer := Inst.Consumer As IDtTextConsumer;
    Debug.WriteLine(Consumer.File);
End Sub UserProc;

После выполнения примера в окно консоли будет выведено наименование текстового файла, используемого объектом экспорта.

Пример Fore.NET

Для выполнения примера предполагается наличие базы данных временных рядов с идентификатором «FC_COMM», содержащим объект экспорта в текстовый файл с идентификатором «EXP_OBJ».

Imports Prognoz.Platform.Interop.Cubes;
Imports Prognoz.Platform.Interop.Dt;

Public Shared Sub Main(Params: StartParams);
Var
    mb: IMetabase;
    RubKey: uinteger;
    Inst: IExportRequestInstance;
    Consumer: IDtTextConsumer;
Begin
    mb := Params.Metabase;
    RubKey := mb.GetObjectKeyById("FC_COMM");
    Inst := mb.ItemByIdNamespace["EXP_OBJ", RubKey].Open(NullAs IExportRequestInstance;
    Consumer := Inst.Consumer As IDtTextConsumer;
    System.Diagnostics.Debug.WriteLine(Consumer.File);
End Sub;

После выполнения примера в окно консоли будет выведено наименование текстового файла, используемого объектом экспорта.

См. также:

IExportRequestInstance