10.2
10.2. Склад-15 - исправление выгрузки единиц измерении
Была обнаружена проблема выгрузки штрих-кодов в ут 10.3. Неправильно выгружались типы штрих-кодов. Иногда штрих-код выгружался без единицы измерения и без контрольной цифры. При изучение данной истории был обнаружение дублирование единиц измерения в справочнике классификаторов ед. измерения и в план видов характеристик типа штрих-кода. Справочник исправлен типовой обработкой, план видов характеристик обработкой с сайта. Кроме этого была добавлена дополнительная проверка в менеджер записи регистра сведении штрих-кодов.
Процедура ПередЗаписью(Отказ, Замещение)
Если ОбменДанными.Загрузка Тогда
Возврат;
КонецЕсли;
Для Каждого ТекущаяЗапись Из ЭтотОбъект Цикл
Если ТипЗнч(ТекущаяЗапись.Владелец) = Тип("СправочникСсылка.Номенклатура") И Не ЗначениеЗаполнено(ТекущаяЗапись.Качество) Тогда
Сообщить("Для товара """ + СокрЛП(ТекущаяЗапись.Владелец) + """ со штрихкодом: " + ТекущаяЗапись.ШтрихКод + " не заполнено качество.");
Отказ = Истина;
КонецЕсли;
//++ТоргВизор
Если ТипЗнч(ТекущаяЗапись.Владелец) = Тип("СправочникСсылка.Номенклатура") Тогда
ШК = СокрЛП(ТекущаяЗапись.Штрихкод);
Если СтрДлина(ШК) = 13 и Не ЕстьНеЦифры(ШК) Тогда
Если ТекущаяЗапись.ТипШтрихкода <> ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13 Тогда
ТекущаяЗапись.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
КонецЕсли;
КонецЕсли;
//Заполним представление ШК
Если ПустаяСтрока(ТекущаяЗапись.ПредставлениеШтрихкода) Тогда
ТекущаяЗапись.ПредставлениеШтрихкода = ШК;
КонецЕсли;
//Иногда преде ШК встречается пробел
Если ТекущаяЗапись.Штрихкод <> ШК Тогда
ТекущаяЗапись.Штрихкод = ШК;
КонецЕсли;
//Часто штрихкод загружется без единицы измерения
Если ТекущаяЗапись.ЕдиницаИзмерения.Пустая() Тогда
ТекущаяЗапись.ЕдиницаИзмерения = ТекущаяЗапись.Владелец.ЕдиницаХраненияОстатков;
КонецЕсли;
КонецЕсли;
//--ТоргВизор
КонецЦикла;
Похожая задача?
Расскажите, что у вас происходит — предложим план.