Ошибка записи Владельца

Процедура ОсновныеДействияФормыСоздатьХар(Кнопка)
	
	Значение = Формат(ЭлементыФормы.Ширина.Значение*10, "ЧГ=0") + "×" + Формат(ЭлементыФормы.Длина.Значение*10, "ЧГ=0") + "×" + Формат(Прав(ЭлементыФормы.Характеристика.Значение.Наименование,3), "ЧГ=0"); //(?(Прав(ЭлементыФормы.Характеристика.Значение.Наименование,3) = "000", 4, 3))); //Считываем характеристику из файла
	ВладелецРазмер = ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоКоду("УТ0000011");
	
	Если ЭлементыФормы.Ширина.Значение > 0 И ЭлементыФормы.Длина.Значение > 0 Тогда // Если характеристика есть
		Запрос = Новый Запрос; // то запросом ищем, есть ли такая характеристика в справочнике. Если есть, то не будем ее по новой создавать
		Запрос.Текст = "ВЫБРАТЬ
		|   ЗначенияСвойствОбъектов.Ссылка
		|ИЗ
		|   Справочник.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов
		|ГДЕ
		|   ЗначенияСвойствОбъектов.Наименование = &Наименование";
		Запрос.УстановитьПараметр("Наименование", Значение);
		Выборка = Запрос.Выполнить().Выбрать();
		Если Выборка.Количество()<=0 Тогда //А если нет, то создаем
			Свойство = Справочники.ЗначенияСвойствОбъектов.СоздатьЭлемент();
			Свойство.Наименование = Значение;
			Свойство.Владелец = ВладелецРазмер;
			Свойство.Записать();
			СвойствоСсылка = Свойство.Ссылка;
		Иначе
			Выборка.Следующий();
			СвойствоСсылка = Выборка.Ссылка;
		КонецЕсли;
				
		//Следующим запросом ищем, может для данной номенклатуры уже задавалась такая характеристика                    
		Запрос.Текст = "ВЫБРАТЬ
		|   ХарактеристикиНоменклатуры.Наименование
		|ИЗ
		|   Справочник.ХарактеристикиНоменклатуры КАК ХарактеристикиНоменклатуры
		|ГДЕ
		|   ХарактеристикиНоменклатуры.Владелец = &Владелец
		|   И ХарактеристикиНоменклатуры.Наименование = &Наименование";
		Запрос.УстановитьПараметр("Наименование", Значение);
		Запрос.УстановитьПараметр("Владелец", ЭлементыФормы.МодельМатраса.Значение.Ссылка);
		
			
		Если Запрос.Выполнить().Выбрать().Количество()<=0 Тогда //Если нет, то задаем характеристику номенклатуре
			Характеристика = Справочники.ХарактеристикиНоменклатуры.СоздатьЭлемент();
			Характеристика.Владелец = ЭлементыФормы.МодельМатраса.Значение.Ссылка;
			Характеристика.Наименование = Значение;
			Характеристика.Записать();
			РегистрЗначенияСвойствОбъектов = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьМенеджерЗаписи(); //Записываем запись в регистр сведений
			РегистрЗначенияСвойствОбъектов.Значение = СвойствоСсылка;
			РегистрЗначенияСвойствОбъектов.Объект = Характеристика.Ссылка;
			РегистрЗначенияСвойствОбъектов.Свойство = ВладелецРазмер;
			РегистрЗначенияСвойствОбъектов.Записать();
		КонецЕсли;
		
		
	КонецЕсли;
	
КонецЦикла;

КонецПроцедуры

Если Запрос.Выполнить().Выбрать().Количество()<=0 Тогда //Если нет, то задаем характеристику номенклатуре
			НоваяХарактеристика = Справочники.ХарактеристикиНоменклатуры.СоздатьЭлемент(); 
			НоваяХарактеристика.Владелец = ЭлементыФормы.МодельМатраса.Значение.Ссылка; 
			НоваяХарактеристика.Наименование = Значение; 
			НоваяХарактеристика.Записать();
			нНоменклатура = ЭлементыФормы.МодельМатраса.Значение;
			РегистрЗначенияСвойствОбъектов = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьМенеджерЗаписи(); //Записываем запись в регистр сведений
			РегистрЗначенияСвойствОбъектов.Объект   = НоваяХарактеристика.Ссылка;
			РегистрЗначенияСвойствОбъектов.Свойство = ВладелецРазмер;
			РегистрЗначенияСвойствОбъектов.Значение = СвойствоСсылка;
			РегистрЗначенияСвойствОбъектов.Записать();
		КонецЕсли;