Значения показателей для распределения расходов / Форма записи / Модуль формы

#Область ОбработчикиСобытийФормы

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
	
	Если Параметры.Свойство("АвтоТест") Тогда // Возврат при получении формы для анализа.
		Возврат;
	КонецЕсли;

	ОбновлениеИнформационнойБазы.ПроверитьОбъектОбработан(Запись, ЭтотОбъект);
	
	Если Параметры.Свойство("Показатель") И ЗначениеЗаполнено(Параметры.Показатель) Тогда
		
		СуществующаяЗапись = РегистрыСведений.ЗначенияПоказателейДляРаспределенияРасходов.СоздатьМенеджерЗаписи();
		СуществующаяЗапись.Показатель = Параметры.Показатель;
		СуществующаяЗапись.Подразделение = Параметры.Подразделение;
		СуществующаяЗапись.Период = Параметры.Период;
		СуществующаяЗапись.Прочитать();
		
		Если ЗначениеЗаполнено(СуществующаяЗапись.Показатель) Тогда
			ЗначениеВДанныеФормы(СуществующаяЗапись, Запись);
		Иначе
			ЗаполнитьЗначенияСвойств(Запись, Параметры);
		КонецЕсли;
		
	КонецЕсли;
	
КонецПроцедуры

&НаСервере
Процедура ПриЧтенииНаСервере(ТекущийОбъект)
	
	ДатыЗапретаИзменения.ОбъектПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект);
	
КонецПроцедуры

&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
	Запись.Период = НачалоМесяца(Запись.Период);
КонецПроцедуры

#КонецОбласти