Изменить Процедуру В конфигурации Розница 2.2.

Функция ПолученШтрихкодИзСШК(Штрихкод, Форма, СтруктураДействий = Неопределено) Экспорт
	
	Перем СтруктураПараметровДействия, Пользователь;
	
	Если СтруктураДействий = Неопределено Тогда
		СтруктураДействий = ВариантыПроверокШтрихкода();
	КонецЕсли;
	
	ТипШтрихкода               = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13; // ОпределитьТипШтрихкода(Штрихкод);
	НеизвестныеДанныеПО        = Истина;
	СтруктураПараметровКлиента = Новый Структура;          
	
	// Весовые товары и штучные на весах.
	Если СтруктураДействий.Свойство("ПроверкаВесовыхТоваров") 
		И ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13 Тогда
		
		ПрефиксВнутреннегоШтрихкодаВесовогоТовара            = ЗначениеНастроекПовтИсп.ПолучитьЗначениеКонстанты("ПрефиксВнутреннегоШтрихкодаВесовогоТовара");
		ПрефиксВнутреннегоШтрихкодаШтучногоФасованногоТовара = ЗначениеНастроекПовтИсп.ПолучитьЗначениеКонстанты("ПрефиксВнутреннегоШтрихкодаШтучногоФасованногоТовара");
		ДлинаКодаВесовогоТовара = СтрДлина(Формат(ЗначениеНастроекПовтИсп.ПолучитьЗначениеКонстанты("ВерхняяГраницаДиапазонаSKUВесовогоТовара"),"ЧГ=0"));
		
		Если ДлинаКодаВесовогоТовара < 5 Тогда
			ДлинаКодаВесовогоТовара = 5;
		КонецЕсли;
		
		Если (ПрефиксВнутреннегоШтрихкодаВесовогоТовара > 0) 
			И (ДлинаКодаВесовогоТовара > 0)
			И (СтрДлина(Штрихкод) = 13)
			И (Лев(Штрихкод, 2) = ("2" + ПрефиксВнутреннегоШтрихкодаВесовогоТовара) 
			ИЛИ Лев(Штрихкод, 2) = ("2" + ПрефиксВнутреннегоШтрихкодаШтучногоФасованногоТовара)) Тогда
			
			КодТовара        = Сред(Штрихкод, 3,  ДлинаКодаВесовогоТовара);
			КоличествоТовара = Сред(Штрихкод, 3 + ДлинаКодаВесовогоТовара, 10 - ДлинаКодаВесовогоТовара);
			 
			Если Лев(Штрихкод, 2) = ("2" + ПрефиксВнутреннегоШтрихкодаВесовогоТовара) Тогда  
				// Весовой товара расфасованный на весах.
				Запрос = Новый Запрос(
				"ВЫБРАТЬ ПЕРВЫЕ 1
				|	КодыТоваровSKU.Номенклатура   КАК Номенклатура,
				|	КодыТоваровSKU.Характеристика КАК Характеристика,
				|	КодыТоваровSKU.Упаковка       КАК Упаковка,
				|	&КоличествоТовара / 1000      КАК Количество
				|ИЗ
				|	РегистрСведений.КодыТоваровSKU КАК КодыТоваровSKU
				|ГДЕ
				|	КодыТоваровSKU.SKU = &Код");
			Иначе
				// Штучный товар расфасованный на весах.
				Запрос = Новый Запрос(
				"ВЫБРАТЬ ПЕРВЫЕ 1
				|	КодыТоваровSKU.Номенклатура   КАК Номенклатура,
				|	КодыТоваровSKU.Характеристика КАК Характеристика,
				|	КодыТоваровSKU.Упаковка       КАК Упаковка,
				|	&КоличествоТовара             КАК Количество
				|ИЗ
				|	РегистрСведений.КодыТоваровSKU КАК КодыТоваровSKU
				|ГДЕ
				|	КодыТоваровSKU.SKU = &Код");
			КонецЕсли;