- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
Для Индекс = 0 По МассивДокументов.Количество()-1 Цикл
Документ = МассивДокументов.Получить(Индекс);
Если Документ.Проведен Тогда
УстановитьСтатусДокумента(ТаблицаДокументов, Документ, "Закрыт");
// Удаляем элемент из массива.
МассивДокументов.Удалить(Индекс);
КонецЕсли;
КонецЦикла;
Пока Индекс < МассивДокументов.Количество() Цикл
Документ = МассивДокументов[Индекс];
Если Документ.Проведен Тогда
УстановитьСтатусДокумента(ТаблицаДокумен тов, Документ, "Закрыт");
// Удаляем элемент из массива.
МассивДокументов.Удалить(Индекс);
Иначе
Индекс = Индекс + 1
КонецЕсли;
КонецЦикла;