Конструкция «Для ... По ... Цикл»
Цикл «Для...По» применяется для записи циклов с известным числом повторений. Например, следующий цикл 12 раз выведет номер месяца в окно служебных сообщений:
Для Месец = 1 По 12 Цикл
Сообщить(Месец);
КонецЦикла;
Переменная Месец называется переменной цикла или счетчиком цикла. Не следует изменять значение переменной цикла внутри него. Это нарушает принципы структурного программирования и может привести к трудно обнаруживаемым ошибкам.
Конструкция «Для Каждого ... Из ... Цикл»
В 1С:Предприятии 8.0 была введена новая конструкция «Для Каждого», предназначенная для обхода элементов коллекции. В таких циклах в качестве переменной цикла выступает не число, а объект — элемент коллекции, например, объект СтрокаТаблицыЗначений в следующем примере:
ПустаяСсылка = Справочники.Номенклатура.ПустаяСсылка();
Для Каждого СтрокаТЗ Из тзСостав Цикл
//тело цикла
Если СтрокаТЗ.Товар = ПустаяСсылка Тогда
Продолжить; //возьмем следующую строку
Иначе
Если СтрокаТЗ.Товар = ВыбТовар Тогда
Прервать; //досрочный выход из цикла
КонецЕсли;
КонецЕсли;
КонецЦикла;
Обратите внимание, что внутри цикла нет никакой переменной, содержащей порядковый номер или индекс элемента коллекции. Если это необходимо, то можно добавить переменную, которая будет увеличиваться внутри цикла, например:
Н = 0;
Для Каждого СтрокаТЗ Из тзСостав Цикл
Н = Н + 1 ;
//действия
КонецЦикла;
Для некоторых коллекций по элементу можно определить его индекс:
Для Каждого СтрокаТЗ Из тзСостав Цикл
ИндексСтроки = тзСостав.Индекс(СтрокаТЗ);
КонецЦикла;
Если элемент не принадлежит данной коллекции, то метод Индекс возвращает -1 (минус единицу).
Конструкция «Пока ... Цикл»
Ключевое слово Пока предназначено для реализации циклов с неизвестным числом повторений. Цикл выполняется до тех пор, пока логическое выражение истинно. Если на очередном витке Цикла оно перестает выполняться (дает значение Ложь), то цикл прекращается. Ниже показан пример реализации цикла Пока:
Н = 0;
Выборка = Справочники.Номенклатура.Выбрать();
Пока Выборка.Следующий() Цикл
Если Выборка.ПометкаУдаления Тогда
Продолжить; //возьмем следующий элемент
КонецЕсли;
Н = Н + 1;
Если Н > 10 Тогда
Прервать; //досрочный выход из цикла
КонецЕсли;
Сообщить("Товар: " + Выборка.Наименование);
КонецЦикла;