Маршрутизация процесса согласования в комплексном процессе

УДОБухгалтер = Ложь;
	УДОЭкономист = Ложь;
	УДОЮрист = Ложь;
	УдоМаркетолог = Ложь;	
	
	
	//Проверка для перехода на согласование Начальник УДО
	Рез = Ложь;	
	//1 проверим нужно ли согласовывать Маркетологом
	УсловиеДляПроверки = Справочники.УсловияМаршрутизации.НайтиПоНаименованию("Добавить Маркетолога УДО");
	ТребуетсяМаркетологУДО = РаботаСУсловиямиМаршрутизации.ПроверитьПрименимостьУсловияМаршрутизацииКОбъекту(Предмет.Ссылка,УсловиеДляПроверки);
	
	
	//2 Проверим  нужно ли согласовывать Экономистом УДО
	УсловиеДляПроверки = Справочники.УсловияМаршрутизации.НайтиПоНаименованию("Добавить Экономиста УДО");
	ТребуетсяЭкономистУДО = РаботаСУсловиямиМаршрутизации.ПроверитьПрименимостьУсловияМаршрутизацииКОбъекту(Предмет.Ссылка,УсловиеДляПроверки);
	
	
	//3 Проверим согласования
	//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
	// Данный фрагмент построен конструктором.
	// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ВизыСогласования.РольИсполнителя,
		|	ВизыСогласования.РезультатСогласования,
		|	ВизыСогласования.Исполнитель
		|ИЗ
		|	Справочник.ВизыСогласования КАК ВизыСогласования
		|ГДЕ
		|	ВизыСогласования.ПомещенаВИсторию = &ПомещенаВИсторию
		|	И ВизыСогласования.Удалена = &Удалена
		|	И ВизыСогласования.Документ = &Документ";
	
	Запрос.УстановитьПараметр("Документ", Предмет.Ссылка);
	Запрос.УстановитьПараметр("ПомещенаВИсторию", Ложь);
	Запрос.УстановитьПараметр("Удалена", Ложь);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	
	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
		Если Строка (ВыборкаДетальныеЗаписи.РольИсполнителя) = "Согласующий УДО Маркетолог" И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УдоМаркетолог = Истина;                                      
		КонецЕсли;
		
		Если юк_РаботаСУсловиямиМаршрутизации.ПроверитьИсполнителяНаРоль(ВыборкаДетальныеЗаписи.Исполнитель,"000000020") И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УдоМаркетолог = Истина;                                      
		КонецЕсли;
		
		Если Строка (ВыборкаДетальныеЗаписи.РольИсполнителя) = "Согласующий УДО Бухгалтер" И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УДОБухгалтер = Истина;	
		КонецЕсли;
		
		Если юк_РаботаСУсловиямиМаршрутизации.ПроверитьИсполнителяНаРоль(ВыборкаДетальныеЗаписи.Исполнитель,"000000017") И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УДОБухгалтер = Истина;                                      
		КонецЕсли;
		
		Если Строка (ВыборкаДетальныеЗаписи.РольИсполнителя) = "Согласующий УДО Экономист" И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УДОЭкономист = Истина;	
		КонецЕсли;	
		
		Если юк_РаботаСУсловиямиМаршрутизации.ПроверитьИсполнителяНаРоль(ВыборкаДетальныеЗаписи.Исполнитель,"000000018") И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УДОЭкономист = Истина;                                      
		КонецЕсли;
		
		Если Строка (ВыборкаДетальныеЗаписи.РольИсполнителя) = "Согласующий УДО Юрист" И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УДОЮрист = Истина;	
		КонецЕсли;
		
		Если юк_РаботаСУсловиямиМаршрутизации.ПроверитьИсполнителяНаРоль(ВыборкаДетальныеЗаписи.Исполнитель,"000000019") И ВыборкаДетальныеЗаписи.РезультатСогласования = Перечисления.РезультатыСогласования.Согласовано Тогда
			УДОЮрист = Истина;                                      
		КонецЕсли;
	КонецЦикла;
	//}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
	
	Если НЕ ТребуетсяМаркетологУДО Тогда 
		УдоМаркетолог = Истина;
	КонецЕсли;
	
	Если НЕ ТребуетсяЭкономистУДО Тогда
		УДОЭкономист = Истина;
	КонецЕсли;
	
	Если 	УДОБухгалтер И УДОЭкономист И УДОЮрист И УдоМаркетолог Тогда
		Рез=Истина;
	КонецЕсли;	
	
	Результат = Рез;