нужна помощь с циклом

результатом моего цикла получается повтор отделения  и фамилии три раза.а надо чтобы один раз отделение и фамилия а дальше услуги полученные в этом отделении по фамилиям

        ЗапросТаблица = Новый Запрос();
        ЗапросТаблица.Текст =
        "ВЫБРАТЬ
        |    РЦ_ОказанныеУслугиОбороты.Договор.Номер КАК Номер,
        |    РЦ_ОказанныеУслугиОбороты.Пациент.Наименование КАК ФИО,
        |    РЦ_ОказанныеУслугиОбороты.Услуга КАК Услуга,
        |    ЕСТЬNULL(РЦ_ОказанныеУслугиОбороты.СуммаОборот, 0) КАК Сумма,
        |    РЦ_Отделения.Наименование КАК Наименование,
        |    РЦ_Отделения.ЭтоГруппа КАК ЭтоГруппа,
        |    РЦ_Отделения.Родитель КАК Родитель
        |ИЗ
        |    РегистрНакопления.РЦ_ОказанныеУслуги.Обороты(&ДатаС, &ДатаПо, , ) КАК РЦ_ОказанныеУслугиОбороты
        |        ЛЕВОЕ СОЕДИНЕНИЕ Справочник.РЦ_Отделения КАК РЦ_Отделения
        |        ПО РЦ_ОказанныеУслугиОбороты.Отделение = РЦ_Отделения.Ссылка
        |ГДЕ
        |    ВЫБОР
        |            КОГДА &ОтделенияЗаполнены
        |                ТОГДА РЦ_Отделения.Ссылка В ИЕРАРХИИ (&Отделения)
        |            ИНАЧЕ ИСТИНА
        |        КОНЕЦ";
        ЗапросТаблица.УстановитьПараметр("Отделения",Отделения);
        ЗапросТаблица.УстановитьПараметр("ДатаС", НачалоДня(ДатаС));
        ЗапросТаблица.УстановитьПараметр("ДатаПо",КонецДня(ДатаПо));
        ЗапросТаблица.УстановитьПараметр("ОтделенияЗаполнены", ЗначениеЗаполнено(Отделения));
        РезультатТаблица = ЗапросТаблица.Выполнить().Выгрузить();



        Для каждого СтрокаТаблица Из РезультатТаблица Цикл
            ОбластьГруппа.Параметры.Наименование = СтрокаТаблица.Наименование;
            ТД.Вывести(ОбластьГруппа);

                ОбластьГруппа1.Параметры.ФИО = СтрокаТаблица.ФИО;
                ТД.Вывести(ОбластьГруппа1);

            ОбластьГруппа2.Параметры.Номер = СтрокаТаблица.Номер;
            ОбластьГруппа2.Параметры.Услуга = СтрокаТаблица.Услуга;
            ОбластьГруппа2.Параметры.Сумма = СтрокаТаблица.Сумма;
            ТД.Вывести(ОбластьГруппа2);
        КонецЦикла;
        ТД.ОтображатьСетку = Ложь ;
        ТД.Показать();