Так как никакой толковой подсказки я сходу не нашел (допускаю, что плохо искал), пришлось разбираться путем тыка.
На скрине приведен пример минимальной настройки для удачной загрузки штрихкодов.
С данными типа штрихкод и владелец штрихкода проблем особых не возникает. Основная сложность для меня была указать тип штрихкода (не стал вникать, зачем рознице на этапе ввода штрихкода нужно самостоятельно выбрать тип), в случае однотипных кодов тоже можно не париться и указать тип по умолчанию. Но мы не ищем легких путей, да и штрихкоды были "разнокалиберными", поэтому решил разобраться, как работает Вычисление и как подсунуть нужный тип.
Пробовал просто указать функцию из общего модуля (МенеджерОборудованияКлиентСервер.ОпределитьТипШтрихкода(ТекстЯчейки)) - не получилось, пришлось ее выдернуть и адаптировать, попутно объединив с несколькими функциями:
ТипШтрихкодаЗнач = "";
Штрихкод = ТекстЯчейки;
ДлинаШтрихкода = СтрДлина(ТекстЯчейки);
Если ДлинаШтрихкода = 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;
КонецЕсли;
КонецЕсли;
Результат = ТипШтрихкодаЗнач;
В общем, надеюсь, кому-то поможет.
Вступайте в нашу телеграмм-группу Инфостарт
