ПроверитьСостояниеЗапросаНаПодключение (БСП)

Проверить состояние запроса на подключение. Выполняет проверку статуса запроса на подключение тестового периода пользователю.

// Выполняет проверку статуса запроса на подключение тестового периода пользователю.
// Используется для вызова фоновым заданием.
//
Процедура ПроверитьСостояниеЗапросаНаПодключение(ПараметрыЗапроса, АдресХранилища) Экспорт
	
	Если Не РазрешеноПодключениеТестовыхПериодов() Тогда
		ВызватьИсключение НСтр("ru = 'Подключение тестового периода недоступно.'");
	КонецЕсли;
	
	РезультатОперации = СостояниеЗапросаНаПодключение(
		ПараметрыЗапроса.Идентификатор,
		ПараметрыЗапроса.ИдентификаторТестовогоПериода);
	
	ПоместитьВоВременноеХранилище(РезультатОперации, АдресХранилища);
	
	Если ПараметрыЗапроса.РежимРегламентногоЗадания Тогда
		
		ЗапросОбработан = Ложь;
		Если РезультатОперации.Ошибка Тогда
			ЗапросОбработан = Истина;
		Иначе
			РезультатПодключения = РезультатОперации.РезультатПодключения;
			Если РезультатПодключения.Ошибка Тогда
				ЗапросОбработан = Истина;
			КонецЕсли;
			Если РезультатПодключения.Подключен Тогда
				ЗапросОбработан = Истина;
			КонецЕсли;
		КонецЕсли;
		
		Если ЗапросОбработан Тогда
			УдалитьРегламентноеЗаданиеПроверкиПодключения(
				ПараметрыЗапроса.Идентификатор);
			УдалитьИнформациюОЗапросеНаПодключение(
				ПараметрыЗапроса.СервисСопровождения,
				ПараметрыЗапроса.Идентификатор);
		КонецЕсли;
	КонецЕсли;
	
КонецПроцедуры

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////

// Выполняет проверку статуса запроса на подключение тестового периода пользователю.
// Используется для вызова фоновым заданием.
//
Процедура ПроверитьСостояниеЗапросаНаПодключение(ПараметрыЗапроса, АдресХранилища) Экспорт
	
	Если Не РазрешеноПодключениеТестовыхПериодов() Тогда
		ВызватьИсключение НСтр("ru = 'Подключение тестового периода недоступно.'");
	КонецЕсли;
	
	РезультатОперации = СостояниеЗапросаНаПодключение(
		ПараметрыЗапроса.Идентификатор,
		ПараметрыЗапроса.ИдентификаторТестовогоПериода);
	
	ПоместитьВоВременноеХранилище(РезультатОперации, АдресХранилища);
	
	Если ПараметрыЗапроса.РежимРегламентногоЗадания Тогда
		
		ЗапросОбработан = Ложь;
		Если РезультатОперации.Ошибка Тогда
			ЗапросОбработан = Истина;
		Иначе
			РезультатПодключения = РезультатОперации.РезультатПодключения;
			Если РезультатПодключения.Ошибка Тогда
				ЗапросОбработан = Истина;
			КонецЕсли;
			Если РезультатПодключения.Подключен Тогда
				ЗапросОбработан = Истина;
			КонецЕсли;
		КонецЕсли;
		
		Если ЗапросОбработан Тогда
			УдалитьРегламентноеЗаданиеПроверкиПодключения(
				ПараметрыЗапроса.Идентификатор);
			УдалитьИнформациюОЗапросеНаПодключение(
				ПараметрыЗапроса.СервисСопровождения,
				ПараметрыЗапроса.Идентификатор);
		КонецЕсли;
	КонецЕсли;
	
КонецПроцедуры

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////