Поддержка аннотации Тест

testrunner.os

@@ -1079,7 +1079,9 @@
 		Возврат МассивТестовыхСлучаев;
 	КонецЕсли;
 
-	Возврат Неопределено;
+	МассивТестовыхСлучаев = ПрочитатьТестовыеСлучаиОбъектаИзАннотаций(ТестОбъект, МенеджерТестирования);
+
+	Возврат МассивТестовыхСлучаев;
 КонецФункции
 
 // Получает список тестовых случаев вызовом метода с предопределенным именем
@@ -1116,6 +1118,54 @@
 	Возврат МассивТестовыхСлучаев;
 КонецФункции
 
+// Получает список тестовых случаев получая методы с аннотацией &тест
+//
+// Параметры:
+//  ТестОбъект  - Объект - Объект тестового сценария
+//
+//  МенеджерТестирования  - Объект - Объект менеджера тестирования
+//
+// Возвращаемое значение:
+//   Массив   - массив строк-имен методов тестового сценария
+//
+Функция ПрочитатьТестовыеСлучаиОбъектаИзАннотаций(Знач ТестОбъект, Знач МенеджерТестирования)
+
+	ТаблицаМетодов = Рефлектор.ПолучитьТаблицуМетодов(ТестОбъект);
+	Если ТаблицаМетодов.Колонки.Найти("Аннотации") = Неопределено Тогда
+		Возврат Неопределено;
+	КонецЕсли;
+
+	МассивТестовыхСлучаев = Неопределено;
+	ВремМассивТестовыхСлучаев = Новый Массив;
+	Для Каждого ТестовыйСлучай Из ТаблицаМетодов Цикл
+		ДополнитьМассивПоАннотациям(ВремМассивТестовыхСлучаев, ТестовыйСлучай);
+	КонецЦикла;
+
+	Если ВремМассивТестовыхСлучаев.Количество() > 0 Тогда
+		МассивТестовыхСлучаев = ВремМассивТестовыхСлучаев;
+	КонецЕсли;	
+	ВремМассивТестовыхСлучаев = Неопределено;
+
+	Возврат МассивТестовыхСлучаев;
+КонецФункции
+
+Процедура ДополнитьМассивПоАннотациям(ВхМассив, ТестовыйСлучай)
+
+	АннотацияТеста = "тест";
+	Если ТестовыйСлучай.Аннотации = Неопределено Тогда
+		Возврат;
+	КонецЕсли;	
+
+	Для Каждого Аннотация Из ТестовыйСлучай.Аннотации Цикл
+
+		Если СтрНайти(Нрег(Аннотация.Имя), АннотацияТеста) > 0 Тогда
+			ВхМассив.Добавить(ТестовыйСлучай.Имя);
+		КонецЕсли;	
+
+	КонецЦикла;	
+
+КонецПроцедуры	
+
 Процедура Инициализация()
 
 	Лог = Логирование.ПолучитьЛог(ИмяЛога());

tests/fixtures/annotation.os

@@ -0,0 +1,23 @@
+#Использовать asserts
+
+Перем юТест;
+
+&тесТ
+Процедура ПередЗапускомТеста() Экспорт
+//TODO вставить в журнал для проверки последовательности вызова    
+КонецПроцедуры
+
+
+Процедура ПослеЗапускаТеста() Экспорт
+//TODO вставить в журнал для проверки последовательности вызова    
+КонецПроцедуры
+
+&Тест
+Процедура ТестДолжен_ПроверитьВерсию() Экспорт
+//TODO вставить в журнал для проверки последовательности вызова    
+	Утверждения.ПроверитьРавенство("0.1", Версия());
+КонецПроцедуры
+
+Функция Версия()
+	Возврат "0.1";
+КонецФункции