Конструкция «Для каждого» в 1С: принципы работы, синтаксис и скрытые возможности

Конструкция «Для каждого» в 1С:Предприятие — одна из самых востребованных среди разработчиков, но её нюансы часто остаются за кадром. На первый взгляд, это простой цикл для перебора коллекций, но под капотом скрываются особенности, которые влияют на производительность, корректность работы с данными и даже безопасность кода. Почему в некоторых случаях Для Каждого Из работает медленнее альтернатив? Как избежать типичных ошибок при изменении элементов прямо в цикле? И почему опытные программисты иногда предпочитают ему Пока?

Эта статья не просто объяснит синтаксис — она раскроет механизмы внутренней оптимизации цикла в платформе 1С, покажет реальные кейсы из практики (включая работу с большими массивами данных и транзакциями), и даст чек-лист для проверки вашего кода на скрытые «подводные камни». Особое внимание уделено различиям между управляемым и обычным приложением, а также тонкостям работы с динамическими списками и запросами.

1. Синтаксис и базовые принципы работы

Конструкция Для Каждого Из <Коллекция> Цикл предназначена для итерации по элементам коллекций: массивов, списков значений, таблиц значений, результатов запросов и даже файлов в каталоге. Её минимальный синтаксис выглядит так:

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

Ключевые моменты:

• 🔹 Неявное объявление переменной: Элемент создаётся автоматически и доступен только внутри цикла. Его тип соответствует типу элементов коллекции.
• 🔹 Порядок обхода: Для массивов и списков значений — по индексу (от 0 или 1, в зависимости от настройки платформы). Для таблиц значений — по строкам сверху вниз.
• 🔹 Отсутствие индекса: В отличие от цикла Для, здесь нет счётчика (например, i). Если нужен индекс, используйте Массив.Индекс(Элемент).

Важно понимать, что 1С внутренне оптимизирует этот цикл: для статических коллекций (например, фиксированных массивов) платформа может заранее вычислить количество итераций, а для динамических (например, результатов запроса) — нет. Это влияет на производительность.

2. «Для каждого» vs «Пока»: когда что использовать

Начинающие разработчики часто спрашивают: почему бы всегда не использовать Для Каждого, если он лаконичнее? Ответ кроется в трёх ключевых различиях:

Пример, где Пока незаменим:

Индекс = 0;
Пока Индекс < Массив.ВГраница И Массив[Индекс] <> ИскомоеЗначение Цикл
Индекс = Индекс + 1;
КонецЦикла;

А здесь лучше Для Каждого:

Сумма = 0;
Для Каждого Строка Из ТаблицаЗначений Цикл
Сумма = Сумма + Строка.Сумма;
КонецЦикла;

3. Работа с большими данными: оптимизация и подводные камни

При переборе тысяч строк в таблице значений или результатов запроса Для Каждого может стать «бутылочным горлышком». Основные проблемы:

• 🐢 Замедление при модификации: Если в цикле изменять саму коллекцию (например, добавлять/удалять строки), платформа вынужденно пересчитывает индексы, что тормозит выполнение.
• 🗑️ Утечки памяти: При работе с объектами (например, ДокументОбъект) неосвобождённые ссылки накапливаются, особенно в управляемом приложении.
• 🔄 Блокировки транзакций: В клиент-серверном варианте длительный цикл может блокировать данные для других пользователей.

Решения:

• 🚀 Выносите вычисления за цикл: Например, предварительно отберите данные запросом, а не фильтруйте в цикле.
• 🧹 Освобождайте объекты: Используйте Элемент = Неопределено; после обработки.
• 🔗 Разбивайте на пакеты: Обрабатывайте данные порциями по 100–500 строк с Подождать(0) для освобождения ресурсов.

Пачка = 500;
ВсегоСтрок = Таблица.Количество;
Для НомерПачки = 0 По ВсегоСтрок / Пачка Цикл
Начало = НомерПачки * Пачка;
Конец = Мин(Начало + Пачка - 1, ВсегоСтрок - 1);
Для Инд = Начало По Конец Цикл
Строка = Таблица[Инд];
// Обработка строки
Подождать(0); // Освобождаем ресурсы
КонецЦикла;
КонецЦикла;

4. Типичные ошибки и как их избежать

Даже опытные разработчики иногда допускают ошибки с этой конструкцией. Вот топ-5 проблем с решениями:

1. Изменение коллекции в цикле:

   Если удалить элемент из массива внутри Для Каждого, цикл пропустит следующий элемент (так как индексы сдвинутся). Решение: используйте обратный обход или собирайте элементы для удаления в отдельный список.

   Удаляемые = Новый СписокЗначений;
   Для Каждого Элемент Из Массив Цикл
   Если Элемент ="Удалить" Тогда
   Удаляемые.Добавить(Элемент);
   КонецЕсли;
   КонецЦикла;
   Для Каждого Элемент Из Удаляемые Цикл
   Массив.Удалить(Массив.Индекс(Элемент));
   КонецЦикла;

2. Работа с Неопределёнными значениями:

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

3. Утечки памяти в управляемом приложении:

   При работе с объектами (например, СправочникОбъект) ссылки на них остаются в памяти. Решение: присваивайте Неопределено после использования.

Выборка = Справочники.Номенклатура.Выбрать;
Пока Выборка.Следующий Цикл
Если Выборка.ЭтотОбъект.Категория = Справочники.Категории.Электроника Тогда
Цена = Выборка.Цена * 1.1;
Выборка.ЭтотОбъект.Цена = Цена;
Выборка.ЭтотОбъект.Записать;
КонецЕсли;
КонецЦикла;

СписокИНН = Новый Соответствие;
Дубли = Новый Массив;
Выборка = Справочники.Контрагенты.Выбрать;
Для Каждого Контрагент Из Выборка Цикл
Если СписокИНН.СодержитКлюч(Контрагент.ИНН) Тогда
Дубли.Добавить(СписокИНН[Контрагент.ИНН] +" |" + Контрагент.Наименование);
Иначе
СписокИНН.Вставить(Контрагент.ИНН, Контрагент.Наименование);
КонецЕсли;
КонецЦикла;

Каталог = Новый Файл("C:\Архив\");
Для Каждого Файл Из Каталог.НайтиФайлы(".") Цикл

Если (ТекущаяДата - Файл.ДатаМодификации) > 30 Тогда
Архив.ДобавитьФайл(Файл.ПолноеИмя);
КонецЕсли;
КонецЦикла;

Объект = Справочники.Номенклатура.СоздатьОбъект;
Для Каждого Свойство Из Объект.Метаданные.Свойства Цикл
Сообщить(Свойство.Имя);
КонецЦикла;

Для Каждого Элемент Из Массив Цикл
Если Элемент ="Стоп" Тогда
Прервать;
КонецЕсли;
КонецЦикла;

ПрерватьВсе = Ложь;
Для Каждого Элемент1 Из Массив1 Цикл
Для Каждого Элемент2 Из Массив2 Цикл
Если Условие Тогда
ПрерватьВсе = Истина;
Прервать;
КонецЕсли;
КонецЦикла;
Если ПрерватьВсе Тогда
Прервать;
КонецЕсли;
КонецЦикла;

Для Каждого Строка Из Таблица Цикл
Строка.Цена = Строка.Цена * 1.1; // Изменение применится
КонецЦикла;

Счётчик = 0;
Для Каждого Строка Из Таблица Цикл
Счётчик = Счётчик + 1;
Если Счётчик % 2 = 0 Тогда
// Обработка чётной строки
КонецЕсли;
КонецЦикла;

Для Инд = 1 По Таблица.Количество Шаг 2 Цикл
Строка = Таблица[Инд];
// Обработка
КонецЦикла;