From 036bd520f79648be2478c8a710fb946b353e5d7e Mon Sep 17 00:00:00 2001
From: EvilBeaver <ovsiankin.aa@gmail.com>
Date: Tue, 28 Mar 2017 22:04:40 +0300
Subject: [PATCH] =?UTF-8?q?=D0=A0=D0=B0=D1=81=D1=88=D0=B8=D1=80=D0=B5?=
 =?UTF-8?q?=D0=BD=D1=8B=20=D0=B2=D0=BE=D0=B7=D0=BC=D0=BE=D0=B6=D0=BD=D0=BE?=
 =?UTF-8?q?=D1=81=D1=82=D0=B8=20=D0=B7=D0=B0=D0=BF=D1=83=D1=81=D0=BA=D0=B0?=
 =?UTF-8?q?=20=D0=B2=20=D1=80=D0=B5=D0=B6=D0=B8=D0=BC=D0=B5=20=D0=BF=D1=80?=
 =?UTF-8?q?=D0=B5=D0=B4=D0=BF=D1=80=D0=B8=D1=8F=D1=82=D0=B8=D1=8F?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 packagedef                                    |  4 ++--
 ...20\270\321\217\321\202\320\270\321\217.os" | 24 +++++++++++++++++--
 2 files changed, 24 insertions(+), 4 deletions(-)

diff --git a/packagedef b/packagedef
index 624797b..a64c7db 100644
--- a/packagedef
+++ b/packagedef
@@ -1,9 +1,9 @@
 
 Описание.Имя("deployka")
-		.Версия("0.1.2")
+		.Версия("0.2")
         .ВерсияСреды("1.0.16")
 		.ЗависитОт("logos")
 		.ЗависитОт("cmdline")
-		.ЗависитОт("v8runner")
+		.ЗависитОт("v8runner", "0.9")
 		.ВключитьФайл("src")
 		.ИсполняемыйФайл("src/deployka.os", "deployka");
diff --git "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\227\320\260\320\277\321\203\321\201\321\202\320\270\321\202\321\214\320\222\320\240\320\265\320\266\320\270\320\274\320\265\320\237\321\200\320\265\320\264\320\277\321\200\320\270\321\217\321\202\320\270\321\217.os" "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\227\320\260\320\277\321\203\321\201\321\202\320\270\321\202\321\214\320\222\320\240\320\265\320\266\320\270\320\274\320\265\320\237\321\200\320\265\320\264\320\277\321\200\320\270\321\217\321\202\320\270\321\217.os"
index 79f0bdc..80bbf37 100644
--- "a/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\227\320\260\320\277\321\203\321\201\321\202\320\270\321\202\321\214\320\222\320\240\320\265\320\266\320\270\320\274\320\265\320\237\321\200\320\265\320\264\320\277\321\200\320\270\321\217\321\202\320\270\321\217.os"
+++ "b/src/\320\232\320\273\320\260\321\201\321\201\321\213/\320\232\320\276\320\274\320\260\320\275\320\264\320\260\320\227\320\260\320\277\321\203\321\201\321\202\320\270\321\202\321\214\320\222\320\240\320\265\320\266\320\270\320\274\320\265\320\237\321\200\320\265\320\264\320\277\321\200\320\270\321\217\321\202\320\270\321\217.os"
@@ -31,6 +31,14 @@
 		"-execute", 
 		"Путь обработки для запуска");
 
+	Парсер.ДобавитьИменованныйПараметрКоманды(ОписаниеКоманды, 
+		"-additional", 
+		"Дополнительные ключи запуска 1С");
+
+	Парсер.ДобавитьПараметрФлагКоманды(ОписаниеКоманды, 
+		"-thin-client", 
+		"Запускать тонкий клиент принудительно");
+
     Парсер.ДобавитьКоманду(ОписаниеКоманды);
     
 КонецПроцедуры
@@ -56,6 +64,10 @@
 		Пользователь,
 		Пароль,
 		ИспользуемаяВерсияПлатформы);
+
+	Если ПараметрыКоманды["-thin-client"] Тогда
+		Конфигуратор.ПутьКПлатформе1С(Конфигуратор.ПутьКТонкомуКлиенту1С());
+	КонецЕслИ;
 	
 	Если Не ПустаяСтрока(КлючРазрешенияЗапуска) Тогда
 		Конфигуратор.УстановитьКлючРазрешенияЗапуска(КлючРазрешенияЗапуска);
@@ -65,20 +77,21 @@
 		ПараметрЗапускаПредприятия = "";
 	КонецЕсли;
 	
-	ДополнительныеКлючи = "";
+	ДополнительныеКлючи = ""+ ПараметрыКоманды["-additional"] + " ";
 	Если Не ПустаяСтрока(ОбработкаДляЗапуска) Тогда
 		ДополнительныеКлючи = ДополнительныеКлючи + "/Execute"+ЗапускПриложений.ОбернутьВКавычки(ОбработкаДляЗапуска);
 	КонецЕсли;
 	
 	Лог.Информация("Запускаю в режиме предприятия");
 	Попытка
+		Конфигуратор.УстановитьОбработчикОжидания(ЭтотОбъект);
 		Конфигуратор.ЗапуститьВРежимеПредприятия(ПараметрЗапускаПредприятия, Неопределено, ДополнительныеКлючи);
 		Текст = Конфигуратор.ВыводКоманды();
 		Если Не ПустаяСтрока(Текст) Тогда
 			Лог.Информация(Текст);
 		КонецЕсли;
 	Исключение
-		Лог.Ошибка(Конфигуратор.ВыводКоманды());
+		Лог.Ошибка(ОписаниеОшибки());
 		Возврат ВозможныйРезультат.ОшибкаВремениВыполнения;
 	КонецПопытки;
 	
@@ -86,6 +99,13 @@
     
 КонецФункции
 
+Процедура ОбработкаОжиданияПроцесса(Отказ, Интервал) Экспорт
+	Лог.Отладка("Ожидаю завершения процесса 1С...");
+	Если Интервал < 60000 Тогда
+		Интервал = Интервал + 500;
+	КонецЕсли;
+КонецПроцедуры
+
 /////////////////////////////////////////////////////////////////////////////////
 СистемнаяИнформация = Новый СистемнаяИнформация;
 ЭтоWindows = Найти(НРег(СистемнаяИнформация.ВерсияОС), "windows") > 0;
-- 
GitLab