Этапы ресурсной спецификации / Форма выбора / Модуль формы

файл

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

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
	
	Если Параметры.Свойство("АвтоТест") Тогда // Возврат при получении формы для анализа.
		Возврат;
	КонецЕсли;
	
	Если Параметры.Свойство("Отбор") И Параметры.Отбор.Свойство("Владелец") Тогда
		Спецификация = Параметры.Отбор.Владелец;
		РазрешитьСменуВладельца = Неопределено;
		Элементы.Спецификация.ТолькоПросмотр =
			НЕ Параметры.Свойство("РазрешитьСменуВладельца", РазрешитьСменуВладельца) ИЛИ РазрешитьСменуВладельца <> Истина;
	Иначе
		УстановитьОтборПоСпецификации(ЭтаФорма);
	КонецЕсли;
	
	Если Параметры.Свойство("ПоказыватьТолькоПредшественников") Тогда
		
		МассивСсылок = ОбщегоНазначенияКлиентСервер.ЗначениеВМассиве(Параметры.ПоказыватьТолькоПредшественников);
		Предшественники = Справочники.ЭтапыПроизводства.Предшественники(МассивСсылок)[МассивСсылок[0]];
		
		ОбщегоНазначенияКлиентСервер.УстановитьЭлементОтбораДинамическогоСписка(Список, "Ссылка", Предшественники, ВидСравненияКомпоновкиДанных.ВСписке,, Истина);
		
	КонецЕсли;
	
	СобытияФорм.ПриСозданииНаСервере(ЭтаФорма, Отказ, СтандартнаяОбработка);

	ВерсионированиеОбъектов.ПриСозданииНаСервере(ЭтотОбъект);
	
КонецПроцедуры

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

#Область ОбработчикиСобытийЭлементовШапкиФормы

&НаКлиенте
Процедура СпецификацияПриИзменении(Элемент)
	
	УстановитьОтборПоСпецификации(ЭтаФорма);
	
КонецПроцедуры

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

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

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

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

#Область СлужебныеПроцедурыИФункции

#Область Прочее

&НаКлиентеНаСервереБезКонтекста
Процедура УстановитьОтборПоСпецификации(Форма)

	ОбщегоНазначенияКлиентСервер.УстановитьЭлементОтбораДинамическогоСписка(
			Форма.Список, 
			"Владелец", 
			Форма.Спецификация,,, 
			Истина);

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

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

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

Связанные материалы