СП101-Ф, СП802-Ф

Сканеры, кассы, ККТ и т.д.
Правила форума
При написании вопроса или обсуждении проблемы, не забывайте указывать версию Clarion который Вы используете.
А так же пользуйтесь спец. тегами при вставке исходников!!!
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

Кто нибудь реализовывал протокол работы с данными аппаратами?
Все команды и ответы гоняются туда/сюда как XML
А то встала задача за неделю все сделать. Напрягло.
Вложения
ККТ СП-Ф. Протокол 10.3 (редакция 2).pdf
(1.19 МБ) 938 скачиваний
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7322
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

СП101-Ф, СП802-Ф

Сообщение Игорь Столяров »

Ну можно задачу свести к предыдущей ... сие чудо-девайсы поддерживаются драйвером АТОЛ.
А значит все легко делается через обычный OLE - весь код для АТОЛ будет работает.

Из приятных бонусов: для техники СЕРВИС-ПЛЮС есть программные эмуляторы.
http://infostart.ru/public/154500/
http://shebdim.github.io/cremu/downloads.html

Проверено - все работает.
Мы как раз его используем для обратной задачи: отработки кода под ФР АТОЛ ...
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

ATOL поддерживает СП101ФР-К и СП402ФР-К а не те что я описал.
СП101ФР-К у нас есть в наличии. Да, они могут работать с ATOL драйвером.
Хотя мы работаем через sp101fr.dll
Сейчас речь идет о СП802-Ф. Их не вижу в списке поддерживаемых.
Драйвер 8.14.0.0
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

Собственно вопрос почти снят.
Написал обмен через COM порт.
XML генерится средствами Clarion (класс XMLGenerator)
С парсером сложнее. Как с встроенным нормально работать не разбирался. Нет примеров и времени.
Так что ответы ККТ читаю в iQXML. Без русского в XML ответах можно обойтись пока.

Спешка дикая.
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Аватара пользователя
Игорь Столяров
Ветеран движения
Сообщения: 7322
Зарегистрирован: 07 Июль 2005, 10:19
Откуда: г. Ростов-на-ДоМу
Благодарил (а): 13 раз
Поблагодарили: 48 раз

СП101-Ф, СП802-Ф

Сообщение Игорь Столяров »

Admin писал(а): 23 Май 2017, 10:30Написала обмен через COM порт.
Не пугайте нас пожалуйста. Скажите срочно, что это орфографическая ошибка ... ;)
За теми кто отстал - не возвращаться. (С) Кодекс
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

:idied:
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

Ну вот накорябал.
sp802f.zip
(53.64 КБ) 336 скачиваний
Используется немного модифицированный XMLGenerator из abprxml.clw
Чья то обертка на IDynStr из dynstrclass.clw
Так же читаю XML через iQXML
Код только дописал. Все потом причешется :facepalm:
Может кому понадобится.
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
Yufil
Ветеран движения
Сообщения: 1277
Зарегистрирован: 16 Май 2006, 14:34
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Yufil »

А что такие сложности? Реально нужна ровно одна процедура замены спецсимволов в строке (у меня ANSI2HTML). А дальше что надо, то и генеришь, не вникая в...

Код: Выделить всё

SaveManifest    ROUTINE  ! Сохранить манифест
                DATA
CS             CSTR                
                CODE
                CS.Set('<<?xml version="1.0" encoding="UTF-8" ?>')
                ! <13,10> только для удобства чтения сгенерированного XML, никакой серьёзной роли не играет 
                CS.CAT('<13,10><<structure>')                
                CS.Cat('<13,10><<program title="' & ANSI2HTML(Loc:MName) & '"/>')
                LOOP ManQ# = 1 to Records(ManQ) 
                  Get(ManQ, ManQ#) 
                  CS.Cat('<13,10><<topic level="' & ManQ:Level |
                  & '" id="' & Clip(ManQ:ID) & '" name="' & ANSI2HTML(ManQ:Name) & '" />') 
                END   
                CS.Cat('<13,10><</structure>') 
                CS.ToUTF8() 
                CS.SaveToFile(Loc:ManifestFileName) 
                EXIT 
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

Ну вот такие мы "пейсатели"
Мы умеем и быстро и красиво и надежно. Но вот все вместе часто не получается :)
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
kreator
✯ Ветеран ✯
Сообщения: 4960
Зарегистрирован: 28 Май 2009, 15:54
Откуда: Москва
Благодарил (а): 6 раз
Поблагодарили: 19 раз

СП101-Ф, СП802-Ф

Сообщение kreator »

Быстро, дёшево, хорошо. Выбрать можно только два пункта. Аксиома!!!
We are hard at work… for you. :)
Аватара пользователя
Дед Пахом
Старичок
Сообщения: 3131
Зарегистрирован: 07 Июль 2005, 16:51
Откуда: Москва, Россия
Благодарил (а): 10 раз
Поблагодарили: 28 раз
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Дед Пахом »

kreator писал(а): 25 Май 2017, 13:44Быстро, дёшево, хорошо. Выбрать можно только два пункта. Аксиома!!!
А дуракам закон не писан, в рекламе Заборстроя (кажется; часто по ТВ крутят) смело предъявлены все три пункта.
С уважением, ДП
karpovi
Прохожий
Сообщения: 3
Зарегистрирован: 25 Декабрь 2017, 8:04

СП101-Ф, СП802-Ф

Сообщение karpovi »

Admin писал(а): 25 Май 2017, 4:04Ну вот накорябал.

sp802f.zip
(53.64 КБ) 32 скачивания

Используется немного модифицированный XMLGenerator из abprxml.clw
Чья то обертка на IDynStr из dynstrclass.clw
Так же читаю XML через iQXML
Код только дописал. Все потом причешется :facepalm:
Может кому понадобится.

скачал то что вы написали а как пользоваться этим не подскажите ?
Аватара пользователя
Admin
Администратор
Сообщения: 3959
Зарегистрирован: 05 Июль 2005, 15:59
Откуда: Хабаровск
Благодарил (а): 25 раз
Поблагодарили: 22 раза
Контактная информация:

СП101-Ф, СП802-Ф

Сообщение Admin »

karpovi писал(а): 25 Декабрь 2017, 8:09скачал то что вы написали а как пользоваться этим не подскажите ?
Конкретнее, в чем проблемы?
Коду же 10 раз переписан.
И вообще от СП101-СП802 отказались в пользу АТОЛА.
Рай совершает ошибки ничуть не реже чем ад. Просто у него хорошая пресса
karpovi
Прохожий
Сообщения: 3
Зарегистрирован: 25 Декабрь 2017, 8:04

СП101-Ф, СП802-Ф

Сообщение karpovi »

В архиве лежит как я понял проект написаный на кларионе и есть еще sp802f.exe.
Как его подключить скажем к 1с и отправлять команды, обычно там dll подключаются.
Просто я кларион не знаю.
Можете новую версию кода выслать если не сложно.
karpovi
Прохожий
Сообщения: 3
Зарегистрирован: 25 Декабрь 2017, 8:04

СП101-Ф, СП802-Ф

Сообщение karpovi »

поставил clarion 10, пытаюсь скомпилировать ваши исходники заново пишет:
Точка входа в процедуру XML:FINDNEXTNODE@....... не найдена в библиотеке DLL sp802f.exe
Ответить