Генерация ШК из Артикула

[SkyNetYar]

Добрый день!
Подскажите,не могу допетрить как перенести генерацию ШК из УТ 11.1 в Розницу 2.1
Код в УТ 11.1

Код Выделить Развернуть

пКод = СправочникОбъект.Артикул;
Попытка
пКод = Число(пКод);
Исключение
пКод = 0;
КонецПопытки;
Если пКод <> 0 Тогда
НовыйШтрихкод = РегистрыСведений.ШтрихкодыНоменклатуры.СоздатьМенеджерЗаписи();
НовыйШтрихкод.Номенклатура = СправочникОбъект.Ссылка;
пШтрихкод = "2"+Формат(пКод, "ЧЦ=11; ЧВН=; ЧГ=");
НовыйШтрихкод.Штрихкод = пШтрихкод + РегистрыСведений.ШтрихкодыНоменклатуры.КонтрольныйСимволEAN(пШтрихкод, 13);
НовыйШтрихкод.Записать(Ложь);
КонецЕсли;

Перенесенный мной код в Розницу 2.1

Код Выделить Развернуть

пКод = Объект.Артикул;
Попытка
пКод = Число(пКод);
Исключение
пКод = 0;
КонецПопытки;
Если пКод <> 0 Тогда
НовыйШтрихкод = РегистрыСведений.Штрихкоды.СоздатьМенеджерЗаписи();
НовыйШтрихкод.Номенклатура = Объект.Ссылка;
пШтрихкод = "2"+Формат(пКод, "ЧЦ=11; ЧВН=; ЧГ=");
НовыйШтрихкод.Штрихкод = пШтрихкод ;
НовыйШтрихкод.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
НовыйШтрихкод.Записать();
КонецЕсли;

Не могу понять в УТ добавляется последняя цифра к штрихкоду сгенерированному из артикула,но в Рознице не могу повторить этот момент,подскажите что не так делаю.