Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Розница 2.2 Программно присвоить штрихкод

Розница 2.2 Программно присвоить штрихкод
Я
   Gera1t
 
30.05.19 - 11:28
Здравствуйте!
Необходимо программно создать Номенклатуру и присвоить штрихкод.
Делаю так:
НовЭл = Справочники.Номенклатура.СоздатьЭлемент();
НовЭл.Наименование = Наименование;
НовЭл.НаименованиеПолное = Наименование;
НовЭл.Артикул    = СтрокаТЧ.Артикул;
НовЭл.Записать();
СсылкаНаОбъект = НовЭл.Ссылка;
Рег = РегистрыСведений.Штрихкоды.СоздатьМенеджерЗаписи();
Рег.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13;
Рег.Владелец = СсылкаНаОбъект.ПолучитьОбъект();
Рег.Штрихкод = СтрокаТЧ.Штрихкод;
Рег.Записать();

В итоге Владелец пустой.
Если делать через Справочник.Найти то работает.
Но как то не правильно, вдруг не тот найдет.
Как быть?
 
 
   shuhard
 
1 - 30.05.19 - 11:32
(0)Рег.Владелец = СсылкаНаОбъект.ПолучитьОбъект(); -должна быть Ссылка, а не Объект
   Kuzmich123
 
2 - 30.05.19 - 11:33
(1) шухард, ну ка у тебя получается раньше всех ответить?
   Gera1t
 
3 - 30.05.19 - 11:50
(1)НовЭл.Ссылка Тоже не работает
   Pro1001C
 
4 - 30.05.19 - 11:57
ответ в (1)

НовЭл = Справочники.Номенклатура.СоздатьЭлемент(); 
    НовЭл.Наименование = "ы"; 
    НовЭл.НаименованиеПолное = "2ы"; 
    НовЭл.Артикул    = "ыы"; 
    НовЭл.Записать(); 
    СсылкаНаОбъект = НовЭл.Ссылка; 
    Рег = РегистрыСведений.Штрихкоды.СоздатьМенеджерЗаписи(); 
    Рег.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13; 
    Рег.Владелец = СсылкаНаОбъект; 
    Рег.Штрихкод = "2000000000003"; 
    Рег.Записать();

все работает
   Gera1t
 
5 - 30.05.19 - 12:13
(1)(4) Спасибо!

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.