Помогите с заданием

[pt_denis]

Здравствуйте. Я начал учить програмирование 1с и у меня возник в вопрос по модулю формы. Нужно что бы при изменении ЭлементаВидЦены и зменялась цена соответственно регистру сведений. Я так понял нужно прописать цикл, но у меня что то не выходит. Поможете? Первые две процедуры это изменение цены в табл. части при изменении номенклатуры и расчет суммы...

&НаКлиенте
Процедура ПереченьТМЦТМЦПриИзменении(Элемент)
	СтрокаТабличнойЧасти = Элементы.ПереченьТМЦ.ТекущиеДанные;
	СтрокаТабличнойЧасти.Цена = РаботаСоСправочниками.РозничнаяЦена(Объект.Дата,СтрокаТабличнойЧасти.ТМЦ);
	РаботаСДокументами.РасчитатьСумму(СтрокаТабличнойЧасти);
КонецПроцедуры

&НаКлиенте
Процедура ПереченьТМЦКоличествоПриИзменении(Элемент)
	СтрокаТабличнойЧасти = Элементы.ПереченьТМЦ.ТекущиеДанные;
	РаботаСДокументами.РасчитатьСумму(СтрокаТабличнойЧасти);
КонецПроцедуры

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

[arccos6pi]

РаботаСДокументами.Расчит� �тьСумму(СтрокаТабличнойЧа сти)
нужен код процедуры

[pt_denis]

Процедура РасчитатьСумму(СтрокаТабличнойЧасти) Экспорт
	СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Количество * СтрокаТабличнойЧасти.Цена;
КонецПроцедуры

Вот

[arccos6pi]

а РаботаСоСправочниками.Роз� �ичнаяЦена(Объект.Дата,Стро каТабличнойЧасти.ТМЦ);

[pt_denis]

Функция РозничнаяЦена(АктуальнаяДата,ЭлементТМЦ) Экспорт
		Отбор = Новый Структура("ТМЦ",ЭлементТМЦ);
	ЗначенияРесурсов = РегистрыСведений.ЦеныНоменклатуры.ПолучитьПоследнее(АктуальнаяДата,Отбор);
	Возврат ЗначенияРесурсов.Цена;
КонецФункции

[arccos6pi]

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

попробуйте так

[pt_denis]

Ну ошибку перестало выдавать, но Цена при изменении ВидЦены не изменяется.... Только при изменении ТМЦ.

[arccos6pi]

Ну ошибку перестало выдавать, но Цена при изменении ВидЦены не изменяется.... Только при изменении ТМЦ.

смотрите отладкой почему цена пустая
экстрасенсов нет