Последние неоплаченные накладные.
По заданной &CуммаЗадолженности найти последний неоплаченный документ. Для такого документа сумма всех последующих документов меньше &CуммаЗадолженности, а сумма всех последующих документов вместе с его суммой – больше &CуммаЗадолженности. Сумму накладных лучше брать из регистра взаиморасчетов. Возможен отбор по контрагенту. Поле «Момент времени» умышленно не включил в условия соединения. Для приемлемого быстродействия запрос Таб1 обязательно нужно ограничивать по количеству «Первые ХХ» или задать период выборки.
ВЫБРАТЬ ПЕРВЫЕ ХХ
РеализацияТоваровУслуг.Дата КАК ДатаРТУ,
РеализацияТоваровУслуг.Ссылка КАК СсылкаРТУ,
РеализацияТоваровУслуг.СуммаДокумента,
РеализацияТоваровУслуг.МоментВремени
ПОМЕСТИТЬ Таб1
ИЗ Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
УПОРЯДОЧИТЬ ПО ДатаРТУ УБЫВ
ИНДЕКСИРОВАТЬ ПО ДатаРТУ
;
ВЫБРАТЬ
Таб1.СсылкаРТУ
ИЗ Таб1 КАК Таб1
ВНУТРЕННЕЕ СОЕДИНЕНИЕ Таб1 КАК Таб11
ПО Таб1.ДатаРТУ <= Таб11.ДатаРТУ
ГДЕ Таб1.МоментВремени < Таб11.МоментВремени
СГРУППИРОВАТЬ ПО Таб1.СсылкаРТУ
ИМЕЮЩИЕ СУММА(Таб11.СуммаДокумента) < &CуммаЗадолженности
И МАКСИМУМ(Таб1.СуммаДокумента) + СУММА(Таб11.СуммаДокумента) >= &CуммаЗадолженности
В обсуждении статьи //infostart.ru/public/568299/ подборка ссылок про отчеты по просроченной задолженности
//infostart.ru/public/20221/
//infostart.ru/public/58966/
//infostart.ru/public/61295/
//infostart.ru/public/62899/
//infostart.ru/public/68225/
//infostart.ru/public/88999/
//infostart.ru/public/122548/
Аналог среза последних
Можно применять для непериодичных регистров, для которых нет совпадения поля «период» по одинаковым измерениям для разных записей регистра или такими совпадениями можно пренебречь. Похожие рассуждения в статье //infostart.ru/public/140933. Только не написано про возможные ошибки, когда периоды совпадают: в статье такая задача не ставилась.
ВЫБРАТЬ
РаботникиОрганизаций.Сотрудник КАК Сотрудник,
МАКСИМУМ(РаботникиОрганизаций.Период) КАК Период
ПОМЕСТИТЬ Таб1
ИЗ РегистрСведений.РаботникиОрганизаций КАК РаботникиОрганизаций
СГРУППИРОВАТЬ ПО РаботникиОрганизаций.Сотрудник
ИНДЕКСИРОВАТЬ ПО Сотрудник, Период
;
ВЫБРАТЬ
Работники.*
ИЗ Таб1 КАК Таб1
ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.РаботникиОрганизаций КАК Работники
ПО Таб1.Сотрудник = Работники.Сотрудник
И Таб1.Период = Работники.Период
Записи с повторением выбранного поля.
Например, запрос возвращает повторяющиеся значения ИНН из справочника Контрагенты. Применяется группирование по текстовому полю ИНН. Одно время я думал, что так можно делать только по полю ссылочного типа. ))
ВЫБРАТЬ
Контрагенты.ИНН КАК ИНН,
КОЛИЧЕСТВО(РАЗЛИЧНЫЕ Контрагенты.Ссылка) КАК Ссылка
ИЗ Справочник.Контрагенты КАК Контрагенты
СГРУППИРОВАТЬ ПО Контрагенты.ИНН
ИМЕЮЩИЕ КОЛИЧЕСТВО(РАЗЛИЧНЫЕ Контрагенты.Ссылка) > 1
Похожая задача решается через внутреннее соединение //infostart.ru/public/535198
Заменить полное (левое) Соединение на Объединение.
При соединении двух таблиц, могут появляться повторяющиеся записи. Например, в этом случае ключ соединения Номенклатура – Серии Номенклатуры не может быть уникальным из-за измерения «ДокументОприходования». В некоторых случаях это можно устранить с помощью объединения. По тексту запроса есть крупинки полезных ископаемых:
- Применяется редкий синтаксис проверки вхождения (Номенклатура, СерияНоменклатуры) В (ВЫБРАТЬ ….)
- К полю «ДокументОприходования» сначала применяем «Выразить», получаем тип Null или Документ.ПоступлениеТоваровУслуг, затем вычисляем Максимум. В результате получаем одно из поступлений.
- При объединении двух таблиц в числовое поле лучше ставить 0, если поле планируем суммировать и Null, если будет функция Максимум (Минимум)
- Команда ОБЪЕДИНИТЬ ВСЕ не отбрасывает повторения, как команда ОБЪЕДИНИТЬ
- Параметр «Дата» виртуальной таблицы лучше заполнять: иначе SQL вынужден делать дополнительный запрос для его определения.
- Используются Индексы. Для регистра «ТоварыНаСкладах» первое измерение – склад, поэтому индекс не так полезен, как для регистра «ПартииТоваровНаСкладахБУ»
- Самый важный момент: в условия виртуальной таблицы не рекомендуется вставлять сложные условия. Их все нужно проверять раньше во временной таблице или даже позже, в секции «ГДЕ» запроса, содержащего виртуальные таблицы. Более подробно статья«Использование параметра Условие при обращении к ВТ» https://its.1c.ru/db/metod8dev/content/5457 .
ВЫБРАТЬ РАЗЛИЧНЫЕ
СерииНоменклатуры.Владелец КАК Номенклатура,
СерииНоменклатуры.Ссылка КАК Серия
ПОМЕСТИТЬ табТовары
ИЗ Справочник.СерииНоменклатуры КАК СерииНоменклатуры
ГДЕ &РазныеСложныеУсловия
И СерииНоменклатуры.Владелец В ИЕРАРХИИ(&Номенклатура)
ИНДЕКСИРОВАТЬ ПО Серия, Номенклатура
;
ВЫБРАТЬ
Партии.Номенклатура КАК Номенклатура,
Партии.Склад КАК Склад,
ВЫРАЗИТЬ(Партии.ДокументОприходования КАК Документ.ПоступлениеТоваровУслуг) КАК ДокументОприходования,
Партии.КоличествоОстаток КАК КоличествоПартии,
Партии.СтоимостьОстаток КАК СтоимостьПартии,
0 КАК КоличествоОстаток
ПОМЕСТИТЬ табОстатки
ИЗ РегистрНакопления.ПартииТоваровНаСкладахБухгалтерскийУчет.Остатки(&ДатаОстатков,
(Номенклатура, СерияНоменклатуры) В
(ВЫБРАТЬ
табТовары.Номенклатура,
табТовары.Серия
ИЗ табТовары КАК табТовары)) КАК Партии
ОБЪЕДИНИТЬ ВСЕ
ВЫБРАТЬ
Остатки.Номенклатура,
Остатки.Склад,
NULL,
0,
0,
Остатки.КоличествоОстаток
ИЗ РегистрНакопления.ТоварыНаСкладах.Остатки(&ДатаОстатков,
(Номенклатура, СерияНоменклатуры) В
(ВЫБРАТЬ
табТовары.Номенклатура,
табТовары.Серия
ИЗ
табТовары КАК табТовары)) КАК Остатки
ИНДЕКСИРОВАТЬ ПО Склад, ДокументОприходования, Номенклатура
;
ВЫБРАТЬ
Таб1.Номенклатура,
Таб1.Склад,
МАКСИМУМ(Таб1.ДокументОприходования) КАК ДокументОприходования,
СУММА(Таб1.КоличествоПартии) КАК КоличествоПартии,
СУММА(Таб1.СтоимостьПартии) КАК СтоимостьПартии,
СУММА(Таб1.КоличествоОстаток) КАК КоличествоОстаток
ИЗ табОстатки КАК Таб1
СГРУППИРОВАТЬ ПО Таб1.Номенклатура, Таб1.Склад
Вывести нумерованный список справочника с помощью запроса, если есть только наименование, нет кода.
Эта задача встретилась мне на одном из собеседований, несколько лет назад. Решение ниже. Спасибо DonPedroGonsales (saudin) за замеченную опечатку. Спасибо Дмитрий Кондаков (dnkon) за более быстрый код.
ВЫБРАТЬ
Справочник.Ссылка КАК Ссылка,
1 КАК Нумератор
ПОМЕСТИТЬ Таб1
ИЗ Справочник.Справочник КАК Справочник
Индексировать по Ссылка
;
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
Таб1.Ссылка,
СУММА(Таб1.Нумератор) КАК Нумератор
ИЗ Таб1 КАК Таб1
ВНУТРЕННЕЕ СОЕДИНЕНИЕ Таб1 КАК Таб11
ПО Таб1.Ссылка <= Таб11.Ссылка
СГРУППИРОВАТЬ ПО Таб1.Ссылка
УПОРЯДОЧИТЬ ПО Нумератор
Горизонтальное масштабирование
Смотрите подробнее //infostart.ru/public/535198/. В запросе используется интересная конструкция, выбирающая данные из середины таблицы.
ВЫБРАТЬ ПЕРВЫЕ 10000
Контрагенты.Ссылка КАК Ссылка
ПОМЕСТИТЬ Первые1000
ИЗ Справочник.Контрагенты КАК Контрагенты
;
ВЫБРАТЬ ПЕРВЫЕ 1000
Первые1000.Ссылка КАК Ссылка
ИЗ Первые1000 КАК Первые1000
УПОРЯДОЧИТЬ ПО Ссылка УБЫВ
"Неожиданные" результаты обработки NULL
Агрегатные функции корректно обрабатывают Null. В выборке Поле1 = 2.
ВЫБРАТЬ
2 КАК Поле1
ПОМЕСТИТЬ Таб1
ОБЪЕДИНИТЬ ВСЕ
ВЫБРАТЬ
NULL
;
ВЫБРАТЬ
СУММА(Таб1.Поле1) КАК Поле1
ИЗ
Таб1 КАК Таб1
Равенство здесь не применимо. В выборке Поле1 = Ложь, остальные - Null.
ВЫБРАТЬ
ВЫБОР КОГДА NULL = NULL
ТОГДА ИСТИНА
ИНАЧЕ ЛОЖЬ
КОНЕЦ КАК Поле1,
ВЫРАЗИТЬ(NULL КАК СТРОКА(5)) КАК Поле2,
МАКСИМУМ(NULL) КАК Поле3,
СУММА(NULL) КАК Поле4
В выборке Поле1 = Null. Спасибо Maxim Kolkin (the1).
ВЫБРАТЬ
0 + NULL КАК Поле1
Кстати, источником Null могут служить
- левое, правое, полное соединение (кроме внутреннего),
- Арифметические, агрегатные, прочие действия над типом Null
- Неполные, не учитывающие все возможные условия логические выражения, например Выбор Если Тогда Конец (без Иначе)
Используем в запросе Таблицу Значений как параметр.
Кстати, встречался с ситуацией, когда условие "Где" ниже строки "ИЗ &ТаблЧастьПарам КАК ТаблЧасть1" не работает
//1. Создаем в конструкторе запрос.
"ВЫБРАТЬ
| ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка) КАК Номенклатура,
| ЗНАЧЕНИЕ(Справочник.СерииНОменклатуры.ПустаяСсылка) КАК СерияНоменклатуры,
| ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка) КАК Склад,
| 0 КАК Количество
|ПОМЕСТИТЬ ТаблЧасть
|;
|
|////////////////////////////////
|ВЫБРАТЬ
| ТоварыНаСкладахОстатки.Склад,
| ТоварыНаСкладахОстатки.Номенклатура,
| ТоварыНаСкладахОстатки.СерияНоменклатуры,
| СУММА(ТоварыНаСкладахОстатки.КоличествоОстаток) КАК КоличествоОстаток
|ИЗ
| РегистрНакопления.ТоварыНаСкладах.Остатки(
| &ДатаОстатков,
| (Номенклатура, СерияНоменклатуры, Склад) В
| (ВЫБРАТЬ
| ТаблЧасть.Номенклатура,
| ТаблЧасть.СерияНоменклатуры,
| ТаблЧасть.Склад
| ИЗ
| ТаблЧасть КАК ТаблЧасть)) КАК ТоварыНаСкладахОстатки
|
|СГРУППИРОВАТЬ ПО
| ТоварыНаСкладахОстатки.Склад,
| ТоварыНаСкладахОстатки.Номенклатура,
| ТоварыНаСкладахОстатки.СерияНоменклатуры"
//2. По первой таблице запроса создаем типизированную Таблицу Значений без строк. Обратите внимание на условие ГДЕ ЛОЖЬ.
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка) КАК Номенклатура,
| ЗНАЧЕНИЕ(Справочник.СерииНоменклатуры.ПустаяСсылка) КАК СерияНоменклатуры,
| ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка) КАК Склад,
| 0 КАК Количество
|ГДЕ
| ЛОЖЬ";
ТаблЧасть = Запрос.Выполнить().Выгрузить();
//3. Обработка таблицы значений
// Стр = ТаблЧасть.ДобавитьСтроку();
// ТаблЧасть.Свернуть("Номенклатура,СерияНоменклатуры,Склад","Количество");
//4. В запросе переделываем первую таблицу под использование Таблицы Значений как параметра. Не забудьте сделать группировку.
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ТаблЧасть1.Номенклатура,
| ТаблЧасть1.СерияНоменклатуры,
| ТаблЧасть1.Склад,
| ТаблЧасть1.Количество
|ПОМЕСТИТЬ ТаблЧасть
|ИЗ
| &ТаблЧастьПарам КАК ТаблЧасть1
|;
|
|////////////////////////////////
|ВЫБРАТЬ
| ТоварыНаСкладахОстатки.Склад,
| ТоварыНаСкладахОстатки.Номенклатура,
| ТоварыНаСкладахОстатки.СерияНоменклатуры,
| СУММА(ТоварыНаСкладахОстатки.КоличествоОстаток) КАК КоличествоОстаток
|ИЗ
| РегистрНакопления.ТоварыНаСкладах.Остатки(
| &ДатаОстатков,
| (Номенклатура, СерияНоменклатуры, Склад) В
| (ВЫБРАТЬ
| ТаблЧасть.Номенклатура,
| ТаблЧасть.СерияНоменклатуры,
| ТаблЧасть.Склад
| ИЗ
| ТаблЧасть КАК ТаблЧасть)) КАК ТоварыНаСкладахОстатки
|
|СГРУППИРОВАТЬ ПО
| ТоварыНаСкладахОстатки.Склад,
| ТоварыНаСкладахОстатки.Номенклатура,
| ТоварыНаСкладахОстатки.СерияНоменклатуры"
Запрос.УстановитьПараметр("ТаблЧастьПарам",ТаблЧасть);
Запрос.УстановитьПараметр("ДатаОстатков",);
Используем запрос в цикле, с передачей информации внутрь цикла.
МВТ1 = Новый МенеджерВременныхТаблиц;
ЗапросОбщий = Новый Запрос;
ЗапросОбщий.МенеджерВременныхТаблиц = МВТ1;
ЗапросОбщий.Текст =
"ВЫБРАТЬ
| 1 КАК Поле1
|ПОМЕСТИТЬ ОбщаяВТ";
Результат = ЗапросОбщий.Выполнить();
//Создаем запрос, рассчитываем временную таблицу, общую для всех запросов внутри цикла, передаем ее через Менеджер временных таблиц.
Для КК = 1 ПО 10 Цикл
Запрос = Новый Запрос;
Запрос.МенеджерВременныхТаблиц = МВТ1;
Запрос.Текст =
"ВЫБРАТЬ
|3 КАК Поле1
|ПОМЕСТИТЬ ЧастнаяВТ
|;
|ВЫБРАТЬ
|ОбщаяВТ.Поле1,
|ЧастнаяВТ.Поле1 КАК Поле11
|ИЗ
|ОбщаяВТ КАК ОбщаяВТ
|ПОЛНОЕ СОЕДИНЕНИЕ ЧастнаяВТ КАК ЧастнаяВТ ПО ИСТИНА
|;
|УНИЧТОЖИТЬ ЧастнаяВТ";
Запрос.Выполнить();
//Внутри цикла можно использовать Общую для всех временную таблицу, а любые другие временные таблицы нужно удалять.
КонецЦикла;
Сравнение полного соединения и декартова произведения
ВЫБРАТЬ 1 КАК один ПОМЕСТИТЬ Таб1;
ВЫБРАТЬ 2 КАК два ПОМЕСТИТЬ Таб2;
ВЫБРАТЬ Таб1.один, Таб2.два ИЗ Таб2 КАК Таб2 ПОЛНОЕ СОЕДИНЕНИЕ Таб1 КАК Таб1 ПО ИСТИНА
//Возвращает выборку 1,2;
ВЫБРАТЬ 1 КАК один ПОМЕСТИТЬ Таб1;
ВЫБРАТЬ 2 КАК два ПОМЕСТИТЬ Таб2;
ВЫБРАТЬ Таб1.один, Таб2.два ИЗ Таб2 КАК Таб2, Таб1 КАК Таб1
//Возвращает выборку 1,2;
ВЫБРАТЬ 1 КАК один ПОМЕСТИТЬ Таб1 ГДЕ ЛОЖЬ;
ВЫБРАТЬ 2 КАК два ПОМЕСТИТЬ Таб2;
ВЫБРАТЬ Таб1.один, Таб2.два ИЗ Таб2 КАК Таб2 ПОЛНОЕ СОЕДИНЕНИЕ Таб1 КАК Таб1 ПО ИСТИНА
//Возвращает выборку null,2;
ВЫБРАТЬ 1 КАК один ПОМЕСТИТЬ Таб1 ГДЕ ЛОЖЬ;
ВЫБРАТЬ 2 КАК два ПОМЕСТИТЬ Таб2;
ВЫБРАТЬ Таб1.один, Таб2.два ИЗ Таб2 КАК Таб2, Таб1 КАК Таб1
//Возвращает пусто.
Формирование текста запроса в цикле
Текст0 =
"ВЫБРАТЬ
| АвансовыйОтчет.Ссылка КАК ДокСсылка
|ИЗ
| Документ.АвансовыйОтчет КАК АвансовыйОтчет
|ГДЕ
| АвансовыйОтчет.Дата >= &Дата";
Текст1 = "";
Для Каждого Док ИЗ Метаданные.Документы Цикл
Если Текст1 = "" Тогда
Текст1 = СтрЗаменить(Текст0,"АвансовыйОтчет",Док.Имя);
Иначе
Текст1 = Текст1 + Символы.ПС + "ОБЪЕДИНИТЬ ВСЕ" + Символы.ПС + СтрЗаменить(Текст0,"АвансовыйОтчет",Док.Имя);
КонецЕсли;
КонецЦикла;
Запрос = Новый Запрос;
Запрос.Текст = Текст1;
Запрос.УстановитьПараметр("Дата", НачалоГода(ТекущаяДата()) );
Результат = Запрос.Выполнить();
Все родители элемента справочника одним запросом.
Элегантное решение вместо неуклюжего Родитель.Родитель. Спасибо А.Волокитину за идею.
ВЫБРАТЬ
Данные.Ссылка КАК Ссылка
ИЗ
Справочник.Контрагенты КАК Данные
ГДЕ
Данные.Ссылка = &ЭлементСправочника
ИТОГИ ПО
Ссылка ТОЛЬКО ИЕРАРХИЯ
Остатки на каждый день по РегистрНакопления.ОстаткиПоЯчейкам
Внешний вид громоздкий, но считает максимально быстро. Делать запрос к временной таблице на каждый день в цикле нецелесообразно, поскольку внутри СУБД будут неявно исполняться запросы похожей конструкции.
- Получаем перекрестную таблицу: каждая ячейка на каждый день. Дни получаем из регистра, но можно использовать любую другую таблицу.
- К входящим остаткам добавляем приход и расход на каждый день. Виртуальные таблицы группированы по измерениям.
- Соединение один ко многим. Остаток на каждый день получаем, как добавку к начальному остатку приращений на каждый день, прошедший с начальной даты по нужную.
ВЫБРАТЬ
Ячейки.Ссылка КАК Ссылка,
ОстаткиПоЯчейкамОбороты.Период КАК Период
ПОМЕСТИТЬ ВТ_Ячейки
ИЗ Справочник.Ячейки КАК Ячейки
ПОЛНОЕ СОЕДИНЕНИЕ
(ВЫБРАТЬ РегистрОстатков.Период КАК Период ИЗ
РегистрНакопления.ОстаткиПоЯчейкам.Обороты(&НачалоПериода,
&КонецПериода, День, ) КАК РегистрОстатков) КАК ОстаткиПоЯчейкамОбороты
ПО (ИСТИНА)
ИНДЕКСИРОВАТЬ ПО Ссылка,Период
;
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
ОстаткиПоЯчейкамОстатки.Ячейка КАК Ячейка,
ОстаткиПоЯчейкамОстатки.КоличествоОстаток КАК КоличествоОстаток,
ОстаткиПоЯчейкамОстатки.Номенклатура КАК Номенклатура,
ДАТАВРЕМЯ(1, 1, 1) КАК Период
ПОМЕСТИТЬ ВТ_ОстаткиПоЯчейкам
ИЗ РегистрНакопления.ОстаткиПоЯчейкам.Остатки(&НачалоПериода, ) КАК ОстаткиПоЯчейкамОстатки
ОБЪЕДИНИТЬ ВСЕ
ВЫБРАТЬ
ОстаткиПоЯчейкамОбороты.Ячейка,
ОстаткиПоЯчейкамОбороты.КоличествоПриход - ОстаткиПоЯчейкамОбороты.КоличествоРасход,
ОстаткиПоЯчейкамОбороты.Номенклатура,
ОстаткиПоЯчейкамОбороты.Период
ИЗ РегистрНакопления.ОстаткиПоЯчейкам.Обороты(&НачалоПериода, &КонецПериода, День, ) КАК ОстаткиПоЯчейкамОбороты
ИНДЕКСИРОВАТЬ ПО Ячейка,Период
;
////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
ВТ_Ячейки.Ссылка КАК Ячейка,
ВТ_Ячейки.Период КАК Период,
СУММА(ЕСТЬNULL(ОстаткиПоЯчейкамОстатки.КоличествоОстаток, 0)) КАК КоличествоОстаток,
ОстаткиПоЯчейкамОстатки.Номенклатура КАК Номенклатура
ИЗ ВТ_Ячейки КАК ВТ_Ячейки
ЛЕВОЕ СОЕДИНЕНИЕ ВТ_ОстаткиПоЯчейкам КАК ОстаткиПоЯчейкамОстатки
ПО ВТ_Ячейки.Ссылка = ОстаткиПоЯчейкамОстатки.Ячейка
И ВТ_Ячейки.Период > ОстаткиПоЯчейкамОстатки.Период
СГРУППИРОВАТЬ ПО ВТ_Ячейки.Ссылка, ВТ_Ячейки.Период, ОстаткиПоЯчейкамОстатки.Номенклатура
