Помогите с запросом 🙏

Помогите с запросом 🙏
🠗 (Волшебник 26.12.2024 23:17)

naïve

26.12.24

✎

21:40

Всем добра!
Есть справочники: Транспортные средства и Водители, из документов - Накладная, в которой в качестве реквизитов используются водитель, машина и дата доставки. По заданию нужно сделать так, чтобы водитель мог быть закреплен только за одним транспортным средством в течение одного дня.
Я создал регистр сведений ПроверкаТС с измерениями - Водитель и ТС, ресурс - Дата.
В обработке проведения документа Накладная использую следующий код:

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

но, как понимаю, код с проверкой не работает, поскольку возникает ошибка: Запись с такими ключевыми полями существует! : ПроверкаТС: 26.12.2024, Петров Иван Сергеевич, МАЗ (Регистр сведений: Проверка ТС; Номер строки: 2)
[ОшибкаХранимыхДанных]

Как можно это исправить? Помогите, пожалуйста

1 Волшебник

26.12.24

✎