Функция ПолучитьКодПЛУ(Товар, Характеристика) Экспорт
	
	Перем СтрокаПЛУ;
	
	СтрокаПЛУ = "";
	Запрос = Новый Запрос;
	Запрос.Текст = 
	"ВЫБРАТЬ РАЗЛИЧНЫЕ
	|	ТоварыВВесах.ПЛУ КАК ПЛУ
	|ИЗ
	|	РегистрСведений.ТоварыВВесах КАК ТоварыВВесах
	|		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.СвязанныеВесыСПечатьюЭтикеток КАК СвязанныеВесыСПечатьюЭтикеток
	|		ПО ТоварыВВесах.Весы = СвязанныеВесыСПечатьюЭтикеток.ВесыПриемник
	|ГДЕ
	|	СвязанныеВесыСПечатьюЭтикеток.ВесыИсточник ЕСТЬ NULL 
	|	И ТоварыВВесах.Весы.ТорговыйОбъект В (&ТорговыйОбъект)
	|	И ТоварыВВесах.Номенклатура = &Товар
	|	И ТоварыВВесах.ХарактеристикаНоменклатуры = &Характеристика";
		
	Запрос.УстановитьПараметр("Товар",Товар);
	Запрос.УстановитьПараметр("Характеристика",Характеристика);
	Запрос.УстановитьПараметр("ТорговыйОбъект", ОграничениеДоступа.ПолучитьСписокТО(ПараметрыСеанса.ТекущийТО));
	
	ТаблицаПЛУ = Запрос.Выполнить().Выбрать();
	
	Пока ТаблицаПЛУ.Следующий() Цикл
		СтрокаПЛУ = СтрокаПЛУ + ТаблицаПЛУ.ПЛУ + ",";
	КонецЦикла;
		
	Если Прав(СтрокаПЛУ,1) = "," Тогда
		СтрокаПЛУ = Лев(СтрокаПЛУ, СтрДлина(СтрокаПЛУ)-1);
	КонецЕсли;
	
	Возврат СтрокаПЛУ;
	
КонецФункции