IMetabaseUpdateObjectNode.ExtendedParams

Синтаксис

ExtendedParams: IMetabaseUpdateObjectExParams;

Описание

Свойство ExtendedParams определяет дополнительные параметры обновления объектов.

Пример

Для выполнения необходимо наличие в схеме репозитория НСИ с идентификатором "RDS", в котором содержится справочник НСИ - "Dict_1".

Sub UserProc;

Var

Mb : imetabase;

MU : IMetabaseUpdate;

Node : IMetabaseUpdateDataObjectNode;

Object: IMetabaseObject;

exParams: IMetabaseUpdateObjectExParams;

Begin

Mb := MetabaseClass.Active;

MU := Mb.CreateUpdate;

Object := Mb.ItemByIdNamespace("Dict_1", Mb.ItemById("RDS").Key).Bind;

Node := MU.RootFolder.Add(MetabaseUpdateNodeType.DataObject) As IMetabaseUpdateDataObjectNode;

Node.Method := MetabaseUpdateMethod.All;

exParams := Object.CreateUpdateExParams;

If exParams Is IRdsDictionaryUpdateExParams Then

(exParams As IRdsDictionaryUpdateExParams).PreserveAccessAttributes := True;

End If;

Node.ExtendedParams := exParams;

Node.UpdatePart := MetabaseObjectUpdatePart.DataMetadata; //обновлять данные и метаданные

Node.PreserveExistingData := True; // оставлять элементы, отсутствующие в исходном объекте

Node.Object := Object;

MU.SaveToFileNF("C:\temp\Up1.pefx");

End Sub UserProc;

После выполнения примера будет создан файл обновления. В данное обновление будет включен справочник НСИ "Dict_1". Для справочника отключено обновление атрибутов, отвечающих за права доступа.

См. также:

IMetabaseUpdateObjectNode