0
КонецЦикла
25.10.12
✎
19:49
|
Есть принтер этикеток, подключенный к ноутбуку
Через RDP заходим на терминал, там запущен робот (сеанс 1С), который ловит команды от терминала сбора данных (атоловский драйвер)
Используется программка Скрин драйвер для принтера.
Этот код в тестовой обработке работает (запускается под тем же пользователем в винде и под тем же роботом):
Парам = СоздатьОбъект("СписокЗначений");
Парам.ДобавитьЗначение(Табл, "ТаблицаДанных");
Парам.ДобавитьЗначение("Товар", "Режим");
Парам.ДобавитьЗначение("принтер", "Устройство");
Парам.ДобавитьЗначение(1, "КолвоКопий");
ОткрытьФорму("Обработка.ПечатьЭтикетки", Парам);
В обработке печати этикеток всяко-разно, затем:
Таб.ПараметрыСтраницы(,,,,,,,,,,,"\");
Таб.Напечатать(0);
Но при обработке команды от драйвера не хочет посылать на печать
Парам = СоздатьОбъект("СписокЗначений");
Парам.ДобавитьЗначение(Табл, "ТаблицаДанных");
Парам.ДобавитьЗначение("Товар", "Режим");
Парам.ДобавитьЗначение("принтер", "Устройство");
Парам.ДобавитьЗначение(Колво, "КолвоКопий");
ЗаписьВЛог("Печать технологического ШК: " + СокрЛП(Штрихкод));
ОткрытьФормуМодально("Обработка.ПечатьЭтикетки", Парам);
ЗаписьВЛог("Окончание печати технологических ШК", 1);
Куда копать? И там и там печать производится программно
|
|
1
КонецЦикла
25.10.12
✎
20:02
|
И там и там ОткрытьФормуМодально, на это внимания не обращайте, к тому же не влияет
Обработка идет так:
Процедура ОбработкаВнешнегоСобытия(Источник, Событие, Данные)
...
ИначеЕсли Событие = "8" Тогда
РаспечататьТехнологическийШК(Данные);
КонецЕсли;
|
|
5
КонецЦикла
25.10.12
✎
22:45
|
(4) Туплю, подробнее
Базу из списка убивал
В принципе я по терминалу с правами админа могу зайти в любой момент, но ТСД и принтер у заказчика :)
Как повторить ошибку так же программно и разобраться в чем дело пока не понимаю
|
|