Clone(Parent: IMetaHierarchyPosition): IMetaMember;
Parent - позиция элемента иерархии.
Метод Clone создает копию элемента иерархии, расположенного в указанной позиции.
Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «OBJ_FC».
Sub UserProc;
Var
Mb: Imetabase;
Rubr: IMetabaseObject;
RubrInst: IRubricatorInstance;
Facts: IMetaDictionaryInstance;
Hierarchy: IMetaHierarchy;
HInstance: IMetaHierarchyInstance;
RootPosition: IMetaHierarchyPosition;
Members: IMetaMembers;
Mem, MemClone: IMetaMember;
Begin
Mb := MetabaseClass.Active;
Rubr := MB.ItemById("OBJ_FC").Edit;
RubrInst := Rubr.Open(Null) As IRubricatorInstance;
Facts := RubrInst.GetDictionary(RubricatorDictionary.Facts);
Hierarchy := Facts.Dictionary.DefaultHierarchy;
HInstance := Facts.OpenHierarchy(Hierarchy);
Members := HInstance.GetRootMembers;
Mem := Members.Current;
RootPosition := HInstance.RootPosition;
MemClone := Mem.Clone(RootPosition);
End Sub UserProc;
После выполнения примера в переменной «MemClone» будут содержаться копия корневого элемента справочника показателей.
См. также: