Если НЕ Источник.ЭтоНовый() Тогда
НЗ = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьНаборЗаписей();
НЗ.Отбор.Объект.Установить(Источник.Ссылка);
НЗ.Отбор.Свойство.Установить(ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоКоду("УТ0000109"));
НЗ.Очистить();