Спасибо
! | Правила, п.3,4,5 |
Приношу извинения за игнорирование правил
! | Правила, п.3,4,5 |
Попытка
Драйвер = CreateObject("ecrmini.t400");
глПереченьДрайверов.ДобавитьЗначение(Драйвер,НазваниеДрайвера+ЭККА.Код);
глКомментарий("Подключен драйвер для ЭККА "+ЭККА,2);
Исключение
глКомментарий("Ошибка ЭККА :"+ОписаниеОшибки(),0);
глКомментарий("Возможно, драйвер не установлен !",2);
КонецПопытки;
//Открыть порт
СтрокаКоманды = "open_port;"+Порт+";"+Скорость+";";
Результат = Драйвер.t400me(СтрокаКоманды);
Если Результат = 0 Тогда
Сообщить("Не удалось открыть порт");
возврат;
КонецЕсли;
! | Правила, п.12 |
Сообщить(Драйвер);
выдает OLE.It400драйвер.get_last_result()
Оля = СоздатьОбъект("ecrmini.t400");
Оля.t400me("open_port;9;115200;");
сообщить(""+Оля.get_last_result());
Оля.t400me("cashier_registration;1;0;");
сообщить(""+Оля.get_last_result());
Оля.t400me("execute_x_report;1;");
сообщить(""+Оля.get_last_result());
Оля.t400me("close_port;");
сообщить(""+Оля.get_last_result());