Ускорение работы со списком документов, в котором при выводе строки выполняется запрос по регистрам или ещё что-нибудь трудоемкое

10.09.12

Разработка - Запросы

Для ускорения работы со списком документов, в котором при выводе строки выполняется запрос по регистрам или ещё что-нибудь трудоемкое, нужно уменьшить количество выполнений запроса.

Для того чтоб запрос не выполнялся каждый раз при переходах по списку можно использовать Соответствие, которое будет выполнять роль временного хранилища результатов запросов.

Для ускорения работы со списком документов, в котором при выводе строки выполняется запрос по регистрам или ещё что-нибудь трудоемкое, нужно уменьшить количество выполнений запроса.

Для того чтоб запрос не выполнялся каждый раз при переходах по списку можно использовать Соответствие, в котором будет храниться результат запроса. Если запрос по текущему документу уже выполнялся, его результат будет найден в соответствии.

Один недостаток, что данные в соответствии могут устареть за то время что открыт журнал. Но их можно обновить переоткрыв журнал.

Ниже пример кода в модуле формы списка:

Перем СводОстатков;
Процедура СписокПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)  
    НайденныйОстаток = СводОстатков.Получить(ДанныеСтроки.Ссылка);
    Если НайденныйОстаток = Неопределено Тогда      
        Запрос = Новый Запрос;   
        Запрос.Текст="ВЫБРАТЬ                
        | ЗаказыПоставщикамОстатки.КоличествоОстаток                
        |ИЗ                
        | РегистрНакопления.ЗаказыПоставщикам.Остатки КАК ЗаказыПоставщикамОстатки                
        |ГДЕ                
        | ЗаказыПоставщикамОстатки.ЗаказПоставщику = &ссылка" ;   
        Запрос.УстановитьПараметр("Ссылка", ДанныеСтроки.Ссылка);   
        Рез = Запрос.Выполнить();   
        Если Рез.Пустой() Тогда    
            ОформлениеСтроки.ЦветФона = WebЦвета.Белый;     
            СводОстатков.Вставить(ДанныеСтроки.Ссылка,0);  
        Иначе    
            ОформлениеСтроки.ЦветФона = WebЦвета.СветлоКоралловый;   
            СводОстатков.Вставить(ДанныеСтроки.Ссылка,1);  
        КонецЕсли;   
    Иначе   
        Если НайденныйОстаток = 0 Тогда    
            ОформлениеСтроки.ЦветФона = WebЦвета.Белый;    
        Иначе    
            ОформлениеСтроки.ЦветФона = WebЦвета.СветлоКоралловый;   
        КонецЕсли;   
    КонецЕсли;   
КонецПроцедуры

СводОстатков =  Новый Соответствие();

Вступайте в нашу телеграмм-группу Инфостарт

См. также

SALE! %

Инструментарий разработчика Роли и права Запросы СКД Программист Руководитель проекта 1С:Предприятие 8 Платные (руб)

Инструменты для разработчиков 1С 8.3: Infostart Toolkit. Автоматизация и ускорение разработки на управляемых формах. Легкость работы с 1С.

16500 15500 руб.

02.09.2020    235506    1286    419    

1099

Инструментарий разработчика Запросы Программист 1С:Предприятие 8 1С:Зарплата и кадры государственного учреждения 3 1С:Зарплата и Управление Персоналом 3.x Абонемент ($m)

QueryConsole1C — расширение, включающее консоль запросов с поддержкой исполняемых представлений — аналогов виртуальных таблиц, основанных на методах программного интерфейса ЗУП. Оно позволяет выполнять запросы с учётом встроенной бизнес-логики, отлаживать алгоритмы получения данных и автоматически генерировать код на встроенном языке 1С.

1 стартмани

16.05.2025    8161    108    zup_dev    22    

78

Инструментарий разработчика Запросы Программист 1С:Предприятие 8 1С:ERP Управление предприятием 2 Абонемент ($m)

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

2 стартмани

05.03.2025    5296    19    XilDen    12    

29

Обновление 1С Запросы Программист 1С:Предприятие 8 1С:ERP Управление предприятием 2 Абонемент ($m)

Данный инструмент помогает анализировать доработанную конфигурацию после обновления на новый релиз и находить «битые» тексты запросов, в которых участвуют несуществующие в новом релизе метаданные.

3 стартмани

06.02.2025    4822    30    XilDen    26    

42

Запросы Программист 1С:Предприятие 8 1C:Бухгалтерия Бесплатно (free)

В статье приведена удобная возможность отладки исполняемого запроса динамического списка.

03.12.2024    10695    artemusII    11    

27

Запросы Программист Бесплатно (free)

Увидел cheatsheet по SQL и захотелось нарисовать подобное, но про запросы.

18.10.2024    20135    sergey279    18    

73

Запросы Программист 1С:Предприятие 8 1C:Бухгалтерия Бесплатно (free)

Столкнулся с интересной ситуацией, которую хотел бы разобрать, ввиду её неочевидности. Речь пойдёт про использование функции запроса АВТОНОМЕРЗАПИСИ() и проблемы, которые могут возникнуть.

11.10.2024    14878    XilDen    38    

110
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. akomar 461 10.09.12 13:27 Сейчас в теме
Вы предполагаете изменять модуль формы или модуль объекта типовой?
6. khaoos 239 11.09.12 09:46 Сейчас в теме
(1) в типовых конфигурациях, я думаю, не встретишь тяжелых запросов при выводе каждой строки. А вот в "допиленных" - это сколько угодно :).
2. Dimasik2007 430 10.09.12 13:43 Сейчас в теме
ПриВыводеСтроки не совсем удачная идея. Лучше данные сразу получать порциями в процедуре ПриПолученииДанных.
Подробности курим тут: http://kb.mista.ru/article.php?id=310
mtv:); artbear; +2 Ответить
3. Модератор раздела 10.09.12 15:55 Сейчас в теме
(0) Неудачная реализация, намного лучше/быстрее/производительнее ПриПолученииДанных.
Правда, не во всех списках оно работает. Правда, в каких списках его нет, навскидку не вспомню :)
4. Dimasik2007 430 10.09.12 16:55 Сейчас в теме
Пример быстрой раскраски:





Функция ПолучитьМассивСсылокОформленияСтрок(ОформленияСтрок)

Массив = Новый Массив;

Для каждого
ОформлениеСтроки Из ОформленияСтрок Цикл
Массив.Добавить(ОформлениеСтроки.Данныестроки.Ссылка);
КонецЦикла;

Возврат
Массив;

КонецФункции
// ПолучитьСписокСсылок(ОформленияСтрок)

Функция ПолучитьТаблицаНаличиеФайлов (МассивСсылокОформления)

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| КОЛИЧЕСТВО(РАЗЛИЧНЫЕ _ФайловоеХранилищеСрезПоследних.Путь) КАК КоличествоФайлов,
| _ФайловоеХранилищеСрезПоследних.Документ как Ссылка
|ИЗ
| РегистрСведений._ФайловоеХранилище.СрезПоследних(, Документ В (&МассивСсылокОформления)) КАК _ФайловоеХранилищеСрезПоследних
|
|СГРУППИРОВАТЬ ПО
| _ФайловоеХранилищеСрезПоследних.Документ"
;

Запрос.УстановитьПараметр("МассивСсылокОформления", МассивСсылокОформления);

Возврат
Запрос.Выполнить().Выгрузить();

КонецФункции
// ПолучитьТаблицаНаличиеФайлов(ОформленияСтрок)()

// отрисуем значок прикрепленных файлов к документу
Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)
МассивСсылокОформления = ПолучитьМассивСсылокОформленияСтрок(ОформленияСтрок);
ТаблицаДанныхНаличиеФайлов = ПолучитьТаблицаНаличиеФайлов (МассивСсылокОформления);

Для каждого
ОформлениеСтроки Из ОформленияСтрок Цикл
СтрокаОформленияСтрок = ТаблицаДанныхНаличиеФайлов.Найти(ОформлениеСтроки.ДанныеСтроки.Ссылка, "Ссылка");
Если
СтрокаОформленияСтрок <> неопределено Тогда
Если
ЗначениеЗаполнено(СтрокаОформленияСтрок.КоличествоФайлов) Тогда
ОформлениеСтроки.Ячейки.Номер.УстановитьКартинку(БиблиотекаКартинок._Скрепка);
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
5. Dimasik2007 430 10.09.12 16:57 Сейчас в теме
Таблицу использовал, потому что отрисовывал еще количество файлов, а так можно использовать все тоже соответствие.
7. zergey128 8 12.09.12 09:49 Сейчас в теме
Автор,курите типовые, а не изобретайте велосипед.
Для отправки сообщения требуется регистрация/авторизация