Имя: Пароль:
1C
1С v8
Помогите перебрать ТЧ
0 KENT2007
 
26.07.14
08:48
КоличетсвоСтрок = Объект.Товары.Количество();
текТЧ=Объект.Товары;
Если КоличетсвоСтрок <> 0 Тогда
Для Каждого стр из Объект.Товары Цикл
текТЧ.ЦенаВРознице =текТЧ.Цена+(текТЧ.Цена*"0,35");
текТЧ.СуммаВРознице =текТЧ.Сумма+(текТЧ.Сумма*"0,35");

КонецЦикла;
КонецЕсли;
Объект.Записать();
1 KENT2007
 
26.07.14
08:49
выдает ошибку Поле объекта не обнаружено (ЦенаВРознице)
2 KENT2007
 
26.07.14
08:49
если текТЧ=Объект.Товары; меняю на текТЧ=Объект.Товары[0]; то обрабатывает только первую строку
3 Drac0
 
26.07.14
08:56
текТЧ.ЦенаВРознице --> стр.ЦенаВРознице. и аналогично с остальными внутри цикла.
4 ivanov-i-i
 
26.07.14
08:57
Для каждого Строка из Объект.ТабличнаяЧасть Цикл
    Строка.Сумма = Строка.Цена * Строка.Количество;
КонецЦикла;
5 KENT2007
 
26.07.14
09:00
спасибо получилось
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс