fix: #39 Получение опций и аргументов родителя команды в методах команды

Author: khorevaa

src/core/Классы/КомандаПриложения.os

@@ -101,17 +101,30 @@
 //   Значение - Произвольный - полученное значение в результате чтения строки использования или переменных окружения
 Функция ЗначениеОпции(Знач ИмяОпции) Экспорт
 
-	ОпцииИндекса = ОпцияИзИндекса(ИмяОпции);
-	Если ОпцииИндекса = Неопределено Тогда
+	ОпцияИндекса = ОпцияИзИндекса(ИмяОпции);
+	
+	Если ОпцияИндекса = Неопределено Тогда
+		
+		ЗначениеОпцииРодителя = ЗначениеОпцииКомандыРодителя(ИмяОпции);
+
+		Если Не ЗначениеОпцииРодителя = Неопределено Тогда
+			Возврат ЗначениеОпцииРодителя;
+		КонецЕсли;
+
+	КонецЕсли;
+	
+	Если ОпцияИндекса = Неопределено Тогда
+	
 		ВызватьИсключение СтрШаблон("Ошибка получение значения опции <%1>. 
 		|Опция не найдена в индексе опций команды", ИмяОпции);
+
 	КонецЕсли;
 
-	Возврат ОпцияИзИндекса(ИмяОпции).Значение;
+	Возврат ОпцияИндекса.Значение;
 
 КонецФункции
 
-// Функция возвращает значение аргумента по переданному имени  аргумента
+// Функция возвращает значение аргумента по переданному имени аргумента
 //
 // Параметры:
 //   ИмяАргумента - строка - имя аргумента
@@ -122,12 +135,21 @@
 
 	АргументИндекса = АргументИзИндекса(ИмяАргумента);
 
+	Если АргументИндекса = Неопределено Тогда
+		ЗначениеАргументаРодителя = ЗначениеАргументаКомандыРодителя(ИмяАргумента);
+
+		Если Не ЗначениеАргументаРодителя = Неопределено Тогда
+			Возврат ЗначениеАргументаРодителя;
+		КонецЕсли;
+
+	КонецЕсли;
+
 	Если АргументИндекса = Неопределено Тогда
 		ВызватьИсключение СтрШаблон("Ошибка получение значения аргумента <%1>.
 		|Аргумент не найден в индексе аргументов команды", ИмяАргумента);
 	КонецЕсли;
 
-	Возврат АргументИзИндекса(ИмяАргумента).Значение;
+	Возврат АргументИндекса.Значение;
 
 КонецФункции
 

tests/КомандаПриложения_test.os

@@ -48,6 +48,7 @@
 	// ИменаТестов.Добавить("ТестДолжен_ПроверитьВыполнениеОбработчикаПередВыполнениемКоманды");
 	// ИменаТестов.Добавить("ТестДолжен_ПроверитьВыполнениеОбработчикаПослеВыполненияКоманды");
 
+	ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОпцийИАргументовРодителяКомандыБезВызоваПроцедуры");
 	ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОпцийИАргументовРодителяКоманды");
 	ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОпцийИАргументовРодителяКомандыПервогоУровня");
 
@@ -88,6 +89,35 @@
 КонецПроцедуры
 
 
+Процедура ТестДолжен_ПроверитьЧтениеОпцийИАргументовРодителяКомандыБезВызоваПроцедуры () Экспорт
+
+	Команда = ПодготовитьТестовуюКоманду();
+
+	ОпцияМассив = Команда.Опция("e env", Новый Массив, "Тестовый массив опций").ТМассивСтрок();
+	АргументСтрока = Команда.Аргумент("ARG", "", "Тестовый простой необязательный аргумент").Обязательный(Ложь);
+
+	ВложеннаяКоманда = Команда.ДобавитьПодкоманду("sub s", "", ЭтотОбъект);
+	ОпцияМассив = ВложеннаяКоманда.Опция("e env", Новый Массив, "Тестовый массив опций").ТМассивСтрок();
+
+	Аргументы = Новый Массив;
+	
+	Аргументы.Добавить("-e=Знач1");
+	Аргументы.Добавить("-e=Знач2");
+	Аргументы.Добавить("-e=Знач3");
+	Аргументы.Добавить("ЗначениеАргумента");
+
+	Аргументы.Добавить("sub");
+
+	РезультатВыполнения = ВыполнитьКомандуПриложения(Команда, Аргументы);
+
+	Утверждения.ПроверитьИстину(РезультатВыполнения, "Команда должна выполниться");
+
+	Утверждения.ПроверитьРавенство(ВложеннаяКоманда.ЗначениеОпцииКомандыРодителя("e").Количество(), 3 , "Результат <ОпцияМассив> должны совпадать");
+	Утверждения.ПроверитьРавенство(ВложеннаяКоманда.ЗначениеОпции("e").Количество(), 0 , "Результат <ОпцияМассив> должны совпадать");
+	Утверждения.ПроверитьРавенство(ВложеннаяКоманда.ЗначениеАргумента("ARG"), "ЗначениеАргумента" , "Результат <АргументСтрока> должны совпадать");
+
+КонецПроцедуры
+
 Процедура ТестДолжен_ПроверитьЧтениеОпцийИАргументовРодителяКоманды() Экспорт
 
 	Команда = ПодготовитьТестовуюКоманду();