diff --git a/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl b/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl index 566a17f57..22bb95dad 100644 --- a/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl +++ b/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl @@ -1,6 +1,6 @@ Процедура ПриДобавленииПодсистемы(Описание) Экспорт Описание.Имя = "УправлениеЗадачами"; - Описание.Версия = "1.0.5.015"; + Описание.Версия = "1.0.5.016"; //+ УрянскийД 2020-06-22 (начало) Описание.РежимВыполненияОтложенныхОбработчиков = "Параллельно"; @@ -321,7 +321,7 @@ Обработчик.Комментарий = "Обновление на версию 1.0.5.015"; Обработчик = Обработчики.Добавить(); - Обработчик.НачальноеЗаполнение = Ложь; + Обработчик.НачальноеЗаполнение = Истина; Обработчик.Версия = "1.0.5.016"; Обработчик.Процедура = "узОбновлениеИнформационнойБазы.ОбновлениеНаВерсию_1_0_5_016"; Обработчик.ОбщиеДанные = Истина; @@ -1225,50 +1225,59 @@ // BSLLS:StyleElementConstructors-off - Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Новая фича") = Неопределено Тогда + Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Новая фича").Ссылка.Пустая() Тогда СпрОбъект = Справочники.узМеткиЗадач.СоздатьЭлемент(); СпрОбъект.Наименование = "Новая фича"; СпрОбъект.РеквизитДопУпорядочивания = 1; - СпрОбъект.ЦветФонаМетки = Новый Цвет(224, 255, 255); - СпрОбъект.ЦветТекстаМетки = Новый Цвет(0, 150, 70); + СпрОбъект.ЦветФонаМетки = Новый ХранилищеЗначения(Новый Цвет(224, 255, 255)); + СпрОбъект.ЦветТекстаМетки = Новый ХранилищеЗначения(Новый Цвет(0, 150, 70)); СпрОбъект.Записать(); КонецЕсли; - Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Ошибка") = Неопределено Тогда + Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Ошибка").Ссылка.Пустая() Тогда СпрОбъект = Справочники.узМеткиЗадач.СоздатьЭлемент(); СпрОбъект.Наименование = "Ошибка"; СпрОбъект.РеквизитДопУпорядочивания = 2; - СпрОбъект.ЦветФонаМетки = Новый Цвет(255, 200, 200); - СпрОбъект.ЦветТекстаМетки = Новый Цвет(255, 0, 0); + СпрОбъект.ЦветФонаМетки = Новый ХранилищеЗначения(Новый Цвет(255, 200, 200)); + СпрОбъект.ЦветТекстаМетки = Новый ХранилищеЗначения(Новый Цвет(255, 0, 0)); СпрОбъект.Записать(); КонецЕсли; - Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Дубль") = Неопределено Тогда + Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Дубль").Ссылка.Пустая() Тогда СпрОбъект = Справочники.узМеткиЗадач.СоздатьЭлемент(); СпрОбъект.Наименование = "Дубль"; СпрОбъект.РеквизитДопУпорядочивания = 3; - СпрОбъект.ЦветФонаМетки = Новый Цвет(172, 195, 207); - СпрОбъект.ЦветТекстаМетки = Новый Цвет(255, 255, 255); + СпрОбъект.ЦветФонаМетки = Новый ХранилищеЗначения(Новый Цвет(172, 195, 207)); + СпрОбъект.ЦветТекстаМетки = Новый ХранилищеЗначения(Новый Цвет(255, 255, 255)); СпрОбъект.Записать(); КонецЕсли; - Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Вопрос") = Неопределено Тогда + Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Вопрос").Ссылка.Пустая() Тогда СпрОбъект = Справочники.узМеткиЗадач.СоздатьЭлемент(); СпрОбъект.Наименование = "Вопрос"; СпрОбъект.РеквизитДопУпорядочивания = 4; - СпрОбъект.ЦветФонаМетки = Новый Цвет(238, 130, 238); - СпрОбъект.ЦветТекстаМетки = Новый Цвет(255, 255, 255); + СпрОбъект.ЦветФонаМетки = Новый ХранилищеЗначения(Новый Цвет(238, 130, 238)); + СпрОбъект.ЦветТекстаМетки = Новый ХранилищеЗначения(Новый Цвет(255, 255, 255)); СпрОбъект.Записать(); КонецЕсли; - Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Требуется помощь") = Неопределено Тогда + Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Требуется помощь").Ссылка.Пустая() Тогда СпрОбъект = Справочники.узМеткиЗадач.СоздатьЭлемент(); СпрОбъект.Наименование = "Требуется помощь"; СпрОбъект.РеквизитДопУпорядочивания = 5; - СпрОбъект.ЦветФонаМетки = Новый Цвет(238, 130, 238); - СпрОбъект.ЦветТекстаМетки = Новый Цвет(255, 255, 255); + СпрОбъект.ЦветФонаМетки = Новый ХранилищеЗначения(Новый Цвет(123, 201, 111)); + СпрОбъект.ЦветТекстаМетки = Новый ХранилищеЗначения(Новый Цвет(255, 255, 255)); СпрОбъект.Записать(); - КонецЕсли; + КонецЕсли; + + Если Справочники.узМеткиЗадач.НайтиПоНаименованию("Инструкция").Ссылка.Пустая() Тогда + СпрОбъект = Справочники.узМеткиЗадач.СоздатьЭлемент(); + СпрОбъект.Наименование = "Инструкция"; + СпрОбъект.РеквизитДопУпорядочивания = 6; + СпрОбъект.ЦветФонаМетки = Новый ХранилищеЗначения(Новый Цвет(70, 130, 180)); + СпрОбъект.ЦветТекстаМетки = Новый ХранилищеЗначения(Новый Цвет(255, 255, 255)); + СпрОбъект.Записать(); + КонецЕсли; // BSLLS:StyleElementConstructors-on