Изучаем функционал программы

[Artem]

Изучаем функционал программы

Кто-нибудь пробовал работать с серверным сокетом через функцию СЕРВЕР_ПОДКЛЮЧИТЬ ?

 

[Ivan NovaSoft]

Кто-нибудь пробовал работать с серверным сокетом через функцию СЕРВЕР_ПОДКЛЮЧИТЬ ?

В ранних версиях (например "5.0.835") в библиотеке "Rs_incerman" использовалась эта функция в "ОтправитьЗапрос".

 

[Artem]

В ранних версиях (например "5.0.835") в библиотеке "Rs_incerman" использовалась эта функция в "ОтправитьЗапрос".

Спасибо. А где бы это скачать? У себя нашел 5.1.хх и 5.0.6 Искомой библиотеки нет

 

[Писарев Петр]

Скачать файл обновления 5.0.835
обноhttps://disk.yandex.ru/d/BF9Q5NZZTK5ywwвления
распаковать и найти нужную функцию

 

[Ivan NovaSoft]

Спасибо. А где бы это скачать? У себя нашел 5.1.хх и 5.0.6 Искомой библиотеки нет

Вот всё что есть по этой части:

СЕРВЕР_ПОДКЛЮЧИТЬ(адрес_подкл, UTF8)

разм1 = СИМВ(ДЛИНА(команда) \ 256)
разм2 = СИМВ(ОСТ(ДЛИНА(команда), 256))
команда = СИМВ(0) + СИМВ(0) + разм1 + разм2 + команда

ЕСЛИ СЕРВЕР_ОТПРАВИТЬ(команда, UTF8) ТО
данные = ""
событие != ""
РЕЗУЛЬТАТ = ЗАПРОС_ВНЕШНЕГО_СОБЫТИЯ("Ожидаем ответ", источник, событие, данные, НЕТ, 30000)
СЕРВЕР_ПОДКЛЮЧИТЬ("", UTF8)

ЕСЛИ РЕЗУЛЬТАТ ТО
ЕСЛИ данные = "" ТО
ЕСЛИ НЕ молча ТО
СООБЩЕНИЕ("Нет информации от ККТ.")
КОНЕЦ_ЕСЛИ
ВЫХОД(НЕТ)
ИНАЧЕ
ЕСЛИ источник = "TCPClient" ТО
ЦИКЛ ДЛЯ (ном = 1, ДЛИНА(данные))
ЕСЛИ ПОДСТР(данные, ном, 1) = "{" ТО
данные = ПОДСТР(данные, ном)
СТОП
КОНЕЦ_ЕСЛИ
КОНЕЦ_ЦИКЛА

//Разбираем полученный ответ на запрос получения отчётов в массив
JSON_СЧИТАТЬ(данные, ответ_масс)

ЕСЛИ ответ_масс["result"] <> "0" ТО
ЕСЛИ НЕ молча ТО
СООБЩЕНИЕ(ФОРМАТ("Ошибка подключения к ККТ://<*>//<*>", ответ_масс["result"], ответ_масс["description"]))
КОНЕЦ_ЕСЛИ
ВЫХОД(НЕТ)
КОНЕЦ_ЕСЛИ
ИНАЧЕ
ЕСЛИ НЕ молча ТО
СООБЩЕНИЕ("Ошибка принятия ответа")
КОНЕЦ_ЕСЛИ
ВЫХОД(НЕТ)
КОНЕЦ_ЕСЛИ
КОНЕЦ_ЕСЛИ
ИНАЧЕ
ЕСЛИ НЕ молча ТО
СООБЩЕНИЕ("Нет ответа от ККТ")
КОНЕЦ_ЕСЛИ
КОНЕЦ_ЕСЛИ
ИНАЧЕ
ЕСЛИ НЕ молча ТО
СООБЩЕНИЕ("Ошибка отправки данных")
КОНЕЦ_ЕСЛИ
ВЫХОД(НЕТ)
КОНЕЦ_ЕСЛИ