#249

Установка реквизитов конструктора объекта XDTO

exts/yaxunit/src/DataProcessors/ЮТКонструкторОбъектаXDTO/ObjectModule.bsl

@@ -45,6 +45,23 @@
 	
 КонецФункции
 
+// Устанавливает значения реквизитов объекта.
+// 
+// Параметры:
+//  ЗначенияРеквизитов - Структура - Устанавливаемые значения реквизитов
+// 
+// Возвращаемое значение:
+//  ОбработкаОбъект.ЮТКонструкторОбъектаXDTO - Конструктор
+Функция УстановитьРеквизиты(ЗначенияРеквизитов) Экспорт
+	
+	Для Каждого ЗначениеРеквизита Из ЗначенияРеквизитов Цикл
+		ТекущийОбъект[ЗначениеРеквизита.Ключ] = ЗначениеРеквизита.Значение;
+	КонецЦикла;
+	
+	Возврат ЭтотОбъект;
+	
+КонецФункции
+
 // Устанавливает фиктивное значение реквизита объекта.
 // 
 // На основании типа реквизита генерируется фиктивное значение.

tests/src/CommonModules/Обр_ЮТКонструкторОбъектаXDTO_МО/Module.bsl

@@ -22,6 +22,7 @@
 	
 	ЮТТесты
 		.ДобавитьТест("Установить")
+		.ДобавитьТест("УстановитьРеквизиты")
 		.ДобавитьТест("Фикция")
 		.ДобавитьТест("ФикцияОбязательныхПолей")
 		.ДобавитьТест("ФикцияНезаполненных")
@@ -52,6 +53,23 @@
 	
 КонецПроцедуры
 
+Процедура УстановитьРеквизиты() Экспорт
+	
+	Номер = ЮТест.Данные().СлучайнаяСтрока(9);
+	Сумма = ЮТест.Данные().СлучайноеЧисло();
+	Реквизиты = Новый Структура("Number, Сумма", Номер, Сумма);
+	
+	Объект = НовыйКонструктор()
+		.УстановитьРеквизиты(Реквизиты)
+		.ДанныеОбъекта();
+	
+	ЮТест.ОжидаетЧто(Объект)
+		.ИмеетТип(Тип("ОбъектXDTO"))
+		.Свойство("Number").Равно(Номер)
+		.Свойство("Сумма").Равно(Сумма);
+	
+КонецПроцедуры
+
 Процедура Фикция() Экспорт
 	
 	Объект = НовыйКонструктор()