Выводит штрихкод только последней строки

1. Farhat95 07.12.22 10:49 Сейчас в теме
Добрый день знатоки! Подскажите где ошибка в коде. Код должен заполнять номенклатуру и в колонках вставлять штрихкод. Но штрих встает только на последнюю строку.




РезультатЗапроса = Отбор.Результат;
	СтруктураОтбора = Новый Структура;
	Выборка = РезультатЗапроса.Выбрать();
	Пока Выборка.Следующий() Цикл
		Если НЕ ЗначениеЗаполнено(Выборка.Номенклатура) Тогда
			Продолжить;
		КонецЕсли;
		
		СтруктураОтбора.Вставить("Номенклатура", Выборка.Номенклатура);		
		СтрокаТабличнойЧасти = ОбработкаТабличныхЧастей.НайтиСтрокуТабЧасти(ТЗ, СтруктураОтбора);
		
		Если СтрокаТабличнойЧасти = Неопределено Тогда
			СтрокаТабличнойЧасти = ТЗ.Добавить();
			СтрокаТабличнойЧасти.Номенклатура = Выборка.Номенклатура;
			Если ЗначениеЗаполнено(СтрокаТабличнойЧасти.Номенклатура)Тогда
				СтрокаТабличнойЧасти.Артикул = Выборка.Номенклатура.Артикул;
			КонецЕсли;
			
		КонецЕсли;
		
		
	КонецЦикла;
	
		
	Ном = СтрокаТабличнойЧасти.Номенклатура;
	
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
	"ВЫБРАТЬ 
	|	Штрихкоды.Штрихкод,
	|	Штрихкоды.ШтрихкодОзон,
	|	Штрихкоды.ШтрихкодВайлдбериз
	|ИЗ
	|	РегистрСведений.Штрихкоды КАК Штрихкоды
	|ГДЕ
	|	Штрихкоды.Владелец = &Владелец";
	Запрос.УстановитьПараметр("Владелец", Ном);
	РезультатЗ = Запрос.Выполнить();
	ТВ = РезультатЗ.Выбрать();
	Пока ТВ.Следующий()Цикл
		
		СтрокаТабличнойЧасти.Штрихкод = ТВ.Штрихкод;
		
	КонецЦикла;
Показать
По теме из базы знаний
Найденные решения
3. lmnlmn 69 07.12.22 11:05 Сейчас в теме
Кусок кода установки штрихкода выпал из цикла обхода номенклатуры. Верните его туда.
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. RustamZz 07.12.22 10:54 Сейчас в теме
(1)
КонецЦикла;

Ном = СтрокаТабличнойЧасти.Номенклатура;
После цикла СтрокаТабличнойЧасти не меняется.
3. lmnlmn 69 07.12.22 11:05 Сейчас в теме
Кусок кода установки штрихкода выпал из цикла обхода номенклатуры. Верните его туда.
4. Farhat95 07.12.22 11:08 Сейчас в теме
Оставьте свое сообщение

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