02.04.2007, 13:35
общий
это ответ
Здравствуйте, Шмачков!
Есть отчет. Нужно подсчитать итого. Вот код:
Процедура Сформировать()
Перем Спр, Спс; // переменные
Перем Итого; // переменная в которой будет накапливатся сумма
НомПП = 1;
Таб = СоздатьОбъект("Таблица");
Спр = СоздатьОбъект ("Справочник.Родители");
Спс = СоздатьОбъект ("СписокЗначений"); // список значений
Таб.ИсходнаяТаблица("Реестр");
ДатаСч = ВыбПериода;
Спр.ИспользоватьРодителя(ВыбраннаяГруппа);
Спр.ВыбратьЭлементы ();
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Пока Спр.ПолучитьЭлемент()>0 Цикл
Если Спр.ЭтоГруппа() =1 Тогда // группы пропускаем
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_1");
НомПП = НомПП + 1;
Спс.ДобавитьЗначение(Спр.НомерСчета); // добавляем НомерСчета
Спс.ДобавитьЗначение(Спр.ФИО); // добавляем ФИО
Спс.ДобавитьЗначение(Спр.Сумма); // добавляем Сумма
Итого=Итого+Спр.Сумма; //!!!!---В цикле накапливается Сумма
Спс.ДобавитьЗначение(НомПП);
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Реестр","");
КонецПроцедуры
вот теперь в макете в подвале объявляете шаблон (или выражение ) Итого и все ))