IDtObject.ClearFields

Синтаксис Fore

ClearFields;

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

ClearFields();

Описание

Метод ClearFields очищает список полей приемника/источника данных.

Пример Fore

Для выполнения примера предполагается наличие таблицы с идентификатором «TBL_SOURCE» и задачи ETL с идентификатором «OBJ_ETL_TASK», содержащей источник репозитория с идентификатором «META_PROVIDER». Добавьте ссылки на системные сборки «Metabase», «Dt», «Etl», «Db».

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    EtlTask: IEtlTask;
    EtlProvider: IEtlPlainDataProvider;
    MBProvider: IDtMetabaseProvider;
Begin
    MB := MetabaseClass.Active;
    //Получение задачи ETL
    MObj := MB.ItemById("OBJ_ETL_TASK").Edit;
    EtlTask := MObj As IEtlTask;
    //Получение объекта "Источник репозитория"
    EtlProvider := EtlTask.FindById("META_PROVIDER") As IEtlPlainDataProvider;
    EtlProvider := EtlProvider.Edit;
    //Настройка источника данных
    MBProvider := EtlProvider.Provider As IDtMetabaseProvider;
    MBProvider.Dataset := MB.ItemById("TBL_SOURCE").Bind As IDatasetModel;
    //Заполняем поля источника
    MBProvider.ClearFields;
    EtlProvider.FillFromSource;
    //Сохраняем источник
    EtlProvider.Save;
    //Сохранение задачи Etl
    MObj.Save;
End Sub UserProc;

После выполнения примера источник репозитория будет настроен на работу с таблицей «TBL_SOURCE».

Пример Fore.NET

Imports Prognoz.Platform.Interop.Db;
Imports Prognoz.Platform.Interop.Dt;
Imports Prognoz.Platform.Interop.Etl;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    EtlTask: IEtlTask;
    EtlProvider: IEtlPlainDataProvider;
    MBProvider: IDtMetabaseProvider;
Begin
    MB := Params.Metabase;
    //Поиск задачи ETL. Объект репозитория с идентификатором "ETL"
    MObj := MB.ItemById["OBJ_ETL_TASK"].Edit();
    EtlTask := MObj As IEtlTask;
    //Получение объекта "Источник репозитория"
    EtlProvider := EtlTask.FindById("META_PROVIDER") As IEtlPlainDataProvider;
    EtlProvider := EtlProvider.Edit();
    //Настройка источника данных
    MBProvider := EtlProvider.Provider As IDtMetabaseProvider;
    MBProvider.Dataset := MB.ItemById["TBL_SOURCE"].Bind() As IDatasetModel;
    MBProvider.ClearFields();
    EtlProvider.FillFromSource();
    //Сохраняем источник
    EtlProvider.Save();
    //Сохранение задачи Etl
    MObj.Save();
End Sub;