Сравнение объекта в документе с регистром сведений

[cdsven]

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

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

Будьте добры укажите на мою ошибку. заранее огромное спасибо.