Сканер в тонком клиенте...

1С v8

28.07.11

✎

11:48

Посмотрел как подключили его в РТиУ
Добавил подключение к своей форме, но не отрабатывает ВнешнееСобытие
не отрабатывает ОбработкаОповещения
в РТиУ прописана ОбработкаОповещения, но где вызывается Оповестить() я не понял
может пнете в нужном направлении?

1 5 Элемент

28.07.11

✎

12:10

(0) оповестить вызывается в модуле упр приложения

1. в ПриСозданииНаСервере

//РаботаСВнешнимОборудованием
 
ИспользоватьПодключаемоеОборудование = ПолучитьФункциональнуюОпцию("ИспользоватьПодключаемоеОборудование");
 
//Конец РаботаСВнешнимОборудованием

2. в ПриОткрытии

// МеханизмВнешнегоОборудования
 
Если ИспользоватьПодключаемоеОборудование
 
    И МенеджерОборудованияКлиент.ОбновитьРабочееМестоКлиента() Тогда
 
    
 
    ОписаниеОшибки = "";
 
    
 
    ПоддерживаемыеТипыВО = Новый Массив();
 
    ПоддерживаемыеТипыВО.Добавить("СканерШтрихкода");
 
    
 
    Если Не МенеджерОборудованияКлиент.ПодключитьОборудованиеПоТипу(УникальныйИдентификатор, ПоддерживаемыеТипыВО, ОписаниеОшибки) Тогда
 
        ТекстСообщения = НСтр("ru = 'При подключении оборудования произошла ошибка:
 
                              |""%ОписаниеОшибки%"".'");
 
        ТекстСообщения = СтрЗаменить(ТекстСообщения, "%ОписаниеОшибки%", ОписаниеОшибки);
 
        ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстСообщения);
 
    КонецЕсли;
 
    
 
КонецЕсли;
 
// Конец МеханизмВнешнегоОборудования

3. в ОбработкаОповещения

// ПодключаемоеОборудование
 
Если Источник = "ПодключаемоеОборудование"
 
    И ВводДоступен() Тогда
 
    
 
    Если ИмяСобытия = "ScanData" Тогда
 
        
 
        //Преобразуем предварительно к ожидаемому формату
 
        Если Параметр[1] = Неопределено Тогда
 
            Данные = Новый Структура("Штрихкод, Количество", Параметр[0], 1); // Достаем штрихкод из основных данных
 
        Иначе
 
            Данные = Новый Структура("Штрихкод, Количество", Параметр[1][1], 1); // Достаем штрихкод из дополнительных данных
 
        КонецЕсли;
 
        
 
        ПолученыШтрихкоды(Данные);
 
        
 
    КонецЕсли;
 
    
 
КонецЕсли;
 
// Конец ПодключаемоеОборудование

2 mikecool

28.07.11

✎