Как добавить 3 рабочих дня к любой дате?

Форум Учет и отчетность Зарплата и кадровый учет (Зарплата)
1. inf012 30.01.24 12:18 Сейчас в теме
Здравствуйте.
ЗУП. Есть любая дата, надо к ней добавить 3 дня и вывести конечную дату в отчет.
Но 3 дня только рабочих, с учетом выходных (их пропускаем)

Есть в ЗУП в общих модулях какая-то функция?
+ – Ответить
По теме из базы знаний
Найденные решения
11. laperuz 47 30.01.24 15:03 Сейчас в теме 
КалендарныеГрафики.ДатаПоКалендарю(КалендарныеГрафики.ОсновнойПроизводственныйКалендарь(), <ДатаОтсчета>, 3)
skeptik2105; inf012; +2 – Ответить
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. RustamZz 30.01.24 13:33 Сейчас в теме
(1) Через соединение с производственным календарем
+ – Ответить
6. ActionBlog 30.01.24 14:41 Сейчас в теме
(1)КалендарныеГрафики.ДатаПоКалендарю

В модуле еще много процедур-функций для работы с датами по графикам
inf012; +1 – Ответить
7. ActionBlog 30.01.24 14:42 Сейчас в теме
(1)КалендарныеГрафики.ДатаПоКалендарю
inf012; +1 – Ответить
9. ActionBlog 30.01.24 14:43 Сейчас в теме
(1)
КалендарныеГрафики.ДатаПоКалендарю
inf012; +1 – Ответить
3. Ferth 30.01.24 14:22 Сейчас в теме
КалендарныеГрафики.ДатаПоКалендарю
inf012; +1 – Ответить
4. ls600 30.01.24 14:29 Сейчас в теме
https://infostart.ru/1c/articles/850536/?ysclid=ls09zw48q5268702740
inf012; +1 – Ответить
5. ls600 30.01.24 14:30 Сейчас в теме
Может поможет
inf012; +1 – Ответить
8. ActionBlog 30.01.24 14:43 Сейчас в теме
КалендарныеГрафики.ДатаПоКалендарю
inf012; +1 – Ответить
10. Romeo_1c_programmer 35 30.01.24 14:46 Сейчас в теме
если есть БСП, то можно попробовать
// Возвращает дату, которая отличается указанной даты ДатаОт на количество дней 
КалендарныеГрафики.ДатаПоКалендарю(ГрафикРаботы, ДатаОт, КоличествоДней);


или 

ГрафикиРаботы.ДатаПоГрафику(ГрафикРаботы, ДатаОт, КоличествоДней);
inf012; +1 – Ответить
11. laperuz 47 30.01.24 15:03 Сейчас в теме 
КалендарныеГрафики.ДатаПоКалендарю(КалендарныеГрафики.ОсновнойПроизводственныйКалендарь(), <ДатаОтсчета>, 3)
skeptik2105; inf012; +2 – Ответить
12. BackinSoda 30.01.24 15:14 Сейчас в теме
(0) Мб поможет 
КалендарныеГрафики.ДатыБлижайшихРабочихДней(График, НачальныеДаты, ПолучатьПредшествующие = Ложь, ВызыватьИсключение = Истина, ИгнорироватьНезаполненностьГрафика = Ложь)
inf012; +1 – Ответить
13. user1278383 5 30.01.24 15:14 Сейчас в теме
Посмотреть в общих модулях КалендарныеГрафики или ГрафикиРаботы, наверняка что-то есть
inf012; +1 – Ответить
14. VZyryanov 30.01.24 15:25 Сейчас в теме 
Функция ЭтоРабочийДень(ГрафикРаботы,ТекДата) Экспорт
	Если ГрафикРаботы=Неопределено Тогда
		СведенияНаДень=РегистрыСведений.ДанныеПроизводственногоКалендаря.Получить(Новый Структура("Дата",ТекДата));
		Возврат СведенияНаДень.ВидДня=Перечисления.ВидыДнейПроизводственногоКалендаря.Рабочий 
			ИЛИ СведенияНаДень.ВидДня=Перечисления.ВидыДнейПроизводственногоКалендаря.Предпраздничный;		
	Иначе
		//СведенияНаДень=РегистрыСведений.ГрафикиРаботыПоВидамВремени.Получить(Новый Структура("ГрафикРаботы,ВидУчетаВремени,Дата",
		//	ГрафикСотрудника,Справочники.ВидыИспользованияРабочегоВремени.Явка,ТекДата));
		//Возврат СведенияНаДень.ОсновноеЗначени>0; //Т.е. в указанный день есть "Явка"
		Запрос=Новый Запрос;
		Запрос.Текст=
			"ВЫБРАТЬ
			|	ГрафикиРаботыПоВидамВремени.ОсновноеЗначение КАК ОсновноеЗначение
			|ИЗ
			|	РегистрСведений.ГрафикиРаботыПоВидамВремени КАК ГрафикиРаботыПоВидамВремени
			|ГДЕ
			|	ГрафикиРаботыПоВидамВремени.ГрафикРаботы = &ГрафикРаботы
			|	И ГрафикиРаботыПоВидамВремени.ВидУчетаВремени = &ВидУчетаВремени
			|	И ГрафикиРаботыПоВидамВремени.Дата = &Дата";
		Запрос.УстановитьПараметр("ГрафикРаботы",ГрафикРаботы);
		Запрос.УстановитьПараметр("ВидУчетаВремени",Справочники.ВидыИспользованияРабочегоВремени.Явка);
		Запрос.УстановитьПараметр("Дата",ТекДата);
		Результат=Запрос.Выполнить();
		Возврат Не Результат.Пустой();
	КонецЕсли;	
КонецФункции
Показать
inf012; +1 – Ответить
Для отправки сообщения требуется регистрация/авторизация

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