Merge pull request #318 from bia-technologies/feature/313

313 / Добавлена настройка `projectPath`

documentation/docs/getting-started/run/configuration.md

@@ -7,12 +7,13 @@
 | Имя параметра     | Тип       | Значение по умолчанию                           | Описание                                                                                                     |
 |-------------------|-----------|-------------------------------------------------|--------------------------------------------------------------------------------------------------------------|
 | `filter`          | `Object`  | [Object, смотрите ниже](#параметры-фильтрации)  | Параметры фильтрации, поиска тестов                                                                          |
-| `reportFormat`    | `String`  | `"jUnit"`                                       | Формат отчета о тестировании, возможные значения: `"jUnit"`, `"JSON"` , `"allure"`                                        |
+| `reportFormat`    | `String`  | `"jUnit"`                                       | Формат отчета о тестировании, возможные значения: `"jUnit"`, `"JSON"` , `"allure"`                           |
 | `reportPath`      | `String`  | `""`                                            | Путь к формируемому отчету, можно указать или каталог (в которому будет создан файл отчета) или путь к файлу |
 | `closeAfterTests` | `Boolean` | `True`                                          | Признак закрытия 1С:Предприятие по завершению тестирования                                                   |
 | `showReport`      | `Boolean` | `True`                                          | Открыть форму отчета завершению тестирования                                                                 |
 | `logging`         | `Object`  | [Object, смотрите ниже](#параметры-логирования) | Параметры логирования, подробнее ниже                                                                        |
 | `exitCode`        | `String`  | `""`                                            | Путь к файлу, в который будет записан признак успешного выполнения (0 - успешно, 1 - есть ошибки)            |
+| `projectPath`     | `String`  | `""`                                            | Путь к каталогу проекта, содержащему файлы для тестов                                                        |
 
 ## Параметры фильтрации
 

exts/yaxunit/src/CommonModules/ЮТИсполнительСлужебныйКлиент/Module.bsl

@@ -120,12 +120,14 @@
 Процедура ВыполнитьИнициализацию(ПараметрыЗапуска) Экспорт
 	
 	ЮТКонтекстСлужебный.ИнициализироватьКонтекст();
+	ЮТКонтекстСлужебный.СохранитьПараметрыЗапуска(ПараметрыЗапуска);
 	ЮТКонтекстСлужебный.УстановитьГлобальныеНастройкиВыполнения(ПараметрыЗапуска.settings);
-	// Повторно сохраним для передачи на сервер
-	ЮТКонтекстСлужебный.УстановитьГлобальныеНастройкиВыполнения(ЮТКонтекстСлужебный.ГлобальныеНастройкиВыполнения());
 	
 	ЮТСобытияСлужебный.Инициализация(ПараметрыЗапуска);
 	
+	// Повторно сохраним для передачи на сервер
+	ЮТКонтекстСлужебный.УстановитьГлобальныеНастройкиВыполнения(ЮТКонтекстСлужебный.ГлобальныеНастройкиВыполнения());
+	
 КонецПроцедуры
 
 #КонецОбласти

exts/yaxunit/src/CommonModules/ЮТКонтекстСлужебный/Module.bsl

@@ -231,6 +231,13 @@
 	
 КонецФункции
 
+// см. ЮТФабрика.ПараметрыЗапуска
+Функция ПараметрыЗапуска() Экспорт
+	
+	Возврат ЗначениеКонтекста(ИмяКонтекстаПараметрыЗапуска());
+	
+КонецФункции
+
 Функция ОписаниеКонтекста() Экспорт
 	
 	Описание = Новый Структура;
@@ -281,6 +288,12 @@
 	
 КонецПроцедуры
 
+Процедура СохранитьПараметрыЗапуска(Знач ПараметрыЗапуска) Экспорт
+	
+	УстановитьЗначениеКонтекста(ИмяКонтекстаПараметрыЗапуска(), ПараметрыЗапуска, Истина);
+	
+КонецПроцедуры
+
 Процедура УдалитьКонтекст() Экспорт
 	
 #Если Клиент Тогда
@@ -336,4 +349,10 @@
 	
 КонецФункции
 
+Функция ИмяКонтекстаПараметрыЗапуска()
+	
+	Возврат "КонтекстПараметрыЗапуска";
+	
+КонецФункции
+
 #КонецОбласти

exts/yaxunit/src/CommonModules/ЮТНастройкиВыполнения/Module.bsl

@@ -18,6 +18,8 @@
 
 #Область ПрограммныйИнтерфейс
 
+#Область НастройкиТеста
+
 // Возвращает значение настройки "ВТранзакции" для текущего исполняемого объекта (тест, набор, модуль)
 // 
 // Возвращаемое значение:
@@ -119,3 +121,30 @@
 КонецФункции
 
 #КонецОбласти
+
+#Область НастройкиСеанса
+
+// Возвращает глобальные настройки выполнения, указанные в файле настроек запуска, объект`settings`
+// 
+// Возвращаемое значение:
+//  Структура, Неопределено - Глобальные настройки
+Функция ГлобальныеНастройкиВыполнения() Экспорт
+	
+	//@skip-check constructor-function-return-section
+	Возврат ЮТКонтекстСлужебный.ГлобальныеНастройкиВыполнения();
+	
+КонецФункции
+
+// Возвращает путь к каталогу проекта, указанному в файле настроек - `projectPath`
+// 
+// Возвращаемое значение:
+//  Строка - Каталог проекта
+Функция КаталогПроекта() Экспорт
+	
+	Возврат ЮТКонтекстСлужебный.ПараметрыЗапуска().projectPath;
+	
+КонецФункции
+
+#КонецОбласти
+
+#КонецОбласти

exts/yaxunit/src/CommonModules/ЮТОбщий/Module.bsl

@@ -359,7 +359,9 @@
 //
 // Параметры:
 //  Сообщение - Строка - Выводимое сообщение
-Процедура ВывестиВКонсоль(Сообщение) Экспорт
+Процедура ВывестиВКонсоль(Знач Сообщение) Экспорт
+	
+	Сообщение = Строка(Сообщение);
 	
 	Компонента = ЮТКомпоненты.Консоль();
 #Если Сервер Тогда

exts/yaxunit/src/CommonModules/ЮТФабрика/Module.bsl

@@ -123,6 +123,7 @@
 // * logging - см. ПараметрыЛогирования
 // * showReport - Булево - Признак необходмости отобразить отчет в 1с по окончании тестирования
 // * exitCode - Строка - Путь к файлу, в который будет записан коды выхода
+// * projectPath - Строка - Путь к каталогу с файлами проекта тестирования, репозиторию
 // * ПодключатьВнешниеКомпоненты - Булево - Выполнять установку и подключение внешних компонент при старте.
 //                                 Если выключено и включен запрет синхронных вызовов, то компоненты не будут доступы в тонком клиенте.
 //                                 Если выключено и разрешены синхронные вызовы, то компоненты можно установить вручную и тогда они будут доступны на клиенте.
@@ -140,6 +141,7 @@
 	Параметры.Вставить("showReport", Ложь);
 	Параметры.Вставить("logging", ПараметрыЛогирования());
 	Параметры.Вставить("exitCode", "");
+	Параметры.Вставить("projectPath", "");
 	
 	Параметры.Вставить("ПодключатьВнешниеКомпоненты", Истина);
 	

exts/yaxunit/src/DataProcessors/ЮТЮнитТесты/Forms/СозданиеНастройки/Form.form

@@ -467,13 +467,65 @@
         <autoMaxHeight>true</autoMaxHeight>
         <wrap>true</wrap>
         <choiceButton>true</choiceButton>
-        <openButton>true</openButton>
         <autoMarkIncomplete>true</autoMarkIncomplete>
         <chooseType>true</chooseType>
         <typeDomainEnabled>true</typeDomainEnabled>
         <textEdit>true</textEdit>
       </extInfo>
     </items>
+    <items xsi:type="form:FormField">
+      <name>КаталогПроекта</name>
+      <id>106</id>
+      <visible>true</visible>
+      <enabled>true</enabled>
+      <userVisible>
+        <common>true</common>
+      </userVisible>
+      <dataPath xsi:type="form:DataPath">
+        <segments>КаталогПроекта</segments>
+      </dataPath>
+      <extendedTooltip>
+        <name>КаталогПроектаРасширеннаяПодсказка</name>
+        <id>108</id>
+        <visible>true</visible>
+        <enabled>true</enabled>
+        <userVisible>
+          <common>true</common>
+        </userVisible>
+        <type>Label</type>
+        <autoMaxWidth>true</autoMaxWidth>
+        <autoMaxHeight>true</autoMaxHeight>
+        <extInfo xsi:type="form:LabelDecorationExtInfo">
+          <horizontalAlign>Left</horizontalAlign>
+        </extInfo>
+      </extendedTooltip>
+      <contextMenu>
+        <name>КаталогПроектаКонтекстноеМеню</name>
+        <id>107</id>
+        <visible>true</visible>
+        <enabled>true</enabled>
+        <userVisible>
+          <common>true</common>
+        </userVisible>
+        <autoFill>true</autoFill>
+      </contextMenu>
+      <type>InputField</type>
+      <editMode>Enter</editMode>
+      <showInHeader>true</showInHeader>
+      <headerHorizontalAlign>Left</headerHorizontalAlign>
+      <showInFooter>true</showInFooter>
+      <extInfo xsi:type="form:InputFieldExtInfo">
+        <handlers>
+          <event>StartChoice</event>
+          <name>КаталогПроектаНачалоВыбора</name>
+        </handlers>
+        <wrap>true</wrap>
+        <choiceButton>true</choiceButton>
+        <chooseType>true</chooseType>
+        <typeDomainEnabled>true</typeDomainEnabled>
+        <textEdit>true</textEdit>
+      </extInfo>
+    </items>
     <items xsi:type="form:FormGroup">
       <name>ГруппаОтчеты</name>
       <id>75</id>
@@ -490,7 +542,7 @@
         </dataPath>
         <extendedTooltip>
           <name>ОтобразитьОтчетРасширеннаяПодсказка</name>
-          <id>71</id>
+          <id>30</id>
           <visible>true</visible>
           <enabled>true</enabled>
           <userVisible>
@@ -1344,6 +1396,9 @@
     <edit>
       <common>true</common>
     </edit>
+    <settingsSavedData xsi:type="form:DataPath">
+      <segments>ПараметрыЗапуска</segments>
+    </settingsSavedData>
   </attributes>
   <attributes>
     <name>ЗапускИзКонфигуратор</name>
@@ -1464,6 +1519,9 @@
     <edit>
       <common>true</common>
     </edit>
+    <settingsSavedData xsi:type="form:DataPath">
+      <segments>ЛогированиеВКонсоль</segments>
+    </settingsSavedData>
   </attributes>
   <attributes>
     <name>ФорматОтчета</name>
@@ -1482,6 +1540,9 @@
     <edit>
       <common>true</common>
     </edit>
+    <settingsSavedData xsi:type="form:DataPath">
+      <segments>ФорматОтчета</segments>
+    </settingsSavedData>
   </attributes>
   <attributes>
     <name>УровеньЛога</name>
@@ -1500,6 +1561,9 @@
     <edit>
       <common>true</common>
     </edit>
+    <settingsSavedData xsi:type="form:DataPath">
+      <segments>УровеньЛога</segments>
+    </settingsSavedData>
   </attributes>
   <attributes>
     <name>ЗакрытьПослеТестирования</name>
@@ -1517,6 +1581,30 @@
     <edit>
       <common>true</common>
     </edit>
+    <settingsSavedData xsi:type="form:DataPath">
+      <segments>ЗакрытьПослеТестирования</segments>
+    </settingsSavedData>
+  </attributes>
+  <attributes>
+    <name>КаталогПроекта</name>
+    <title>
+      <key>ru</key>
+      <value>Каталог проекта</value>
+    </title>
+    <id>71</id>
+    <valueType>
+      <types>String</types>
+      <stringQualifiers/>
+    </valueType>
+    <view>
+      <common>true</common>
+    </view>
+    <edit>
+      <common>true</common>
+    </edit>
+    <settingsSavedData xsi:type="form:DataPath">
+      <segments>КаталогПроекта</segments>
+    </settingsSavedData>
   </attributes>
   <formCommands>
     <name>УстановитьФлажки</name>

exts/yaxunit/src/DataProcessors/ЮТЮнитТесты/Forms/СозданиеНастройки/Module.bsl

@@ -35,7 +35,8 @@
 	УровеньЛога = Конфигурация.logging.level;
 	ОтобразитьОтчет = Конфигурация.showReport;
 	ЗакрытьПослеТестирования = Конфигурация.closeAfterTests;
-	ЛогированиеВКонсоль = Конфигурация.logging.console ;
+	КаталогПроекта = Конфигурация.projectPath;
+	ЛогированиеВКонсоль = Конфигурация.logging.console;
 	
 КонецПроцедуры
 
@@ -62,6 +63,14 @@
 	
 КонецПроцедуры
 
+&НаКлиенте
+Процедура КаталогПроектаНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
+	
+	Оповещение = Новый ОписаниеОповещения("СохранитьИмяФайлаВРеквизит", ЭтотОбъект, "КаталогПроекта");
+	ВыбратьКаталог(КаталогПроекта, Оповещение);
+	
+КонецПроцедуры
+
 &НаКлиенте
 Процедура ЗапускИзПредприятияПриИзменении(Элемент)
 	
@@ -79,14 +88,16 @@
 &НаКлиенте
 Процедура ВыводЛогаНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
 	
-	ВыбратьФайл("*.log|*.log|*.txt|*.txt|All files(*.*)|*.*", ИмяФайлаЛога, Новый ОписаниеОповещения("УстановитьИмяФайлаЛога", ЭтотОбъект));
+	Оповещение = Новый ОписаниеОповещения("СохранитьИмяФайлаВРеквизит", ЭтотОбъект, "ИмяФайлаЛога");
+	ВыбратьФайл("*.log|*.log|*.txt|*.txt|All files(*.*)|*.*", ИмяФайлаЛога, Оповещение);
 	
 КонецПроцедуры
 
 &НаКлиенте
 Процедура ИмяФайлаКодаВозвратаНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
 	
-	ВыбратьФайл("All files(*.*)|*.*", ИмяФайлаЛога, Новый ОписаниеОповещения("УстановитьИмяФайлаКодаВозврата", ЭтотОбъект));
+	Оповещение = Новый ОписаниеОповещения("СохранитьИмяФайлаВРеквизит", ЭтотОбъект, "ИмяФайлаКодаВозврата");
+	ВыбратьФайл("All files(*.*)|*.*", ИмяФайлаКодаВозврата, Оповещение);
 	
 КонецПроцедуры
 
@@ -99,10 +110,11 @@
 		Возврат;
 	КонецЕсли;
 	
+	Оповещение = Новый ОписаниеОповещения("СохранитьИмяФайлаВРеквизит", ЭтотОбъект, "ИмяФайлаОтчета");
 	Если ОписаниеФормата.ЗаписьВКаталог Тогда
-		ВыбратьКаталог(ИмяФайлаОтчета, Новый ОписаниеОповещения("УстановитьИмяФайлаОтчета", ЭтотОбъект));
+		ВыбратьКаталог(ИмяФайлаОтчета, Оповещение);
 	Иначе
-		ВыбратьФайл(ОписаниеФормата.ФильтрВыбораФайла, ИмяФайлаОтчета, Новый ОписаниеОповещения("УстановитьИмяФайлаОтчета", ЭтотОбъект));
+		ВыбратьФайл(ОписаниеФормата.ФильтрВыбораФайла, ИмяФайлаОтчета, Оповещение);
 	КонецЕсли;
 	
 КонецПроцедуры
@@ -393,28 +405,10 @@
 КонецПроцедуры
 
 &НаКлиенте
-Процедура УстановитьИмяФайлаЛога(ВыбранныйФайл, ДополнительныеПараметры) Экспорт
+Процедура СохранитьИмяФайлаВРеквизит(ВыбранныйФайл, ИмяРеквизита) Экспорт
 	
 	Если ВыбранныйФайл <> Неопределено Тогда
-		ИмяФайлаЛога = ВыбранныйФайл;
+		ЭтотОбъект[ИмяРеквизита] = ВыбранныйФайл;
-	КонецЕсли;
-	
-КонецПроцедуры
-
-&НаКлиенте
-Процедура УстановитьИмяФайлаКодаВозврата(ВыбранныйФайл, ДополнительныеПараметры) Экспорт
-	
-	Если ВыбранныйФайл <> Неопределено Тогда
-		ИмяФайлаКодаВозврата = ВыбранныйФайл;
-	КонецЕсли;
-	
-КонецПроцедуры
-
-&НаКлиенте
-Процедура УстановитьИмяФайлаОтчета(ВыбранныйФайл, ДополнительныеПараметры) Экспорт
-	
-	Если ВыбранныйФайл <> Неопределено Тогда
-		ИмяФайлаОтчета = ВыбранныйФайл;
 	КонецЕсли;
 	
 КонецПроцедуры
@@ -468,6 +462,7 @@
 	Конфигурация.closeAfterTests = ЗакрытьПослеТестирования;
 	Конфигурация.reportFormat = ФорматОтчета;
 	Конфигурация.reportPath = ИмяФайлаОтчета;
+	Конфигурация.projectPath = КаталогПроекта;
 	
 	Конфигурация.logging.level = УровеньЛога;
 	Конфигурация.logging.file = ИмяФайлаЛога;
@@ -477,6 +472,8 @@
 		Конфигурация.exitCode = ИмяФайлаКодаВозврата;
 	КонецЕсли;
 	
+	Конфигурация.filter.Очистить();
+	
 	Если НЕ (УстановленФильтрПоРасширению(Конфигурация) ИЛИ УстановленФильтрПоМодулям(Конфигурация)) Тогда
 		УстановитьФильтрПоТестам(Конфигурация);
 	КонецЕсли;
@@ -519,7 +516,7 @@
 	КонецЦикла;
 	
 	Если Расширения.Количество() Тогда
-		Конфигурация.filter.extensions = Расширения;
+		Конфигурация.filter.Вставить("extensions",Расширения);
 	КонецЕсли;
 	
 	Возврат Расширения.Количество() > 0;
@@ -550,7 +547,7 @@
 	КонецЦикла;
 	
 	Если Модули.Количество() Тогда
-		Конфигурация.filter.modules = Модули;
+		Конфигурация.filter.Вставить("modules", Модули);
 	КонецЕсли;
 	
 	Возврат Модули.Количество() > 0;
@@ -563,7 +560,7 @@
 	Тесты = Новый Массив();
 	ДобавитьОтмеченныеТесты(ДеревоТестов.ПолучитьЭлементы(), Тесты);
 	
-	Конфигурация.filter.tests = Тесты;
+	Конфигурация.filter.Вставить("tests", Тесты);
 	
 КонецПроцедуры
 

tests/src/CommonModules/ОМ_Общий/Module.bsl

@@ -25,7 +25,7 @@
 		.ДобавитьТест("ВывестиВКонсоль")
 		.ДобавитьСерверныйТест("Менеджер")
 		.ДобавитьТест("ЗначениеСвойства")
-		;
+	;
 	
 КонецПроцедуры