КУГС = ЭлементыФормы.Результат.КоличествоУровнейГруппировокСтрок();
Для а = 0 По КУГС Цикл//сворачиваем все группировки
ЭлементыФормы.Результат.ПоказатьУровеньГруппировокСтрок(КУГС - а);
КонецЦикла;
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший