Имя: Пароль:
1C
1С v8
Таблица
0 mirror1982
 
23.04.12
14:16
Процедура Сформировать()
   
спр=СоздатьОбъект("Справочник.Номенклатура");
спрК=СоздатьОбъект("Справочник.Контрагенты");
Таб=СоздатьОбъект("Таблица");  
Таб.ИсходнаяТаблица("Таблица");
спрК.ВыбратьЭлементы();
Пока спрК.ПолучитьЭлемент()=1 Цикл
    Если спрК.ЭтоГруппа()=0 Тогда
         Контрагент=спрК.ТекущийЭлемент();
    КонецЕсли;
    спр.ВыбратьЭлементы();
    Таб.ПрисоединитьСекцию("Строка|Контрагент");
    Пока спр.ПолучитьЭлемент()=1 Цикл
     Если  (спр.ЭтоГруппа()=1)И(спр.Уровень()=1) Тогда
               Товары=спр.ТекущийЭлемент();
           Таб.ПрисоединитьСекцию("Строка|Столбец");
       Таб.ВывестиСекцию("Строка");
     КонецЕсли;
    КонецЦикла;
КонецЦикла;
Таб.Показать("Таблица");                
   
КонецПроцедуры

Написано криво, но не суть. Как сделать так, чтобы после прохождения цикла по номенклатуре, после каждого контрагента. В таблице секция перескакивала на следующую строчку?
1 mirror1982
 
23.04.12
14:16
v7, пардон!
2 butterbean
 
23.04.12
14:17
ВывестиСекцию()
3 butterbean
 
23.04.12
14:19
Таб.ВывестиСекцию("Строка|Контрагент");
потом в цикле Таб.ПрисоединитьСекцию("Строка|Столбец");