КоличетсвоСтрок = Объект.Товары.Количество();
текТЧ=Объект.Товары;
Если КоличетсвоСтрок <> 0 Тогда
Для Каждого стр из Объект.Товары Цикл
текТЧ.ЦенаВРознице =текТЧ.Цена+(текТЧ.Цена*"0,35");
текТЧ.СуммаВРознице =текТЧ.Сумма+(текТЧ.Сумма*"0,35");
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс