Загрузка данных


&НаКлиенте
Процедура Команда1(Команда)
	
	// Постоянные нормы из условия задачи
	НормаТекущегоЗапаса        = 20;   // дней
	НормаСтраховогоЗапаса      = 10;   // дней
	НормаТранспортногоЗапаса   = 3;    // дней
	ДоляТехнологическогоЗапаса = 0.05; // 5%
	НормаНЗППроцент            = 0.05;  // 5%
	НормаГотовойПродукции      = 5;     // дней
	
	РасходыБудущихПериодов     = 560;   // тыс. руб.
	ДебиторскаяЗадолженность   = 520;   // тыс. руб.
	ДенежныеСредства           = 350;   // тыс. руб.
	
	// Проверка на ноль, чтобы не выбило ошибку деления
	Если РабочихДней = 0 Тогда
		Сообщить("Укажите количество рабочих дней!");
		Возврат;
	КонецЕсли;
	
	// 1. Расчет по введенным значениям (берем прямо из полей формы)
	РасходМПЗВДень = СтоимостьМПЗ / РабочихДней;
	НормаЗапасаМПЗДней = (НормаТекущегоЗапаса + НормаСтраховогоЗапаса + НормаТранспортногоЗапаса) / (1 - ДоляТехнологическогоЗапаса);
	НормативМПЗ = РасходМПЗВДень * НормаЗапасаМПЗДней;
	
	// 2. НЗП
	НормативНЗП = ОбъемСМР * НормаНЗППроцент;
	
	// 3. Готовая продукция
	ДнейВГодуРабочих = РабочихДней * 12;
	НормативГП = (ВыпускПродукции * НормаГотовойПродукции) / ДнейВГодуРабочих;
	
	// 4. Итоговый расчет и запись в поле результата на форме
	ИтогНорматив = Окр(НормативМПЗ + НормативНЗП + РасходыБудущихПериодов + ДебиторскаяЗадолженность + ДенежныеСредства + НормативГП, 2);
	
	Сообщить("Расчет выполнен. Норматив: " + ИтогНорматив + " тыс. руб.");

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