diff --git a/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl b/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl index 6db724cbe..b01649e0d 100644 --- a/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl +++ b/src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl @@ -1081,6 +1081,10 @@ ДополнительныеСвойства.Удалить("СобытияВИстории"); СформироватьЗаписиВРССвязанныеЗадачи(Отказ); + + //+ ##122 Дзеса Ігор (capitoshko) 21.01.2019 + СформироватьЗаписиВрегистрСтатусыЗадач(Отказ); + //- ##122 Дзеса Ігор (capitoshko) 21.01.2019 КонецПроцедуры Процедура СформироватьЗаписиВРССвязанныеЗадачи(Отказ) Экспорт @@ -1107,6 +1111,28 @@ КонецПроцедуры +//+ ##122 Дзеса Ігор (capitoshko) 21.01.2019 +Процедура СформироватьЗаписиВрегистрСтатусыЗадач(Отказ) + + ЗаписьИсторияСтатусов = РегистрыСведений.узСтатусыЗадач.СоздатьМенеджерЗаписи(); + ЗаписьИсторияСтатусов.Период = ТекущаяДата(); + ЗаписьИсторияСтатусов.Активность = Истина; + ЗаписьИсторияСтатусов.Задача = Ссылка; + ЗаписьИсторияСтатусов.Исполнитель = Исполнитель; + ЗаписьИсторияСтатусов.Статус = Статус; + + ЗаписьИсторияСтатусов.Записать(); + //НачатьТранзакцию(); + //Попытка + // ЗаписьИсторияСтатусов.Записать(); + //Исключение + // ОтменитьТранзакцию(); + // ВызватьИсключение; + //КонецПопытки; + //ЗафиксироватьТранзакцию(); + +КонецПроцедуры +//- ##122 Дзеса Ігор (capitoshko) 21.01.2019 Процедура УдалитьЗаписиИзРССвязанныеЗадачи(пЗадача,Отказ) Экспорт Если Отказ Тогда diff --git a/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl b/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl index 624fb5d7d..dee952eb4 100644 --- a/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl +++ b/src/cf/CommonModules/узОбновлениеИнформационнойБазы/Ext/Module.bsl @@ -1,6 +1,6 @@ Процедура ПриДобавленииПодсистемы(Описание) Экспорт Описание.Имя = "УправлениеЗадачами"; - Описание.Версия = "1.0.4.023"; + Описание.Версия = "1.0.4.024"; // Требуется библиотека стандартных подсистем. Описание.ТребуемыеПодсистемы.Добавить("СтандартныеПодсистемы"); КонецПроцедуры @@ -211,6 +211,15 @@ Обработчик.ОбщиеДанные = Истина; Обработчик.Комментарий = "Обновление на версию 1.0.4.023"; + //+ ##122 Дзеса Ігор (capitoshko) 21.01.2019 + Обработчик = Обработчики.Добавить(); + Обработчик.Версия = "1.0.4.024"; + Обработчик.НачальноеЗаполнение = Ложь; + Обработчик.Процедура = "узОбновлениеИнформационнойБазы.ОбновлениеНаВерсию_1_0_4_024"; + Обработчик.ОбщиеДанные = Истина; + Обработчик.Комментарий = "Обновление на версию 1.0.4.024"; + //- ##122 Дзеса Ігор (capitoshko) 21.01.2019 + КонецПроцедуры Процедура ПередОбновлениемИнформационнойБазы() Экспорт КонецПроцедуры @@ -948,6 +957,33 @@ КонецПроцедуры //- #104 Дзеса Ігор (capitoshko) 08.10.2018 +//+ ##122 Дзеса Ігор (capitoshko) 21.01.2019 +Процедура ОбновлениеНаВерсию_1_0_4_024() Экспорт + + Запрос = Новый Запрос( + "ВЫБРАТЬ + | узЗадачиИсторияСтатусов.Ссылка КАК Задача, + | узЗадачиИсторияСтатусов.Статус, + | узЗадачиИсторияСтатусов.Исполнитель, + | узЗадачиИсторияСтатусов.ДатаНачала КАК Период + |ИЗ + | Справочник.узЗадачи.ИсторияСтатусов КАК узЗадачиИсторияСтатусов"); + + ВыборкаИстории = Запрос.Выполнить().Выбрать(); + + + Пока ВыборкаИстории.Следующий() Цикл + + МенеджерЗаписи = РегистрыСведений.узСтатусыЗадач.СоздатьМенеджерЗаписи(); + ЗаполнитьЗначенияСвойств(МенеджерЗаписи, ВыборкаИстории); + + МенеджерЗаписи.Записать(); + + КонецЦикла; + +КонецПроцедуры +//- ##122 Дзеса Ігор (capitoshko) 21.01.2019 + Процедура узНачальноеЗаполнение() Экспорт узДобавитьАдминистраторИБ(); узОбработатьСправочники("узВидыСтатусов"); diff --git a/src/cf/InformationRegisters/узСтатусыЗадач.xml b/src/cf/InformationRegisters/узСтатусыЗадач.xml new file mode 100644 index 000000000..4ca850907 --- /dev/null +++ b/src/cf/InformationRegisters/узСтатусыЗадач.xml @@ -0,0 +1,367 @@ + + + + + + 78530abe-99b8-4bd8-b5f8-d777dc6ab35c + 7eae03cb-7b08-43bb-baeb-5f91b828ca3b + + + e8397907-6a2b-42b2-9a23-95126e500659 + 01c8afb7-8067-49c1-b05c-b896e3a06255 + + + 66605111-8b2d-402a-bbc1-d59fbd815ee0 + 263904e5-6089-433d-8b6e-c5fcb36369ae + + + 6fcec97f-2c4f-4cc2-bd49-b42d4964bbc0 + 559d7415-2981-4c16-b0c8-0dc1bc2c15a3 + + + 8daf98eb-6416-419e-aa7b-83352ae85d9d + 2ee212c0-43be-48bf-997a-4e51a3478845 + + + b6968a88-e81b-41d5-bd91-380e0c31fdf0 + 0c2e0440-4977-4391-a9be-3e65d1274fe9 + + + 0351c9b4-9e30-4e00-91bb-d0e6eec96654 + 535c8d3c-74d0-42e1-ba4f-339664fdcf49 + + + + узСтатусыЗадач + + + ru + Cтатусы задач + + + + true + InDialog + + + + + + + + DontCheck + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + DontCheck + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + DontCheck + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + ShowError + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + Second + Independent + true + false + Managed + DontUse + false + false + + + + + + + + + + Исполнитель + + + ru + Исполнитель + + + + + cfg:CatalogRef.Пользователи + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + DontIndex + Use + + + + + Статус + + + ru + Статус + + + + + cfg:CatalogRef.узСтатусыЗадачи + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + DontIndex + Use + + + + + ДатаНачала + + + ru + Дата начала + + + + + xs:dateTime + + Date + + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + DontIndex + Use + + + + + ДатаОкончания + + + ru + Дата окончания + + + + + xs:dateTime + + Date + + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + DontIndex + Use + + + + + Задача + + + ru + Задача + + + + + cfg:CatalogRef.узЗадачи + + false + + + + false + + false + false + + + true + + DontCheck + Items + + + Auto + Auto + + + Auto + true + true + false + DontIndex + Use + + + + + \ No newline at end of file diff --git a/src/cf/Roles/узПользователь/Ext/Rights.xml b/src/cf/Roles/узПользователь/Ext/Rights.xml index 487ff2cae..c4a2b253a 100644 --- a/src/cf/Roles/узПользователь/Ext/Rights.xml +++ b/src/cf/Roles/узПользователь/Ext/Rights.xml @@ -533,6 +533,25 @@ true + + InformationRegister.узСтатусыЗадач + + Read + true + + + Update + true + + + View + true + + + Edit + true + + Constant.НастройкаПроксиСервера diff --git a/src/cf/Subsystems/узУправлениеЗадачами.xml b/src/cf/Subsystems/узУправлениеЗадачами.xml index 675b4c447..e2d77a520 100644 --- a/src/cf/Subsystems/узУправлениеЗадачами.xml +++ b/src/cf/Subsystems/узУправлениеЗадачами.xml @@ -117,6 +117,7 @@ XDTOPackage.узUSERSXDTO XDTOPackage.узVERSIONSXDTO XDTOPackage.узOBJECTSXDTO + InformationRegister.узСтатусыЗадач