Перенос остатков из бухгалтерии 2.0 в ERP 2.0

Ошибка при выгрузке данных: {ВнешняяОбработка.УниверсальныйОбменДаннымиXML.МодульОбъекта(1693)}: Ошибка получения коллекции подчиненных объектов из входящих данных 
	ПКО                    =  ВводОстатков00001  (:)
	ПКГС                   =  6  (--> Товары)
	Объект                 =  (Выборка из результата запроса)
	ОписаниеОшибки         =  Получение элемента по индексу для значения не определено
	ПозицияМодуля          =  ВнешняяОбработка.УниверсальныйОбменДаннымиXML.МодульОбъекта(7966)
	КодСообщения           =  66

Запрос = новый Запрос;
запрос.текст = "ВЫБРАТЬ
|	ХозрасчетныйОстатки.Субконто1 КАК Субконто1,
|	ХозрасчетныйОстатки.Субконто2 КАК Субконто2,
|	ХозрасчетныйОстатки.Субконто1.Код КАК код,
|	ХозрасчетныйОстатки.Субконто1.ЗаводскойНомер КАК ЗаводскойНомер,
|	ХозрасчетныйОстатки.Субконто3,
|	ХозрасчетныйОстатки.Счет,
|	ХозрасчетныйОстатки.КоличествоОстатокДт,
|	ХозрасчетныйОстатки.СуммаОстатокДт
|ИЗ
|	РегистрБухгалтерии.Хозрасчетный.Остатки(&период, Счет В ИЕРАРХИИ (&Счет), , ) КАК ХозрасчетныйОстатки
|
|УПОРЯДОЧИТЬ ПО
|	Субконто2,
|	Субконто1
|АВТОУПОРЯДОЧИВАНИЕ";

запрос.УстановитьПараметр("период",Параметры.ПериодОстатков);
запрос.УстановитьПараметр("Счет",Параметры.Счет);

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