Как определить что сеанс запущен в режиме менеджера тестирования?

Разработка и сценарное тестирование с Vanessa-ADD. Установка инструментов. Запись действий пользователя и выполнение сценариев
Многопоточный CI-контур для 1С c Packer, Vagrant и Jenkins. Часть 1. Описание системы и обзор инструментария
Практика применения DevOps. Тестирование
Эффективное управление фоновыми заданиями и коммуникация сеансов сервера с Фоном с помощью Структуры обмена (ноу-хау) + Бонус: Альтернативный вариант через Хранилище настроек
Каждому проекту – сценарные тесты! Быстрый старт в тестирование с помощью СППР

Вознаграждение за ответ

Сумма: 0 $m

Добавили:
VKislitsin (0.50 $m)

Получили:

VKislitsin (0.5 $m)

Показать полностью

2. VKislitsin 1021 28.02.23 09:49 Сейчас в теме

Отвечу сам себе. На случай, если кому-то еще такое понадобится.

Нашел простой способ.

По информации из справки, объект ТестируемоеПриложение, предназначенный для связи с сеансом клиента тестирования, существует только в сеансе менеджера тестирования:

ТестируемоеПриложение (TestedApplication)
...
Объект доступен если исполняющее код приложение запущено с ключом командной строки /TESTMANAGER.

Таким образом, для того чтобы определить, что текущий сеанс - это менеджер тестирования, нужно попытаться инициализировать этот объект или проверить существование типа для объекта ТестируемоеПриложение.

Примерно таким образом:

&НаКлиенте
Функция ЭтоМенеджерТестирования()

   Результат = Неопределено;

   Попытка
       ИмяТипа = "ТестируемоеПриложение";
       Результат = Тип(ИмяТипа);
       //или
       //Результат = Вычислить("Тип(""ТестируемоеПриложение"")");
       //или
       //Результат = Вычислить("Новый ТестируемоеПриложение()");
   Исключение
   КонецПопытки;
   
   Возврат Результат <> Неопределено;
   
КонецФункции

Показать

2. VKislitsin 1021 28.02.23 09:49 Сейчас в теме

Отвечу сам себе. На случай, если кому-то еще такое понадобится.

Нашел простой способ.

По информации из справки, объект ТестируемоеПриложение, предназначенный для связи с сеансом клиента тестирования, существует только в сеансе менеджера тестирования:

ТестируемоеПриложение (TestedApplication)
...
Объект доступен если исполняющее код приложение запущено с ключом командной строки /TESTMANAGER.

Таким образом, для того чтобы определить, что текущий сеанс - это менеджер тестирования, нужно попытаться инициализировать этот объект или проверить существование типа для объекта ТестируемоеПриложение.

Примерно таким образом:

&НаКлиенте
Функция ЭтоМенеджерТестирования()

   Результат = Неопределено;

   Попытка
       ИмяТипа = "ТестируемоеПриложение";
       Результат = Тип(ИмяТипа);
       //или
       //Результат = Вычислить("Тип(""ТестируемоеПриложение"")");
       //или
       //Результат = Вычислить("Новый ТестируемоеПриложение()");
   Исключение
   КонецПопытки;
   
   Возврат Результат <> Неопределено;
   
КонецФункции

Показать