1
0
mirror of https://github.com/bia-technologies/precommit4onec.git synced 2025-07-05 00:49:02 +02:00

Поправил конфигурацию

This commit is contained in:
Dmitriy Medvedev
2019-11-01 09:55:50 +03:00
parent 8529815a85
commit 847f4e1459
3 changed files with 39 additions and 12 deletions

View File

@ -132,7 +132,7 @@
Для Каждого Настройка из ВсеНастройки Цикл Для Каждого Настройка из ВсеНастройки Цикл
НастройкиПрекоммита = УправлениеНастройками.НастройкиПриложения(Настройка); НастройкиПрекоммита = УправлениеНастройками.НастройкиПриложения("Precommit4onecСценарии");
Если НЕ ЗначениеЗаполнено(НастройкиПрекоммита) Тогда Если НЕ ЗначениеЗаполнено(НастройкиПрекоммита) Тогда
@ -208,21 +208,25 @@
Возврат; Возврат;
КонецЕсли; КонецЕсли;
Сообщить("ТокДопы" + ТолькоДополнительные);
Если ЗначениеЗаполнено(ПутьКаталога) Тогда Если ЗначениеЗаполнено(ПутьКаталога) Тогда
ПутьКаталога = ФайловыеОперации.ПолучитьНормализованныйОтносительныйПуть(КаталогРепозитория, ПутьКаталога); ПутьКаталога = ФайловыеОперации.ПолучитьНормализованныйОтносительныйПуть(КаталогРепозитория, ПутьКаталога);
УправлениеНастройками.УдалитьНастройкиПриложения(ПутьКаталога); Если ПутьКаталога = УправлениеНастройками.ИмяБазовойНастройки() Тогда
ВызватьИсключение "Нельзя удалять базовую настройку отдельно сбросьте все локальные настройки приложения";
КонецЕсли;
УправлениеНастройками.УдалитьНастройку("Precommit4onecСценарии" , ПутьКаталога);
Иначе ИначеЕсли ТолькоДополнительные Тогда
ВсеНастройки = УправлениеНастройками.ПолучитьПроектыКонфигурации(ТолькоДополнительные); ВсеНастройки = УправлениеНастройками.ПолучитьПроектыКонфигурации(ТолькоДополнительные);
Для Каждого Настройка Из ВсеНастройки Цикл Для Каждого Настройка Из ВсеНастройки Цикл
УправлениеНастройками.УдалитьНастройкиПриложения(Настройка); УправлениеНастройками.УдалитьНастройку("Precommit4onecСценарии" , Настройка);
КонецЦикла; КонецЦикла;
Иначе
УправлениеНастройками.УдалитьНастройкиПриложения("Precommit4onecСценарии");
КонецЕсли; КонецЕсли;
КонецПроцедуры КонецПроцедуры

View File

@ -85,7 +85,7 @@
НастройкиПроектов = УправлениеНастройками.ПолучитьПроектыКонфигурации(); НастройкиПроектов = УправлениеНастройками.ПолучитьПроектыКонфигурации();
НаборНастроек = Новый Соответствие; НаборНастроек = Новый Соответствие;
Для Каждого ЭлементНастройки з НастройкиПроектов Цикл Для Каждого ЭлементНастройки Из НастройкиПроектов Цикл
Настройка = Новый Структура("СценарииОбработки, НастройкиСценариев"); Настройка = Новый Структура("СценарииОбработки, НастройкиСценариев");
Настройка.СценарииОбработки = ЗагрузитьСценарииОбработки(Приложение.КаталогСценариев(), Настройка.СценарииОбработки = ЗагрузитьСценарииОбработки(Приложение.КаталогСценариев(),
УправлениеНастройками, УправлениеНастройками,

View File

@ -49,7 +49,7 @@
ВызватьИсключение "Не указано имя приложения"; ВызватьИсключение "Не указано имя приложения";
КонецЕсли; КонецЕсли;
Сообщить(ИмяПриложения);
ИскомыеНастройки = Конфигурация.Получить(ИмяПриложения); ИскомыеНастройки = Конфигурация.Получить(ИмяПриложения);
Если ИскомыеНастройки = Неопределено Тогда Если ИскомыеНастройки = Неопределено Тогда
@ -84,10 +84,10 @@
Функция ПолучитьПроектыКонфигурации(ТолькоДополнительные = Ложь) Экспорт Функция ПолучитьПроектыКонфигурации(ТолькоДополнительные = Ложь) Экспорт
Массив = Новый Массив; Массив = Новый Массив;
Сообщить(НастройкиПриложения(ИмяПоУмолчанию()));
Для Каждого Элемент из Конфигурация Цикл Для Каждого Элемент Из Конфигурация.Получить(ИмяПоУмолчанию()) Цикл
Если ТолькоДополнительные И Элемент.Ключ = ИмяПоУмолчанию() Тогда Если ТолькоДополнительные И Элемент.Ключ = ИмяБазовойНастройки() Тогда
Продолжить; Продолжить;
КонецЕсли; КонецЕсли;
@ -163,7 +163,7 @@
Процедура УдалитьНастройкиПриложения(ИмяПриложения) Экспорт Процедура УдалитьНастройкиПриложения(ИмяПриложения) Экспорт
ПроверкаИнициализации(); ПроверкаИнициализации();
Сообщить(ИмяПриложения);
Если ПустаяСтрока(ИмяПриложения) Тогда Если ПустаяСтрока(ИмяПриложения) Тогда
ВызватьИсключение "Не указано имя приложения"; ВызватьИсключение "Не указано имя приложения";
@ -176,6 +176,22 @@
КонецПроцедуры // УдалитьНастройкиПриложения() КонецПроцедуры // УдалитьНастройкиПриложения()
Процедура УдалитьНастройку(ИмяПриложения, ИмяНастройки) Экспорт
ПроверкаИнициализации();
Сообщить(ИмяПриложения);
Если ПустаяСтрока(ИмяПриложения) Тогда
ВызватьИсключение "Не указано имя приложения";
КонецЕсли;
тмп = Конфигурация.Получить(ИмяПриложения);
Тмп.Удалить(ИмяНастройки);
Конфигурация.Вставить(ИмяПриложения,Тмп);
ОбновитьКонфигурационныйФайл();
КонецПроцедуры // УдалитьНастройкиПриложения()
/////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////
// Служебный функционал // Служебный функционал
/////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////
@ -227,6 +243,13 @@
Возврат "Precommit4onecСценарии"; Возврат "Precommit4onecСценарии";
КонецФункции КонецФункции
Функция ИмяБазовойНастройки() Экспорт
Возврат "General";
КонецФункции
/////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////
// ПриСозданииОбъекта // ПриСозданииОбъекта