Произвольным запросом получаю данные:
   
   Запрос=СоздатьОбъект("Запрос");
   ТекстЗапроса="

|ПЕРИОД С ДатаНачала По ДатаОкончания;
|Товар = Регистр.АрендаМашин.Товар;
|Клиент = Регистр.АрендаМашин.Клиент;
|Номер = Регистр.АрендаМашин.Номер;
|Сумма = Регистр.АрендаМашин.Сумма;
|Функция СуммаКонОст = КонОст(Сумма);
|Группировка Товар без групп без упорядочивания;
|Группировка Клиент без групп без упорядочивания;
|Группировка Номер без групп без упорядочивания;
|";


   
   Если Запрос.Выполнить(ТекстЗапроса)=0 тогда
       Сообщить("Запрос по оборудованию клиентов не выполнился!");
       Отказ = 1;
   Иначе    
       Пока Запрос.Группировка("Товар") = 1 Цикл
           ИсходящиеДанные = СоздатьОбъект("СписокЗначений");;
           ИсходящиеДанные.ДобавитьЗначение(Запрос.Товар, "Оборудование");
           ИсходящиеДанные.ДобавитьЗначение(Запрос.Сумма, "Сумма");
           Пока Запрос.Группировка ("Клиент")= 1 Цикл
               ИсходящиеДанные.ДобавитьЗначение(Запрос.Клиент, "Партнер");
               Пока Запрос.Группировка ("Номер")= 1 Цикл
                   ИсходящиеДанные.ДобавитьЗначение(Запрос.Номер, "СерийныйНомер");
               КонецЦикла;    
           КонецЦикла;            
           ВыгрузитьПоПравилу(, , ИсходящиеДанные, , "КофейноеОборудованиеКлиентов");
       КонецЦикла;
   КонецЕсли;



Проблема заключается в том, что строчки сворачиваются на серийном номере...  я плохо знаю семерку, как сделать чтобы получить все строчки ???

уточнение, сворачиваются строчки при группировке по номенклатуре и контрагенту

Если Запрос.Выполнить(ТекстЗапроса)=0 тогда
       Сообщить("Запрос по оборудованию клиентов не выполнился!");
       Отказ = 1;
   Иначе    
       Пока Запрос.Группировка("Товар") = 1 Цикл
           Пока Запрос.Группировка ("Клиент")= 1 Цикл
               Пока Запрос.Группировка ("Номер")= 1 Цикл
                   ИсходящиеДанные = СоздатьОбъект("СписокЗначений");;
                   ИсходящиеДанные.ДобавитьЗначение(Запрос.Товар, "Оборудование");
                   ИсходящиеДанные.ДобавитьЗначение(Запрос.Сумма, "Сумма");
                   ИсходящиеДанные.ДобавитьЗначение(Запрос.Клиент, "Партнер");
                   ИсходящиеДанные.ДобавитьЗначение(Запрос.Номер, "СерийныйНомер");
                   ВыгрузитьПоПравилу(, , ИсходящиеДанные, , "КофейноеОборудованиеКлиентов");
               КонецЦикла;    
           КонецЦикла;            
       КонецЦикла;
   КонецЕсли;

(2) Спасибо, сработало.. хотя я вроде бы делал также.. видимо что то проглядел первый раз...