Имя: Пароль:
1C
1С v8
как вывести сумму по строкам?
0 tg30000
 
29.12.11
08:05
как вывести сумму по строкам в таб. док.?
В сообщении выводит, а в сам таб док в область нет!
что не так делаю?...


Процедура КнопкаСформироватьНажатие(Кнопка)
   Запрос = Новый Запрос;
   ТекстЗапроса =
   "ВЫБРАТЬ
   |    Реализация_вариант_33.Дата,
   |    Реализация_вариант_33.Покупатель,
   |    Реализация_вариант_33.ИтогоСтоимостьСНДС,
   |    Реализация_вариант_33.Номер
   |ИЗ
   |    Документ.Реализация_вариант_33 КАК Реализация_вариант_33
   |ГДЕ
   |    Реализация_вариант_33.Дата МЕЖДУ &ДатаН И &ДатаК";
   Запрос.УстановитьПараметр("ДатаН",ДатаН);
   Запрос.УстановитьПараметр("ДатаК",ДатаК);
   
   Запрос.Текст=ТекстЗапроса;
   Выборка= Запрос.Выполнить().Выбрать();

   
   ТабДок = Новый ТабличныйДокумент;
   Макет=Отчеты.Ведомость16.ПолучитьМакет("Макет");
   
   ОблШапка=Макет.ПолучитьОбласть("Шапка");
   ОблСтрока=Макет.ПолучитьОбласть("Строка");
   ОблИтог=Макет.ПолучитьОбласть("Итог");
   
   ОблШапка.Параметры.Заполнить(Выборка);
   ОблШапка.Параметры.ДатаН=ДатаН;
   ОблШапка.Параметры.ДатаК=ДатаК;
   
   ТабДок.Вывести(ОблШапка);
   
   Итог = 0 ;

   Пока Выборка.Следующий() Цикл
       Итог=Итог+Выборка.ИтогоСтоимостьСНДС;
       
       Обл=ОблСтрока ;
       Обл.Параметры.Заполнить(Выборка);
       ОблИтог=Итог;
       ТабДок.Вывести(Обл);
   КонецЦикла;
       Сообщить(ОблИтог);
   



   
   ТабДок.Вывести(ОблИтог);
   ТабДок.Показать();
   
КонецПроцедуры
1 tg30000
 
29.12.11
08:06
запутался с облостями..
2 MatrosoV AleXXXand_R
 
29.12.11
08:07
ОблИтог.Итог = Итог;
4 sergei123654
 
29.12.11
08:17
Обл.Параметры.ОблИтог=Итог;
5 Ant1773
 
29.12.11
09:42
ОблИтог.Параметры.ОблИтог=Итог;

Исче варианты? :)
6 tg30000
 
29.12.11
09:47
Всем СПАСИБО, все сделал!)
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший