Имя: Пароль:
1C
1C 7.7
v7: Вывод секций в таблице
0 work92
 
05.08.16
12:42
Подскажите как можно сделать чтобы расчеты попали в секцию которая выводилась раньше перед расчетами.
1 Горогуля
 
05.08.16
12:43
взять то, что вывелось раньше и поправить. или тупо сразу выводить всё правильно
2 work92
 
05.08.16
12:43
КонецЦикла;
        
  Таб.вывестиСекцию("Итоги") ;
  Таб.ВывестиСекцию("Подвал");



     МежРСИндексВодаНач=0;
     МежРСИндексКанНач=0;
     МежРСИндексВодаНДС=0;
     МежРСИндексКанНДС=0;
     МежРСИндексВодаБезНДС=0;
     МежРСИндексКанБезНДС=0;
Индекс.Первая();  
  Пока Индекс.ВКонце()=0 Цикл
  
      Если ((СокрЛП(Индекс.CALCCOD_)=СокрЛП(ПериодДанных)) и (СокрЛП(Индекс.PAYCOD_)=СокрЛП(ПлательщикДН))) Тогда
      
       ИнфоСумИнд="-";
       ИнфоИндекНДС="20";
       ИндексВода="Индексация водоснабжение на дату "+СокрЛП(Индекс.PAYDATE_) ;
       ИндексКан= "Индексация Водоотведение на дату "+СокрЛП(Индекс.PAYDATE_)  ;
      
     ИндексВодаОБ=СокрЛП(Индекс.VOLUMEW_);
     ИндексКанОБ=СокрЛП(Индекс.VOLUMEC_);
    
     ИндексВодаНач=СокрЛП(Индекс.INDEXW_);
     ИндексКанНач=СокрЛП(Индекс.INDEXC_);
    
     ИндексВодаНДС=Окр(Число(ИндексВодаНач)*0.2/1.2,2);
     ИндексКанНДС=Окр(Число(ИндексКанНач)*0.2/1.2,2);
        
     ИндексВодаБезНДС=Число(ИндексВодаНач)-Число(ИндексВодаНДС);
     ИндексКанБезНДС=Число(ИндексКанНач)-Число(ИндексКанНДС);
    
     МежРСИндексВодаНач=МежРСИндексВодаНач+Число(ИндексВодаНач);
     МежРСИндексКанНач=МежРСИндексКанНач+Число(ИндексКанНач);
     МежРСИндексВодаНДС=МежРСИндексВодаНДС+ИндексВодаНДС;
     МежРСИндексКанНДС=МежРСИндексКанНДС+ИндексКанНДС;
     МежРСИндексВодаБезНДС=МежРСИндексВодаБезНДС+ИндексВодаБезНДС;
     МежРСИндексКанБезНДС=МежРСИндексКанБезНДС+ИндексКанБезНДС;
    
      
     ИтогИндексНач=МежРСИндексВодаНач+МежРСИндексКанНач;
     ИтогИндексНДС=МежРСИндексВодаНДС+МежРСИндексКанНДС;
     ИтогИндексБезНДС=МежРСИндексВодаБезНДС+МежРСИндексКанБезНДС;
    
    
      Таб.вывестиСекцию("Индекс") ;

       КонецЕсли;
          
      Индекс .Следующая();
  КонецЦикла;
  
   Если Число(ИтогИндексНач)>0 Тогда
       
      Таб.вывестиСекцию("ИтогиПод") ;
3 work92
 
05.08.16
12:45
Пытаюсь в секцию итоги добавить значение из индексации  индексация рассчитывается под итогами.
4 Ёпрст
 
05.08.16
13:03
штатно - только перерисовкой всей таблицы, или заранее оставлять место, потом через Область заполнять.
А так, йоксель умеет вставлять области куда хочешь
5 work92
 
05.08.16
13:08
А как заполнять через область
6 ovrfox
 
05.08.16
13:09
Самый простой вариант реализации:
1. Не выводить Итоги
2. Выводить индексы в отдельный табличныйДокумент
3. Вывести откорректированные итоги
4. Вывести табличный документ 2 (с инлдексами) в табличный документ
7 Ёпрст
 
05.08.16
13:11
(5)

Таб.ВывестиСекцию("ИтогиВаси");
Высота = Таб.ВысотаТаблицы();
.........
Цикл
    Таб.ВывестиСекцию("Строка");
КонецЦикла;

Таб.Область(Высота,НужныйНомерКолонки,Высота,НужныйНомерКолонки).Текст = <тут значение итогов>;
8 work92
 
05.08.16
13:17
Объясните как вывесить область если модно примером
9 Горогуля
 
05.08.16
13:19
Если Область.Модно()=1 Тогда
ТабДокумент.Вывесить(Область);
КонецЕсли
10 HawkEye
 
05.08.16
20:34
(8) нужнаяЯчейка = Таб.Область(адресячейки);
нужнаяЯчейка.ТЕКСТвроди = "ИТООГ!"

как-то так...