Как при изменении объекта изменить значение всех элементов табличной части.

[Серега16]

День Добрый как сделать чтоб при изменении Объекта в форме изменялась цена в ТабличнойЧасти формы?
Есть вот такой код

Код Выделить Развернуть


Процедура КоличествоДнейПриИзменении(Элемент)
  ТабСтрока=элементы.ВыбрТовара.ТекущиеДанные;
  ТабСтрока.Цена = ПолучениеЦеныПроката(ТабСтрока.ПрокатныйНомер);
  ЦенаИтог= ТабСтрока.Цена*объект.КоличествоДней;
 
КонецПроцедуры


Но он действует только на тот элемент табличной части который выделен, а остальные остаются не именными.
Пробывал добавить

Код Выделить Развернуть


Для каждого стр Из Объект.ВыбрТовара Цикл
   
   ТабСтрока.ЦенаИтог= ТабСтрока.Цена*объект.КоличествоДней;

  КонецЦикла;

Не помогло.

[wise]

(0)мысль ПРАВИЛЬНАЯ!

Для каждого стр Из Объект.ВыбрТовара Цикл
   
   ТабСтрока.ЦенаИтог= ТабСтрока.Цена*объект.КоличествоДней;
    
  КонецЦикла;

Процедура КоличествоДнейПриИзменении(Элемент)
    Для каждого ТекСтр Из Объект.ВыбрТовара Цикл   
        Цена = ПолучениеЦеныПроката(ТекСтр.ПрокатныйНомер)
       ТекСтр.ЦенаИтог = Цена * КоличествоДней;
   КонецЦикла;
КонецПроцедуры

[Серега16]

(0)мысль ПРАВИЛЬНАЯ!

Для каждого стр Из Объект.ВыбрТовара Цикл
   
   ТабСтрока.ЦенаИтог= ТабСтрока.Цена*объект.КоличествоДней;
     
  КонецЦикла;

Процедура КоличествоДнейПриИзменении(Элемент)
    Для каждого ТекСтр Из Объект.ВыбрТовара Цикл   
        Цена = ПолучениеЦеныПроката(ТекСтр.ПрокатныйНомер)
       ТекСтр.ЦенаИтог = Цена * КоличествоДней;
   КонецЦикла;
КонецПроцедуры

Спасибо помогло. Правда у меня он выглядит так

Код Выделить Развернуть

Для каждого ТекСтр Из Объект.ВыбрТовара Цикл   
        ТекСтр.Цена = ПолучениеЦеныПроката(ТекСтр.ПрокатныйНомер);
        ТекСтр.ЦенаИтог = ТекСтр.Цена *Объект.КоличествоДней ;
   КонецЦикла;