Mappings(Attribute: IRdsAttribute): IRdsAttribute;
Attribute - пользовательский атрибут составного справочника, для которого необходимо настроить привязку.
Свойство Mappings определяет привязку атрибута составного справочника к атрибуту справочника-источника.
Для выполнения примера предполагается наличие репозитория НСИ - "NSI_1". В данном репозитории содержится два справочника: 1) обычный справочник с идентификатором "Dict_1"; 2) составной справочник НСИ с идентификатором "CompDict_1". В каждом справочнике имеется дополнительный атрибут с идентификатором "ATTRIBUTE".
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Dict: IRdsDictionary;
CompDict: IRdsCompoundDictionary;
CompSources: IRdsCompoundDictionarySources;
CompSource: IRdsCompoundDictionarySource;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemByIdNamespace("CompDict_1", MB.ItemById("NSI_1").Key).Edit;
Dict := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Bind As IRdsDictionary;
CompDict := MObj As IRdsCompoundDictionary;
CompSources := CompDict.Sources;
CompSource := CompSources.Add;
CompSource.Id := "New_Source";
CompSource.Name := "Новый справочник-источник";
CompSource.Source := Dict;
CompSource.Mappings(CompDict.Attributes.FindById("ATTRIBUTE")) := Dict.Attributes.FindById("ATTRIBUTE");
MObj.Save;
End Sub Main;
После выполнения примера в составной справочник будет добавлен новый источник. В качестве источника данных выступает справочник НСИ "Dict_1". Дополнительный атрибут составного справочника будет привязан к аналогичному атрибуту в справочнике НСИ.
См. также: