Не верно работает запрос

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

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

Пока ВыборкаЗанятости.Следующий() Цикл
    Если НЕ ЗначениеЗаполнено(СтрокаПредметы.Аудитория) Тогда
        Сообщение = Новый СообщениеПользователю;
        Сообщение.Текст = "Вы не указали аудиторию.";
        Сообщение.Сообщить();
        Отказ = Истина;
        Возврат;
    КонецЕсли;
    
    Если ВыборкаЗанятости.Аудитория = СтрокаПредметы.Аудитория Тогда
        Сообщение = Новый СообщениеПользователю;
        Сообщение.Текст = "Аудитория " + СтрокаПредметы.Аудитория.Наименование + " уже занята в этот день и время.";
        Сообщение.Сообщить();
        Отказ = Истина;
        Возврат;
    КонецЕсли;

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

        КонецЦикла;
    КонецЕсли;
КонецПроцедуры