IRdsDictionaryElementsLookup.Attributes

Синтаксис

Attributes: String;

Описание

Свойство Attributes определяет список атрибутов, по которым будет производиться поиск.

Комментарии

Идентификаторы атрибутов разделяются знаком «;». Данное свойство используется для смены списка атрибутов, по которым осуществляется поиск. По каждому атрибуту искомое значение задается с помощью свойства Value.

Пример

Для выполнения примера предполагается наличие репозитория НСИ с идентификатором «NSI_1», содержащего справочник НСИ с идентификатором «Dict_1». В справочнике содержится дополнительный атрибут с идентификатором «ATTRIBUTE1».

Добавьте ссылки на системные сборки: Metabase, Rds.

Sub UserProc;
Var
    MB: IMetabase;
    Dict: IRdsDictionary;
    DictInst: IRdsDictionaryInstance;
    Look: IRdsDictionaryElementsLookup;
    Element: IRdsDictionaryElement;
Begin
    MB := MetabaseClass.Active;
    Dict := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Bind As IRdsDictionary;
    DictInst := Dict.Open(Null);
    Look := DictInst.CreateLookup("NAME");
    Look.Options := RdsElementsLookupOptions.Partial;
    Look.Data.Value(0) := "Первый";
    // Первый поиск
    For Each Element In Look.LookupList Do
        Debug.WriteLine(Element.Name + " " + Element.Key.ToString);
    End For;
    //Второй поиск
    Debug.WriteLine("---Второй поиск---");
    Look.Attributes := "ATTRIBUTE1";
    Look.Options := RdsElementsLookupOptions.Default_;
    Look.Data.Value(0) := "33";
    For Each Element In Look.LookupList Do
        Debug.WriteLine(Element.Name + " " + Element.Key.ToString);
    End For;
End Sub UserProc;

После выполнения примера будут осуществлены два поиска элементов справочника НСИ. При первом будут искаться элементы, содержащие в своем наименование слово «Первый». При втором поиске будут искаться элементы, содержащие в значениях дополнительного атрибута значение «33». Наименования и ключи найденных элементов будут выведены в консоль среды разработки.

См. также:

IRdsDictionaryElementsLookup