Как записывать НаборЗаписей регистра сведений внутри цикла?

Question

[VikaUlshina]

Данная обработка записывает из файла в справочник ТранспортныеСредства реквизиты: водитель, транспорт, телефон водителя, объем кузова.
Но необходимо чтобы транспорт также записывался в регистр, в пустую колонку НомерТС.
Также построчно, без дополнительных условий отбора.
Сейчас этот код записывает номерТС последнего водителя (последней строки файла) в каждую строку подряд.
Не могу понять как настроить цикл НаборовЗаписей в цикле перебора строк файла.
Подскажите, пожалуйста, как это правильно сделать

&НаСервере
Процедура ЗагрузитьНаСервере()
	
	Документ = Новый ТекстовыйДокумент;
	Документ.Прочитать(Объект.ПутьКФайлу);
	
	НаборЗаписей = РегистрыСведений.ДанныеСотрудников.СоздатьНаборЗаписей();
	НаборЗаписей.Прочитать();     
	
	Для Каждого ЗаписьНабора из НаборЗаписей Цикл
			
		Для НомерСтроки = 2 По Документ.КоличествоСтрок() Цикл
			   
			СтрокаДокумента = Документ.ПолучитьСтроку(НомерСтроки);
				   
			МассивЗначенийСтроки = СтрРазделить(СтрокаДокумента, ";");
				   
			Водитель        = МассивЗначенийСтроки[0];
			Транспорт       = МассивЗначенийСтроки[1];
			ТелефонВодителя = МассивЗначенийСтроки[2];
			ОбъемКузова     = МассивЗначенийСтроки[3];
				   
			ПоискТС = Справочники.ТранспортныеСредства.НайтиПоНаименованию(Водитель, Истина);
			Если ПоискТС.Пустая() Тогда
				НовоеТС = Справочники.ТранспортныеСредства.СоздатьЭлемент();
				НовоеТС.Наименование    = Справочники.Сотрудники.НайтиПоНаименованию(Водитель);
				НовоеТС.Номер           = Транспорт;
				НовоеТС.ТелефонВодителя = ТелефонВодителя;
				НовоеТС.ОбъемКузова     = ОбъемКузова;
				НовоеТС.Записать();
			КонецЕсли;

			ЗаписьНабора.НомерТС = Транспорт;
			
		КонецЦикла;
	НаборЗаписей.Записать();
		 
	КонецЦикла;
		   
		
КонецПроцедуры

Comments

[Константин Нагибович]

Может вам попробовать не набор записей перебирать, а результат запроса?

Answer 1

[Дмитрий Кинаш]

С первого взгляда - какая-то чушь. Со второго - еще большая чушь!

1) Тут два цикла - верхний по всем существующим записям РегистрыСведений.ДанныеСотрудников, а вложенный по всем строкам начиная со второй. Уже это само по себе не имеет смысла, так как выходит, что цель программы - записать в ячейку НомерТС значение из последней строки файла.

2) Записывать набор записей внутри цикла по его же записям - это ужасная идея!!! Откинем вероятный код из модуля набора записей, который может изменять состав и/или последовательность строк, но и тогда это просто расточительно - на каждом витке цикла записывать одно и то же

3) Ужасное наименование переменных, чтобы запутать самого себя! Если транспортное средство ищется в базе по первой колонке из файла, то какого лешего ее назвали "Водитель", а не "Транспорт"??? Если в колонку НомерТС записывается значение из второй колонки файла, какого лешего ее назвали "Транспорт", а не "НомерТранспорта"???

4) Что за странная установка наименования транспортного средства? Если в базе выполняется поиск по наименованию из переменной Водитель (хотя на самом деле там Транспорт), то именно это значение и нужно записать в название, чтобы поиск сработал на следующем витке цикла! А вовсе не сайд-эффекты по справочнику Сотрудников с помощью Справочники.Сотрудники.НайтиПоНаименованию(Водитель):
4.1) В справочнике Сотрудников может не существовать нужного элемента и в отличии от Транспорта тут нет создания недостающего элемента (в принципе он и не нужен, так как в этом коде справочник "Сотрудники" нигде не используется)
4.2) Если менять представление в настройках справочник "Сотрудники" и/или в менеджере справочника, то платформа 1С ничего не подскажет о том, что в коде загрузки транспорта может что-то сломаться. Поэтому сайд-эффекты запрещено применять всюду кроме разовых обработок для правки данных, когда риск осознается.

5) Алгоритм не имеет смысла. Подозреваю, что в файле указан транспорт для существующих пользователей, по которому нужно обновить регистр ДанныеСотрудников. Тогда нужно:
5.1) Сначала пройти по файлу и сформировать таблицу (можно структуру или соответствие), в которую поместить данные по владению транспортом.
5.2) В цикле по файлу проверять существование транспорта в базе не по наименованию "моя тайота", а по гос.номеру или по вин-коду.
5.3) Сотрудника тоже желательно искать не по ФИО, а по табельному номеру, налоговому или паспортному номеру.
5.4) В регистр ДанныеСотрудников не имеет смысл помещает номер автомобиля - так как все будущие операции потребуют поиск по реквизиту "номер" для каждой строчки! Нужно поместить ссылку на элемент справочника "Транспорт"
5.5) Имея таблицу (можно структуру или соответствие) из пункта 5.1 проходим циклом по ее строкам, создаем менеджер записи с отбором по Сотруднику-Владельцу, если запись выбирается, то устанавливаем ссылку на транспорт и записываем.

Comments

[Константин]

С первого взгляда - какая-то чушь. Со второго - еще большая чушь!

я тут нашел свой код где то 20-ей давности. Правил на 7ке в розничном магазине )))

Опыт наше все. А судя по фотке (если реальная) и прошлыми вопросами :-) супер что не стесняется задавать вопросы

[Дмитрий Кинаш]

Константин, привет.
Тоже писал на 7-ке с 2003 - ужас, что там ссылка и объект были одной и той же переменной, а как вспоминаю обход бухгалтерских остатков - это холодный пот )))

Не понимаю с каким умыслом Вика тут пишет свои вопросы и не комментирует сообщения других. Тоже глянул предыдущие и там все те же проблемы с отсутствием обратной связи. Она пишет код в ЧатеГПТ и пытается доработать? Или может это ИИ-агент, который сам постит вопросы и анализирует ответы? )))

[Константин]

Или может это ИИ-агент

Кто-то развлекается...

тоже думал, о фейковости аккаунта.