gifts2017

Формирование списка дат в заданном диапазоне в тексте запроса

Опубликовал Осипов Сергей (fixin) в раздел Программирование - Практика программирования

Позволяет в тексте запроса получить последовательность дат за указанный период времени от даты 1 до даты 2

Просто текст на языке запроса, который можно вставить как вложенную таблицу в любой запрос для получения последовательности дат.

Недостаток: Даты выдаются только с 2008 по 2019 годы, но на практике обычно этого достаточно. Если что, можно поправить текст запроса.

Вот работающий текст запроса:

 

ВЫБРАТЬ
    ДОБАВИТЬКДАТЕ(ДОБАВИТЬКДАТЕ(ДОБАВИТЬКДАТЕ(ДАТАВРЕМЯ(1, 1, 1), ГОД, ТГоды.Год - 1), МЕСЯЦ, ТМесяцы.Месяц - 1), ДЕНЬ, ТДни.День - 1) КАК ДАТА
ИЗ
    (ВЫБРАТЬ
        1 КАК День
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        2
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        3
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        4
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        5
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        6
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        7
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        8
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        9
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        10
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        11
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        12
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        13
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        14
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        15
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        16
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        17
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        18
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        19
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        20
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        21
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        22
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        23
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        24
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        25
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        26
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        27
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        28
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        29
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        30
    
    ОБЪЕДИНИТЬ
    
    ВЫБРАТЬ
        31) КАК ТДни
        ПОЛНОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
            1 КАК Месяц
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            3
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            4
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            5
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            6
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            7
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            8
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            9
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            10
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            11
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            12) КАК ТМесяцы
        ПО (ИСТИНА)
        ПОЛНОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
            2008 КАК Год
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2009
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2010
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2011
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2012
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2013
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2014
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2015
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2016
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2017
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2018
        
        ОБЪЕДИНИТЬ
        
        ВЫБРАТЬ
            2019) КАК ТГоды
        ПО (ИСТИНА)
ГДЕ
    ДОБАВИТЬКДАТЕ(ДОБАВИТЬКДАТЕ(ДОБАВИТЬКДАТЕ(ДАТАВРЕМЯ(1, 1, 1), ГОД, ТГоды.Год - 1), МЕСЯЦ, ТМесяцы.Месяц - 1), ДЕНЬ, ТДни.День - 1) МЕЖДУ &Дата1 И &Дата2

УПОРЯДОЧИТЬ ПО
    ДАТА

См. также

Подписаться Добавить вознаграждение
Комментарии
1. Вячеслав (slawa) 02.11.11 03:44
Только нужно "ВЫБРАТЬ РАЗЛИЧНЫЕ ..."
иначе дублируются строки если в месяце меньше 31 дня
2. Andrew Belkin (kgdrsu) 02.11.11 15:51
В типовой есть такой код:

		ТекстЗапросаДат = 
		"ВЫБРАТЬ
		|	ДАТАВРЕМЯ(" + Формат(Год(НачалоПериода), "ЧГ=4") + ", " + Месяц(НачалоПериода) + " , " + День(НачалоПериода) + ") КАК Дата,
		|	ДАТАВРЕМЯ(" + Формат(Год(НачалоПериода), "ЧГ=4") + ", " + Месяц(НачалоПериода) + " , 1) КАК Период
		|ПОМЕСТИТЬ ВТДаты 
		|	";           
		ДатаВОтчете = НачалоПериода + 86400;
		Пока ДатаВОтчете <= НачалоДня(КонецПериода) Цикл
			НомерДня    = День(ДатаВОтчете);
			НомерМесяца = Месяц(ДатаВОтчете);
			НомерГода   = Год(ДатаВОтчете);
			ТекстЗапросаДат = ТекстЗапросаДат + 
			"ОБЪЕДИНИТЬ ВСЕ
			|ВЫБРАТЬ
			|  ДАТАВРЕМЯ(" + Формат(НомерГода, "ЧГ=4")+ ", " + НомерМесяца + " ," + НомерДня + "),
			|  ДАТАВРЕМЯ(" + Формат(НомерГода, "ЧГ=4") + ", " + НомерМесяца + " , 1) КАК Период
			|	";
			ДатаВОтчете = ДатаВОтчете + 86400;
		КонецЦикла;
...Показать Скрыть


По-моему такой же код в результате получаем и есть переменные НачалоПериода и КонецПериода.
nick_krsk; SirYozha; +2 Ответить 1
3. bulpi bulpi (bulpi) 03.11.11 11:56
Уж если так сильно надо, можно подготовить таблицу значений с любой информацией, и получить из нее временную таблицу
4. motherf 03.11.11 12:40
(3) Да, но не везде можно использовать временные таблицы. Например, в построителе отчета нельзя.
(1) согласен.
(2) как вариант. Просто если диапазон дат большой, объем текста запроса получится слишком большим, мой метод гарантированно компактный.
5. Сергей (ildarovich) 03.11.11 13:18
Если кому-либо требуется более быстрое и компактное решение рассмотренной задачи, обратите внимание на статью Порождающий запрос. Начало пакетного запроса будет таким же как в статье, а окончание
ВЫБРАТЬ ДОБАВИТЬКДАТЕ(&НачалоПериода, ДЕНЬ, Х) КАК Дата ИЗ Регистр16 ГДЕ Х < &Дней 

(3) В той же статье показано, что искусственную таблицу значений для передачи в запрос можно не готовить, гораздо проще и быстрее получить необходимую таблицу в самом запросе.
nick_krsk; zqzq; kgdrsu; +3 Ответить 1
6. motherf 03.11.11 23:20
Смотреть не хочу, надо тратить деньги.
Но по сути, если соединять таблицы друг с другом, то требуется несколько итераций, а это время.
т.е. несколько циклов пройдет, прежде чем получится нужная таблица. Думаю, это надуманное усложнение и потери времени для данной задачи.
7. Дмитрий Корчагин (MorningStalker) 10.03.15 07:53
(5) ildarovich,
использую статью Порождающий запрос получаем конечный результат в таком виде:

ВЫБРАТЬ
	0 КАК Х
ПОМЕСТИТЬ Регистр1

ОБЪЕДИНИТЬ

ВЫБРАТЬ
	1
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
	Младшие.Х + 2 * Старшие.Х КАК Х
ПОМЕСТИТЬ Регистр2
ИЗ
	Регистр1 КАК Младшие,
	Регистр1 КАК Старшие
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
	Младшие.Х + 4 * Старшие.Х КАК Х
ПОМЕСТИТЬ Регистр4
ИЗ
	Регистр2 КАК Младшие,
	Регистр2 КАК Старшие
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
	Младшие.Х + 16 * Старшие.Х КАК Х
ПОМЕСТИТЬ Регистр8
ИЗ
	Регистр4 КАК Младшие,
	Регистр4 КАК Старшие
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
	Младшие.Х + 256 * Старшие.Х КАК Х
ПОМЕСТИТЬ Регистр16
ИЗ
	Регистр8 КАК Младшие,
	Регистр8 КАК Старшие
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
	РАЗНОСТЬДАТ(&НачалоПериода, &КонецПериода,  ДЕНЬ) + 1 КАК КоличествоДней
ПОМЕСТИТЬ ВТ_КоличествоДней
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
	ДОБАВИТЬКДАТЕ(&НачалоПериода,  ДЕНЬ, Регистр16.Х) КАК Дата
ИЗ
	Регистр16 КАК Регистр16,
	ВТ_КоличествоДней КАК ВТ_КоличествоДней
ГДЕ
	Регистр16.Х < ВТ_КоличествоДней.КоличествоДней

УПОРЯДОЧИТЬ ПО
	Дата
...Показать Скрыть