|
|
|
печать на фискальный принтер МІНІ-ФП | ☑ | ||
|---|---|---|---|---|
|
0
telemost
31.05.10
✎
17:23
|
У меня вопрос по роботе с фискальным принтером.
Проблема в следующем есть фискальный принтер МИНИ-ФП, пробую настроить печать чека с 1С 7,7 но никак не могу соединится. Пробовал и полный протокол и упрощенный режим соединения, использую пример с сайта http://help-micro.com.ua Код: Выделить всё proc = CreateObject("EQLProc.EQLProcedure"); // установка свойств объекта перед соединением с кассой proc.Number = "1;0"; // касса подключена к порту COM1 proc.Protocol = "L2Com.HcComSessionCreator"; proc.User = 1; proc.Password = 0; // Соединение с кассой proc.Connect = -1; //True // Процедуры работают только если установлена связь с кассой Если proc.Connect = -1 Тогда // Работа proc.SmenBegin(); proc.BegChk(); proc.FullProd(322233,3,1,1,1,1,"Пиво"); proc.Oplata(0,0,0); proc.EndChk(); КонецЕсли; другие варианты Код: Выделить всё Попытка Проц = СоздатьОбъект("EQLProc.EQLProcedure"); //Проц.Number = "1;1"; // установка соединения. //Проц.Number = "1;0"; // установка соединения. //Проц.Number = 1; // установка соединения. Проц.Number = "1;0"; // установка соединения. Проц.User = 1; // более подробно вопрос рассмотрен в обработке EQLConn.ert Проц.Password = 0; Проц.Protocol="L2Com.HcComSessionCreator"; Проц.Connect = 1; Проц.SmenBegin(); // начать смену кассиром, зарегистрированным при установке соединения. Исключение Предупреждение(ОписаниеОшибки()); КонецПопытки; с драйверов устанавливаю только eqlecr.exe(Build: 83 05.09.2008 8:22:52 (UTC)), через утилиты comtest.exe - связь установлено а через winmon.exe и Smc2.exe только через полный протокол устанавливается связь, но в 1С при вызове SmenBegin(), постоянно выдает сообщение "поле агрегатного объекта не обнаружено (SmenBegin())" |
|||
|
1
Иду
31.05.10
✎
17:50
|
//
Попытка Проц=CreateObject("EQLProc.EQLProcedure"); Проц.Number="1;0"; Проц.User="1"; Проц.Password="000000"; Проц.Protocol="L2Com.HcComSessionCreator"; Проц.Connect=1; Проц.SmenBegin(); Сообщить("Соединилися!"); Исключение Сообщить("Фигвам"); КонецПопытки; |
|||
|
2
telemost
01.06.10
✎
09:15
|
Удалось соединится следующим образом, через полный протокол.
[code] Попытка Проц=CreateObject("EQLProc.EQLProcedure"); Проц.Number="1;1"; Проц.User=1; Проц.Password=0; Проц.Connect=1; Проц.SmenBegin(); Сообщить("Соединилися!"); Исключение Сообщить("Фигвам"); КонецПопытки; [code] |
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |