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