Фикс модуля проверки тестов

src/ru/BSL/OpenIntegrations/src/CommonModules/OPI_ИнструментыВызовСервера/Module.bsl

@@ -49,6 +49,13 @@
 	 ПараметрыСеанса[Имя] =	Значение; // !OPI
 КонецПроцедуры
 
+Процедура УстановитьКонстанту(Знач Имя, Знач Значение) Экспорт
+	
+	Константы[Имя].Установить(Значение); // !OPI
+	// !OInt Возврат;
+	
+КонецПроцедуры
+
 Функция ПолучитьРаскодированнуюСтроку(Знач Значение, Знач Способ) Экспорт
 	
 	Если ТипЗнч(Способ) = Тип("Строка") Тогда
@@ -133,6 +140,13 @@
 	
 КонецФункции
 
+Функция ПолучитьКонстанту(Знач Имя) Экспорт
+	
+	Возврат Константы[Имя].Получить(); // !OPI
+	// !OInt Возврат Неопределено;
+	
+КонецФункции
+
 Функция Хеш(ДвоичныеДанные, Тип) Экспорт
 
 	Если ТипЗнч(Тип) = Тип("Строка") Тогда

src/ru/BSL/Tests/src/CommonModules/OPI_ПолучениеДанныхТестов/Module.bsl

@@ -379,9 +379,10 @@
 
 Функция СформироватьТестыЯкс(Знач МодульТестов) Экспорт
 
+	Модуль        = ПолучитьОбщийМодуль("ЮТТесты");
     ТаблицаТестов = ПолучитьТаблицуТестов(МодульТестов);
 
-    Набор = ЮТТесты.ДобавитьТестовыйНабор(МодульТестов);
+    Набор = Модуль.ДобавитьТестовыйНабор(МодульТестов);
 
     Для Каждого Тест Из ТаблицаТестов Цикл
         Набор.ДобавитьКлиентскийТест(Тест.Метод, Тест.Синоним);
@@ -394,9 +395,10 @@
 
 Функция СформироватьТестыЯксCLI(Знач МодульТестов = "") Экспорт
 
+	Модуль        = ПолучитьОбщийМодуль("ЮТТесты");
     ТаблицаТестов = ПолучитьТаблицуТестов(МодульТестов);
 
-    Набор = ЮТТесты.ДобавитьТестовыйНабор(МодульТестов + " (CLI)");
+    Набор = Модуль.ДобавитьТестовыйНабор(МодульТестов + " (CLI)");
 
     Для Каждого Тест Из ТаблицаТестов Цикл
         Набор.ДобавитьТест(Тест.Метод, Тест.Синоним);
@@ -483,8 +485,11 @@
 Функция ЭтоТестCLI() Экспорт
 
     Попытка
-           // !OInt Данные = ПолучитьПеременнуюСреды("OINT_TESTS_CLI");
-        Данные             = Константы["IsCLITests"].Получить(); // !OPI
+    	
+        // !OInt Данные = ПолучитьПеременнуюСреды("OINT_TESTS_CLI");
+        
+        Данные = OPI_ИнструментыВызовСервера.ПолучитьКонстанту("IsCLITests"); // !OPI
+        
     Исключение
         Возврат Ложь;
     КонецПопытки;
@@ -566,9 +571,12 @@
 
     CLITestsMark = ?(Значение, 1, 0);
 
+    //@skip-check empty-except-statement
     Попытка
-        Константы["IsCLITests"].Установить(CLITestsMark); // !OPI
+    	
+        OPI_ИнструментыВызовСервера.УстановитьКонстанту("IsCLITests", CLITestsMark); // !OPI
         // !OInt УстановитьПеременнуюСреды("OINT_TESTS_CLI", CLITestsMark);
+        
     Исключение КонецПопытки;
 
 КонецПроцедуры
@@ -1289,50 +1297,52 @@
 
 Функция Проверка_Core_ВызовВФЗ(Знач Результат, Знач Вариант)
 
-    ЭтоOneScript   = OPI_Инструменты.ЭтоOneScript();
-    ФоновоеЗадание = Результат["ФоновоеЗадание"];
-
-    Счетчик = 0;
-
-    Попытка
-        ФоновоеЗадание.ОжидатьЗавершения();
-    Исключение
-
-        ВызватьИсключение ПодробноеПредставлениеОшибки(?(ЭтоOneScript
-            , ФоновоеЗадание.ИнформацияОбОшибке
-            , ФоновыеЗадания.НайтиПоУникальномуИдентификатору(ФоновоеЗадание.УникальныйИдентификатор).ИнформацияОбОшибке));
-
-    КонецПопытки;
-
-    Если Не ЭтоOneScript Тогда
-        ФоновоеЗадание = ФоновыеЗадания.НайтиПоУникальномуИдентификатору(ФоновоеЗадание.УникальныйИдентификатор);
-    КонецЕсли;
-
-    ОжидаетЧто(ФоновоеЗадание.Состояние).Равно(СостояниеФоновогоЗадания.Завершено);
-
-    Если ЭтоOneScript Тогда
-        ДанныеРезультата = ФоновоеЗадание.Результат;
-    Иначе
-        ДанныеРезультата = ПолучитьИзВременногоХранилища(Результат["Адрес"]); // !OPI
-    КонецЕсли;
-
-    Если Не ЗначениеЗаполнено(Вариант) Тогда
-
-        ОжидаетЧто(ДанныеРезультата.Свойство("status")).Равно(Истина);
-        ОжидаетЧто(ДанныеРезультата.Свойство("headers")).Равно(Истина);
-        ОжидаетЧто(ДанныеРезультата.Свойство("body")).Равно(Истина);
-
-    ИначеЕсли Вариант = "ВозвратДД" Тогда
-
-        ОжидаетЧто(ТипЗнч(ДанныеРезультата)).Равно(Тип("ДвоичныеДанные"));
-
-    ИначеЕсли Вариант = "ВозвратДДСтруктура" Тогда
-
-        ОжидаетЧто(ДанныеРезультата.Свойство("status")).Равно(Истина);
-        ОжидаетЧто(ДанныеРезультата.Свойство("headers")).Равно(Истина);
-        ОжидаетЧто(ТипЗнч(ДанныеРезультата["body"])).Равно(Тип("ДвоичныеДанные"));
-
-    КонецЕсли;
+	#Если Не Клиент Тогда
+		
+		ЭтоOneScript   = OPI_Инструменты.ЭтоOneScript();
+    	ФоновоеЗадание = Результат["ФоновоеЗадание"];
+	
+	    Попытка
+	        ФоновоеЗадание.ОжидатьЗавершения();
+	    Исключение
+	
+	        ВызватьИсключение ПодробноеПредставлениеОшибки(?(ЭтоOneScript
+	            , ФоновоеЗадание.ИнформацияОбОшибке
+	            , ФоновыеЗадания.НайтиПоУникальномуИдентификатору(ФоновоеЗадание.УникальныйИдентификатор).ИнформацияОбОшибке));
+	
+	    КонецПопытки;
+	
+	    Если Не ЭтоOneScript Тогда
+	        ФоновоеЗадание = ФоновыеЗадания.НайтиПоУникальномуИдентификатору(ФоновоеЗадание.УникальныйИдентификатор);
+	    КонецЕсли;
+	
+	    ОжидаетЧто(ФоновоеЗадание.Состояние).Равно(СостояниеФоновогоЗадания.Завершено);
+	
+	    Если ЭтоOneScript Тогда
+	        ДанныеРезультата = ФоновоеЗадание.Результат;
+	    Иначе
+	        ДанныеРезультата = ПолучитьИзВременногоХранилища(Результат["Адрес"]); // !OPI
+	    КонецЕсли;
+	
+	    Если Не ЗначениеЗаполнено(Вариант) Тогда
+	
+	        ОжидаетЧто(ДанныеРезультата.Свойство("status")).Равно(Истина);
+	        ОжидаетЧто(ДанныеРезультата.Свойство("headers")).Равно(Истина);
+	        ОжидаетЧто(ДанныеРезультата.Свойство("body")).Равно(Истина);
+	
+	    ИначеЕсли Вариант = "ВозвратДД" Тогда
+	
+	        ОжидаетЧто(ТипЗнч(ДанныеРезультата)).Равно(Тип("ДвоичныеДанные"));
+	
+	    ИначеЕсли Вариант = "ВозвратДДСтруктура" Тогда
+	
+	        ОжидаетЧто(ДанныеРезультата.Свойство("status")).Равно(Истина);
+	        ОжидаетЧто(ДанныеРезультата.Свойство("headers")).Равно(Истина);
+	        ОжидаетЧто(ТипЗнч(ДанныеРезультата["body"])).Равно(Тип("ДвоичныеДанные"));
+	
+	    КонецЕсли;
+    
+    #КонецЕсли
 
     Возврат Неопределено;
 
@@ -2529,8 +2539,8 @@
         ОжидаетЧто(Результат).ИмеетТип("ДвоичныеДанные").Заполнено();
         ОжидаетЧто(Результат.Размер()).Равно(Файл.Размер());
 
-        ХешОригинал = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Файл, ХешФункция.SHA256));
-        ХешПроверки = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Результат, ХешФункция.SHA256));
+        ХешОригинал = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Файл, "SHA256"));
+        ХешПроверки = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Результат, "SHA256"));
 
         ОжидаетЧто(ХешПроверки).Равно(ХешОригинал);
 
@@ -3266,8 +3276,8 @@
         ОжидаетЧто(Результат).ИмеетТип("ДвоичныеДанные").Заполнено();
         ОжидаетЧто(Результат.Размер()).Равно(Файл.Размер());
 
-        ХешОригинал = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Файл, ХешФункция.SHA256));
-        ХешПроверки = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Результат, ХешФункция.SHA256));
+        ХешОригинал = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Файл, "SHA256"));
+        ХешПроверки = ПолучитьСтрокуИзДвоичныхДанных(OPI_Криптография.Хеш(Результат, "SHA256"));
 
         ОжидаетЧто(ХешПроверки).Равно(ХешОригинал);
 
@@ -14864,9 +14874,11 @@
 КонецФункции
 
 Функция ПолучитьОбщийМодуль(Знач Имя)
-    УстановитьБезопасныйРежим(Истина);
+
+    //@skip-check server-execution-safe-mode
     Модуль = Вычислить(Имя);
     Возврат Модуль;
+    
 КонецФункции
 
 Функция ПолучитьЗначениеДляCLI(Знач Значение, Знач Вложенный = Ложь, ДопОпции = "")

src/ru/BSL/Tests/src/CommonModules/OPIt_Core/Module.bsl

@@ -153,46 +153,50 @@
 
 Процедура РасширенныйВызов_ВызовВФЗ(ПараметрыФункции)
 
-    Токен   = ПараметрыФункции["Telegram_Token"];
-    IDФайла = ПараметрыФункции["Telegram_FileID"];
-
-    Параметры = Новый Массив;
-    Параметры.Добавить(Токен);
-
-    Настройки = Новый Структура("adv_response, dontwait"
-        , Истина
-        , Истина);
-
-    Результат = OPI_РасширенныйВызов.ВызватьСНастройками("OPI_Telegram"
-        , "ПолучитьИнформациюБота"
-        , Параметры
-        , Настройки);
-
-    OPI_ПолучениеДанныхТестов.Обработать(Результат, "Core", "ВызовВФЗ");
-
-    Параметры = Новый Массив;
-    Параметры.Добавить(Токен);
-    Параметры.Добавить(IDФайла);
-
-    Настройки = Новый Структура("dontwait", Истина);
-
-    Результат = OPI_РасширенныйВызов.ВызватьСНастройками("OPI_Telegram"
-        , "СкачатьФайл"
-        , Параметры
-        , Настройки);
-
-    OPI_ПолучениеДанныхТестов.Обработать(Результат, "Core", "ВызовВФЗ", "ВозвратДД");
-
-    Настройки = Новый Структура("adv_response, dontwait"
-        , Истина
-        , Истина);
-
-    Результат = OPI_РасширенныйВызов.ВызватьСНастройками("OPI_Telegram"
-        , "СкачатьФайл"
-        , Параметры
-        , Настройки);
-
-    OPI_ПолучениеДанныхТестов.Обработать(Результат, "Core", "ВызовВФЗ", "ВозвратДДСтруктура");
+	#Если Не Клиент Тогда
+		
+	    Токен   = ПараметрыФункции["Telegram_Token"];
+	    IDФайла = ПараметрыФункции["Telegram_FileID"];
+	
+	    Параметры = Новый Массив;
+	    Параметры.Добавить(Токен);
+	
+	    Настройки = Новый Структура("adv_response, dontwait"
+	        , Истина
+	        , Истина);
+	
+	    Результат = OPI_РасширенныйВызов.ВызватьСНастройками("OPI_Telegram"
+	        , "ПолучитьИнформациюБота"
+	        , Параметры
+	        , Настройки);
+	
+	    OPI_ПолучениеДанныхТестов.Обработать(Результат, "Core", "ВызовВФЗ");
+	
+	    Параметры = Новый Массив;
+	    Параметры.Добавить(Токен);
+	    Параметры.Добавить(IDФайла);
+	
+	    Настройки = Новый Структура("dontwait", Истина);
+	
+	    Результат = OPI_РасширенныйВызов.ВызватьСНастройками("OPI_Telegram"
+	        , "СкачатьФайл"
+	        , Параметры
+	        , Настройки);
+	
+	    OPI_ПолучениеДанныхТестов.Обработать(Результат, "Core", "ВызовВФЗ", "ВозвратДД");
+	
+	    Настройки = Новый Структура("adv_response, dontwait"
+	        , Истина
+	        , Истина);
+	
+	    Результат = OPI_РасширенныйВызов.ВызватьСНастройками("OPI_Telegram"
+	        , "СкачатьФайл"
+	        , Параметры
+	        , Настройки);
+	
+	    OPI_ПолучениеДанныхТестов.Обработать(Результат, "Core", "ВызовВФЗ", "ВозвратДДСтруктура");
+    
+    #КонецЕсли
 
 КонецПроцедуры