gifts2017

Срез последних в запросе за период, с периодичностью месяц

Опубликовал Денис Алехин (dand1) в раздел Программирование - Практика программирования

Обработка является примером/шаблоном, для выполнения схожих задач

Доброго времени. Обработка разработана, как показательный шаблон для выборки цен номенклатуры с отбором по номенклатуре и периоду. 

1. Задаем параметры в шапке документа (Номенклатура, ДатаНачала, ДатаОкончания).

2. Выполнить!

3. Табличное поле заполняется последней ценой каждого месяца периода.

Сам текст запроса:

 

ВЫБРАТЬ
0 КАК Число
ПОМЕСТИТЬ Числа

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
1

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
2

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
3

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
4

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
5

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
6

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
7

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
8

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
9
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
сч1.Число * 1 + сч2.Число * 10 + сч3.Число * 100 + сч4.Число * 1000 КАК Число
ПОМЕСТИТЬ врСчетчик
ИЗ
Числа КАК сч1,
Числа КАК сч2,
Числа КАК сч3,
Числа КАК сч4
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
ДОБАВИТЬКДАТЕ(&ДатаНачала, МЕСЯЦ, сч.Число) КАК ДатаНачала,
КОНЕЦПЕРИОДА(ДОБАВИТЬКДАТЕ(&ДатаНачала, МЕСЯЦ, сч.Число), МЕСЯЦ) КАК ДатаОкончания
ПОМЕСТИТЬ врДаты
ИЗ
врСчетчик КАК сч
ГДЕ
РАЗНОСТЬДАТ(&ДатаНачала, &ДатаОкончания, МЕСЯЦ) >= сч.Число
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
ВложенныйЗапрос.Номенклатура,
ВложенныйЗапрос.Период,
ВложенныйЗапрос.ДатаНачала,
ВложенныйЗапрос.ДатаОкончания,
ЦеныНоменклатуры.Цена
ИЗ
(ВЫБРАТЬ
ЦеныНоменклатуры.Номенклатура КАК Номенклатура,
МАКСИМУМ(ЦеныНоменклатуры.Период) КАК Период,
Даты.ДатаОкончания КАК ДатаОкончания,
Даты.ДатаНачала КАК ДатаНачала
ИЗ
РегистрСведений.ЦеныНоменклатуры КАК ЦеныНоменклатуры
ВНУТРЕННЕЕ СОЕДИНЕНИЕ врДаты КАК Даты
ПО (ЦеныНоменклатуры.Период МЕЖДУ Даты.ДатаНачала И Даты.ДатаОкончания)
И (ЦеныНоменклатуры.Номенклатура = &Номенклатура)

СГРУППИРОВАТЬ ПО
ЦеныНоменклатуры.Номенклатура,
Даты.ДатаНачала,
Даты.ДатаОкончания) КАК ВложенныйЗапрос
ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры КАК ЦеныНоменклатуры
ПО ВложенныйЗапрос.Номенклатура = ЦеныНоменклатуры.Номенклатура
И ВложенныйЗапрос.Период = ЦеныНоменклатуры.Период

Скачать файлы

Наименование Файл Версия Размер Кол. Скачив.
СрезПоследнихЗапрос
.epf 8,85Kb
16.01.15
2
.epf 1 8,85Kb 2 Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. Константин Юрин (kostyaomsk) 18.01.15 08:51
Интересен запрос с точки зрения оптимизации. Виртуальных таблиц то нет.
2. Сергей (ildarovich) 18.01.15 12:06
(1) kostyaomsk, интересен запрос с точки зрения правильности. Если в некотором месяце цена задаваться не будет, то ее не будет и в результате этого запроса. То есть это не срез последних, а что-то другое. Ровно тот же результат можно получить, если просто сгруппировать данные регистра по концу периода "месяц" вообще без всякой искусственной таблицы врСчетчик.
Запрос станет срезом последних, когда из таблицы врДаты будет убрано поле ДатаНачала, а условие "между" будет заменено условием < Даты.ДатаОкончания.
И вот тогда встанет вопрос эффективности.
kostyaomsk; +1 Ответить 2
3. Денис Алехин (dand1) 19.01.15 05:32
(2) ildarovich, Можно еще
МАКСИМУМ(ЦеныНоменклатуры.Период) КАК Период
поменять на
МИНИМУМ(ЦеныНоменклатуры.Период) КАК Период,
и условие изменить получим срез первых. Я же написал, что использовал в собственных целях, а выложил как шаблон.
4. Сергей (ildarovich) 19.01.15 11:13
(3) dand1, я говорю не об этом, а о конкретной сделанной вами в запросе ОШИБКЕ.Свой шаблон вы назвали НЕПРАВИЛЬНО. В этом шаблоне определяется не срез последних, а последняя установленная в каждом месяце цена. Под срезом последних на дату подразумевается действующая на эту дату цена. И есть разница. Она в том, что если цена в данном месяце не устанавливалась, то и ваш запрос ничего в этом месяце не покажет.

Предположим, что вы действительно хотели определить последнюю установленную в каждом месяце цену. Но она определяется гораздо проще и быстрее, чем в вашем запросе. Всего два запроса в пакете. Тогда меняйте название и переписывайте запрос на более эффективный вариант.

Если нужен срез последних, то тоже нужно поменять запрос так, как я сказал. Иначе ваша ошибка будет размножаться.
5. Денис Алехин (dand1) 20.01.15 04:36
(4) ildarovich, Вы даже сами назвали, это последней установленной ценой в месяце, а последняя установленная цена в период, в данном случае месяц, случайно нельзя назвать, в моем случае, "СрезПоследних за Месяц"? У 1с срез последних, за период 00010101 по "Установленную дату", если "Установленной даты" нет, то на 3999, у меня срок искусственно сокращен до месяца, так в чем проблема?!
И почему вы решили, что в запросе ошибка? Результаты верные? А на премию производительности я не претендовал!
Скажем, у меня стиль программирования такой, у вас другой и я не навязываю всем использовать этот запрос в виде получения данных, просто показал как еще можно использовать язык запросов 1с и да, кстати, читайте внимательнее что написано в начале статьи жирным шрифтом "Обработка является примером/шаблоном, для выполнения схожих задач", если Вы не заметили продублировал в ответе!
6. Stepan (StepanBY) 20.01.15 15:08
Может кому пригодиться.

Курсы валют за период на каждый день (если даже в этот день они не устанавливались)

ВЫБРАТЬ
0 КАК a
ПОМЕСТИТЬ Числа

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
1

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
2

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
3

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
4

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
5

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
6

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
7

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
8

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
9
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
НАЧАЛОПЕРИОДА(ДОБАВИТЬКДАТЕ(&ДатаНачала, ДЕНЬ, aa.a + bb.a * 10 + cc.a * 100 + dd.a * 1000), ДЕНЬ) КАК ПериодДень
ПОМЕСТИТЬ ВТОсьВремени
ИЗ
Числа КАК aa,
Числа КАК bb,
Числа КАК cc,
Числа КАК dd

ИНДЕКСИРОВАТЬ ПО
ПериодДень
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
КурсыВалют.Валюта,
КурсыВалют.Курс,
КурсыВалют.Кратность,
КурсыВалют.Период КАК ПериодС,
МИНИМУМ(ЕСТЬNULL(ДОБАВИТЬКДАТЕ(КурсыВалют1.Период, ДЕНЬ, -1), КурсыВалют.Период)) КАК ПериодПо
ПОМЕСТИТЬ ВТКурсы
ИЗ
РегистрСведений.КурсыВалют КАК КурсыВалют
ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
КурсыВалют.Валюта КАК Валюта,
КурсыВалют.Курс КАК Курс,
КурсыВалют.Кратность КАК Кратность,
КурсыВалют.Период КАК Период
ИЗ
РегистрСведений.КурсыВалют КАК КурсыВалют

ОБЪЕДИНИТЬ

ВЫБРАТЬ
КурсыВалютСрезПоследних.Валюта,
КурсыВалютСрезПоследних.Курс,
КурсыВалютСрезПоследних.Кратность,
&ДатаКонца
ИЗ
РегистрСведений.КурсыВалют.СрезПоследних КАК КурсыВалютСрезПоследних) КАК КурсыВалют1
ПО КурсыВалют.Валюта = КурсыВалют1.Валюта
И КурсыВалют.Период < КурсыВалют1.Период

СГРУППИРОВАТЬ ПО
КурсыВалют.Валюта,
КурсыВалют.Курс,
КурсыВалют.Кратность,
КурсыВалют.Период
;

////////////////////////////////////////////////////////////­////////////////////
ВЫБРАТЬ
ВТОсьВремени.ПериодДень КАК ПериодДень,
ВТКурсы.Валюта,
ВТКурсы.Курс,
ВТКурсы.Кратность
ИЗ
ВТОсьВремени КАК ВТОсьВремени
ВНУТРЕННЕЕ СОЕДИНЕНИЕ ВТКурсы КАК ВТКурсы
ПО (ВТОсьВремени.ПериодДень МЕЖДУ ВТКурсы.ПериодС И ВТКурсы.ПериодПо)

УПОРЯДОЧИТЬ ПО
ПериодДень
7. Сергей (ildarovich) 20.01.15 16:03
(5) dand1,
случайно нельзя назвать
- ничего случайно называть нельзя! Нужно называть так, чтобы было понятно, а то получается как в анекдоте "спички у нас лежат в коробке из-под сахара, на которой написано "соль". Под срезом последних все понимают одно, а именно - действующую на заданный момент цену. Если вы понимаете другое, то предупреждайте читателей КРУПНЫМИ БУКВАМИ. Иначе люди будут использовать ваше решение в соответствии с названием, в программах и отчетах будут ошибки и всем будет плохо.
Что касается шаблона, то еще лучше всего шаблон "0123456789абвгдеёжзиклмнопрст..." - из него можно вообще, что угодно составить. Здесь речь идет о конкретной задаче.
В общем, дело тут не в стиле, а в том, что если можно решить задачу проще, то огород городить не стоит. Не стоит пропагандировать громоздкие медленные шаблоны.
Если будете настаивать на своем, хотелось бы узнать про пример задачи, где это можно применить. Где и кому нужна последняя установленная в каждом месяце цена?
8. Денис Алехин (dand1) 20.01.15 20:25
(4) ildarovich, Порядком мне надоело спорить с вами так как вы прицепились к наименованию темы и решения, человек написавший комментарий под номером (6) смог применить данное решение, так что кто хочет тот сможет разобраться. А по поводу ваши нескольких запросов в пакете для получения такого же результата, это еще нужно подумать об эффективности, все решается в один запрос:
ВЫБРАТЬ
	ВложенныйЗапрос.Номенклатура,
	ВложенныйЗапрос.Период,
	ЦеныНоменклатуры.Цена
ИЗ
	(ВЫБРАТЬ
		ЦеныНоменклатуры.Номенклатура КАК Номенклатура,
		МАКСИМУМ(ЦеныНоменклатуры.Период) КАК Период
	ИЗ
		РегистрСведений.ЦеныНоменклатуры КАК ЦеныНоменклатуры
	ГДЕ
		ЦеныНоменклатуры.Период МЕЖДУ &ДатаНачала И &ДатаОкончания
		И ЦеныНоменклатуры.Номенклатура = &Номенклатура
	
	СГРУППИРОВАТЬ ПО
		МЕСЯЦ(ЦеныНоменклатуры.Период),
		ГОД(ЦеныНоменклатуры.Период),
		ЦеныНоменклатуры.Номенклатура) КАК ВложенныйЗапрос
		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры КАК ЦеныНоменклатуры
		ПО ВложенныйЗапрос.Номенклатура = ЦеныНоменклатуры.Номенклатура
			И ВложенныйЗапрос.Период = ЦеныНоменклатуры.Период
...Показать Скрыть

И еще один момент я вам говорил что нужно получить срез последних на каждый месяц, т.е. последняя установленная цена в каждом месяце, как еще объяснить вам, это называется срез последних в периоде.
Вот что пишет 1с:
Вообще регистры сведений предназначены для хранения информации, развернутой по комбинации измерений. Главное отличие периодического регистра сведений от обычного заключается в том, что в нем присутствует дополнительное системное измерение "Период", имеющее тип "дата". Это позволяет получать не только текущие сведения об объекте, но также на любой момент времени.
http://its.1c.ru/db/metod8dev/content/2588/hdoc
Исходя из выше написанного, могу сделать вывод что срез последних за период с периодичностью в месяц будет равен последней датой установленной в периоде. Уже аргументровал это, что на период, например, 01.01.2001 по 01.02.2001, будет последняя установленное значение с макисмум по периоду, т.е. макисмум по месяцу и году.
Вот нашел вам пример http://kb.mista.ru/article.php?id=92, примерно такое же решение.
9. Сергей (ildarovich) 20.01.15 22:26
(8) dand1, зря вы так упорствуете. Решение в (8) правильное для решенной задачи, его я и имел ввиду в комментарии (2), когда предлагал обойтись без временной таблицы врСчетчик. Только группировка Год вроде бы лишняя. Получается, что приведенное в статье решение содержит лишние действия, о чем я и говорил.

Автор комментария (6) не применял данное решение, а написал свое собственное, насколько я смог понять.

По-поводу названия тут кажется вы свои заблуждения больше пытаетесь отстоять, чем до истины докопаться.
Дело в том, что я задачей множественных срезов последних уже занимался. Собрал целых четыре (!) разных способа их получения. Среди них и общеизвестный классический метод из комментария (6) или из вашей ссылки http://kb.mista.ru/article.php?id=92. И метод ровно в один запрос (без вложенных), приведенный в статье "Минимализмы". Метод с использованием коррелированного запроса и еще один метод.
И получается, что вы решаете другую задачу, имеющую другой (меньший) порядок сложности, а называете ее так же. Поэтому и хотел вас переубедить.
Множественные срезы последних приходится получать очень часто, поскольку это жизненная задача. Ее смысл в интерполяции пропущенных в регистре сведений данных. То есть сначала производится сокращение избыточности (сжатие) за счет удаления тех данных (цен, например), которые не меняются, а потом восстановление данных на требуемые даты.

А задаче определения последних цен, установленных в каждом месяце трудно придумать реалистичный сценарий использования. Кому и когда она может быть нужна - вы так и не ответили. Хотя бы разные ситуации возникновения этих задач должны были вас убедить, что эти задачи принципиально разные.

Но в целом, наверное, если добавить к статье решение из (8), написать в аннотации, что именно понимается вами здесь под срезом последним (и еще упоминуть, что не все с таким определением согласны), то публикация может оказаться полезной.
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа