Программное создание штатного расписания ЗКГУ 3.1

	ТЗ													= ДанныеИзФайлаНаФорме1.Выгрузить();
	УтверждениеШтатногоРасписания						= Документы.УтверждениеШтатногоРасписания.СоздатьДокумент();
	УтверждениеШтатногоРасписания.Дата					= Дата("20190101");	
	УтверждениеШтатногоРасписания.Организация			= Объект.Организация.Ссылка;
	УтверждениеШтатногоРасписания.МесяцВступленияВСилу	= Дата("20190101"); 
	Идентификатор										= 1;
	Для Каждого  Строка Из ТЗ Цикл
		СтрокаПозиции									= УтверждениеШтатногоРасписания.Позиции.Добавить();
		СтрокаПозиции.Действие							= Перечисления.ДействияСПозициямиШтатногоРасписания.СоздатьНовуюПозицию;
		СтрокаПозиции.Должность							= Справочники.Должности.НайтиПоНаименованию(Строка.Должность);
		СтрокаПозиции.Подразделение						= Справочники.ПодразделенияОрганизаций.НайтиПоКоду(Строка.Подразделение);
		СтрокаПозиции.КоличествоСтавок					= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.КоличествоСтавок);
		СтрокаПозиции.ГрафикРаботыСотрудников			= ПолучитьГрафикРабот(Строка.ГрафикРаботы);
		СтрокаПозиции.УдалитьКатегорияПерсонала			= Справочники.СтрокиОтчетностиМониторингаРаботниковСоциальнойСферы.НайтиПоНаименованию(Строка.СОМРСС);
		СтрокаПозиции.ИдентификаторСтрокиПозиции		= Идентификатор;
		Идентификатор									=Идентификатор + 1;
		
		
		СпрШтатноеРасписание							= Справочники.ШтатноеРасписание.СоздатьЭлемент();
		СпрШтатноеРасписание.Должность					= СтрокаПозиции.Должность;
		СпрШтатноеРасписание.Подразделение				= СтрокаПозиции.Подразделение;
		СпрШтатноеРасписание.Владелец					= Объект.Организация.Ссылка;
		СпрШтатноеРасписание.Наименование				= СтрокаПозиции.Должность.Наименование + " /" + СтрокаПозиции.Подразделение.Наименование + "/";

		СтрокаНачисления								= СпрШтатноеРасписание.Начисления.Добавить();
		СтрокаНачисления.Начисление						= ПланыВидовРасчета.Начисления.НайтиПоНаименованию(Строка.Начисление1);
		СтрокаНачисления.Размер							= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.РазмерНачисления1);
		СтрокаНачисления.РазмерМин						= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.РазмерНачисления1);
		СтрокаНачисления.РазмерМакс						= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.РазмерНачисления1);
		
		СтрокаПоказателя								= СпрШтатноеРасписание.Показатели.Добавить();
		СтрокаПоказателя.ИдентификаторСтрокиВидаРасчета	= 1;
		СтрокаПоказателя.Показатель						= ПолучитьВидРасчета(Строка.Начисление1);
		СтрокаПоказателя.Значение						= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.РазмерНачисления1);
		СтрокаПоказателя.ЗначениеМин					= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.РазмерНачисления1);
		СтрокаПоказателя.ЗначениеМакс					= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(Строка.РазмерНачисления1);
		СтрокаНачисления.ИдентификаторСтрокиВидаРасчета	= 1;
		СпрШтатноеРасписание.Утверждена					= Истина;
		СпрШтатноеРасписание.Записать();
		СтрокаПозиции.Позиция							= СпрШтатноеРасписание.Ссылка;
		
		//СтрокаПозиции.ФОТ								= СтроковыеФункцииКлиентСервер.СтрокаВЧисло(СтрокаНачисления.Размер * 1.15);
		СтрокаПозиции.ОкладТариф						= СтрокаНачисления.Размер;
			
	КонецЦикла;