Форум Программирование Общие вопросы программирования (Dev)

Запрос в 7.7

Оперативный учет 7.7

1. n_spb 18.12.16 19:21 Сейчас в теме

Подскажите по запросу в 7.7. Нужно выбрать все элементы справочника номенклатура из определенной группы.
Сделал так:

Запрос = СоздатьОбъект("Запрос");
		    ТекстЗапроса = "
		    |Обрабатывать Все;
		    |Спр   = Справочник.Номенклатура.ТекущийЭлемент;
		    |Условие(Спр в ВыбНоменклатура);
		    |Группировка Спр Все;
		    |";

В ВыбНоменклатура группа справочника из которой нужно выбрать все элементы и группы.

Ответы

В избранное Подписаться на ответы

Свернуть все

4. DWZ2 20.12.16 05:53 Сейчас в теме

(1)

Я бы лично писал просто

|Группировка Спр;

ВыбНоменклатура, кстати, должна быть группой и не пустым значением, то есть должно быть ВыбНоменклатура.Выбран()=1.

А что конкретно не работает / работает не так?

2. Harry_udm 2 18.12.16 22:23 Сейчас в теме

Ну так и проверьте: работает ли? Должно работать...
Конструктор запросов выдает практически такую же структуру:

	ТекстЗапроса = "
	|Спр = Справочник.Номенклатура.ТекущийЭлемент;
	|Группировка Спр все;
	|Условие(Спр в ВыбНоменклатура);
	|;";

6. n_spb 20.12.16 21:02 Сейчас в теме

(2) Мой вариант, работает. Делал его без конструктора, сомневался просто, что грамотно его сделал. Подскажите, где про запросы и конструктор в 7.7 почитать.
(4) Работает. А где написать ВыбНоменклатура.Выбран()=1?

7. DWZ2 20.12.16 22:41 Сейчас в теме

(6)

Мой вариант, работает.

Значит, не страшно.

Делал его без конструктора, сомневался просто, что грамотно его сделал.

Просто обычно со словом "Группировка" пишут КОГДА НАДО или "Без Групп" или "Упорядочить По". А когда не надо - ничего не пишут.

Подскажите, где про запросы и конструктор в 7.7 почитать.

В ЖКК - жёлто-красных книжках, то есть в документации по Конфигуратору (2 тома) и по языку (тоже 2 тома).

А где написать ВыбНоменклатура.Выбран()=1?

Нигде :). Я просто хотел сказать, что элемент управления ВыбНоменклатура не должен быть пустым, то есть должен содержать ссылку на конкретную группу справочника "Номенклатура". Некоторые думают, что если он будет пустым, отбор по номенклатуре работать не будет, и они получат весь справочник. А на самом деле будут только элементы, у которых пустой родитель, то есть те, которые находятся в корне справочника. Часто таких не бывает - и на выходе запроса пусто.

А вообще "в лучших домах" пишут так:


Если ВыбНоменклатура.Выбран()=1 Тогда
    // 
    Если ВыбНоменклатура.ЭтоГруппа()=1 Тогда
         ТекстЗапроса=ТекстЗапроса+"
                                  |Условие (Спр В ВыбНоменклатура);";
    Иначе
         ТекстЗапроса=ТекстЗапроса+"
                                  |Условие (Спр = ВыбНоменклатура);";
   КонецЕсли;
КонецЕсли;

Показать

Обратите внимание, что в условиях точка с запятой стоит 2 раза до и после кавычки. Первый раз она относится к тексту запроса, а второй - к программе 1С.

Также рекомендую разбивать запрос на строчки, то есть писать НЕ

ТекстЗапроса=ТекстЗапроса+"Условие (Спр В ВыбНоменклатура);";

ТекстЗапроса=ТекстЗапроса+"
                                  |Условие (Спр В ВыбНоменклатура);";

или

ТекстЗапроса=ТекстЗапроса+РазделительСтрок+"Условие (Спр В ВыбНоменклатура);";

Так будет легче прочесть при отладке текст запроса, который сгенерировала программа, и не будет проблем, если решите закомментировать какую-то строчку в тексте запроса.

Кстати, если будете смотреть текст ВНЕ отладчика, делайте через Предупреждение(), а не через Сообщить(). Не забудьте только убрать :))), а то пользователи будут недовольны.

3. CheBurator 3439 20.12.16 01:12 Сейчас в теме

http://www.forum.mista.ru/topic.php?upd&id=787569

5. DWZ2 20.12.16 06:14 Сейчас в теме

(3)

Там не про семёрочный запрос.

8. DWZ2 20.12.16 22:53 Сейчас в теме

Кстати, если не нужно группировать, и данные хранятся в виде DBF, то будет быстрее через цикл с ВыбратьЭлемент()/ПолучитьЭлемент(). Так как:

1) С запросом у Вас будет 2 прохода по базе, а так один. (Правда, второй может быть меньше, если в запросе стоит "мощное" условие)

2) Можно будет использовать индекс в БД через свойство "Сортировка" у реквизита. Запрос по справочникам индексы НЕ использует.

9. DWZ2 21.12.16 12:24 Сейчас в теме

Кстати, в запросе можно фильтровать по списку значений, в том числе в виде органа управления в форме. В этом списке могут быть и элементы и группы в любом сочетании. Тут уж "В" работает в обоих случаях. Если элемент списка - элемент справочника, то 1С автоматически проверяет на равенство, а если группа - на вхождение. То есть можно писать

Если ВыбНоменклатура.РазмерСписка()>0 Тогда
         ТекстЗапроса=ТекстЗапроса+"
                                  |Условие (Спр В ВыбНоменклатура);";
КонецЕсли;

Для отчетов можно написать:

Если ВыбНоменклатура.РазмерСписка()>0 Тогда
      ЗаголовокПоНоменклатуре  ="По всей номенклатуре";
      ТекстЗапроса=ТекстЗапроса+"
                                  |Условие (Спр В ВыбНоменклатура);";
Иначе
      ЗаголовокПоНоменклатуре  ="По номенклатуре из списка: " +    ВыбНоменклатура.ВСтрокуСРазделителями();
КонецЕсли;

Показать

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

Лично мне лень переключать алфавит для печать знака ">", поэтому я пишу наоборот:

Если ВыбНоменклатура.РазмерСписка()=0 Тогда
      ЗаголовокПоНоменклатуре  ="По номенклатуре из списка: " +    ВыбНоменклатура.ВСтрокуСРазделителями();

Иначе
      ЗаголовокПоНоменклатуре  ="По всей номенклатуре";
      ТекстЗапроса=ТекстЗапроса+"
                                  |Условие (Спр В ВыбНоменклатура);";

КонецЕсли;

Показать

К тому же это в стиле кого-то из корифеев программирования - чтобы не запутаться, делать первую ветку условия короче или заменять вторую по обстоятельствам на "Продолжить", "Прервать" или "Возврат".

Оставьте свое сообщение

E-mail:

Вопросы с вознаграждением

Открыть форму записи регистра с параметром из формы справочника (5) 0.35 $m Dev v8	5	сегодня, 16:17 user824140
Запретить печатать документ "Товарный чек", пока статус Чека ККМ не будет "Чек пробит", а сам Чек ККМ не будет проведен. (6) 1 $m Dev УТ11 v8	6	сегодня, 12:00 LastSoldier
Помогите добавить в запрос поле с выборкой со счета 90.03 (7) 0.87 $m Dev	7	26.02.2021 Shecurok
Почему 27 счёт не попадает в поле счёт учёта ? (27) 0.27 $m Dev БГУ	27	26.02.2021 Terabaytus
Необходимо в вузе разработать информационную систему для отчетности преподавателей по выполнению научных показателей (32) 2 $m Управление персоналом Обучение, бизнес-тренинг, курсы Автоматизация Аналитика УУ	32	26.02.2021 delta
Помогите, пожалуйста, разобраться с выводом среднего в отчёте СКД (6) 0.43 $m Dev УТ11 v8 ИТ-компания 1С Программист	6	26.02.2021 user1500067
УТ 10.3 изменяет количетсво товара в чеке ККМ при продаже БезПередачиТовара (9) 0.4 $m Dev	9	26.02.2021 andrey7617
Ошибка СУБД при входе в базу 1С (37) 0.55 $m Admin СУБД PostgreSQL	37	25.02.2021 dimonas
Работа с файлами на мобильном клиенте (8) 0.3 $m MobileDev v8::Mobile	8	24.02.2021 irlandets1980
Грейды программистов 1с (25) 10 $m Общие вопросы управления	25	24.02.2021 maguga
MDF SQL ищу битый файл для теста DataNumen SQL Recovery (10) 1 $m Utils	10	22.02.2021 XAKEP
Как получить значение имея НавигационнуюСсылку к полю (2) 0.25 $m Dev	2	21.02.2021 AlexxSys
Мобильный клиент. Android. Обрезает строку ввода от сканера (3) 0.35 $m MobileDev	3	21.02.2021 gamletspb
Не приходит письмо от apple после ввода карты для оплаты. (10) 5 $m MobileDev	10	20.02.2021 maksa2005
Прикрепленная подпись и БСП. Возможно ли? (10) 1 $m БСП 8.3.14	10	20.02.2021 mat skywalker
заглушка на запуск (управляемое приложение) (7) 1 $m Dev	7	19.02.2021 morrex
Сложный расчет ЗП в бухгалтерии (Нужен совет по реализации) (12) 2 $m Зарплата БП3.0 v8	12	19.02.2021 Dilovar9
Перетаскивание в списке справочника (3) 0.15 $m Dev	3	18.02.2021 user1292093
загрузка базы из dt (60) 2 $m Admin	60	18.02.2021 doctorov_s
Списание задолженности в валюте управленческого учета (5) 1 $m Финансы УТ11	5	18.02.2021 gmtv