Clear;
Метод Clear очищает коллекцию объектов.
После вызова данного метода значение свойства ICubeMetaUpdateAdditionalObjects.Count становится равным нулю.
Для выполнения примера предполагается наличие в репозитории объекта репликации с идентификатором «CUBE_META_UPD» Также необходимо добавить ссылки на системные сборки «Cubes» и «Metabase».
Sub UserProc;
Var
Mb: IMetabase;
Update: ICubeMetaUpdateEx;
AdditionalObjs: ICubeMetaUpdateAdditionalObjects;
Begin
Mb := MetabaseClass.Active;
Update := Mb.ItemById("CUBE_META_UPD").Edit As ICubeMetaUpdateEx;
AdditionalObjs := Update.AdditionalObjects;
AdditionalObjs.Clear;
(Update As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера будут изменены параметры копирования базы данных временных рядов: он будет скопирован без внешних объектов.
См. также: