Вылетает ошибка "Значение поле Дата не может быть пустой датой"

1. user1979322 25.03.24 07:21 Сейчас в теме
Всем привет, сложность в том что у меня нет Реквизита Дата . И данная ошибка вылезает когда записываю документ
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
	// Вставить содержимое обработчика.
	Объект.РасчетПоДату=ТекущаяДата();
	ТекущаяДата=ТекущаяДата();
	Г=Год(ТекущаяДата);
	Месяц="01";
	День="10";      	
	ЯнварскаяДата="10.01.2024";
	Объект.РасчетСДаты=Дата(Г,Месяц,День);
	
КонецПроцедуры

&НаКлиенте
Процедура Расчитать(Команда)
	Дата1=Объект.РасчетСДаты;
	Дата2=Объект.РасчетПоДату;
	РасчитатьНаСервере(Дата1,Дата2);
КонецПроцедуры

&НаСервере
Процедура РасчитатьНаСервере(Дата1,Дата2)
	// Вставить содержимое обработчика.
	Запрос=Новый Запрос;
	Запрос.Текст="ВЫБРАТЬ
	             |	Сделки.Наименование КАК Наименование,
	             |	Сделки.Контрагент КАК Контрагент,
	             |	Сделки.Дата1 КАК Дата1,
	             |	Сделки.Дата2 КАК Дата2,
	             |	Сделки.Дата3 КАК Дата3,
	             |	Сделки.ИНН КАК ИНН,
	             |	Сделки.Сумма1 КАК Сумма1,
	             |	Сделки.Сумма2 КАК Сумма2,
	             |	Сделки.СуммаНДС КАК СуммаНДС,
	             |	Сделки.ОКВЭД КАК ОКВЭД
	             |ИЗ
	             |	Справочник.Сделки КАК Сделки
	             |ГДЕ
	             |	Сделки.Дата2 < &Дата2
	             |	И Сделки.Дата2 > &Дата1";
	Запрос.УстановитьПараметр("Дата2",Дата2);
	Запрос.УстановитьПараметр("Дата1",Дата1);
	
	Выборка=Запрос.Выполнить().Выбрать();
	
	Док=Документы.ОтчетПоПредприятиям.СоздатьДокумент();
	Пока Выборка.Следующий() Цикл
		Контрагент=Выборка.Наименование;
		Контрагент=СокрЛП(Контрагент);
		Если ПустаяСтрока(Контрагент) Тогда
			 Продолжить;
		КонецЕсли;	
	
		ИНН=Выборка.ИНН;
		Сумма1=Выборка.Сумма1;
		Сумма2=Выборка.Сумма2;
		СуммаНДС=Выборка.СуммаНДС;
		ОКВЭД=Выборка.ОКВЭД;
		НоваяСтрока=Док.ТабличнаяЧасть.Добавить();
		НоваяСтрока.Контрагент=Контрагент;
		НоваяСтрока.ИНН=ИНН;
		НоваяСтрока.Счет_901=Сумма1;
		НоваяСтрока.Счет_902=Сумма2;
		НоваяСтрока.Счет_903=СуммаНДС;
		НоваяСтрока.Счет_901_903=Число(Сумма1)-Число(СуммаНДС);   	
	КонецЦикла;	
	Док.Записать();   // ЗДЕСЬ ОШИБКА ВЫЛИТАЕТ
КонецПроцедуры
Показать
Прикрепленные файлы:
По теме из базы знаний
Найденные решения
3. PowerBoy 3364 25.03.24 07:33 Сейчас в теме
У документа всегда есть Дата.
Док.Дата = ТекущаяДата()
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. glek 119 25.03.24 07:32 Сейчас в теме
(1) Реквизит Дата у документов есть всегда. Так же как и номер.
3. PowerBoy 3364 25.03.24 07:33 Сейчас в теме
У документа всегда есть Дата.
Док.Дата = ТекущаяДата()
4. anton13m 2 25.03.24 10:42 Сейчас в теме
Для чего вы в форме документа создаете новый документ?
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот