Сделки с клиентами / Расчетная вероятность / Модуль формы

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

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

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

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

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

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

&НаКлиенте
Процедура Установить(Команда)
	
	Закрыть(Расчетная);
	
КонецПроцедуры

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

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