Класс для API ТС ПИоТ ЕСМ от АО «ЕСП»

[Игорь Столяров]

Привет всем !

Класс для разрешительной проверки КМ (кодов маркировки) через API ТС ПИоТ ЕСМ от АО «ЕСП».
Поддержка работы с API ЦРПТ: ПО Локальный модуль и Национальный каталог.
Полный боевой комплект с описанием интерфейса API и примерами.

Реализованный в классе функционал соответствует ПФС версии 1.18 от 26.06.2026 г. (27 сценариев),
для получения сертификата совместимости и допуска к работе в промышленной среде ТС ПИоТ ЦРПТ.

Благодарность за помощь на старте проекта: FinsoftRZ и Alex412.
Любые замечания, исправления и дополнения - приветствуются !

Список изменений в версии от 27.06.2026 г.
----------------------------------------------------------------------------------------------------
- Внесены изменения в соответствии с требованиями ПФС 1.17 и 1.18;
- Устранены проблемы по запросам и внесены изменения в примеры.
----------------------------------------------------------------------------------------------------
Рекомендуем использовать актуальные версии классов LibCURL, cJSON и PrintF.

esp.png (13.96 КБ) 157605 просмотров

[Игорь Столяров]

Всем привет !

Хочу рассказать историю, непосредственно связанную с ТС ПИоТ.
АО "ЕСП" анонсировало создание по всей стране центров обслуживания ЕСМ (на сайте есть карта).
Было заявлено, что они получат часть оплаты из подписки 5тр на ЕСМ за установку и сопровождение.
Вроде бы всё правильно и хорошо, но ...

Есстественно никаких центров обслуживания ЕСМ никто создавать не собирается.
Учитывая выверты ЦРПТ с переносом сроков внедрения ТС ПИоТ - это провальная бизнес модель.
А вот всё-теже мелкие ЦТО по ремонту кассовой техники в регионах - заработать на шару не против.
Проблема в том, что у них есть техники для пайки плат, а с маркировкой они сталкиваются только в магазине.

Далее они берут под "новый проект" девочку, которая удалённо за +6-7 тр. из дома установит ЕСМ и (Внимание !!!) решит
все вопросы с ЕСМ и разработчиком кассовой программы. При этом модель ККТ, версия Windows и программы вообще пофиг.
Супер-профессионалы ! Запуганные предприниматели готовы на всё.

И начинается цирк с конями. Со мной парочка таких девах уже контактировала. От них я узнал, что программа
не видит порт если запущено окно драйвера (тупо ККТ захвачен), запуская по нескольку копий ЕСМ - они добились
эффекта когда ТС ПИоТ начинает в цикле искать и переподключаться к единственной ККТ. Всё падает на компе с 4GB RAM.
Вишенкой на этом торте, они "загуглив Алису" (дословно !) пришли ко мне, что бы я немедленно удалённо подключился
к какому-то компьютеру и решил все их проблемы. Просто пипец. Сейчас вроде пошла отсрочка, но осенью они вернуться.

[finsoftrz]

Скоро будут звонить, чтобы приехали лично и настроили свою 1с.

[Игорь Столяров]

Вы знаете, я считаю, получив 2000 руб. от ЕСМ за сопровождение + 7000 руб. от клиента "за установку",
можно, как минимум, оторвать попу съездить на пол-дня в торговую точку для настройки всего этого.
Тем более, что это небольшие города, где на автобусе можно за пол-часа весь город объехать.
Но нет ! Мы устраиваем срач на ноуте из дома ...

[finsoftrz]

И начинается цирк с конями. Со мной парочка таких девах уже контактировала. От них я узнал, что программа
не видит порт если запущено окно драйвера (тупо ККТ захвачен), запуская по нескольку копий ЕСМ - они добились
эффекта когда ТС ПИоТ начинает в цикле искать и переподключаться к единственной ККТ. Всё падает на компе с 4GB RAM.

Я сейчас ответы на подобные вопросы заношу в файлик и скармливаю дипсику. Затем копирую и пересылаю ответ дипсика без лишних слов. При повторном возникновении вопроса просто копирую ответ.

[Игорь Столяров]

Сейчас это модная тема.
Если Вы отправите в тех. поддержку АТОЛ запрос с любым текстом, содержащим слова "ЕСМ" или "ТС ПИоТ",
то моментально получите ответ ити в тех. поддержку АО "ЕСП" и там решать все свои вопросы.

[finsoftrz]

Не знаю, как у Вас, мне просто посылать своих клиентов без решения вопросов неправильно, так как они оплачивают ежемесячную поддержку. Которые остались со старых времен на годовом абонементе (маленькие), их тоже надо консультировать по минимальному уровню. Если вопросы за пределами непосредственно работы с прикладной программой, то передаю партнерам, которые решают вопрос за отдельную оплату, в том числе с выездом на место.
У меня когда-то были вопросы, которые не знал, как решить, и которые отнимали много времени. Первый это консультации, второй рисование бланков, третий высокие затраты на всякие интеграции. Появление нейросетей эти проблемы в значительной мере снимает.

[DarkTMP]

Добрый день. Как-то можно через API ЕСМ получить до какой даты действительна лицензия ?

[Игорь Столяров]

Как-то можно через API ЕСМ получить до какой даты действительна лицензия

Добрый день !

Метод класса Honest возвращает сведения о состоянии инстанса (экземпляра объекта) ЕСМ по его ID номеру:

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

!!! 1.3. Запрос получения информации из ЕСМ 
ESML_IdInfo  Procedure(String IdService,*ESML:G_IdInfo gIdInfo),Bool,Proc

Результат получите в объекте "licenses" из структуры ESML:G_IdInfo:

[Игорь Столяров]

Как-то можно через API ЕСМ получить до какой даты действительна лицензия ?

Сделал простой тест:

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

Test_ESML2 Routine
  Data
xHonest    HonestClass
gContact   Group(Honest:G_Contact).  ! Параметры подключения
gInfoList  Group(ESML:G_InfoList).
gIdInfo    Group(ESML:G_IdInfo).

  Code
  ! Инициализация класса (см. примеры)
  If xHonest.Init(gContact) 
  
     ! Запрос на получение списка всех сервисов
     If xHonest.ESML_Info(gInfoList)
     
        ! Смотрим на ID первого сервиса
        Honest::Message(gInfoList.instances[1].id)
        
        ! Запрос на получение детальной информации о конкретном сервисе по его ID
        If xHonest.ESML_IdInfo(gInfoList.instances[1].id,gIdInfo)          
           Honest::Message('Срок действия лицензии ЕСМ:' & gIdInfo.licenses[1].activeTill)          
        end
     end
  end  

Результат:

[DarkTMP]

Как-то можно через API ЕСМ получить до какой даты действительна лицензия ?

Сделал простой тест:

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

Test_ESML2 Routine
  Data
xHonest    HonestClass
gContact   Group(Honest:G_Contact).  ! Параметры подключения
gInfoList  Group(ESML:G_InfoList).
gIdInfo    Group(ESML:G_IdInfo).

  Code
  ! Инициализация класса (см. примеры)
  If xHonest.Init(gContact) 
  
     ! Запрос на получение списка всех сервисов
     If xHonest.ESML_Info(gInfoList)
     
        ! Смотрим на ID первого сервиса
        Honest::Message(gInfoList.instances[1].id)
        
        ! Запрос на получение детальной информации о конкретном сервисе по его ID
        If xHonest.ESML_IdInfo(gInfoList.instances[1].id,gIdInfo)          
           Honest::Message('Срок действия лицензии ЕСМ:' & gIdInfo.licenses[1].activeTill)          
        end
     end
  end  

Результат:
1.jpg

Большое спасибо за развёрнутый ответ, у нас около 40 контрагентов и нужно мониторить их добро для предупреждения подачи заявок в техподдержку. Осталось только победить пароль на архив, пока не получается..

[Игорь Столяров]