IRdsDictionaryElementData.RecordO

Синтаксис Fore

RecordO(Options: Variant): ;

Синтаксис Fore.NET

RecordO[Options: object]: Prognoz.Platform.Interop.Orm.IOrmRecord;

Параметры

Options. Определяет вариант возвращаемых данных.

Описание

Свойство RecordO возвращает данные атрибутов элемента в зависимости от заданного параметра в виде объекта, реализуемого интерфейсом IOrmRecord.

«0». Свойство RecordO работает аналогично свойству IRdsDictionaryElementData.Record и возвращает отображаемые значения атрибутов;
«1». Свойство RecordO возвращает значения атрибутов, которые лежат в таблице, являющейся источником данных справочника.

Пример Fore

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

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

Sub UserProc;
Var
    DictInst: IRdsDictionaryInstance;
    Elem: IRdsDictionaryElement;
Begin
    DictInst := MetabaseClass.Active.ItemById("DIM").Open(Null) As IRdsDictionaryInstance;
    DictInst.FetchAll:=True;
    Elem := DictInst.Elements.Item(1);
    Debug.WriteLine("Отображаемое значение атрибута: " + Elem.RecordO(0).AttributeValue(4));
    Debug.WriteLine("Значение атрибута в таблице справочника: "
        + Elem.RecordO(1).AttributeValue(4));
End Sub UserProc;

В результате выполнения примера будет получена вторая запись справочника. В окно консоли будет выведена информация об отображаемом значении указанного атрибута и значение атрибута в таблице справочника.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Orm;
Imports Prognoz.Platform.Interop.Rds;
…
Public Shared Sub Main(Params: StartParams);
Var
    DictInst: IRdsDictionaryInstance;
    Elem: IRdsDictionaryElement;
Begin
    DictInst := Params.Metabase.ItemById["DIM"].Open(Null) As IRdsDictionaryInstance;
    DictInst.FetchAll:=True;
    Elem := DictInst.Elements.Item[1];
    System.Diagnostics.Debug.WriteLine("Отображаемое значение атрибута: " + Elem.RecordO[0].AttributeValue[4]);
    System.Diagnostics.Debug.WriteLine("Значение атрибута в таблице справочника: "
        + Elem.RecordO[1].AttributeValue[4]);
End Sub;

См. также:

IRdsDictionaryElementData