Для каждого стр из ЭтотОбъект.СоставУслуги цикл
Если стр.КлючСтроки=КлючСтр тогда
стр.Цена = СтрокаТабличнойЧасти.ЦенаНовая;
ОбработкаТабличныхЧастей.РассчитатьСуммуТабЧасти(стр, ЭтотОбъект);
ОбработкаТабличныхЧастей.РассчитатьСуммуНДСТабЧасти(стр, ЭтотОбъект);
Конецесли;
Конеццикла;
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший