Экземпляр бюджета / Аналитики отображаемые всегда / Модуль формы

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

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

	АналитикиОтображаемыеВсегда = Параметры.АналитикиОтображаемыеВсегда;
	
КонецПроцедуры

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

#Область ОбработчикиКомандФормы

&НаКлиенте
Процедура Применить(Команда)
	
	МаксимальноеКоличествоАналитик = БюджетированиеКлиентСервер.МаксимальноеКоличествоАналитик();
	Если АналитикиОтображаемыеВсегда.Количество() > МаксимальноеКоличествоАналитик Тогда
		ТекстПредупреждения = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
			НСтр("ru = 'Максимально можно выбрать %1 аналитик'"), 
			МаксимальноеКоличествоАналитик);
		ПоказатьПредупреждение(,ТекстПредупреждения);
		Возврат;
	КонецЕсли;
	
	Всего = АналитикиОтображаемыеВсегда.Количество();
	Для Сч = 1 По Всего Цикл
		ЭлементСписка = АналитикиОтображаемыеВсегда[Всего - Сч];
		Если Не ЗначениеЗаполнено(ЭлементСписка.Значение) Тогда
			АналитикиОтображаемыеВсегда.Удалить(ЭлементСписка);
		КонецЕсли;
	КонецЦикла;
	
	Закрыть(АналитикиОтображаемыеВсегда);
	
КонецПроцедуры

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