Ограничение цикла

1. mob51 139 09.08.19 10:52 Сейчас в теме
Добрый день уважаемые форумчане, есть функция:

Функция ПолучитьСписокЛицевыхСчетовДляПечатиЧеков(СуммыПлатежей)

СписокЛицевыхСчетов = Новый СписокЗначений;

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

Возврат СписокЛицевыхСчетов;

КонецФункции


Нужно ограничить ее действия 45 строками из документа, как это более правильно сделать? Заранее спасибо
По теме из базы знаний
Найденные решения
3. soft_wind 09.08.19 11:02 Сейчас в теме
один из вариантов

лкКол = 0
Для Каждого ТекущаяСтрока Из СуммыПлатежей Цикл
Если ТекущаяСтрока.НомерЧекаККМ = 0 Тогда
СписокЛицевыхСчетов.Добавить(ТекущаяСтрока.Объект);
лкКол = лкКол + 1;
Если лкКол = 45 Тогда
Прервать;//достигли 45 строк, выходим из цикла
КонецЕсли;
КонецЕсли;
КонецЦикла;
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
8. spacecraft 09.08.19 12:35 Сейчас в теме
(1) можно и без дополнительной переменной:
Функция ПолучитьСписокЛицевыхСчетовДляПечатиЧеков(СуммыПлатежей) 

СписокЛицевыхСчетов = Новый СписокЗначений; 

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

Возврат СписокЛицевыхСчетов; 

КонецФункции 
Показать
2. platonov.e 161 09.08.19 10:57 Сейчас в теме
ЧТобы в СписокЛицевыхСчетов попадало 5 строк, или чтобы сумма строк всех таблиц всех ТекущаяСтрока.Объект не превышала 45 строк?
4. mob51 139 09.08.19 11:53 Сейчас в теме
(2)ТекущаяСтрока.Объект не превышала 45 строк
3. soft_wind 09.08.19 11:02 Сейчас в теме
один из вариантов

лкКол = 0
Для Каждого ТекущаяСтрока Из СуммыПлатежей Цикл
Если ТекущаяСтрока.НомерЧекаККМ = 0 Тогда
СписокЛицевыхСчетов.Добавить(ТекущаяСтрока.Объект);
лкКол = лкКол + 1;
Если лкКол = 45 Тогда
Прервать;//достигли 45 строк, выходим из цикла
КонецЕсли;
КонецЕсли;
КонецЦикла;
5. mob51 139 09.08.19 11:54 Сейчас в теме
6. mob51 139 09.08.19 12:02 Сейчас в теме
(3)Пишет ошибку, как на скриншоте
Прикрепленные файлы:
7. Fox-trot 164 09.08.19 12:12 Сейчас в теме
10. mob51 139 09.08.19 12:35 Сейчас в теме
9. mob51 139 09.08.19 12:35 Сейчас в теме
(3)
лкКол = 0
Спасибо, все заработало)
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот