Отбор по контрагенту в обработке

Функция ВыгрузитьРеализациИзКАВБух(ПутьКФайлу)
	ЗаписьXML = Новый ЗаписьXML;
	ЗаписьXML.ОткрытьФайл(ПутьКФайлу,"UTF-8");
	ЗаписьXML.ЗаписатьОбъявлениеXML();
	
	
	Запрос = Новый запрос;
	Запрос.Текст =
	"ВЫБРАТЬ
	|	РеализацияТоваровУслуг.Номер КАК Номер,
	|	РеализацияТоваровУслуг.Дата КАК Дата,
	|	РеализацияТоваровУслуг.Проведен КАК Проведен,
	|	РеализацияТоваровУслуг.СуммаДокумента КАК СуммаДокумента,
	|	РеализацияТоваровУслуг.Организация КАК Организация,
	|	РеализацияТоваровУслуг.Склад КАК Склад,
	|	РеализацияТоваровУслуг.Товары.(
	|		Ссылка КАК Ссылка,
	|		НомерСтроки КАК НомерСтроки,
	|		Номенклатура КАК Номенклатура,
	|		Характеристика КАК Характеристика,
	|		Назначение КАК Назначение,
	|		Упаковка КАК Упаковка,
	|		КоличествоУпаковок КАК КоличествоУпаковок,
	|		Количество КАК Количество,
	|		ВидЦены КАК ВидЦены,
	|		Цена КАК Цена,
	|		Сумма КАК Сумма,
	|		СтавкаНДС КАК СтавкаНДС,
	|		СуммаНДС КАК СуммаНДС,
	|		СуммаСНДС КАК СуммаСНДС,
	|		КодСтроки КАК КодСтроки,
	|		СуммаРучнойСкидки КАК СуммаРучнойСкидки,
	|		СуммаАвтоматическойСкидки КАК СуммаАвтоматическойСкидки,
	|		ПроцентРучнойСкидки КАК ПроцентРучнойСкидки,
	|		ПроцентАвтоматическойСкидки КАК ПроцентАвтоматическойСкидки,
	|		КлючСвязи КАК КлючСвязи,
	|		Склад КАК Склад,
	|		СтатусУказанияСерий КАК СтатусУказанияСерий,
	|		СуммаВзаиморасчетов КАК СуммаВзаиморасчетов,
	|		ЗаказКлиента КАК ЗаказКлиента,
	|		СрокПоставки КАК СрокПоставки,
	|		ИдентификаторСтроки КАК ИдентификаторСтроки,
	|		Серия КАК Серия,
	|		АналитикаУчетаНоменклатуры КАК АналитикаУчетаНоменклатуры,
	|		НоменклатураНабора КАК НоменклатураНабора,
	|		ХарактеристикаНабора КАК ХарактеристикаНабора,
	|		АналитикаУчетаНаборов КАК АналитикаУчетаНаборов,
	|		КодТНВЭД КАК КодТНВЭД
	|	) КАК Товары,
	|	РеализацияТоваровУслуг.Контрагент КАК Контрагент,
	|	РеализацияТоваровУслуг.Контрагент.ИНН КАК КонтрагентИНН,
	|	РеализацияТоваровУслуг.Организация.ИНН КАК ОрганизацияИНН
	|ИЗ
	|	Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
	|ГДЕ
	|	РеализацияТоваровУслуг.Дата МЕЖДУ &ДатаНач И &ДатаКонец
	|	И РеализацияТоваровУслуг.Организация = &Организация";
	
	Запрос.УстановитьПараметр("ДатаНач",ПериодВыгрузки.ДатаНачала);
	Запрос.УстановитьПараметр("ДатаКонец",ПериодВыгрузки.ДатаОкончания);
	Запрос.УстановитьПараметр("Организация", РекОрганизация);
	
	Результат = Запрос.Выполнить().Выбрать();
	ЗаписьXML.ЗаписатьНачалоЭлемента("СпискоДокументов");
	Пока Результат.Следующий()Цикл
		
		ЗаписьXML.ЗаписатьНачалоЭлемента("Реализация");
		ЗаписьXML.ЗаписатьАтрибут("Номер",Строка(Результат.Номер));
		ЗаписьXML.ЗаписатьАтрибут("дата",Строка(Результат.Дата));
		ЗаписьXML.ЗаписатьАтрибут("Организация",Строка(Результат.Организация));
		ЗаписьXML.ЗаписатьАтрибут("ОрганизацияИНН",Строка(Результат.ОрганизацияИНН));
		ЗаписьXML.ЗаписатьАтрибут("Контрагент",Строка(Результат.Контрагент));
		ЗаписьXML.ЗаписатьАтрибут("КонтрагентИНН",Строка(Результат.КонтрагентИНН));
		ЗаписьXML.ЗаписатьАтрибут("Склад",Строка(Результат.Склад));
		ЗаписьXML.ЗаписатьАтрибут("СуммаДокумента", Строка(Результат.СуммаДокумента));
		
		Товары = Результат.Товары;
		список = Товары.Выбрать();
		Пока список.Следующий() Цикл
			ЗаписьXML.ЗаписатьНачалоЭлемента("таблицаТовары");
			ЗаписьXML.ЗаписатьАтрибут("Номенклатура",Строка(список.Номенклатура));
			ЗаписьXML.ЗаписатьАтрибут("КодНоменклатуры",Строка(список.Номенклатура.Код));
			ЗаписьXML.ЗаписатьАтрибут("Цена",Строка(список.Цена));
			ЗаписьXML.ЗаписатьАтрибут("Количество",Строка(список.Количество));
			ЗаписьXML.ЗаписатьАтрибут("Сумма",Строка(список.Сумма));
			ЗаписьXML.ЗаписатьАтрибут("СтавкаНДС",Строка(список.СтавкаНДС)); 
			ЗаписьXML.ЗаписатьКонецЭлемента();
		КонецЦикла;
		ЗаписьXML.ЗаписатьКонецЭлемента();
		
		
		
		
	КонецЦикла;
	ЗаписьXML.ЗаписатьКонецЭлемента();
	Сообщить("Файл успешно записан");
КонецФункции