новое событие
Информационный поток
Задания вакансии материалы разработки сообщения форума
Пимшин Дмитрий Александрович
Приватное сообщение

Передача PDF417 (акцизная марка) с ТСД DS5 в 1С

65 |  0
19 мая 2023 в 20:11:54 (1 год 5 часов назад)
66900
Текст задания
Готов заплатить за дельный совет, кот. решит мою проблему.

Есть ТСД Mobilebase DS5 (3.5in,2D imager,3G,Wifi,BT,WinEH 6.5,512Mb RAM/1Gb ROM,Numeric RUS,IP67, АКБ 5200,подставка).
Настроил в нем сканирование ШК (определил, что нужно EAN13 и PDF417, выставил суффикс).
Настроил RDP-подключение к Windows server 2008 R2 Standard (версия 6.1, сборка 7601, SP 1).
В сессии автоматом запускается 1С:Комплексная автоматизация (платформа 8.2.19.68) со спец. обработкой.
В обработке активируется поле ввода, куда д. читаться ШК.

Сначала специально в терминале сканер не подключал (драйвера не ставил, торговое оборудование не настраивал, чистая эмуляция клавиатуры).

EAN 13 читается без проблем (он читается и читался при любых настройках).
А вот акцизная марка читаться не хочет.
Вместо
22N000009L591W7B7NM0R1P606300200016097JD9X6LHRI61ZDGX94ZB83S20YD2AOA
ТСД передаёт
22000009%(!7701606300200160979661($8320@ или
22 000009%(!77016063002000160979661($8320@

При этом, если запускать утилиту чтения ШК на самом ТСД, то в утилиту попадает правильный ШК, а вот в терминал передаётся фигня.

Вычитал, что надо устанавливать англ. язык и раскладку для корректного чтения PDF417. Сделал на стороне терминала выставляется англ. язык при запуске обработки. Тем не менее и в поле ввода, и в текст. документ читается
22000009%(!7701606300200160979661($8320@....

Поставил Атолоские драйвера DTO6_2009_02_11. Взял обработку обслуживания ATOLBarcodeScan_v2.epf. Настроил подключаемое оборудование. Ничего не изменилось.

В настройках ТСД нашёл возможность передачи ШК через буфер обмена. Включил. Отсканированный ШК (PDF417) вставляется правильно вручную. Сделал в обработке периодический опрос буфера обмена:
comObj = Новый COMОбъект("htmlfile");
result = comObj.ParentWindow.ClipboardData.Getdata("Text");
если TypeOf(result) = Тип("Строка") и не ПустаяСтрока(result) тогда
полеВвода = result;
ШК(undefined);
comObj.ParentWindow.ClipboardData.ClearData();
конецЕсли;

И ничего. comObj.ParentWindow.ClipboardData.Getdata("Text") всегда возвращает пустую строку.
Суффикс включал / выключал. Вручную из буфера ШК вставляется правильный.

Может кто сталкивался с таким зверем и м. подсказать, куда ковырять?

ПС: В эту же обработку, только с обычного компьютера, через RDP обычный 2D-сканер в режиме эмуляции COM-порта с теми же драйверами и обработкой обслуживания читает акцизку правильно.
0
Отклики (0)
Предложения отсутствуют