Исключение из цикла объектов помеченных на удаление

1. BartGTO1 25.04.19 15:40 Сейчас в теме
Добрый день. В печатной форме есть следующий код:
Если СтрТовар.Упаковка.Вес=0 Тогда
			выбр=Справочники.УпаковкиЕдиницыИзмерения.Выбрать(,СтрТовар.Номенклатура);
			Пока выбр.Следующий() Цикл				
				Если СокрП(выбр.ЕдиницаИзмерения) ="шт" Тогда
					Вес=Вес+выбр.Вес*СтрТовар.КоличествоУпаковок;
					Объем=Объем+выбр.Объем*СтрТовар.КоличествоУпаковок;
				КонецЕсли;
			КонецЦикла
		Иначе......
Показать

Но он захватывает и данные помеченные на удаление.
Вопрос как сделать исключение из этого списка, т.е. чтоб значения помеченных на удаление объектов не брались во внимание.
Сейчас он их суммирует.
Пробовал таким образом:
Если СтрТовар.Упаковка.Вес=0 Тогда
			выбр=Справочники.УпаковкиЕдиницыИзмерения.Выбрать(,СтрТовар.Номенклатура);
			Пока выбр.Следующий() Цикл				
				Если СокрП(выбр.ЕдиницаИзмерения) ="шт" и ссылка.ПометкаУдаления = 0 Тогда
					Вес=Вес+выбр.Вес*СтрТовар.КоличествоУпаковок;
					Объем=Объем+выбр.Объем*СтрТовар.КоличествоУпаковок;
				КонецЕсли;
			КонецЦикла
		Иначе......
Показать

Но это не сработало...
По теме из базы знаний
Найденные решения
2. platonov.e 158 25.04.19 15:44 Сейчас в теме
выбр=Справочники.УпаковкиЕдиницыИзмерения.Выбрать(,СтрТовар.Номенклатура);
            Пока выбр.Следующий() Цикл
                Если выбр.ПометкаУдаления Тогда
Продолжить;
КонецЕсли;
                Если СокрП(выбр.ЕдиницаИзмерения) ="шт" и ссылка.ПометкаУдаления = 0 Тогда
                    Вес=Вес+выбр.Вес*СтрТовар.КоличествоУпаковок;
                    Объем=Объем+выбр.Объем*СтрТовар.КоличествоУпаковок;
                КонецЕсли;
            КонецЦикла
Показать
BartGTO1; +1 Ответить
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. platonov.e 158 25.04.19 15:44 Сейчас в теме
выбр=Справочники.УпаковкиЕдиницыИзмерения.Выбрать(,СтрТовар.Номенклатура);
            Пока выбр.Следующий() Цикл
                Если выбр.ПометкаУдаления Тогда
Продолжить;
КонецЕсли;
                Если СокрП(выбр.ЕдиницаИзмерения) ="шт" и ссылка.ПометкаУдаления = 0 Тогда
                    Вес=Вес+выбр.Вес*СтрТовар.КоличествоУпаковок;
                    Объем=Объем+выбр.Объем*СтрТовар.КоличествоУпаковок;
                КонецЕсли;
            КонецЦикла
Показать
BartGTO1; +1 Ответить
5. BartGTO1 25.04.19 15:54 Сейчас в теме
3. platonov.e 158 25.04.19 15:46 Сейчас в теме
Или где там пометка на удаления?
4. BartGTO1 25.04.19 15:48 Сейчас в теме
(3)
Прикрепленные файлы:
Оставьте свое сообщение

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