регистр сведений штрихкод

[Sevak]

привет всем ....

подскажите пожалуйста как в регистре сведений по штрих коду найти владельца (1c 8.2, розница 1.0).

Я написал функцию `

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

Функция НаименованиеПоШтрихкоду(Штрихкод)

Запрос = Новый Запрос;
Запрос.Текст =  "ВЫБРАТЬ
| Штрихкоды.Владелец,
| Штрихкоды.Штрихкод
|ИЗ
| РегистрСведений.Штрихкоды КАК Штрихкоды
|ГДЕ
| Штрихкоды.Штрихкод = &ШК; ";
Запрос.УстановитьПараметр("ШК", Штрихкод);
Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать();
Возврат Выборка.Владелец;
   
КонецФункции

я вызываю функцию вот так` A = НаименованиеПоШтрихкоду("4850089000479");
при установке параметра выдает ошибку ` "переменная не определена (ШК)"????

[СветланаCC]

Приложение какое? обычное? или управляемое?
Покажите процедуру где вызываете данную функцию

[Sevak]

вот и задача ...

у меня есть форма,кнопка и поле ввода...

мне надо нажать кнопку и в другом поле вводе увидит владельца этого штрих кода

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


Процедура Кнопка1Нажатие()
Запрос = Новый Запрос;

Запрос.Текст =  "ВЫБРАТЬ
| Штрихкоды.Владелец,
| Штрихкоды.Штрихкод
|ИЗ
| РегистрСведений.Штрихкоды КАК Штрихкоды
|ГДЕ
| Штрихкоды.Штрихкод ПОДОБНО &ШК ";

   

Запрос.УстановитьПараметр("ШК", ПолеВвода1);

Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать();
    Выборка.Следующий();
ПолеВвода2 = Выборка.Владелец();   

КонецПроцедуры



[СветланаCC]

может быть такое, что штрихкоды у товаров одинаковые? если да - то для вывода владельца лучше использовать таб поле...

[СветланаCC]

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


Процедура КнопкаСформироватьНажатие(Кнопка)
// Вставить содержимое обработчика.
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Штрихкоды.Владелец
|ИЗ
| РегистрСведений.Штрихкоды КАК Штрихкоды
|ГДЕ
| Штрихкоды.Штрихкод = &Штрихкод";
Запрос.УстановитьПараметр("Штрихкод",Штрихкод);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
//если с таб полем - то довавляем всех, кого нашли с этим штрихкодом -
НовСтрока = ТабЧасть.Добавить();
НовСтрока.Владелец = Выборка.Владелец;
КонецЦикла;
КонецПроцедуры