Одинаковый остаток и резерв по разным номенклатурах в таблице

Запрос=Новый Запрос;
Запрос.Текст="ВЫБРАТЬ
|    ЕСТЬNULL(ТоварыВРезервеНаСкладахОстатки.КоличествоОстаток, 0) КАК Резерв,
|    ЕСТЬNULL(ВложенныйЗапрос.КоличествоОстаток, 0) КАК Остаток,
|    ВозвратТоваровОтПокупателяТовары.Номенклатура
|ИЗ
|    Документ.ВозвратТоваровОтПокупателя.Товары КАК ВозвратТоваровОтПокупателяТовары
|        ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыВРезервеНаСкладах.Остатки(КОНЕЦПЕРИОДА(&НачалоПериода, ДЕНЬ), ) КАК ТоварыВРезервеНаСкладахОстатки
|        ПО ВозвратТоваровОтПокупателяТовары.Номенклатура = ТоварыВРезервеНаСкладахОстатки.Номенклатура
|        ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
|            ТоварыНаСкладахОстатки.КоличествоОстаток КАК КоличествоОстаток,
|            ТоварыНаСкладахОстатки.Номенклатура КАК Номенклатура
|        ИЗ
|            РегистрНакопления.ТоварыНаСкладах.Остатки(, ) КАК ТоварыНаСкладахОстатки
|        
|        СГРУППИРОВАТЬ ПО
|            ТоварыНаСкладахОстатки.Номенклатура,
|            ТоварыНаСкладахОстатки.КоличествоОстаток) КАК ВложенныйЗапрос
|        ПО ВозвратТоваровОтПокупателяТовары.Номенклатура = ВложенныйЗапрос.Номенклатура
|ГДЕ
|    ВозвратТоваровОтПокупателяТовары.Ссылка.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
|    ВозвратТоваровОтПокупателяТовары.Номенклатура,
|    ЕСТЬNULL(ВложенныйЗапрос.КоличествоОстаток, 0),
|    ЕСТЬNULL(ТоварыВРезервеНаСкладахОстатки.КоличествоОстаток, 0)";
Запрос.УстановитьПараметр("Ссылка",Ссылка);
Запрос.УстановитьПараметр("НачалоПериода",ТекущаяДата());
////тут мы получаем в выборе последнее значение+
//Выборка=Запрос.Выполнить().Выбрать();
//Пока Выборка.Следующий() Цикл
//КонецЦикла;
////можно получить таблицу значение с данными

Выборка=Запрос.Выполнить().Выгрузить();

ТекущиеДанные = ЭлементыФормы.Товары.ТекущиеДанные;
Форма = ПолучитьФорму("РегистрСведений.ЛогРедактированияДокументов.Форма.Возврат", , ЭлементыФормы.Товары);
Форма.КлючУникальности = ТекущиеДанные.ИдентификаторСтроки;        
Форма.ТабТовары =ДокументОбъект.Товары.Выгрузить(,"Номенклатура,Количество,Цена,Сумма");
Форма.ТабТовары.Колонки.Добавить("ПричинаИзменения", Новый ОписаниеТипов("СправочникСсылка.AV_ПричиныУрезанияНоменклатуры"));
Форма.ТабТовары.Колонки.Добавить("ИдентификаторСтроки", Новый ОписаниеТипов("УникальныйИдентификатор"));
Форма.ТабТовары.Колонки.Добавить("Остаток", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(15, 3)));
Форма.ТабТовары.Колонки.Добавить("Резерв", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(15, 3)));
Форма.ЭлементыФормы.ТабТовары.СоздатьКолонки();
Для Каждого Запись Из Форма.ТабТовары Цикл 
	// ищем в таблице значений поулченные данные +
	НаденоеЗначение = Выборка.Найти("Номенклатура", Запись.Номенклатура);
	Если НаденоеЗначение <> Неопределено Тогда
		//-
		Запись.Остаток=НаденоеЗначение.Остаток;
		Запись.Резерв=НаденоеЗначение.Резерв;
	иначе
		Запись.Остаток=0;
		Запись.Резерв=0;
	КонецЕсли;	
КонецЦикла;
ЗаполнитьЗначенияСвойств(Форма.ТабТовары,ПервоначальныеДанные);
Топ=Форма.ТабТовары;
Форма.ОткрытьМодально();

ТекущиеДанные = ЭлементыФормы.Товары.ТекущиеДанные;
Для Каждого Данные из ПервоначальныеДанные Цикл 
КонецЦикла;

Для Каждого Строка Из Топ Цикл
	Если ТекущиеДанные.Количество<>Строка.Количество Тогда
		ТекстВопроса = "Данные будут записаны в регистр сведений. Заполнить?";
		Ответ = Вопрос(ТекстВопроса, РежимДиалогаВопрос.ДаНет, , КодВозвратаДиалога.Да, );
		Если Ответ = КодВозвратаДиалога.Да Тогда
			
			НаборЗаписей = РегистрыСведений.ЛогРедактированияДокументов.СоздатьНаборЗаписей();
			НоваяЗапись = НаборЗаписей.Добавить();
			НоваяЗапись.Документ =Ссылка;
			НоваяЗапись.Было =Строка.Количество;
			НоваяЗапись.Стало =Строка.Количество;
			// тут мы снова получали последнее значение, либо так же через "Найти" либо прямо из формы правильные данные
			//НоваяЗапись.Остаток =Выборка.Остаток;
			//НоваяЗапись.Резерв =Выборка.Резерв;
			НоваяЗапись.Остаток =Строка.Остаток;
			НоваяЗапись.Резерв =Строка.Резерв;
			НоваяЗапись.ПричинаИзменения =Строка.ПричинаИзменения;
			НоваяЗапись.Товар =Строка.Номенклатура;
			НоваяЗапись.Пользователь =ПараметрыСеанса.ТекущийПользователь;
			НоваяЗапись.Период =ТекущаяДата();
			НаборЗаписей.Записать(Ложь);
		КонецЕсли;
	КонецЕсли;
КонецЦикла;