IMetaDictionaryLookup.DeleteMarkAttribute

Синтаксис

DeleteMarkAttribute: String;

Описание

Свойство DeleteMarkAttribute определяет атрибут, содержащий признак того, что запись удалена.

Пример

Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «OBJ_FC».

Sub Main;

Var

MB: IMetabase;

RubDesc: IMetabaseObjectDescriptor;

RubrIn: IRubricatorInstance;

DictInst: IMetaDictionaryInstance;

MetaDLookup: IMetaDictionaryLookup;

Atts: IMetaAttributes;

DeleteMark: String;

i: Integer;

Res: Array Of Integer;

Begin

MB := MetabaseClass.Active;

RubDesc := MB.ItemById("OBJ_FC");

RubrIn := RubDesc.Open(Null) As IRubricatorInstance;

DictInst := RubrIn.Facts;

MetaDLookup := DictInst.CreateLookup("");

Atts := DictInst.Dictionary.Attributes;

DeleteMark := Atts.FindByTag(MetaAttributeTag.DeleteMark).Id;

MetaDLookup.DeleteMarkAttribute := DeleteMark;

MetaDLookup.WhereIsDeleted := TriState.OnOption;

i := MetaDLookup.LookupKeys("FACTOR").Length;

Res := New Integer[i];

Res := MetaDLookup.LookupKeys("FACTOR");

For i := 0 To Res.Length - 1 Do

Debug.WriteLine(Res[i].ToString);

End For;

End Sub Main;

После выполнения примера будет определен атрибут, содержащий признак того, что запись удалена. Затем будет произведен поиск всех удаленных показателей, в окно консоли будут выведены их ключи.

См. также:

IMetaDictionaryLookup