Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Присоединение секций
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
pablo
Нужда заставила сесть за 7,7 и теперь уже не помню, как правильно сделать, а подсмотреть негде. Создаю отчет с произвольным количеством горизонтальных секций.

И следующий код
        Таб.ВывестиСекцию("Заголовок");  
        Секция=Таб.ПолучитьСекцию("Заголовок|ДеньСекция");  
        Секция2=Таб.ПолучитьСекцию("Сотрудники|ДеньСекция");
         для индекс=НП по КП цикл  
             День=Строка(Датачисло(Индекс));
             ДеньНедели=НомерДняНедели(Индекс);             
             Таб.ПрисоединитьСекцию(Секция);      
         КОнеццикла;    
         Таб.ПрисоединитьСекцию("Заголовок|ИтогВконце");
    для инд=1 по ТаблицаДанных.КоличествоСтрок() цикл
             Таб.ВывестиСекцию("Сотрудники");
             Сотрудник=ТаблицаДанных.ПолучитьЗначение(Инд,"Сотрудник");
             для индекс2=НП по КП цикл                                    
                 Значение=ТаблицаДанных.ПолучитьЗначение(Инд,"День"+Строка(ДатаЧисло(индекс2)));
                 Таб.ПрисоединитьСекцию(Секция2);      
            КОнеццикла;    
                 ИтогоПоСот=1;
            Таб.ПрисоединитьСекцию("Сотрудники|ИтогВконце");    
         Конеццикла;

Что-то я делаю не так, но что - понять не могу. То ли переменные в макете не так обозвал, то ли еще что-то...
Домовик
Судя по всему вертикальная еще должна быть секция. По колонке "2". К примеру "ПерваяКолонка".


Тогда, в каждом случ. когда используете ВывестиСекцию() ее используете:
напр:
 Таб.ВывестиСекцию("Заголовок|ПерваяКолонка");



я тоже не очень помню, но вроде так
nysysimara
согласна с Домовик, нужна первая вертикальная колонка
Таб.ВывестиСекцию("Заголовок|ПерваяКолонка");
Для индекс=НП по КП цикл  
      День=Строка(Датачисло(Индекс));
      ДеньНедели=НомерДняНедели(Индекс);            
      Таб.ПрисоединитьСекцию("Заголовок|ДеньСекция");      
КонецЦикла;
Таб.ПрисоединитьСекцию("Заголовок|ИтогВконце");
Для инд=1 по ТаблицаДанных.КоличествоСтрок() Цикл
    Сотрудник=ТаблицаДанных.ПолучитьЗначение(Инд,"Сотрудник"); //до вывести секцию
        Таб.ВывестиСекцию("Сотрудники|ПерваяКолонка");
    Для индекс2=НП по КП Цикл                                    
        Значение=ТаблицаДанных.ПолучитьЗначение(Инд,"День"+Строка(ДатаЧисло(индекс2)));
        Таб.ПрисоединитьСекцию("Сотрудники||ДеньСекция");      
    КонецЦикла;    
    ИтогоПоСот=1;
    Таб.ПрисоединитьСекцию("Сотрудники|ИтогВконце");    
КонецЦикла;

Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.