Merge pull request plastinin#19 from aplastinin/feature/plastinin#17-refactor

plastinin#17 - рефакоринг

Author: plastinin

Let's code/src/DataProcessors/ИТК_ПроведениеТестирования/Forms/Форма/Module.bsl

@@ -185,13 +185,8 @@
 &НаСервере
 Процедура ОпубликоватьРешениеНаСервере()
 
-	НоваяЗапись = РегистрыСведений.ИТК_РезультатыТестирования.СоздатьМенеджерЗаписи();   
-	НоваяЗапись.Задача = ТекущаяЗадача;
-	НоваяЗапись.Пользователь = Пользователь;
-	НоваяЗапись.Выполнена = Истина;
-	НоваяЗапись.Код = ТекстАлгоритмаСервер;
-	НоваяЗапись.КоличествоБаллов = Баллы;
-	НоваяЗапись.Записать(Истина);
+	МенеджерРегистра = РегистрыСведений.ИТК_РезультатыТестирования;
+	МенеджерРегистра.Добавить(ТекущаяЗадача, Пользователь, Истина, ТекстАлгоритмаСервер, Баллы);
 
 	ТекущаяЗадача = Справочники.ИТК_Задачи.ПустаяСсылка();
 	ПостановкаЗадачи = РазметкаВыбериЗадачу();

Let's code/src/InformationRegisters/ИТК_РезультатыТестирования/ManagerModule.bsl

@@ -0,0 +1,28 @@
+#Если Сервер или ТолстыйКлиентОбычноеПриложение или ВнешнееСоединение Тогда
+	
+#Область ПрограммныйИнтерфейс
+
+// Процедура добавляет резульатат тестирования в регистр
+// 
+// Параметры:
+//  Задача - СправочникСсылка.ИТК_Задача - задача тестирования
+//  Пользователь - Строка - участник тестирования
+//  Выполнена - Булево - тесты по задаче завершены успешно
+//  ТекстАлгоритмаСервер - Строка - код алгоритма
+//  Баллы - Число - количество баллов за верное решение
+//
+Процедура Добавить(Задача, Пользователь, Выполнена, ТекстАлгоритмаСервер, Баллы) Экспорт
+
+	НоваяЗапись = РегистрыСведений.ИТК_РезультатыТестирования.СоздатьМенеджерЗаписи();   
+	НоваяЗапись.Задача = Задача;
+	НоваяЗапись.Пользователь = Пользователь;
+	НоваяЗапись.Выполнена = Выполнена;
+	НоваяЗапись.Код = ТекстАлгоритмаСервер;
+	НоваяЗапись.КоличествоБаллов = Баллы;
+	НоваяЗапись.Записать(Истина);
+
+КонецПроцедуры
+
+#КонецОбласти
+		
+#КонецЕсли