Форум Программирование Общие вопросы программирования (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 3443 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:

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

Система компоновки данных (медленный вывод в коллекцию значений при РСВ) (1) 1 $m Dev УПП1 v8::СКД	1	вчера, 18:48 StAlexei
Отчёт СКД. Данные выводятся не в те ту строку. (2) 0.9 $m Dev УТ11 v8 ИТ-компания 1С	2	вчера, 10:18 user1500067
Путевые листы в БП 3.0 (6) 0.5 $m TMS БП3.0	6	12.04.2021 German_Tagil
Тонкая настройка СКД (добавление строки) (8) 1.49 $m Dev	8	09.04.2021 Shecurok
Доработать запрос отчета в СКД для регистра сведений Цены Номенклатуры (8) 0.5 $m Dev	8	08.04.2021 rosenword
Как выгрузить список новых созданных контрагентов (создаются программно) (16) 1 $m Dev	16	08.04.2021 Shecurok
Синхронизация УТ 11.4 и БП 3.0, справочник Виды номенклатуры (2) 0.09 $m Обмен БП3.0 УТ11	2	08.04.2021 Grek_Master
Курсовые разницы в РБ по 159 указу (0) 2 $m БУ 1cv8.cf БП1.6 Беларусь 1С БУ Бухгалтер Программист Вопрос	0	07.04.2021 keyn5565`
Доступ в 1С по web-сервису. Внутренний и внешний сервера. (21) 0.44 $m Admin v8	21	06.04.2021 TVA_11
Не отображается общая параметризуемая команда в списке глобальных команд на форме элемента (1) 0.1 $m Dev	1	06.04.2021 Symbiat
Проблема при возврате по безналу бп 3.0 (1) 1 $m БУ	1	05.04.2021 seva1405
Нужна помощь в доработке обработки СБИС (12) 5 $m Dev УТ10	12	05.04.2021 al_zzz
Не указано значение параметра "Тип кода маркировки" (4) 0.15 $m Dev УТ11 Маркировка	4	05.04.2021 user1003434
Резервы отпусков разница БУ и НУ (18) 1 $m Зарплата ЗУП3.x	18	02.04.2021 Romanets
Не удалось заблокировать таблицу _NODE15215 (14) 0.5 $m Dev ДО УТ11	14	01.04.2021 BlinOFF
УТ 10.3. Маркировка. ОСНО + ПСН (2) 3 $m Торговля УТ10 Розничная и сетевая торговля (FMCG) НДС ПСН (патентная система налогообложения) Вопрос	2	01.04.2021 dvshaymardanov
Проверка при обмене (3) 0.16 $m Dev	3	01.04.2021 smzaly
Не переносится номенклатура в 1с Бухгалтерию (18) 1 $m Торговля Розница	18	01.04.2021 user1433617
УТ 11.4 автоматическое создание документа "Установка цен номенклатуры" при проведение "Приобретения товаров и услуг" (23) 1 $m Dev	23	30.03.2021 serg_art
Не проходит обмен по расписанию УТ 10.3 - БП 3.0 (Базовая) (24) 1 $m Dev	24	24.03.2021 user973528