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


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

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

	Если Параметры.КодУровняЗапаса = 0 Тогда
		Любой = 1;
	ИначеЕсли Параметры.КодУровняЗапаса = 1 Тогда
		СрочноКЗаказу = 1;
	ИначеЕсли Параметры.КодУровняЗапаса = 2 Тогда
		БлизкоКЗаказу = 1;
	ИначеЕсли Параметры.КодУровняЗапаса = 3 Тогда
		КОтменеЗаказа = 1;
	ИначеЕсли Параметры.КодУровняЗапаса = 4 Тогда
		МеньшеПоловины = 1;
	ИначеЕсли Параметры.КодУровняЗапаса = 5 Тогда
		БольшеПоловины = 1;
	ИначеЕсли Параметры.КодУровняЗапаса = 6 Тогда
		Избыток = 1;
	КонецЕсли;
	
	Картинка = Истина;

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

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

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

&НаКлиенте
Процедура ЛюбойПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("Любой");
КонецПроцедуры

&НаКлиенте
Процедура СрочноКЗаказуПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("СрочноКЗаказу");
КонецПроцедуры

&НаКлиенте
Процедура БлизкоКЗаказуПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("БлизкоКЗаказу");
КонецПроцедуры

&НаКлиенте
Процедура КОтменеЗаказаПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("КОтменеЗаказа");
КонецПроцедуры

&НаКлиенте
Процедура МеньшеПоловиныПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("МеньшеПоловины");
КонецПроцедуры

&НаКлиенте
Процедура БольшеПоловиныПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("БольшеПоловины");
КонецПроцедуры

&НаКлиенте
Процедура ИзбытокПриИзменении(Элемент)
	ПриИзмененииПереключателяИндикатораОбеспечения("Избыток");
КонецПроцедуры

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

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

&НаКлиенте
Процедура Выбрать(Команда)
	
	КодУровняЗапаса =
		?(Любой = 1,            0,
		?(СрочноКЗаказу = 1,    1,
		?(БлизкоКЗаказу = 1,    2,
		?(КОтменеЗаказа = 1,    3,
		?(МеньшеПоловины = 1,   4,
		?(БольшеПоловины = 1,   5,
		?(Избыток = 1,          6, Неопределено)))))));
	
	ВыбранноеЗначение = Новый Структура("КодУровняЗапаса", КодУровняЗапаса);
	
	ОповеститьОВыборе(ВыбранноеЗначение);
	
КонецПроцедуры

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

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

&НаКлиенте
Процедура ПриИзмененииПереключателяИндикатораОбеспечения(ВыбранныйИндикатор)
	
	Любой =          0;
	СрочноКЗаказу =  0;
	БлизкоКЗаказу =  0;
	КОтменеЗаказа =  0;
	МеньшеПоловины = 0;
	БольшеПоловины = 0;
	Избыток =        0;
	ЭтаФорма[ВыбранныйИндикатор] = 1;
	
КонецПроцедуры

#КонецОбласти
Формирование заказов по потребностям / Форма выбора уровня запаса / Модуль формы

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