Если не выбрать цвет и выбрать или коробку передач или класса автомобиля выдает ошибку - как исправить?

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

Запрос.Текст = "ВЫБРАТЬ * ИЗ  Справочник.Машины ГДЕ 999=999 И 888=888 И 777=777";
Если ЭлементыФормы.ПолеВвода2.Значение<>Справочники.ЦветМашины.ПустаяСсылка() Тогда
Запрос.Текст=СтрЗаменить(Запрос.Текст,"999=999","Цвет = &ВыбЦвет");
КонецЕсли;
//... и т.д.