IDtTextConsumer.File

Синтаксис

File: String;

Описание

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

Пример

Для выполнения примера предполагается наличие в репозитории задачи ETL с идентификатором "Etl".

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

EtlTask: IEtlTask;

EtlConsumer: IEtlPlainDataConsumer;

TextConsumer: IDtTextConsumer;

WxConsumer: IWxRectangle;

WxETLConsumer: IWxETLObject;

Begin

MB := MetabaseClass.Active;

//Поиск задачи ETL. Объект репозитория с идентификатором "ETL"

MObj := MB.ItemById("Etl").Edit;

EtlTask := MObj As IEtlTask;

//Начало создания приемника

//Создание объекта "Экспорт в текст"

EtlConsumer := EtlTask.Create(EtlObjectType.PlainDataTextConsumer) As IEtlPlainDataConsumer;

EtlConsumer := EtlConsumer.Edit;

EtlConsumer.Id := "Text_Consumer";

EtlConsumer.Name := "Экспорт в текст";

EtlConsumer.Description := "Экспорт в текст";

//Настройка приемника данных

TextConsumer := EtlConsumer.Consumer As IDtTextConsumer;

TextConsumer.File := "c:\Data_out.txt";

TextConsumer.WriteHeader := True;

TextConsumer.RowDelimiter := #13 + #10; //Возврат каретки + перевод строки

TextConsumer.DelimitedColumnDelimiter := #9; //Клавиша Tab

TextConsumer.DelimitedTextQualifier := "'";

//Сохраняем приемник

EtlConsumer.Save;

//Конец создания приемника

//Начало создания визуального объекта

WxConsumer := EtlTask.Workspace.CreateRectangle;

WxETLConsumer := New WxETLObject.Create;

WxETLConsumer.ETLObject := EtlConsumer;

WxConsumer.Style.TextPosition := WxTextPosition.Bottom;

WxConsumer.Style.PictureMarginTop := -10;

WxConsumer.PinPosition := New GxPointF.Create(50, 50);

WxConsumer.Extension := WxETLConsumer As IWxShapeExtension;

//Конец создания визуального объекта

//Сохранение задачи Etl

MObj.Save;

End Sub Main;

После выполнения примера в задаче ETL будет создан объект «Экспорт в текст». При экспорте в качестве разделителя строк будет использоваться сочетание Возврат каретки+Перевод строки, в качестве разделителя полей - Знак табуляции. Ограничитель текста - апостроф. В первую строку файла будут экспортироваться наименования полей. Если файл не существует - он будет создан.

См. также:

IDtTextConsumer