IEtlPlainIndex.ClearFields

Копировать пример

Sub UserProc;
Var
    MB: IMetabase;
    Object: IMetabaseObject;
    EtlTask: IEtlTask;
    Join: IEtlPlainDataJoin;
    Index: IEtlPlainIndex;
Begin
    MB := MetabaseClass.Active;
    Object := MB.ItemById("ETL").Edit;
    EtlTask := Object As IEtlTask;
    Join := EtlTask.Item(0) As IEtlPlainDataJoin;
    Index := Join.Index;
    Index.ClearFields;
    Object.Save;
End Sub UserProc;