// Устанавливает значение свойства объекта XDTO.
//
Процедура УстановитьЗначениеСвойстваXDTO(ОбъектXDTO, ИмяСвойства, ЗначениеСвойства, ТекстОшибки, Глубина = Неопределено)
Попытка
Если ТипЗнч(ОбъектXDTO[ИмяСвойства]) = Тип("СписокXDTO") Тогда
ОбъектXDTO[ИмяСвойства].Добавить(ЗначениеСвойства);
Иначе
ОбъектXDTO[ИмяСвойства] = ЗначениеСвойства;
КонецЕсли;
Исключение
ЧтениеXML = Новый Структура;
ЧтениеXML.Вставить("Имя" , ИмяСвойства);
ЧтениеXML.Вставить("ЛокальноеИмя" , ИмяСвойства);
ЧтениеXML.Вставить("Значение" , ЗначениеСвойства);
ЧтениеXML.Вставить("ТипУзла" , ТипУзлаXML.КонецЭлемента);
ЧтениеXML.Вставить("URIПространстваИмен", ОбъектXDTO.Тип().URIПространстваИмен);
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший