0. 987ww765 248 12.09.17 16:21 Сейчас в теме

Получение даты, зная день недели и его порядок в месяце

Иногда бывает необходимость получить "Первый понедельник месяца" или "Вторую пятницу месяца".
Есть несколько способов решения вопроса. Опишу один из них.

Перейти к публикации

Лучшие комментарии
3. ildarovich 6720 13.09.17 12:48 Сейчас в теме
Вот еще вариант:
Функция ПолучитьДатуПоНомерамДня_и_НеделиМесяца(НомерНеделиМесяца, НомерДняНедели, ДатаМесяца)
	
	Возврат НачалоМесяца(ДатаМесяца) 
+ 86400 * (7 * НомерНеделиМесяца - 7 + (НомерДняНедели - ДеньНедели(НачалоМесяца(ДатаМесяца)) + 7) % 7)
	
КонецФункции
В функции, приведенной в статье, мне не нравится "Попытка-Исключение", которую лучше не использовать для относительно простой календарной арифметики, а оставить для более серьезных и сложных случаев. И то, что возвращается в исключении. Если результат функции будет без проверки на неопределено использоваться в выражении, то получится еще одно исключение. А если делать проверку, то она будет еще одной.
Остальные комментарии
Избранное Подписка Сортировка: Древо
1. echo77 1094 13.09.17 05:41 Сейчас в теме
Из практического применения вспомнилось только как найти последнюю пятницу июля
10. FesenkoA 39 06.04.18 09:37 Сейчас в теме
(1)єто вы с бюджетниками никогда не работали)))
2. Synoecium 650 13.09.17 08:55 Сейчас в теме
запросом проще, имхо:
ВЫБРАТЬ
	ВЫБОР
		КОГДА ДЕНЬНЕДЕЛИ(НАЧАЛОПЕРИОДА(&ЗаданнаяДатаМесяца, МЕСЯЦ)) <= &ДеньНедели
			ТОГДА ДОБАВИТЬКДАТЕ(НАЧАЛОПЕРИОДА(ДОБАВИТЬКДАТЕ(НАЧАЛОПЕРИОДА(&ЗаданнаяДатаМесяца, МЕСЯЦ), НЕДЕЛЯ, &Неделя - 1), НЕДЕЛЯ), ДЕНЬ, &ДеньНедели - 1)
		ИНАЧЕ ДОБАВИТЬКДАТЕ(НАЧАЛОПЕРИОДА(ДОБАВИТЬКДАТЕ(НАЧАЛОПЕРИОДА(&ЗаданнаяДатаМесяца, МЕСЯЦ), НЕДЕЛЯ, &Неделя), НЕДЕЛЯ), ДЕНЬ, &ДеньНедели - 1)
	КОНЕЦ КАК ДатаРезультат
4. 987ww765 248 13.09.17 13:03 Сейчас в теме
(2) Проще, не спорю. Даже привел статью, где рассматривается этот вариант. Просто это другой вариант решения.
3. ildarovich 6720 13.09.17 12:48 Сейчас в теме
Вот еще вариант:
Функция ПолучитьДатуПоНомерамДня_и_НеделиМесяца(НомерНеделиМесяца, НомерДняНедели, ДатаМесяца)
	
	Возврат НачалоМесяца(ДатаМесяца) 
+ 86400 * (7 * НомерНеделиМесяца - 7 + (НомерДняНедели - ДеньНедели(НачалоМесяца(ДатаМесяца)) + 7) % 7)
	
КонецФункции
В функции, приведенной в статье, мне не нравится "Попытка-Исключение", которую лучше не использовать для относительно простой календарной арифметики, а оставить для более серьезных и сложных случаев. И то, что возвращается в исключении. Если результат функции будет без проверки на неопределено использоваться в выражении, то получится еще одно исключение. А если делать проверку, то она будет еще одной.
5. 987ww765 248 13.09.17 13:16 Сейчас в теме
(3) Шикарное решение. Снимаю шляпу. Сам бы я не додумался до такого(
6. spacecraft 13.09.17 13:53 Сейчас в теме
(3) интересный алгоритм. Только не правильно отрабатывает на параметрах вне диапазона. Точнее если указать параметры меньше допустимого для данного месяца.
Пример:
ДатаМесяц = Дата(2017,1,1);
НомерНеделиМесяца = 1;
НомерДняНедели = 1;
Получим '02.01.2017'.
В большую сторону отрабатывает.
Это конечно проблема передачи корректных данных, но забавно.
7. ildarovich 6720 13.09.17 14:27 Сейчас в теме
(6) А мне кажется, что результат верный, ведь спрашивается дата первого понедельника месяца (как я понял задачу). Это и есть второе января.
8. spacecraft 13.09.17 14:39 Сейчас в теме
(7) если так подходить к задаче, тогда верно. Только получается, что начало первой недели больше конца первой недели. Логический нонсенс.
9. ildarovich 6720 13.09.17 16:10 Сейчас в теме
(8) Да, согласен, наверное, мне нужно было по другому функцию и параметры называть...ближе к формулировке задачи в анонсе.
Оставьте свое сообщение
Новые вопросы с вознаграждением
Автор темы объявил вознаграждение за найденный ответ, его получит тот, кто первый поможет автору.

Вакансии

Бизнес-архитектор 1С, ведущий консультант
Санкт-Петербург
Полный день

Руководитель проектов 1С
Санкт-Петербург
Полный день

Программист 1C
Москва
зарплата от 100 000 руб. до 150 000 руб.
Полный день

Программист 1С
Москва
зарплата от 120 000 руб. до 150 000 руб.
Полный день

Программист 1С
Санкт-Петербург
зарплата от 80 000 руб. до 120 000 руб.
Полный день