Как ускорить работу ert-а?

как вариант выводить представление() ,а не весь елемент

для поиска по первым символам, можно в запросе указать Условие ( наименование >= искстрока) Условие ( наименование < искстрока2 )

где искстрока2 заменой последнего символа на символ с кодом на 1 больше.

Пример: если нужно найти абв то искстрока = "абв"; искстрока2 = "абг";

для скл версии выгрыш в скорости будет ощутимый.

для дбф - не знаю.

На SQL базах обычно быстрей выбрать запросом элементы справочника с их наименованиями, чем перебирать элементы.

Всем спасибо, база dbf пользователи сидят через терминалы, попробую изменить код как посоветовали)

Все сделал. Результат - время поиска до оптимизации кода:27сек, после:10сек. Отлично) Спасибо помогающим! Еще ускориться как-то можно? Железом?

Попробуйте, может так будет быстрее:

Но лучше конечно !С++ и 1sqlite и запрос будет работать гораздо шустрее.

Вот это нафига? Чтобы не слишком ускоряться? Ну, тогда дальше сами...

Можно так:

Может, вы не заметили, но Спр.Наименование, Спр.ЭтоГруппа(), да и Спр.ПометкаУдаления() обходятся без второго чтения, оно осуществляется только при нахождении искомых элементов. В таких случаях да, мой код помедленнее отработает.

Зато в нем не будет вычисления Спр.ТекущийЭлемент() на каждом элементе, попадет он потом в выборку или нет.

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

Вот ваш запрос может дать существенно другие результаты за счет переноса процесса перебора из интерпретируемого кода внутрь движка 1С, а будут они лучше или хуже - ХЗ.

P.S. Интересно, автор учитывает, что при втором и последующих запусках обработки она может отрабатывать быстрее в разы за счет того, что справочник попал в кэш?

Cooler Согласен конкретно в этом примере это лишнее. Лучше тогда:

Но надо проверить какой алгоритм будет быстрее через перебор или через запрос 1С (если не хочется делать через прямой запрос в базе).

+32
это значит, что в случае

он будет вполнять и присваивание, и сложение, и сравнение

неточно цитируешь. Перед этим сравнением выполняется икс=0;
И именно умный компилятор увидит, что условие верно _всегда_, и в скомпилированном коде сравнение будет отсутствовать.
Компилятор не будет ругаться на неоптимальный код, он просто его соптимизирует.

Поскольку 7.7. не является компилятором - то ему оптимизация не грозит :).

и я об этом же. см посты 31-32

Четкой границы между компилятором и интерпретатором нет. В том же Java происходит сначала компиляция исходного кода в байт-код, потом интерпретация программы на байт-коде.

для дбф базы, заготовка
.
//==========================================================­============
Функция ПоискПоПодстрокеSQlite()

//если здесь - значит на периферии
//примем административное правило, на периферии - ДБФ базы
Попытка
глВКлайт.Открыть(":memory:");
Запрос = глВКлайт.НовыйЗапрос();
Запрос.ВыполнитьЗапрос("create virtual table Товары using dbeng(Справочник.Номенклатура)");
Исключение
//тОшибка = "инфо: проблема при выполнении запроса инициализации вирт.таблицы, при случае - сообщите программисту: "+ОписаниеОшибки();
//Сообщить(тОшибка);
Возврат 0;
КонецПопытки;

//ОТЛАДКА
//Сообщить("работаем SQLite");

РазбиваемаяСтрока = ПодСтрокаПоиска;
РазбиваемаяСтрока = СтрЗаменить(РазбиваемаяСтрока,"'","");
РазбиваемаяСтрока = СтрЗаменить(РазбиваемаяСтрока,"""","");
РазбиваемаяСтрока = СтрЗаменить(СокрЛП(РазбиваемаяСтрока)," ",РазделительСтрок);

ТекстЗапроса = "SELECT
|Товары.id [Элемент :Справочник.Номенклатура]
|FROM Товары
|WHERE Товары.isfolder=2 and Товары.ismark <> '*'";

Для Индекс = 1 По СтрКоличествоСтрок(РазбиваемаяСтрока)
Цикл Слово = Врег(СтрПолучитьСтроку(РазбиваемаяСтрока,Индекс));

Если ПустоеЗначение(Слово)=1
Тогда Продолжить;
КонецЕсли;
ТекстЗапроса = ТекстЗапроса+"
|AND UPPER(Товары.descr) LIKE '%"+Слово+"%'";
КонецЦикла;

//ТекстЗапроса = ТекстЗапроса+"
//|ORDER BY Элемент.descr";

ТЗраб = СоздатьОбъект("ТаблицаЗначений");
Попытка
_время1 = _GetPerformanceCounter();
Запрос.ВыполнитьЗапрос(ТекстЗапроса).Выгрузить(ТЗраб);
//Сообщить((_GetPerformanceCounter()-_время1)/1000);
//ч=1/0;
Исключение
глВКлайт.Закрыть();
тОшибка = "ошибка при выполнении запроса, сообщите программисту: "+ОписаниеОшибки();
Сообщить(тОшибка);
Возврат 0;
КонецПопытки;
глВКлайт.Закрыть();