Как создать поле итоги для имеющейся колонки таблицы?

[chudyr]

Процедура Печать(СразуНаПринтер = 0,КолЭкз = 1)

//*****************************************
// вот сюда вставляем и определяем числовую переменную
Перем СуммаОБ;
СуммаОБ=0;
//*****************************************
//проверим полномочия печати непроведенных документов
Если Проведен() = 0 Тогда
Если глПривилегииПользователя(" РазрешитьПечатьНепроведен ныхДокументов") = 0 Тогда
Предупреждение("Недостаточ но полномочий для печати непроведенного документа!", 60);
Возврат;
КонецЕсли;
КонецЕсли;

Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Табли� �а");
Таб.ВывестиСекцию("Шапка|Об щая");
Если ПустоеЗначение(Скидка) = 0 Тогда
Таб.ПрисоединитьСекцию("Ша� �ка|Скидка");
КонецЕсли;

ИтогоБезСкидки = 0;

ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
Таб.ВывестиСекцию("Строка|О бщая");
Если ПустоеЗначение(Скидка) = 0 Тогда
Таб.ПрисоединитьСекцию("Ст� �ока|Скидка");
КонецЕсли;
//*****************************************
// вот сюда вставляете
СуммаОБ=СуммаОБ+<идентифик� �тор реквизита, который описывает объем>
//************************************************** *****
ИтогоБезСкидки = ИтогоБезСкидки+Количество* Цена;
КонецЦикла;

Таб.ВывестиСекцию("Итоги|Об щая");
// ********************************
// В Секции "Итоги" у Вас должна быть ячейка , реквизит которой определен как выражение "СуммаОБ"
//************************************************** *****
Если ПустоеЗначение(Скидка) = 0 Тогда
Таб.ПрисоединитьСекцию("Ит� �ги|Скидка");
КонецЕсли;