From b9a79707dba948f798c13f5addf10dc60597f30d Mon Sep 17 00:00:00 2001 From: Anton Ivanov Date: Fri, 25 Jan 2019 08:08:08 +0300 Subject: [PATCH] =?UTF-8?q?@capitoshko=20#122=20=D0=9F=D0=B5=D1=80=D0=B5?= =?UTF-8?q?=D0=BD=D0=BE=D1=81=20=D0=B4=D0=B0=D0=BD=D0=BD=D1=8B=D1=85=20?= =?UTF-8?q?=D1=82=D0=B0=D0=B1=D0=BB=D0=B8=D1=87=D0=BD=D0=BE=20=D1=87=D0=B0?= =?UTF-8?q?=D1=81=D1=82=D0=B8=20"=D0=98=D1=81=D1=82=D0=BE=D1=80=D0=B8?= =?UTF-8?q?=D1=8F=D0=A1=D1=82=D0=B0=D1=82=D1=83=D1=81=D0=BE=D0=B2"=20?= =?UTF-8?q?=D0=B2=20=D0=BE=D1=82=D0=B4=D0=B5=D0=BB=D1=8C=D0=BD=D1=8B=D0=B9?= =?UTF-8?q?=20=D1=80=D0=B5=D0=B3=D0=B8=D1=81=D1=82=D1=80=20=D1=81=D0=B2?= =?UTF-8?q?=D0=B5=D0=B4=D0=B5=D0=BD=D0=B8=D0=B9?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/cf/Catalogs/узЗадачи/Ext/ObjectModule.bsl | 26 ++ .../Ext/Module.bsl | 38 +- .../InformationRegisters/узСтатусыЗадач.xml | 367 ++++++++++++++++++ src/cf/Roles/узПользователь/Ext/Rights.xml | 19 + src/cf/Subsystems/узУправлениеЗадачами.xml | 1 + 5 files changed, 450 insertions(+), 1 deletion(-) create mode 100644 src/cf/InformationRegisters/узСтатусыЗадач.xml 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.узСтатусыЗадач