8.х Автоматическая подстановка цены в документ при выборе номенклатуры

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

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


Вот из общего модуля:

Функция РозничнаяЦена(АктуальнаяДата, ЭлементНоменклатуры) Экспорт

// Cозадть вспомогательный объект Отбор.
Отбор = Новый Структура("Номенклатура", ЭлементНоменклатуры);

//Получить актуальные значения ресурсов регистра.
ЗначенияРесурсов = РегистрыСведений.Цены.ПолучитьПоследнее(АктуальнаяДата,Отбор);
Возврат ЗначенияРесурсов.Цена;

КонецФункции

Пожалуйста ребят помогите! Я уже неделю почти убил в поисках решений данной проблемы...

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

вот эту ещё книжку почитайте
http://v8.1c.ru/metod/books/book.jsp?id=231
Разработка управляемого интерфейса (+CD). Серия "1С:Профессиональная разработка" (артикул 4601546069634)

в ней точно работают примеры по подстановке цен и реквизитов и пересчёта сумм и полезное по оптимизации сразу найдёте

Ребят большое спасибо Вам всем тем кто откликнулся! Я решил проблему, проблема была в том , что функция не могла понять где общий модуль на клиенте или сервере. Добавил &НаКлиенте перед процедурой и все заработало. Она автоматом добавляется, но не знаю может я ее стер случайно или не добавилась она у меня! Вот в такой мелочи была вся суть проблемы! Спасибо Всем!

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



Выдает ошибку:
{Документ.ПриходнаяНакладная.Форма.ФормаДокумента.Форма(4)}: Поле объекта не обнаружено (Материалы)
СтрокаТабличнойЧасти = Элементы.Материалы.ТекущиеДанные;

В режиме 1С при попытке изменить количество сообщение:
"Поле объекта не обнаружено"

Спасибо, разобралась...