Перенос Свойств Номенклатуры

[tank436]

Делаю перенос Справочника номенклатуры номенклатуру перенес , а как перенести свойства непойму пока( Перенос с ТиС 7.7 нетиповая  в Розницу 1.0 8.2 свойства добавлены в номенклатуре , подключение через OLE
может из этого что то можно
            СтруктураСвойства = Новый Структура;
            СтруктураСвойства.Вставить("Свойство",ИмяСвойства);
            СтруктураСвойства.Вставить("Значение",ЗначениеСвойства);
            ЗаписатьЗначенияСвойствА(Элем,СтруктураСвойства);



Функция ЗаписатьЗначенияСвойствА(Объект,СтруктураСвойства)   
    НаборЗаписейЗначенияСвойств = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьНаборЗаписей();
    Если ЗначениеЗаполнено(СтруктураСвойства.Значение) Тогда
        Запись = НаборЗаписейЗначенияСвойств.Добавить();

        Запись.Объект   = Объект.Ссылка;
        Свойство=ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоНаименованию(СтруктураСвойства.Свойство);
        Запись.Свойство = Свойство.Ссылка;
        Запись.Значение = СтруктураСвойства.Значение;
    КонецЕсли;
   
    НаборЗаписейЗначенияСвойств.Отбор.Объект.Установить(Объект.Ссылка);
    НаборЗаписейЗначенияСвойств.Отбор.Свойство.Установить(Свойство); //.Ссылка
    Попытка
        НаборЗаписейЗначенияСвойств.Записать();
    Исключение
            Предупреждение("Не удалось записать значения свойств:" + Символы.ПС + ОписаниеОшибки());
        Возврат Ложь;
    КонецПопытки;
    Возврат Истина;   
КонецФункции     
Как бы реализовать бы с этого фрагмента кода ?