обход ошибки невозможности получения лицензии

#46 при не возможности получить лицензию делаем паузу и пробуем загрузить файл еще раз

Author: Tushkan

src/core/Классы/МенеджерСинхронизации.os

@@ -68,27 +68,34 @@
 	ЛогКонфигуратора = Логирование.ПолучитьЛог("oscript.lib.v8runner");
 	ЛогКонфигуратора.УстановитьУровень(Лог.Уровень());
 
-	Попытка
+	Пока Истина Цикл
+		Попытка
 
-		Конфигуратор.ЗагрузитьКонфигурациюИзФайла(ФайлКонфигурации, Ложь);
+			Конфигуратор.ЗагрузитьКонфигурациюИзФайла(ФайлКонфигурации, Ложь);
+			Прервать;
 
-	Исключение
+		Исключение
 
-		// проверим текст ошибки, если текст содержит информацию о необходимости конвертировать
-		// тогда выполним конвертацию и повторно попытаемся загрузить файл
-		ТекстОшибки = Конфигуратор.ВыводКоманды();
-		Если Найти(Врег(ТекстОшибки), Врег("Структура конфигурации несовместима с текущей версией программы")) Тогда
+			// проверим текст ошибки, если текст содержит информацию о необходимости конвертировать
+			// тогда выполним конвертацию и повторно попытаемся загрузить файл
+			ТекстОшибки = Конфигуратор.ВыводКоманды();
+			Если Найти(Врег(ТекстОшибки), Врег("Структура конфигурации несовместима с текущей версией программы")) Тогда
 
-			Конфигуратор.СконвертироватьФайлКонфигурации(ФайлКонфигурации);
-			Конфигуратор.ЗагрузитьКонфигурациюИзФайла(ФайлКонфигурации, Ложь);
+				Конфигуратор.СконвертироватьФайлКонфигурации(ФайлКонфигурации);
 
-		Иначе
+			ИначеЕсли Найти(Врег(ТекстОшибки), Врег("Не обнаружено свободной лицензии!")) Тогда
+				Лог.Ошибка(ТекстОшибки);
+				Лог.Информация("Повторное подключение. Не обнаружено свободной лицензии!");
+				Приостановить(10000);
+				
+			Иначе
 
-			ВызватьИсключение ТекстОшибки;
+				ВызватьИсключение ТекстОшибки;
 
-		КонецЕсли;
+			КонецЕсли;
 
-	КонецПопытки;
+		КонецПопытки;
+	КонецЦикла;
 
 	Если Не (Новый Файл(КаталогПлоскойВыгрузки).Существует()) Тогда
 		СоздатьКаталог(КаталогПлоскойВыгрузки);