From 82a0d91661c2161ed0a5b0cd7450e394550c60b0 Mon Sep 17 00:00:00 2001
From: Anton Titovets <bayselonarrend@gmail.com>
Date: Sat, 21 Dec 2024 21:39:20 +0300
Subject: [PATCH] Fastfix

---
 .../OPI/src/CommonModules/OPI_TCP/Module.bsl  | 27 ++++++++++++++-----
 .../CommonModules/OPI_Инструменты/Module.bsl  | 15 -----------
 2 files changed, 20 insertions(+), 22 deletions(-)

diff --git a/src/ru/OPI/src/CommonModules/OPI_TCP/Module.bsl b/src/ru/OPI/src/CommonModules/OPI_TCP/Module.bsl
index 508d0d01d8..13dc161ff2 100644
--- a/src/ru/OPI/src/CommonModules/OPI_TCP/Module.bsl
+++ b/src/ru/OPI/src/CommonModules/OPI_TCP/Module.bsl
@@ -57,7 +57,7 @@
 
     OPI_ПреобразованиеТипов.ПолучитьСтроку(Адрес);
 
-    TCPКлиент = OPI_Инструменты.ПолучитьВнешнююКомпоненту("OPI_TCPClient");
+    TCPКлиент = ПодключитьКомпонентуНаСервере("OPI_TCPClient");
 
     TCPКлиент.Address = Адрес;
 
@@ -206,12 +206,7 @@
     OPI_ПреобразованиеТипов.ПолучитьБулево(ОтветСтрокой);
 
     Соединение = ОткрытьСоединение(Адрес);
-
-    Если Соединение = Неопределено Тогда
-        Возврат "OPI: Не удалось установить соединение";
-    КонецЕсли;
-
-    Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
+    Результат  = ОтправитьДвоичныеДанные(Соединение, Данные);
 
     Если Результат Тогда
 
@@ -235,3 +230,21 @@
 
 #КонецОбласти
 
+#Область СлужебныеПроцедурыИФункции
+
+Функция ПодключитьКомпонентуНаСервере(Знач ИмяКомпоненты, Знач Класс = "Main")
+
+    Если OPI_Инструменты.ЭтоOneScript() Тогда
+        ИмяМакета = OPI_Инструменты.КаталогКомпонентOS() + ИмяКомпоненты + ".zip";
+    Иначе
+        ИмяМакета = "ОбщийМакет." + ИмяКомпоненты;
+    КонецЕсли;
+
+    ПодключитьВнешнююКомпоненту(ИмяМакета, ИмяКомпоненты, ТипВнешнейКомпоненты.Native);
+
+    Компонента = Новый("AddIn." + ИмяКомпоненты + "." + Класс);
+    Возврат Компонента;
+
+КонецФункции
+
+#КонецОбласти
\ No newline at end of file
diff --git a/src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl b/src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl
index 1ec8e35576..228c1db06c 100644
--- a/src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl
+++ b/src/ru/OPI/src/CommonModules/OPI_Инструменты/Module.bsl
@@ -1146,21 +1146,6 @@
 
 КонецФункции
 
-Функция ПолучитьВнешнююКомпоненту(Знач ИмяКомпоненты, Знач Класс = "Main") Экспорт
-
-    Если OPI_Инструменты.ЭтоOneScript() Тогда
-        ИмяМакета = OPI_Инструменты.КаталогКомпонентOS() + ИмяКомпоненты + ".zip";
-    Иначе
-        ИмяМакета = "ОбщийМакет." + ИмяКомпоненты;
-    КонецЕсли;
-
-    ПодключитьВнешнююКомпоненту(ИмяМакета, ИмяКомпоненты, ТипВнешнейКомпоненты.Native);
-
-    Компонента = Новый("AddIn." + ИмяКомпоненты + "." + Класс);
-    Возврат Компонента;
-
-КонецФункции
-
 #КонецОбласти
 
 #КонецОбласти