IRubricatorCopier.Copy

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

Sub UserCopy;
Var
    MB: IMetabase;
    pCopier: IRubricatorCopier;
    CInfo: IMetabaseObjectCopyInfo;
Begin
    // Получаем текущий репозиторий
    MB := MetabaseClass.Active;
    // Создаем объект для копирования объекта репозитория
    CInfo := MB.CreateCopyInfo;
    CInfo.Id := MB.GenerateId("FC_COPY");
    CInfo.Name := "Копия базы данных временных рядов";
    CInfo.WithData := True;
    CInfo.Destination := MB.ItemById("F_TSDB_COPY");
    CInfo.Source := MB.ItemById("TSDB");
    // Создаем объект для копирования базы данных временных рядов
    pCopier := New RubricatorCopier.Create;
    // Указываем общие параметры копирования
    pCopier.CopyInfo := CInfo;
    // Указываем, что копирование выполняется с данными
    pCopier.WithObjects := True;
    // Указываем, что копирование выполняется в одну транзакцию
    pCopier.DisableTransactions := True;
    // Выполняем копирование
    pCopier.Copy;
End Sub UserCopy;