Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
Expand Up @@ -32,7 +32,7 @@

// Поле в котором можно хранить клиентский контекст на протяжении сеанса
// данный контекст можно использовать для передачи данных между тестами
&НаКлиенте
&НаКлиенте
Перем ГлобальныйКонтекст;

// { События формы
Expand Down Expand Up @@ -1272,13 +1272,13 @@
КонецФункции
// } История загрузки тестов


// { Пакетный запуск
&НаКлиенте
Процедура ВыполнитьПакетныйЗапуск(Знач ПараметрЗапуска)
Перем РезультатыТестирования;

Попытка

ПарсерКоманднойСтроки = Плагин("ПарсерКоманднойСтроки");
ПараметрыЗапуска = ПарсерКоманднойСтроки.Разобрать(ПараметрЗапуска);

Expand Down Expand Up @@ -1339,6 +1339,12 @@

СобратьНастройкиОтчетовТестирования(НастройкиШагов, ПараметрыЗапуска);

Область = ПолучитьОбластьДанных();
Если Область <> Неопределено Тогда
ВходВОбластьНаСервере(Область);
КонецЕсли;


Если Не ЕстьПоддержкаАсинхронныхВызовов Тогда
ВыполнитьПакетныйЗапускСинхронно(НастройкиШагов);
Иначе
Expand Down Expand Up @@ -2950,6 +2956,40 @@

КонецФункции


&НаСервереБезКонтекста
Процедура ВходВОбластьНаСервере(Знач ОбластьДанных)
МОбщегоНазначения = Неопределено;
Попытка
МОбщегоНазначения = Вычислить("ОбщегоНазначения");
Исключение
Возврат;
КонецПопытки;

МРаботаВМоделиСервиса = МОбщегоНазначения.ОбщийМодуль("РаботаВМоделиСервиса"); // мало ли модуля может не быть (если конфы самописные)
МСтроковыеФункцииКлиентСервер = МОбщегоНазначения.ОбщийМодуль("СтроковыеФункцииКлиентСервер");

Если МСтроковыеФункцииКлиентСервер <> Неопределено И ТипЗнч(ОбластьДанных) <> Тип("Число") Тогда
ОбластьДанных = МСтроковыеФункцииКлиентСервер.СтрокаВЧисло(ОбластьДанных);
КонецЕсли;

Если ОбластьДанных <> Неопределено И МРаботаВМоделиСервиса <> Неопределено И МРаботаВМоделиСервиса.СеансЗапущенБезРазделителей() Тогда
МРаботаВМоделиСервиса.ВойтиВОбластьДанных(ОбластьДанных);
КонецЕсли;
КонецПроцедуры

&НаКлиенте
Функция ПолучитьОбластьДанных()
Перем ОбластьДанныхМенеджера, ПлагинНастроек;

ПлагинНастроек = Плагин("Настройки");
ПлагинНастроек.Обновить();

ПлагинНастроек.ПолучитьНастройки().Свойство("ОбластьДанныхМенеджера", ОбластьДанныхМенеджера);

Возврат ОбластьДанныхМенеджера;
КонецФункции

// } Вспомогательные методы

#Область Глобальный_контекст
Expand Down
Loading