Достаточно часто задают вопрос: «А что же делать со штрихкодом, размещенным на печатной форме документа?» (см. Простое штрихкодирование документов) Предлагаю рассмотреть вариант, который реализован у меня…

Конфигурация: «Торговля и склад 9.2»

В модуль формы списка общего журнала добавляем процедуру «ОбработкаВнешнегоСобытия»

Процедура ОбработкаВнешнегоСобытия(Источник, Событие, Данные)
   
   // Процедура разбирает штрих-код, считанный сканером и активизирует документ
   Если Событие = "BarCodeValue" Тогда
      
      Состояние("Поиск документа..."); // пока будем обрабатывать штрихкод сканер должен буфферизовать
      // вновь считанные штрихкоды
      глСканерПосылкаДанных(0);
      ШтрихкодДокумента = Данные;
      // Определим год документа
      ЦифрыГода = Лев(ШтрихкодДокумента, 2);
      ГодДокумента = "20" + ЦифрыГода;
      ДатаНачалаПоиска = Дата(ГодДокумента, "01", "01");
      ДатаОкончанияПоиска = Дата(ГодДокумента, "12", "31");
      УстановитьИнтервал(ДатаНачалаПоиска, ДатаОкончанияПоиска);
      Док = СоздатьОбъект("Документ");
      Док.ВыбратьПоЗначению(ДатаНачалаПоиска, ДатаОкончанияПоиска,"EAN13" ,ШтрихкодДокумента);
      
      Если Док.ПолучитьДокумент() = 1 Тогда
         АктивизироватьОбъект(Док.ТекущийДокумент());
      Иначе
         Предупреждение("Документ со штрихкодом " + ШтрихкодДокумента +  " не был найден!");
      КонецЕсли;

      глСканерПосылкаДанных(1);

   КонецЕсли;

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

Теперь, при считывании штрихкода, в открытом журнале будет активизироваться необходимый нам документ, а уж что дальше с ним делать — это на Ваше усмотрение

P.S. Код написал по памяти (рабочей конфигурации в данный момент нет под рукой), если что — не пинать Как только будет возможность, сверю с оригиналом