7.7 Отчет

Доброго времени суток. Дали написать отчет, бьюсь с выводом одной секции уже 2 дня... Конфигурация ТиС 9.2.
Нужно вывести табличку как во вложении,точнее,вывести данные в секции итог, но не понимаю, как это правильно сделать( в общем,из одной ТЗ я вытаскиваю все значения кроме сумм, из второй ТЗ нужно вытащить значения сумм и присоединить секцию строка|прав только после того, как все секции строка|сред присоединятся... помогите,пожалуйста((

Подумал,немного изменил код, табличка начала появляться, но первое значение из ТЗ1 выводится в шапке...

Код:

    
Для К = 1 по ТЗВспом.КоличествоСтрок() цикл
        Код             = "( "+ТЗВспом.ПолучитьЗначение(К, "Код")+" )";
        Номенклатура = ТЗВспом.ПолучитьЗначение(К, "Номенклатура");
        Остаток         = ТЗВспом.ПолучитьЗначение(К, "Остаток");
        Сумма         = ТЗВспом.ПолучитьЗначение(К, "Сумма");
        Филиал         = ТЗВспом.ПолучитьЗначение(К, "Филиал");
        //
        //Для с = 1 по ТЗ1.КоличествоСтрок() цикл
        //    Товар = ТЗ1.получитьЗначение(с, "Номенклатура");
        //    СумОст= ТЗ1.ПолучитьЗначение(с, "Остаток");
        //    СумСум= ТЗ1.ПолучитьЗначение(с, "Сумма");
        //КонецЦикла;
        Если Номен <> Номенклатура тогда               
            Если Сумма<>0 тогда
                Запас = Окр(Остаток/Сумма,4);
            Иначе
                Запас = 0;
            КонецЕсли;
            Номен = Номенклатура;
            Для с = 1 по ТЗ1.КоличествоСтрок() цикл
                Товар = ТЗ1.получитьЗначение(с, "Номенклатура");
                СумОст= ТЗ1.ПолучитьЗначение(с, "Остаток");
                СумСум= ТЗ1.ПолучитьЗначение(с, "Сумма");
               
                Если СумСум<>0 тогда
                    СумЗапас = окр(СумОст/СумСум,2);
                Иначе
                    СумЗапас = 0;
                КонецЕсли;
               
                если товар=номенклатура тогда
                    Таб.ПрисоединитьСекцию("Строка|Прав");
                КонецЕсли;
               
            КонецЦикла;
            Таб.ВывестиСекцию("Строка|Лев");
            Если сокр = 0 тогда
                Таб.ПрисоединитьСекцию("Строка|Сред");
            КонецЕсли;
       иначе
            Если Сумма<>0 тогда
                Запас = Окр(Остаток/Сумма,4);
            Иначе
                Запас = 0;
            КонецЕсли;
            Если Сокр = 0 тогда
                Таб.ПрисоединитьСекцию("Строка|Сред");
            КонецЕсли;
        КонецЕсли;
КонецЦикла;

да,это помогло,спасибо большое.. а еще вопрос,наверху у меня выводятся названия филиалов, как сделать так, чтобы они объединилсь?
типа такого
филиал1 филиал2 филиал3
с....по с....по с....по с....по с....по с....по

Код:

Процедура Сформировать()
   ТЗПериод.ВыбратьСтроки();
   КолПериодов = ТЗПериод.КоличествоСтрок();
   Если Сокр = 0 тогда
    Таб = СоздатьОбъект("Таблица");
     Таб.ИсходнаяТаблица("Таблица");
     Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
     Таб.ВывестиСекцию("Шапка1");
     Таб.ВывестиСекцию("Шапка|Лев");
   
     Если (ВыбРубли=1) и (ВыбШТ=0) ТОгда   
           зн = "руб.";
       ИначеЕсли (ВыбРубли=0) и (ВыбШТ=1) тогда 
           зн = "шт.";
       КонецЕсли;
       // 
     стр="";
     ТекСтрокаВТаблице = ТаблицаМФ.ТекущаяСтрока(2);
     Для н=1 по СписокЭлементовМФ.РазмерСписка() цикл
       ТТ = СписокЭлементовМФ.ПолучитьЗначение(н,стр);
         Для к=1 По КолПериодов Цикл
         НачДата = ТЗПериод.ПолучитьЗначение(к,"Период_С");
           КонДата  =  ТЗПериод.ПолучитьЗначение(к,"Период_По");
           Периодтек = "С "+НачДата+" по "+КонДата;
           Таб.ПрисоединитьСекцию("Шапка|Сред");
       КонецЦикла;
     КонецЦикла;
   
     Для к=1 По КолПериодов Цикл
       НачДата = ТЗПериод.ПолучитьЗначение(к,"Период_С");
         КонДата  =  ТЗПериод.ПолучитьЗначение(к,"Период_По");
         Периодтек = "С "+НачДата+" по "+КонДата;
         Таб.ПрисоединитьСекцию("Шапка|Прав");
     КонецЦикла;
   иначе
    Таб = СоздатьОбъект("Таблица");
     Таб.ИсходнаяТаблица("Таблица");
     Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
     Таб.ВывестиСекцию("Шапка1");
     Таб.ВывестиСекцию("Шапка|Лев");
   
     Если (ВыбРубли=1) и (ВыбШТ=0) ТОгда   
           зн = "руб.";
       ИначеЕсли (ВыбРубли=0) и (ВыбШТ=1) тогда 
           зн = "шт.";
       КонецЕсли;
   
     Для к=1 По КолПериодов Цикл
       НачДата = ТЗПериод.ПолучитьЗначение(к,"Период_С");
         КонДата  =  ТЗПериод.ПолучитьЗначение(к,"Период_По");
         Периодтек = "С "+НачДата+" по "+КонДата;
         Таб.ПрисоединитьСекцию("Шапка|Прав");
     КонецЦикла;
   КонецЕсли;

и еще вопрос, в коде есть вывод шапки (где я пытался объединить ячейки), если во вкладке МФ не поставлю курсор на строку "По складам", в шапке будет выводиться номенклатура, в коде явно указываю
ТаблицаМФ.ПолучитьСтрокуПоНомеру(2)
но ему как-то по-барабану...

Код:

ТаблицаМФ.ПолучитьСтрокуПоНомеру(2);
  Для н=1 по СписокЭлементовМФ.РазмерСписка() цикл
ТТ = СписокЭлементовМФ.ПолучитьЗначение(н,стр);
Начало = Таб.ШиринаТаблицы()+1;
//Таб.ПрисоединитьСекцию("Шапка2|Сред");

  Для к=1 По КолПериодов Цикл
НачДата = ТЗПериод.ПолучитьЗначение(к,"Период_С");
  КонДата = ТЗПериод.ПолучитьЗначение(к,"Период_По");
  Периодтек = "С "+НачДата+" по "+КонДата;
  Таб.ПрисоединитьСекцию("Шапка|Сред");
КонецЦикла;

строка 2-таблица МФ по складам..

список элементов МФ обновляется через глПриСменеСтрокиТаблицыМФ

блин..я думал что при смене вкладок будет вызываться...спасибо большое