Табличный запрос к региструсведений

Здравствуйте, что за ошибка в запросе? Не выдаёт никакую цену из него.

Все данные передаются ( Контрагент, номенклатура ).

Нужно чтобы при выборе номенклатуры из списка, цена автоматически подставлялась в поле цена.

&НаСервере
Функция ТоварыНоменклатураПриИзмененииНаСервере(Номенклатура)//
    Запрос = Новый Запрос;
    Запрос.УстановитьПараметр("Номенклатура", Номенклатура);
    Запрос.УстановитьПараметр("Контрагент", Объект.Контрагент.Ссылка);
    Сообщить("Номенклатура на сервере:" +Номенклатура);
    Сообщить("Контрагент на сервере:" +Объект.Контрагент.Ссылка);
    Запрос.Текст =
        "ВЫБРАТЬ
        |   ЦеныПоставщиковСрезПоследних.Цена КАК Цена,
        |   ЦеныПоставщиковСрезПоследних.Номенклатура.ЦенаПокупки КАК НоменклатураЦенаПокупки,
        |   ЦеныПоставщиковСрезПоследних.Номенклатура.ЦенаПродажи КАК НоменклатураЦенаПродажи
        |ИЗ
        |   РегистрСведений.ЦеныПоставщиков.СрезПоследних КАК ЦеныПоставщиковСрезПоследних
        |ГДЕ
        |   ЦеныПоставщиковСрезПоследних.Контрагент = &Контрагент
        |   И ЦеныПоставщиковСрезПоследних.Номенклатура = &Номенклатура";
    РезультатЗапроса = Запрос.Выполнить();

    ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

    Сообщить(""+ВыборкаДетальныеЗаписи.Цена);
    Сообщить(""+ВыборкаДетальныеЗаписи.НоменклатураЦенаПокупки);
    Сообщить(""+ВыборкаДетальныеЗаписи.НоменклатураЦенаПродажи);

    Если ВыборкаДетальныеЗаписи.Следующий() Тогда
        Возврат(ВыборкаДетальныеЗаписи.Цена);
    КонецЕсли;
КонецФункции

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

Пробовал так, тоже не показывает:

  Запрос.Текст =
        "ВЫБРАТЬ
        |   ЦеныПоставщиковСрезПоследних.Цена КАК Цена,
        |   ЦеныПоставщиковСрезПоследних.Номенклатура.ЦенаПокупки КАК НоменклатураЦенаПокупки,
        |   ЦеныПоставщиковСрезПоследних.Номенклатура.ЦенаПродажи КАК НоменклатураЦенаПродажи
        |ИЗ
        |   РегистрСведений.ЦеныПоставщиков.СрезПоследних(&Дата, Номенклатура = &Номенклатура) КАК ЦеныПоставщиковСрезПоследних";