Загрузка штрихкодов номенклатуры в конфигурацию 1С: Розница

Так как никакой толковой подсказки я сходу не нашел (допускаю, что плохо искал), пришлось разбираться путем тыка.

На скрине приведен пример минимальной настройки для удачной загрузки штрихкодов.

С данными типа штрихкод и владелец штрихкода проблем особых не возникает. Основная сложность для меня была указать тип штрихкода (не стал вникать, зачем рознице на этапе ввода штрихкода нужно самостоятельно выбрать тип), в случае однотипных кодов тоже можно не париться и указать тип по умолчанию. Но мы не ищем легких путей, да и штрихкоды были "разнокалиберными", поэтому решил разобраться, как работает Вычисление и как подсунуть нужный тип. 

Пробовал просто указать функцию из общего модуля (МенеджерОборудованияКлиентСервер.ОпределитьТипШтрихкода(ТекстЯчейки)) - не получилось, пришлось ее выдернуть и адаптировать, попутно объединив с несколькими функциями:

	ТипШтрихкодаЗнач = "";	
	Штрихкод = ТекстЯчейки;
	ДлинаШтрихкода = СтрДлина(ТекстЯчейки);
	
	Если ДлинаШтрихкода = 0 Тогда
		ТипШтрихкодаЗнач = "";
	КонецЕсли;
	
	Если ДлинаШтрихкода = 14 Тогда 
		
		Сумма = 0;
		Коэффициент = 1;
		
		Для Сч = 1 По 12 Цикл
			ВремКодСимвола = КодСимвола(Штрихкод, Сч);
			Сумма  = Сумма + Коэффициент * (ВремКодСимвола - 48);
			Коэффициент = 4 - Коэффициент;
		КонецЦикла;
		Сумма = (10 - Сумма % 10) % 10;
		КонтрольныйСимвол = Символ(Сумма + 48);
		
		Если КонтрольныйСимвол = Прав(Штрихкод, 1) Тогда
			ТипШтрихкодаЗнач = ПланыВидовХарактеристик.ТипыШтрихкодов.ITF14;
		КонецЕсли;
		
	ИначеЕсли ДлинаШтрихкода = 13 Тогда 
		
		Сумма = 0;
		Коэффициент = 1;
		
		Для Сч = 1 По 12 Цикл
			ВремКодСимвола = КодСимвола(Штрихкод, Сч);
			Сумма  = Сумма + Коэффициент * (ВремКодСимвола - 48);
			Коэффициент = 4 - Коэффициент;
		КонецЦикла;
		Сумма = (10 - Сумма % 10) % 10;
		КонтрольныйСимвол = Символ(Сумма + 48);
		
		Если КонтрольныйСимвол = Прав(Штрихкод, 1) Тогда
			ТипШтрихкодаЗнач = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
		КонецЕсли;
		
	ИначеЕсли ДлинаШтрихкода = 8 Тогда 
		
		Сумма = 0;
		Коэффициент = 3;
		
		Для Сч = 1 По 7 Цикл
			ВремКодСимвола = КодСимвола(Штрихкод, Сч);
			Сумма  = Сумма + Коэффициент * (ВремКодСимвола - 48);
			Коэффициент = 4 - Коэффициент;
		КонецЦикла;
		Сумма = (10 - Сумма % 10) % 10;
		КонтрольныйСимвол = Символ(Сумма + 48);
		Если КонтрольныйСимвол = Прав(Штрихкод, 1) Тогда
			ТипШтрихкодаЗнач = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN8;
		КонецЕсли;
		
	КонецЕсли;
	
	
	Если ТипШтрихкодаЗнач= "" Тогда 
		
		CODE39 = Истина;
		Для Сч = 1 По ДлинаШтрихкода Цикл
			ВремКодСимвола = КодСимвола(Штрихкод, Сч);
			Если (ВремКодСимвола <> 32)
				И (ВремКодСимвола < 36 Или ВремКодСимвола > 37)
				И (ВремКодСимвола <> 43)
				И (ВремКодСимвола < 45 Или ВремКодСимвола > 57)
				И (ВремКодСимвола < 65 Или ВремКодСимвола > 90) Тогда
				CODE39 = Ложь;
				Прервать;
			КонецЕсли;
		КонецЦикла;
		
		Если CODE39 Тогда
			ТипШтрихкодаЗнач = ПланыВидовХарактеристик.ТипыШтрихкодов.CODE39;
		КонецЕсли                                                     
		
	КонецЕсли;
	
	Если ТипШтрихкодаЗнач= ""  Тогда 
		
		CODE128 = Истина;
		Для Сч = 1 По ДлинаШтрихкода Цикл
			ВремКодСимвола = КодСимвола(Штрихкод, Сч);
			Если (ВремКодСимвола > 127) Тогда
				CODE128 = Ложь;
				Прервать;
			КонецЕсли;
		КонецЦикла;
		
		Если CODE128 Тогда
			ТипШтрихкодаЗнач = ПланыВидовХарактеристик.ТипыШтрихкодов.CODE128;
		КонецЕсли                                                     
		
	КонецЕсли;
	
	Если ТипШтрихкодаЗнач = "CODE128"  Тогда
		Если КодСимвола(Штрихкод, 1) = 40 Или СтрНайти(Штрихкод, КодСимвола(29)) > 0  Тогда
			ТипШтрихкодаЗнач = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN128;
		КонецЕсли;
	КонецЕсли;
	
	Результат = ТипШтрихкодаЗнач;

В общем, надеюсь, кому-то поможет.