1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-03-25 21:39:21 +02:00

Update Module.bsl

This commit is contained in:
Anton Titovets 2024-12-17 19:47:34 +03:00
parent 05b224b3f9
commit 6dc14fbe33

View File

@ -2166,6 +2166,19 @@
#КонецОбласти
#Область TCP
Процедура CLI_TC_Клиент() Экспорт
ПараметрыТеста = Новый Структура;
OPI_ПолучениеДанныхТестов.ПараметрВКоллекцию("TCP_Address", ПараметрыТеста);
CLI_TCP_ОбработатьЗапрос(ПараметрыТеста);
КонецПроцедуры
#КонецОбласти
#КонецОбласти
#КонецОбласти
@ -17870,6 +17883,28 @@
#КонецОбласти
#Область TCP
Процедура CLI_TCP_ОбработатьЗапрос(ПараметрыФункции) Экспорт
Адрес = ПараметрыФункции["TCP_Address"];
Данные = "Echo this!\n";
Опции = Новый Структура;
Опции.Вставить("address", Адрес);
Опции.Вставить("data" , Данные);
Результат = OPI_ПолучениеДанныхТестов.ВыполнитьТестCLI("tcp", "ОбработатьЗапрос", Опции);
Результат = ПолучитьСтрокуИзДвоичныхДанных(Результат);
OPI_ПолучениеДанныхТестов.ЗаписатьЛог(Результат, "ОбработатьЗапрос", "TCP");
OPI_ПолучениеДанныхТестов.Проверка_Строка(СтрЗаменить(Результат, Символы.ПС, "\n"), Данные);
КонецПроцедуры
#КонецОбласти
#КонецОбласти
#КонецОбласти