4
Ёпрст
гуру
05.08.20
✎
18:56
|
(0)
// Устанавливает значение свойства объекта XDTO.
//
Процедура УстановитьЗначениеСвойстваXDTO(ОбъектXDTO, ИмяСвойства, ЗначениеСвойства, ТекстОшибки, Глубина = Неопределено)
Попытка
Если ТипЗнч(ОбъектXDTO[ИмяСвойства]) = Тип("СписокXDTO") Тогда
ОбъектXDTO[ИмяСвойства].Добавить(ЗначениеСвойства);
Иначе
ОбъектXDTO[ИмяСвойства] = ЗначениеСвойства;
КонецЕсли;
Исключение
ЧтениеXML = Новый Структура;
ЧтениеXML.Вставить("Имя" , ИмяСвойства);
ЧтениеXML.Вставить("ЛокальноеИмя" , ИмяСвойства);
ЧтениеXML.Вставить("Значение" , ЗначениеСвойства);
ЧтениеXML.Вставить("ТипУзла" , ТипУзлаXML.КонецЭлемента);
ЧтениеXML.Вставить("URIПространстваИмен", ОбъектXDTO.Тип().URIПространстваИмен);
ТекстОшибки = ПодробноеПредставлениеОшибки(ИнформацияОбОшибке());
ТекстОшибки = ПредставлениеОшибкиXDTO(ТекстОшибки, ЧтениеXML, Глубина);
КонецПопытки;
КонецПроцедуры
|
|