Как запросом отобрать элементы справочника определенной папки?
По теме из базы знаний
Найденные решения
(1)
https://forum.mista.ru/topic.php?id=17913
1С 7.7
"//{{ЗАПРОС(ОстаткиНаСкладах)
|Период с ДатаДок по ТекДок ;
|ВидМПЗрег = Регистр.МестаХранения.ВидМПЗ;
|МПЗрег = Регистр.МестаХранения.МПЗ;
|МХ = Регистр.МестаХранения.МестоХранения;
|Колво = Регистр.МестаХранения.Количество;
|Функция КоличествоКонОст = КонОст(Колво);
|Группировка ВидМПЗрег;
|Группировка МПЗрег без групп;
|Условие (МХ = МестоХранения);
|Условие (МПЗрег в ВыбГруппа);
Показать
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|ТекущийЭлемент = Справочник.Контрагенты.ТекущийЭлемент;
|Наименование = Справочник.Контрагенты.Наименование;
|Родитель = Справочник.Контрагенты.Родитель;
|ЕДРПОУ = Справочник.Контрагенты.ЕДРПОУ;
|Группировка ТекущийЭлемент без групп;
|Условие (ТекущийЭлемент.ПринадлежитГруппе(Выбродитель) = 1);
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей ТекущийЭлемент
Таб.ВывестиСекцию("ТекущийЭлемент");
КонецЦикла;
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры
ПоказатьВыбРодитель - это группа контрагентов на форме обработки
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1)
https://forum.mista.ru/topic.php?id=17913
1С 7.7
"//{{ЗАПРОС(ОстаткиНаСкладах)
|Период с ДатаДок по ТекДок ;
|ВидМПЗрег = Регистр.МестаХранения.ВидМПЗ;
|МПЗрег = Регистр.МестаХранения.МПЗ;
|МХ = Регистр.МестаХранения.МестоХранения;
|Колво = Регистр.МестаХранения.Количество;
|Функция КоличествоКонОст = КонОст(Колво);
|Группировка ВидМПЗрег;
|Группировка МПЗрег без групп;
|Условие (МХ = МестоХранения);
|Условие (МПЗрег в ВыбГруппа);
Показать
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|ТекущийЭлемент = Справочник.Контрагенты.ТекущийЭлемент;
|Наименование = Справочник.Контрагенты.Наименование;
|Родитель = Справочник.Контрагенты.Родитель;
|ЕДРПОУ = Справочник.Контрагенты.ЕДРПОУ;
|Группировка ТекущийЭлемент без групп;
|Условие (ТекущийЭлемент.ПринадлежитГруппе(Выбродитель) = 1);
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
// Подготовка к заполнению выходных форм данными запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей ТекущийЭлемент
Таб.ВывестиСекцию("ТекущийЭлемент");
КонецЦикла;
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать", "");
КонецПроцедуры
ПоказатьВыбРодитель - это группа контрагентов на форме обработки
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот