Безопасный режим

&ИзменениеИКонтроль ("ЗаполнитьДокумент_УПД2019_ИнформацияПродавца")

	#Вставка
	СвУчДокОбор = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(Файл, "СвУчДокОбор");
	ИдОтпр = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(СвУчДокОбор, "ИдОтпр"); 
	ИдПол = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(СвУчДокОбор, "ИдПол"); 
	ИдОтпр = СтрЗаменить(ИдОтпр, "_", "-");
	ИдПол = СтрЗаменить(ИдПол, "_", "-");
	РаботаСФайламиБЭД.ЗаполнитьСвойствоXDTO(СвУчДокОбор, "ИдОтпр", ИдОтпр, Истина, Ошибки);
	РаботаСФайламиБЭД.ЗаполнитьСвойствоXDTO(СвУчДокОбор, "ИдПол", ИдПол, Истина, Ошибки);
	РаботаСФайламиБЭД.ЗаполнитьСвойствоXDTO(Файл, "СвУчДокОбор", СвУчДокОбор, Истина, Ошибки);   
	
	ДокументИзм = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(Файл, "Документ");
	СвСчФакт = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(ДокументИзм, "СвСчФакт");
	РаботаСФайламиБЭД.СброситьСвойствоXDTO(СвСчФакт, "ИнфПолФХЖ1", Ошибки);
	
	СвПродПер = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(ДокументИзм, "СвПродПер");
	РаботаСФайламиБЭД.СброситьСвойствоXDTO(СвПродПер, "ИнфПолФХЖ3", Ошибки);
	
	ТаблСчФакт = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(ДокументИзм, "ТаблСчФакт");
	СведТов = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(ТаблСчФакт, "СведТов");
	Для каждого Товар Из СведТов Цикл
		
		ИнфПолФХЖ2 = РаботаСФайламиБЭД.ЗначениеСвойстваXDTO(Товар, "ИнфПолФХЖ2");
		Для Индекс = -(ИнфПолФХЖ2.Количество() - 1) По 0 Цикл
			
			Если Не ИнфПолФХЖ2[-Индекс].Идентиф = "Для1С_ШтрихкодыНоменклатуры" Тогда
				ИнфПолФХЖ2.Удалить(-Индекс);
			Иначе
				ИнфПолФХЖ2[-Индекс].Идентиф =  "Штрихкод";
			КонецЕсли;
			
		КонецЦикла;
		
	КонецЦикла;
	#КонецВставки