Исправлено создание ключа записи РС

Author: Nenashev A.A

Plugins/СериализаторMXL.epf

@@ -48,9 +48,10 @@
 
 &НаСервереБезКонтекста
 Функция ПолучитьКлючиЗаписиРСПоНаборуЗаписейРС(НаборЗаписей, ИмяРС)
+	
 	Результат = Новый Массив;
 
-	Периодический        = Не (Метаданные.РегистрыСведений[ИмяРС].ПериодичностьРегистраСведений = Метаданные.СвойстваОбъектов.ПериодичностьРегистраСведений.Непериодический);
+	Периодический        = НЕ (Метаданные.РегистрыСведений[ИмяРС].ПериодичностьРегистраСведений = Метаданные.СвойстваОбъектов.ПериодичностьРегистраСведений.Непериодический);
 	ПодчиненРегистратору = (Метаданные.РегистрыСведений[ИмяРС].РежимЗаписи = Метаданные.СвойстваОбъектов.РежимЗаписиРегистра.ПодчинениеРегистратору);
 
 	МассивИзмерений = Новый Массив;
@@ -59,30 +60,27 @@
 	КонецЦикла;
 
 	Для каждого Запись Из НаборЗаписей Цикл
-		ЗначениеКлюча = Новый Структура;
+		ЗначенияКлюча = Новый Структура;
 
 		Если ПодчиненРегистратору Тогда
-			ЗначениеКлюча.Вставить("Регистратор",Запись.Регистратор);
-		КонецЕсли;	 
+			ЗначенияКлюча.Вставить("Регистратор",Запись.Регистратор);
+		КонецЕсли;
 		Если Периодический Тогда
-			ЗначениеКлюча.Вставить("Период",Запись.Период);
-		КонецЕсли;	 
+			ЗначенияКлюча.Вставить("Период",Запись.Период);
+		КонецЕсли;
 
 		Для каждого Измерение Из МассивИзмерений Цикл
-			ЗначениеКлюча.Вставить(Измерение,Запись[Измерение]);
+			ЗначенияКлюча.Вставить(Измерение,Запись[Измерение]);
 		КонецЦикла;
 
-		
-		ПараметрыКонструктора = Новый Массив();      
-		ПараметрыКонструктора.Добавить(ЗначениеКлюча);      
-		КлючЗаписи =  Новый("РегистрСведенийКлючЗаписи." + ИмяРС, ПараметрыКонструктора);		
+		КлючЗаписи = РегистрыСведений[ИмяРС].СоздатьКлючЗаписи(ЗначенияКлюча);
 
 		Результат.Добавить(КлючЗаписи);
 	КонецЦикла;
 
 	Возврат Результат;
 
-КонецФункции	
+КонецФункции
 
 &НаСервере
 Функция УдалитьСозданныеДанныеСервер(Знач Данные)