Добрый день, купили фискальный регистратор МИНИ ФП54.01, может кто поделиться обработкой подключения к 1с 7? К Сожалению на сайте юнисистема примеры только под 8-ку.
Спасибо
! | Правила, п.3,4,5 |
Попытка
Драйвер = CreateObject("ecrmini.t400");
глПереченьДрайверов.ДобавитьЗначение(Драйвер,НазваниеДрайвера+ЭККА.Код);
глКомментарий("Подключен драйвер для ЭККА "+ЭККА,2);
Исключение
глКомментарий("Ошибка ЭККА :"+ОписаниеОшибки(),0);
глКомментарий("Возможно, драйвер не установлен !",2);
КонецПопытки;
//Открыть порт
СтрокаКоманды = "open_port;"+Порт+";"+Скорость+";";
Результат = Драйвер.t400me(СтрокаКоманды);
Если Результат = 0 Тогда
Сообщить("Не удалось открыть порт");
возврат;
КонецЕсли;
! | Правила, п.12 |
Сообщить(Драйвер);
выдает OLE.It400Попробуйте через родную программу аппарата посмотреть настройки порта и укажите их в строке
Я тоже ищу. Поделитесь пожалуйста кто сколько может
реализовал печать чеков через execute_file - но так и не понял, как в 1с 77 - сделать по отдельным командам, например, как получить сумму в кассе?
команда драйвер.t400me("get_cashbox_sum"); - показывает 0 или что-то я не так делаю?
драйвер.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());
Супер, большое спасибо.
я писал через Оля.t400me а надо было просто Оля
Не обратил внимание в первом Вашем посте, еще раз большое спасибо !!!
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua