|
а какой код в обработчике ожидания?
такой?
Процедура ОбработкаВнешнегоСобытия(Источник,Событие,Данные)//Предопределенная процедура 1С
//Глобальный обработчик внешнего события
Сообщить("Внешнее событие: Источник="+Источник+" Событие="+Событие+"Данные=" + Данные);
Если (Источник="vk_rs232") И (Событие="BarCodeValue") Тогда
rs232.ЗакрытьПорт();
Сп = Новый ("СписокЗначений");
Сп.ИзСтрокиСРазделителями(""""+СтрЗаменить(Данные,",",""",""")+"""");
Если Сп.РазмерСписка()=4 Тогда
Зн = СокрЛП(Сп.ПолучитьЗначение(4));
Поз = Найти(Зн," ");
Результат=Число(Лев(Зн,Поз-1));
КонецЕсли;
rs232.ОткрытьПорт("COM1");
rs232.КонецСтроки=Символ(13);
КонецЕсли;
КонецПроцедуры |
|