Сегменты клиентов / Разблокирование реквизитов / Модуль формы

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

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

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

	СобытияФорм.ПриСозданииНаСервере(ЭтаФорма, Отказ, СтандартнаяОбработка);

КонецПроцедуры

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

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

&НаКлиенте
Процедура РазрешитьРедактирование(Команда)
	
	Результат = Новый Массив;
	Если РазрешитьРедактированиеИспользованияРегламентногоЗадания Тогда
		Результат.Добавить("РегламентноеЗаданиеИспользуется");
	КонецЕсли;
	
	Если РазрешитьРедактированиеНастройкиСКД Тогда
		Результат.Добавить("ПредставлениеШаблонаСКД");
	КонецЕсли;
	
	Если РазрешитьРедактированиеРасписание Тогда
		Результат.Добавить("Расписание");
	КонецЕсли;
	
	Если РазрешитьРедактированиеСпособФормирования Тогда
		Результат.Добавить("СпособФормирования");
	КонецЕсли;
	
	Если РазрешитьРедактированиеЗапретОтгрузки Тогда
		Результат.Добавить("ЗапретОтгрузки");
	КонецЕсли;
	
	Закрыть(Результат);
	
КонецПроцедуры

&НаКлиенте
Процедура Подключаемый_ВыполнитьПереопределяемуюКоманду(Команда)
	
	СобытияФормКлиент.ВыполнитьПереопределяемуюКоманду(ЭтаФорма, Команда);
	
КонецПроцедуры

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