Автопроведение документа

1. Jebick 13.06.24 11:30 Сейчас в теме
Добрый день. Есть документ "Выбытие имущества", который списывает имущество у которого закончилось время эксплуатации. Как сделать чтобы этот документ автоматически проводился каждый день?
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. lefthander 13.06.24 15:12 Сейчас в теме
(1)Использовать фоновое задание. Оно будет проверять имущество к списанию, создавать документ и проводить его
3. Jebick 13.06.24 17:29 Сейчас в теме
Добрый день. Еще не работал с фоновыми заданиями. Не могли бы вы помочь с этим.

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

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