8.х 1C 8.x Ошибка в запросе при попытке получения значения из Табличной части документа

Здравствуйте. Я новичок в 1с. Если возможно помогите разобраться.Используется Упр. Торговлей 10.3 без изменений в конфе. Редактируется документ РеализацияТоваровУслуг. Необходимо получить предыдущую цену продажи по данному Контрагенту, Дате и номенклатуре.
В первом запросе все получилось и предыдущая дата(с таким контрагентом) определяется верно, но второй запрос с выводом предыдущей цены не дает никакого результата. Данные в дальнейшем планируется вывести в поле ввода в табличной части документа.(Поле не является реквизитом табличной части).
Помогите кто может,подскажите где ошибся. Вся загвоздка в том что поле Цена это поле табличной части формы документа,как и номенклатура. А дата и контрагент поля формы документа. Спасибо.
Код:

Код:

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

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

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

    Запрос.УстановитьПараметр("Дата", ПредыдущаяДата);
    Результат=Запрос.Выполнить().Выбрать();
    Пока Результат.Следующий() Цикл
        ПрЦена=Результат.Цена;
        КонецЦикла;
Сообщить("Предыдущая цена на товар равна "+ПрЦена);

Для каждой строки, которая есть в документе. Получается для текущей строки,которая редактируется. Поэтому и взял событие привыводестроки

--- Объединение сообщений, 8 авг 2014 ---

Спасибо за ответ. Да вот я не разобрался из каких регистров брать данные.Поэтому пошел по этому пути. В модуле формы уже изначально большой объем кода.

Исправил. Но считается предыдущая цена только последней строки. Не догнал про получение данных в событии ПриОткрытии,поскольку при получении их там массив должен быть глобальной переменной, а в моем случае(УТ 10.3 толстый клиент) программа не понимает что это за экспорт. Данные в поле Прцена(которое не явл. реквизитом) не записываются.

Код:

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

Спасибо огромное. Все получилось. Только вот оформил не в процедуру а в функцию,потому что не нашел как прописать в процедуре возврат переменной. Хотя наверное можно было в глобальную записать,а потом обратиться?

Спасибо.