Разработка регламентного задания

Перед началом выполнения регламентного задания, выполняющего интеграцию с внешними ресурсами, необходимо проверить возможность работы базы с внешними ресурсами.

ИмяСобытияЖР = КонстантыМодуля("ИмяСобытияЖР");
ТекстСообщенияБлокировкаРаботыСвнешнимиРесурсами = КонстантыМодуля("ТекстСообщенияБлокировкаРаботыСвнешнимиРесурсами");
ТекстСообщенияНеВыполнена = КонстантыМодуля("ТекстСообщенияНеВыполнена");

Если БлокировкаРаботыСВнешнимиРесурсами.РаботаСВнешнимиРесурсамиЗаблокирована() Тогда 
	ОписаниеОшибки = ТекстСообщенияНеВыполнена + " " + ТекстСообщенияБлокировкаРаботыСвнешнимиРесурсами;
	#ЕСЛИ НаКлиенте ТОГДА
		Сообщить(ОписаниеОшибки);
	#КОНЕЦЕСЛИ
	ЗаписьЖурналаРегистрации(ИмяСобытияЖР, УровеньЖурналаРегистрации.Информация,,, ОписаниеОшибки);
	
	Возврат;
КонецЕсли;

Функция КонстантыМодуля(ИмяКонстанты)
	
	Если ИмяКонстанты = "ИмяСобытияЖР" Тогда 
		Возврат %ИмяСобытияЖР%
	ИначеЕсли ИмяКонстанты = "ТекстСообщенияБлокировкаРаботыСвнешнимиРесурсами" Тогда 
		Возврат "Работа с внешними ресурсами заблокирована."
	ИначеЕсли ИмяКонстанты = "ТекстСообщенияНеВыполнена" Тогда 
		Возврат "Регламентное задание прервано."
	КонецЕсли;
	
	ВызватьИсключение СтрШаблон("Константа %1 не определена", ИмяКонстанты);
	
КонецФункции // КонстантыМодуля()