Цитата(niklain-k @ 08.02.10, 21:27)
У меня сканеры MS 9520 стоят в разрыв клавиатуры.Как сделать, чтоб эмулировался как девайс .? Ну..подробнее ...по пунктам ))), куда этот код вставить?)
В ГЛАВНОМ МОДУЛЕ
1. Подключение - всегда подключаю, без проверок
Процедура ПриНачалеРаботыСистемы()
// ТУТ ТВОЙ КОД ......
Попытка
ПрогИД = "AddIn.Scaner45";
ПодключитьВнешнююКомпоненту(ПрогИД);
Scaner = Новый (ПрогИД);
Scaner.OldVersion = 0;
Scaner.AutoDisable = 1;
Scaner.DataEventEnabled = 1;
Исключение
Сообщить("Невозможно подключить внешнюю компоненту.
| Проверьте, что внешняя компонента корректно установлена и имеет ту же версию,
| что и требуемая обработкой обслуживания.");
КонецПопытки;
КонецПроцедуры // ПриНачалеРаботыСистемы()
2. Срабатывание
Процедура ОбработкаВнешнегоСобытия(Источник, Событие, Данные)
Если ВсеОбработано Тогда // использую для проверки не обработано ли в форме?
ВсеОбработано = Ложь;
Возврат;
КонецЕсли;
Scaner.EventNumber=Число(Данные);
ТорговоеОборудование.ОбработатьВведеныйШК(Scaner.ScanData);
Scaner.DeleteEvent();
Scaner.DataEventEnabled = 1;
КонецПроцедуры
3. МОДУЛЬ ФОРМЫ ЛЮБОЙ, данная форма РеализацияТоваровУслуг
Процедура ВнешнееСобытие(Источник, Событие, Данные)
Если НЕ ВводДоступен() Тогда Возврат; КонецЕсли; // Проверка на доступность ввода
Scaner.EventNumber=Число(Данные);
// тут обрабатываю данные
Владелец = ТорговоеОборудование.ПолучитьВладельца(Scaner.ScanData);
Если Владелец = Неопределено Тогда
Спр = Справочники.Номенклатура.СоздатьЭлемент();
Спр.Комментарий = "ШК-" + Scaner.ScanData;
Спр.ПолучитьФорму("ФормаЭлемента").ОткрытьМодально();
ДобавитьНоменклатуру(Спр,1);
ИначеЕсли ТипЗнч(Владелец) = Тип("СправочникСсылка.Контрагенты") Тогда
Контрагент = Владелец;
КонтрагентПриИзменении(Неопределено);
ИначеЕсли ТипЗнч(Владелец) = Тип("СправочникСсылка.Номенклатура") Тогда
ДобавитьНоменклатуру(Владелец,1);
КонецЕсли;
// конец обработки даных
Scaner.DeleteEvent();
Scaner.DataEventEnabled = 1;
ВсеОбработано = Истина; // указываю что обработал в форме и глобально обрабатывать нет нужды
КонецПроцедуры
Надеюсь что был полезен!