Задаем выборку всех подчиненных элементов
Заг = "По товарам группы " + ВыбТовар.Наименование;
// Задаем выборку всех подчиненных элементов Справочника
Тов.ВключатьПодчиненные(Режим);
Иначе
// если в диалоге выбран товар, то
// формируем отчет только по этому товару
Тов.НайтиЭлемент(ВыбТовар);
Заг = "По товару " + ВыбТовар.Наименование;
Таб.ВывестиСекцию("Отчет");
Таб.ВывестиСекцию("Товар");
Перейти ~MET;
КонецЕсли;
ЧислоСтрок = О;
Таб.ВывестиСекцию("Отчет");
// Открываем выборку
Тов.ВыбратьЭлементы();
Пока Тов.ПолучитьЭлемент() > 0 Цикл
ЧислоСтрок = ЧислоСтрок + 1;
Если Тов.ЭтоГруппа() = 1 Тогда
Таб.ВывестиСекцию("Группа");
Иначе
Таб.ВывестиСекцию("Товар");
КонецЕсли;
Состояние("В отчет выведено " + ЧислоСтрок + " строк.");
КонецЦикла;
//Вызов выходного отчета в окно просмотра и редактирования.
~MET:
Таб.ТолькоПросмотр(1);
Таб.Опции(0, 0, 4, 0);
Таб.Показать("Список товаров по каталогу", "");
КонецПроцедуры
См. также: ВыбратьЭлементы, ПолучитьЭлемент, СоздатьОбъект