Новый экспортный метод Получить(ИмяПараметра, ЗначениеПоУмолчанию)

Author: Stepa86

Tests/ЧтениеПараметров_test.os

@@ -29,6 +29,10 @@
 	СписокТестов.Добавить("ТестДолжен_ПроверитьНаличиеКомментарияВКавычках");
 
 	СписокТестов.Добавить("ТестДолжен_ПрочитатьПеременныеСреды");
+	СписокТестов.Добавить("ТестДолжен_ПолучитьПараметрЧерезМетод");
+	СписокТестов.Добавить("ТестДолжен_ПолучитьОтсутствующийПараметрЧерезМетод");
+
+	СписокТестов.Добавить("Тест_ПрочитатьФайлыПараметровЧерезСсылкиВПеременныхСреды");
 
 	Возврат СписокТестов;
 
@@ -176,6 +180,31 @@
 
 КонецПроцедуры
 
+Процедура Тест_ПрочитатьФайлыПараметровЧерезСсылкиВПеременныхСреды() Экспорт
+	
+	файлПараметров = ОбъединитьПути( ВременныйКаталог, "testParam1.json");
+
+	СИ = Новый СистемнаяИнформация;
+	СИ.УстановитьПеременнуюСреды( "ReadFile_testParam", файлПараметров );
+	
+	записьТекста = Новый ЗаписьТекста(файлПараметров);
+	ЗаписьТекста.ЗаписатьСтроку( "{""парам.Число"": 1, ""парам.Строка"": ""1"", ""парам.Булево"": true}" );
+	ЗаписьТекста.Закрыть();
+
+	ошибкиЧтения = Неопределено;
+
+	прочитанныеПараметры = ЧтениеПараметров.Прочитать( , ошибкиЧтения, Истина );
+
+	Утверждения.ПроверитьРавенство( ошибкиЧтения.Количество(), 0, "Ошибок чтения быть не должно");
+
+	Утверждения.ПроверитьРавенство( прочитанныеПараметры["парам.Число"], 1);
+	Утверждения.ПроверитьРавенство( прочитанныеПараметры["парам.Строка"], "1");
+	Утверждения.ПроверитьРавенство( прочитанныеПараметры["парам.Булево"], Истина);
+
+	Утверждения.ПроверитьРавенство( прочитанныеПараметры["ReadFile_testParam"], файлПараметров);
+	
+КонецПроцедуры
+
 Процедура Тест_ПрочитатьФайлыПараметровЧерезОтносительныеСсылки() Экспорт
 
 	файлПараметров1 = ОбъединитьПути( ВременныйКаталог, "testParam1.json");
@@ -392,3 +421,51 @@
 	Утверждения.ПроверитьРавенство( прочитанныеПараметры["testReadParam"], Строка( текДата ) );
 
 КонецПроцедуры
+
+Процедура ТестДолжен_ПолучитьПараметрЧерезМетод() Экспорт
+	
+	файлПараметров = ОбъединитьПути( ВременныйКаталог, "testParam.json");
+
+	записьТекста = Новый ЗаписьТекста(файлПараметров);
+	ЗаписьТекста.ЗаписатьСтроку( "{""парам.Число"": 100, ""парам.Строка"": ""100"", ""парам.Булево"": true}" );
+	ЗаписьТекста.Закрыть();
+
+	ошибкиЧтения = Неопределено;
+
+	прочитанныеПараметры = ЧтениеПараметров.Прочитать( файлПараметров, ошибкиЧтения );
+
+	Утверждения.ПроверитьРавенство( ТипЗнч(прочитанныеПараметры), Тип("Соответствие"), "Прочитанные параметры должны быть с типом Соответствие");
+	Утверждения.ПроверитьРавенство( прочитанныеПараметры.Количество(), 3, "Прочитанных параметров должно быть 3");
+
+	Утверждения.ПроверитьРавенство( ТипЗнч(ошибкиЧтения), Тип("Соответствие"), "Ошибки чтения должны быть с типом Соответствие");
+	Утверждения.ПроверитьРавенство( ошибкиЧтения.Количество(), 0, "Ошибок чтения быть не должно");
+
+	Утверждения.ПроверитьРавенство( ЧтениеПараметров.Получить("парам.Число"), 100, "Должно быть парам.Число = 100");
+	Утверждения.ПроверитьРавенство( ЧтениеПараметров.Получить("парам.Строка"), "100", "Должно быть парам.Строка = ""100""");
+	Утверждения.ПроверитьРавенство( ЧтениеПараметров.Получить("парам.Булево"), Истина, "Должно быть парам.Булево = Истина");
+	
+КонецПроцедуры
+
+Процедура ТестДолжен_ПолучитьОтсутствующийПараметрЧерезМетод() Экспорт
+	
+	файлПараметров = ОбъединитьПути( ВременныйКаталог, "testParam.json");
+
+	записьТекста = Новый ЗаписьТекста(файлПараметров);
+	ЗаписьТекста.ЗаписатьСтроку( "{""парам.Число"": 100, ""парам.Строка"": ""100"", ""парам.Булево"": true}" );
+	ЗаписьТекста.Закрыть();
+
+	ошибкиЧтения = Неопределено;
+
+	прочитанныеПараметры = ЧтениеПараметров.Прочитать( файлПараметров, ошибкиЧтения );
+
+	Утверждения.ПроверитьРавенство( ТипЗнч(прочитанныеПараметры), Тип("Соответствие"), "Прочитанные параметры должны быть с типом Соответствие");
+	Утверждения.ПроверитьРавенство( прочитанныеПараметры.Количество(), 3, "Прочитанных параметров должно быть 3");
+
+	Утверждения.ПроверитьРавенство( ТипЗнч(ошибкиЧтения), Тип("Соответствие"), "Ошибки чтения должны быть с типом Соответствие");
+	Утверждения.ПроверитьРавенство( ошибкиЧтения.Количество(), 0, "Ошибок чтения быть не должно");
+
+	Утверждения.ПроверитьРавенство( ЧтениеПараметров.Получить("ОтсутствующийПараметр", 200), 200, "Должно быть ОтсутствующийПараметр = 200");
+	Утверждения.ПроверитьРавенство( ЧтениеПараметров.Получить("ОтсутствующийПараметр2"), Неопределено, "Должно быть ОтсутствующийПараметр2 = Неопределено");
+	
+КонецПроцедуры
+

Модули/ЧтениеПараметров.os

@@ -49,6 +49,27 @@
 
 КонецФункции
 
+// Получает значение параметра
+//
+// Параметры:
+//  пИмяПараметра  - Строка - имя параметра, который нужно прочитать
+//	пЗначениеПоУмолчанию - Произвольный - если значение параметра не найдено (или = Неопределено), то будет возвращено 
+//											это значение по умолчанию
+// Возвращаемое значение:
+//   Произвольный   - Значение параметра
+//
+Функция Получить( Знач пИмяПараметра, Знач пЗначениеПоУмолчанию = Неопределено ) Экспорт
+	
+	значениеПараметра = мПрочитанныеПараметры[пИмяПараметра];
+
+	Если значениеПараметра = Неопределено Тогда
+		значениеПараметра = пЗначениеПоУмолчанию;
+	КонецЕсли;
+
+	Возврат значениеПараметра;
+
+КонецФункции
+
 Процедура ПрочитатьОбъектСФайламиРекурсивно( Знач пОбъектЧтения, пМассивПрочитанныхЗначений )
 
 	Если ТипЗнч( пОбъектЧтения ) = Тип("Строка") Тогда
@@ -160,8 +181,6 @@
 
 		мПрочитанныеПараметры.Вставить( цПеременнаяСреды.Ключ, цПеременнаяСреды.Значение );
 		ПрочитатьФайлИзЗначенияПараметра( цПеременнаяСреды.Ключ, цПеременнаяСреды.Значение );
-		
-		Сообщить(цПеременнаяСреды.Ключ + " = " + цПеременнаяСреды.Значение);
 
 	КонецЦикла;