Добавление к датам рабочих дней в запросе

31.07.15

Разработка - Запросы

Нужно было написать запрос, добавляющий к датам рабочие дни.
Не нашёл оптимального решения, делюсь своим.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Демо обработка
.epf 7,35Kb
6
6 Скачать (1 SM) Купить за 1 850 руб.

Задача

Дана таблица "Исходные даты" с колонками:

"Дата отсчета";

"Прибавить рабочих дней".

Нужно получить таблицу "Результат" с колонками:

"Дата отсчета";

"Прибавить рабочих дней";

"Дата добавлены рабочие дни".

 

Запрос

ВЫБРАТЬ
ИсходныеДаты.ДатаОтсчета КАК ДатаОтсчета,
ИсходныеДаты.ПрибавитьРабочихДней + 1 КАК ПрибавитьРабочихДней
ПОМЕСТИТЬ ИсходныеДаты
ИЗ
&ИсходныеДаты КАК ИсходныеДаты
;
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ РАЗЛИЧНЫЕ
ИсходныеДаты.ДатаОтсчета,
ИсходныеДаты.ПрибавитьРабочихДней,
ДанныеПроизводственногоКалендаря.Дата КАК РабочийДень
ПОМЕСТИТЬ СоединениеСРабочими
ИЗ
РегистрСведений.ДанныеПроизводственногоКалендаря КАК ДанныеПроизводственногоКалендаря
ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсходныеДаты КАК ИсходныеДаты
ПО (ИсходныеДаты.ДатаОтсчета <= ДанныеПроизводственногоКалендаря.Дата)
И (ДОБАВИТЬКДАТЕ(ИсходныеДаты.ДатаОтсчета, ДЕНЬ, ИсходныеДаты.ПрибавитьРабочихДней * 2 + 10) > ДанныеПроизводственногоКалендаря.Дата)
ГДЕ
ДанныеПроизводственногоКалендаря.ВидДня В (ЗНАЧЕНИЕ(Перечисление.ВидыДнейПроизводственногоКалендаря.Предпраздничный), ЗНАЧЕНИЕ(Перечисление.ВидыДнейПроизводственногоКалендаря.Рабочий))
И ДанныеПроизводственногоКалендаря.ПроизводственныйКалендарь = &КалендарьРФ
;
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
СоединениеСРабочими.ДатаОтсчета,
СоединениеСРабочими.ПрибавитьРабочихДней - 1 КАК ПрибавитьРабочихДней,
КОЛИЧЕСТВО(РАЗЛИЧНЫЕ СоединениеСРабочими.РабочийДень) КАК КоличествоРабочихДней,
СоединениеСРабочими1.РабочийДень КАК ДатаДобавленыРабочиеДни
ИЗ
СоединениеСРабочими КАК СоединениеСРабочими
ВНУТРЕННЕЕ СОЕДИНЕНИЕ СоединениеСРабочими КАК СоединениеСРабочими1
ПО СоединениеСРабочими.РабочийДень <= СоединениеСРабочими1.РабочийДень
СГРУППИРОВАТЬ ПО
СоединениеСРабочими.ПрибавитьРабочихДней,
СоединениеСРабочими.ДатаОтсчета,
СоединениеСРабочими1.РабочийДень
ИМЕЮЩИЕ
КОЛИЧЕСТВО(РАЗЛИЧНЫЕ СоединениеСРабочими.РабочийДень) = СоединениеСРабочими.ПрибавитьРабочихДней

 

Нужно пояснить применение конструкции:

"ДОБАВИТЬКДАТЕ(ИсходныеДаты.ДатаОтсчета, ДЕНЬ, ИсходныеДаты.ПрибавитьРабочихДней * 2 + 10)"

Назовём её "Глубина поиска".

Это конец периода, в котором мы ищем дату "Дата добавлены рабочие дни".

Поясню на примере:

"Дата отсчета" = 01.07.2015.

"Прибавить рабочих дней" = 5.

Искомая дата ("Дата добавлены рабочие дни") = 08.07.2015;

Глубина поиска в таком случае равна 21.07.2015.

Тоесть мы ищем дату 08.07.2015 и интервале между 01.07.2015 и 21.07.2015. И находим.

Теперь почему +10 и умножаем на 2 ?

Потому что максимальное количество выходных подряд в году равно примерно 10 и соотношение рабочих и выходных дней примерно 2 к 1.

Таким образом должно работать для всех случаев.


П.С.

Есть аналогичная публикация:

//infostart.ru/public/166349/

 

Отличие моей:

1) Сделано для БП 3.0;

2) Сделано для нескольких дат (задаётся в таблице, а не параметром);

3) Значительно более эффективный запрос.


рабочие дни производственный календарь

См. также

Инструментарий разработчика Роли и права Запросы СКД Программист Руководитель проекта Платформа 1С v8.3 Управляемые формы Запросы Система компоновки данных Платные (руб)

Инструменты для разработчиков 1С 8.3: Infostart Toolkit. Автоматизация и ускорение разработки на управляемых формах. Легкость работы с 1С.

12000 руб.

02.09.2020    169274    937    403    

905

Запросы Программист Бесплатно (free)

Увидел cheatsheet по SQL и захотелось нарисовать подобное, но про запросы.

18.10.2024    11394    sergey279    18    

65

Запросы Программист Платформа 1С v8.3 Запросы Конфигурации 1cv8 Бесплатно (free)

Столкнулся с интересной ситуацией, которую хотел бы разобрать, ввиду её неочевидности. Речь пойдёт про использование функции запроса АВТОНОМЕРЗАПИСИ() и проблемы, которые могут возникнуть.

11.10.2024    6338    XilDen    36    

83

Запросы Программист Запросы Бесплатно (free)

Отлаживая взаимодействие с базой данных, мы регулярно сталкиваемся с зависающими или подозрительно долго выполняющимися обращениями, негативно влияющими на производительность. О том, как в PostgreSQL выявить подозрительные запросы, основываясь на доступной о них информации, расскажем в статье.

16.08.2024    9068    user1840182    5    

28

Математика и алгоритмы Запросы Программист Платформа 1С v8.3 Запросы Бесплатно (free)

Рассмотрим быстрый алгоритм поиска дублей с использованием hash функции по набору полей шапки и табличных частей.

08.07.2024    2727    ivanov660    9    

22

Запросы СКД Программист Стажер Система компоновки данных Россия Бесплатно (free)

Часто при разработке отчетов в СКД возникает ситуация, когда не совсем понятно, почему отчет выводит не те данные, которые нужны, либо не выводит вовсе. Возникает потребность увидеть конечный запрос, который формирует СКД. Как это сделать, рассмотрим в этой статье.

15.05.2024    10219    implecs_team    6    

48

Запросы Программист Стажер Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Часто поступают задачи по произвольному распределению общих сумм. После распределения иногда пропадают копейки. Суть решения добавить АвтоНомерЗаписи() в ВТ распределения, и далее используя функции МАКСИМУМ или МИНИМУМ можем положить разницу копеек в первую или последнюю строку знаменателя распределения.

11.04.2024    3623    andrey_sag    10    

38
Оставьте свое сообщение