IRdsDictionaryElementData.ParamsControl

Синтаксис

ParamsControl(Link: IRdsLinkInstance): IRdsParamsControlInstance;

Параметры

Link - связь со справочником, параметрами которого необходимо управлять.

Описание

Свойство ParamsControl возвращает объект, осуществляющий управление значениями параметров связанного справочника путем изменения значений атрибутов текущего справочника.

Пример

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

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Dict: IRdsDictionary;
    Attr: IRdsAttributes;
    Inst, Inst1: IRdsDictionaryInstance;
    Data: IRdsDictionaryElementData;
    ParamContrInst: IRdsParamsControlInstance;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Bind;
    Dict := MObj As IRdsDictionary;
    Inst := MObj.Open(NullAs IRdsDictionaryInstance;
    Attr := Dict.Attributes;
    Data := Inst.CreateElementData;
    Data.Attribute(Attr.FindById("FOR_PARAM").Key) := 1;
    ParamContrInst := Data.ParamsControl(Inst.Links.Item(0));
    Inst1 := ParamContrInst.ReferenceDictionary;
    Data.Attribute(Attr.FindById("ATTRIBUTE").Key) := Inst1.Elements.Item(1).Key;
    Data.Attribute(Attr.Name.Key) := "New";
    Inst.Insert(-2, Data);
End Sub UserProc;

После выполнения примера в справочнике "Dict_1" будет создан новый элемент. В качестве значения атрибута "ATTRIBUTE" будет выбран первый элемент из связанного справочника, открытого при значении параметра "1".

См. также:

IRdsDictionaryElementData