Не работает проверка регистра

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


//151321 Создание записи регистра
Процедура РегистрУведомленияORDRSP()

Если  НетЗаписейУведомленияORDRSP(Ссылка) тогда

запись = РегистрыСведений.УведомленияORDRSP.СоздатьМенеджерЗаписи();
запись.ЗаказПокупателя = Ссылка;
запись.ЗаказEDI = ПолучитьЗаказEDI(); 
запись.УникальныйИдентификатор = Новый УникальныйИдентификатор();
запись.ОтправленВРучную = Ложь;
запись.ВариантЗаполнения = Перечисления.ВариантыЗаполненияORDRSP.ПовкладкеМТСС;
запись.Состояние = Перечисления.СостоянияORDRSP.Ожидает;
запись.ДатаПостановки = ТекущаяДата();
запись.Записать();
КонецЕсли;
КонецПроцедуры                                                                                                                  


Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
//ВремТаблица = ТоварыSFA.Выгрузить();	
//Проверка--151321	
Если (ТорговаяТочка.АвтоматическаяОтправкаORDRSP и Контрагент.АвтоматическаяОтправкаORDRSP)= Истина  
и торговаяточка.ВариантОтправкиORDRSP = Перечисления.ВариантыОтправкиORDRSP.ПриКаждомИзменении          
и торговаяточка.ВариантЗаполненияORDRSP = Перечисления.ВариантыЗаполненияORDRSP.ПовкладкеМТСС
и НЕ (ТоварыSFA = ссылка.ТоварыSFA)Тогда  
РегистрУведомленияORDRSP();
КонецЕсли;