Не получает данные из запроса

Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС()
|Склад = Регистр.ПартииТоваров.Склад;
|Товар = Регистр.ПартииТоваров.Товар;
|Партия = Регистр.ПартииТоваров.Партия;
|Остаток = Регистр.ПартииТоваров.Остаток;
|ПрихДок = Регистр.ПартииТоваров.Партия.ПрихДок;
|Стоимость = Регистр.ПартииТоваров.Стоимость;
|Функция ОстатокКонОст = КонОст(Остаток);
|Функция СтоимостьКонОст = КонОст(Стоимость);
|Группировка Партия упорядочить по Партия.ПрихДок, Партия.СерийныйНомер, Партия.ПартияОсн без групп;
|Группировка Склад упорядочить по Склад.Наименование без групп;
|Группировка Товар упорядочить по Товар.Наименование без групп;
|Условие(ПрихДок = Источник);
|Условие(Остаток > 0);
|"//}}ЗАПРОС
;
ОсновнойЗапрос = Запрос.Выполнить(ТекстЗапроса);
ВходящиеДанные = СоздатьОбъект("ТаблицаЗначений");
Запрос.Выгрузить(ВходящиеДанные,0,0);

ВходящиеДанные.ВыбратьСтроки();
Пока ВходящиеДанные.ПолучитьСтроку() = 1 Цикл
	Сообщить(Шаблон("[ВходящиеДанные.Товар] х [ВходящиеДанные.ОстатокКонОст] ед., [ВходящиеДанные.СтоимостьКонОст]р."));	
КонецЦикла;

Если (ВходящиеДанные.КоличествоСтрок()=0) Тогда
	Отказ = 1;
КонецЕсли;