2-уровневый обход результата запроса

Question

Имеется периодический регистр сведений "ТВ_Программа" (см. рис)

Требуется при помощи [B]запроса [/B]вычислять некоторую величину для [B]блока передач по одному часу каждый[/B] (в примере  - сумму длин , но не суть)

Проблема в том, что [B]обе[/B]  группировки - и внешняя и внутренняя ходят по всем передачам, а надо, чтобы внешняя срабатывала 1 раз на каждый час, а внутренняя - на каждую передачу ИЗ ЭТОГО ЧАСА.

Вот код

[1C-CODE]&НаСервереБезКонтекста
Функция ОпределитьМаксДлинуБлокаПрограммНаСервере(пчДатаСтарт, пчДатаФиниш, пбЭтоПерваяПоловина)
	лчМаксДлина=0;
	
	лсТекстЗапроса="ВЫБРАТЬ
	               |	ТВ_Программа.Период КАК Период,
	               |	ТВ_Программа.ТВ_Передача КАК ТВ_Передача,
	               |	ТВ_Программа.ЭтоПерваяПоловина КАК ЭтоПерваяПоловина,
	               |	ТВ_Программа.ЧасыСмещенияДоДругойПоловины КАК ЧасыСмещенияДоДругойПоловины,
	               |	НАЧАЛОПЕРИОДА(ТВ_Программа.Период, ЧАС) КАК НачалоБлока
	               |ИЗ
	               |	РегистрСведений.ТВ_Программа КАК ТВ_Программа
	               |ГДЕ
	               |	ТВ_Программа.ЭтоПерваяПоловина = &ЭтоПерваяПоловина
	               |	И МИНУТА(ТВ_Программа.Период) < 47
	               |	И ТВ_Программа.Период МЕЖДУ &ДатаСтарт И &ДатаФиниш
	               |
	               |СГРУППИРОВАТЬ ПО
	               |	НАЧАЛОПЕРИОДА(ТВ_Программа.Период, ЧАС),
	               |	ТВ_Программа.ТВ_Передача,
	               |	ТВ_Программа.Период,
	               |	ТВ_Программа.ЭтоПерваяПоловина,
	               |	ТВ_Программа.ЧасыСмещенияДоДругойПоловины
	               |
	               |УПОРЯДОЧИТЬ ПО
	               |	Период,
	               |	ТВ_Передача";
	
	лаЗапрос=Новый Запрос;
	лаЗапрос.Текст=лсТекстЗапроса;
	лаЗапрос.УстановитьПараметр("ЭтоПерваяПоловина", пбЭтоПерваяПоловина);
	лаЗапрос.УстановитьПараметр("ДатаСтарт", пчДатаСтарт);
	лаЗапрос.УстановитьПараметр("ДатаФиниш", пчДатаФиниш);
	
	ВыборкаЧас=лаЗапрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
	Пока ВыборкаЧас.Следующий() Цикл
		
		лсСоставБлока=""; лбПервыйРаз=Истина;
		
		ВыборкаПередача=ВыборкаЧас.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
		Пока ВыборкаПередача.Следующий() Цикл
			
			Если лбПервыйРаз Тогда
				лбПервыйРаз=Ложь;
			Иначе
				лсСоставБлока=лсСоставБлока+"/";
			КонецЕсли;
			
			лсСоставБлока=лсСоставБлока+ВыборкаПередача.ТВ_Передача.Наименование;
		КонецЦикла; // ВыборкаПередача
		
		лчДлина=СтрДлина(лсСоставБлока);
		Если лчМаксДлина<лчДлина Тогда
			лчМаксДлина=лчДлина;
		КонецЕсли;
	КонецЦикла; // ВыборкаЧас
	
	Возврат лчМаксДлина;
КонецФункции
[/1C-CODE]

Что я делаю не так?

P.S. Группировки "ТВ_Программа.Период" и ниже внёс Конструктор, если их убрать - Запрос ругается.

Accepted Answer

(7) потому что в запросе вы не указали итоги по полям - нужно ИТОГИ ПО Период и ТВ_Передача