Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
29 мар 2024, 18:30

работа со сканером штрихкода

Автор BotMan, 26 авг 2015, 12:42

0 Пользователей и 1 гость просматривают эту тему.

BotMan

есть пустая конфигурация, есть внешняя обработка, в которой есть поле: Штрихкод.
хочется подключить сканер-штрихкода, чтобы тот заполнял этот параметр.

подскажите пож как будет происходить сам процесс в двух словах:
- в глобальном модуле приначалеработысистемы?
- в самой обработке процедуру или что-там.

просто пока ума не могу приложить как оно там все будет ловиться.


Жми спасибо, если подсказал 8)

G_Re

???? Удивительный вопрос ???? "Всё уже украдено(написано) до нас" (Операция "Ы")
Общая логика такова: Процедура ОбработкаВнешнегоСобытия() (предопределенная), располагай где нужно, например, в той же внешней форме. В ней и обрабатывай своё событие(отработка сканера).
Конкретные команды существенно зависят от драйвера сканера. Рекомендую АТОЛовский, а не тот, который в коробке, но это дело вкуса.

BotMan

Огромное спасибо, просто в синтаксис помощнике об этой процедуре ни единого слова!
был бы весьма признателен, за небольшой пример:

я так понимаю в форму нужно добавить:

процедура приоткрытии()
сканер = создатьобъект("атоловский драйвер");
??????
?????
что тут еще необходимо????

конецпроцедуры

процедура ОбработкаВнешнегоСобытия(Событие,Источник,Данные)
сообщить(Источник);
сообщить(событие);
сообщить(данные);
конецпроцедуры
Жми спасибо, если подсказал 8)

prog1c7.7

небольшой пример в ТиСе реализован

G_Re

У меня, например, так:
1. В глобальнике в процедуру ПриНачалеРаботыСистемы() добавлены буквы:
   
//*********** АТОЛ-драйвер сканера *********************
   Если ЗагрузитьВнешнююКомпоненту("Scaner1C.DLL")<>0 Тогда
     Scaner = СоздатьОбъект("AddIn.Scaner45"); // Создание объекта сканера из внешней компоненты
     Scaner.AutoDisable = 1;
     Scaner.DataEventEnabled = 1;
     Scaner.OldVersion = 0;
     //Сообщить("Внешняя компонента сканера штрих-кода Scaner1C.DLL успешно загружена");   
    
   Иначе
     Сообщить("Внешняя компонента сканера штрих-кода - Scaner1C.DLL не найдена");
   КонецЕсли;


2. В модуль формы документа добавлена процедура
//************************************************
Процедура ОбработкаВнешнегоСобытия(Источник,Событие,Данные)

      сДанные=СокрЛП(Scaner.ScanData);
   
// В сДанные находятся считанные сканером или кардридером или ..... данные.
// Далее обрабатывай их, как считаешь нужным.   
        

    
     Scaner.DeleteEvent();
     Scaner.DataEventEnabled = 1;
КонецПроцедуры 

3. Вот, собственно и всё!
Примечание1. Драйвер устанавливай штатно, не вручную.
Примечание2. В букваре к драйверу описаны все его возможности(свойства и даже в кириллице(я пользуюсь английской нотацией, что не есть обязательно).
Примечание3. После правильной установки драйвера в 1С в Сервис->Параметры появится закладка сканера. Там выставь порт-Клавиатура, суффикс #13, галки "включено..." и "включать..."
Вот теперь, вроде, ВСЁ! Успехов


Теги: штрихкод 

Похожие темы (5)

Рейтинг@Mail.ru

Поиск