Update Module.bsl

src/ru/OPI/src/CommonModules/OPI_ТестыCLI/Module.bsl

@@ -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"), Данные);
+
+КонецПроцедуры
+
+#КонецОбласти
+
 #КонецОбласти
 
 #КонецОбласти