From 1d85025ac0f1621c5fbe78a75e374302e0d9c57c Mon Sep 17 00:00:00 2001 From: Anton Ivanov Date: Fri, 27 Jul 2018 14:00:12 +0300 Subject: [PATCH] =?UTF-8?q?=D0=94=D0=BE=D0=B1=D0=B0=D0=B2=D0=B8=D0=BB=20?= =?UTF-8?q?=D1=81=D0=BF=D1=80=D0=B0=D0=B2=D0=BE=D1=87=D0=BD=D0=B8=D0=BA=20?= =?UTF-8?q?=D0=93=D1=80=D1=83=D0=BF=D0=BF=D1=8B=D0=A2=D0=B5=D0=BA=D1=83?= =?UTF-8?q?=D1=89=D0=B8=D1=85=D0=94=D0=B5=D0=BB:=20=D0=A1=D0=B5=D0=B3?= =?UTF-8?q?=D0=BE=D0=B4=D0=BD=D1=8F,=20=D0=9D=D0=B0=20=D0=BD=D0=B5=D0=B4?= =?UTF-8?q?=D0=B5=D0=BB=D0=B5,=20=D0=9F=D0=BE=D0=B7=D0=B6=D0=B5.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/cf/Catalogs/узГруппыТекущихДел.xml | 315 ++++++++++++++++++ .../узГруппыТекущихДел/Ext/Predefined.xml | 21 ++ src/cf/Catalogs/узТекущиеДела.xml | 39 +++ .../Forms/ФормаСписка/Ext/Form.xml | 18 +- src/cf/DataProcessors/узТекущиеДела.xml | 138 ++++++++ .../узТекущиеДела/Ext/ObjectModule.bsl | 15 + .../узТекущиеДела/Forms/Форма/Ext/Form.xml | 44 +++ .../Forms/Форма/Ext/Form/Module.bsl | 20 +- src/cf/Roles/узПользователь/Ext/Rights.xml | 15 + src/cf/Subsystems/узУправлениеЗадачами.xml | 1 + 10 files changed, 623 insertions(+), 3 deletions(-) create mode 100644 src/cf/Catalogs/узГруппыТекущихДел.xml create mode 100644 src/cf/Catalogs/узГруппыТекущихДел/Ext/Predefined.xml diff --git a/src/cf/Catalogs/узГруппыТекущихДел.xml b/src/cf/Catalogs/узГруппыТекущихДел.xml new file mode 100644 index 000000000..34d091e9c --- /dev/null +++ b/src/cf/Catalogs/узГруппыТекущихДел.xml @@ -0,0 +1,315 @@ + + + + + + 057a6e4b-16b1-4746-bd28-9cbb915796dc + 7de867c3-6d6e-4006-887b-66707295b253 + + + 3056ba0b-f39d-46b0-85a3-60c3f7f4ba7c + 61838a80-747a-4a9b-b7fa-0cc72f3d08a4 + + + 153acba1-05c9-4fc9-833f-02060f9aa274 + d48a6448-82ec-4220-abcd-760669c31605 + + + 66055adb-75ad-4dac-8838-7216620e2bf5 + 93d418c3-848b-43fd-8870-fe233e96b761 + + + 559daffc-9631-4517-b9f3-05a2d8268ee9 + 5e32d94b-9dfd-411d-b19d-5bb563e86b91 + + + + узГруппыТекущихДел + + + ru + Группы текущих дел + + + + true + HierarchyFoldersAndItems + false + 2 + true + true + + ToItems + 9 + 150 + String + Variable + WholeCatalog + true + true + AsDescription + + + + 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 + + + + + + + + DontCheck + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + DontCheck + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + ShowError + false + true + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + DontCheck + false + true + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + ShowError + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + DontCheck + false + false + Auto + + + false + + + Auto + Auto + + false + false + + + + Use + + + + + + + + Auto + InDialog + true + BothWays + + Catalog.узГруппыТекущихДел.StandardAttribute.Description + Catalog.узГруппыТекущихДел.StandardAttribute.Code + + Begin + DontUse + Directly + + + + + + + + + + + false + + + Managed + Use + + + + + + Use + Auto + + + + \ No newline at end of file diff --git a/src/cf/Catalogs/узГруппыТекущихДел/Ext/Predefined.xml b/src/cf/Catalogs/узГруппыТекущихДел/Ext/Predefined.xml new file mode 100644 index 000000000..df80355dc --- /dev/null +++ b/src/cf/Catalogs/узГруппыТекущихДел/Ext/Predefined.xml @@ -0,0 +1,21 @@ + + + + НаНеделе + 000000002 + На неделе + false + + + Позже + 000000003 + Позже + false + + + Сегодня + 000000001 + Сегодня + false + + \ No newline at end of file diff --git a/src/cf/Catalogs/узТекущиеДела.xml b/src/cf/Catalogs/узТекущиеДела.xml index 37894f07b..a41c15fc3 100644 --- a/src/cf/Catalogs/узТекущиеДела.xml +++ b/src/cf/Catalogs/узТекущиеДела.xml @@ -519,6 +519,45 @@ Use + + + ГруппаТекущегоДела + + + ru + Группа текущего дела + + + + + cfg:CatalogRef.узГруппыТекущихДел + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + ForItem + DontIndex + Use + +
ФормаСписка
diff --git a/src/cf/Catalogs/узТекущиеДела/Forms/ФормаСписка/Ext/Form.xml b/src/cf/Catalogs/узТекущиеДела/Forms/ФормаСписка/Ext/Form.xml index 1b9358957..5a6252f0b 100644 --- a/src/cf/Catalogs/узТекущиеДела/Forms/ФормаСписка/Ext/Form.xml +++ b/src/cf/Catalogs/узТекущиеДела/Forms/ФормаСписка/Ext/Form.xml @@ -122,6 +122,16 @@ + + Список.ГруппаТекущегоДела + + + + + Список.Ref + + + @@ -131,6 +141,9 @@ cfg:DynamicList true + + Список.Ref + true true @@ -150,11 +163,12 @@ СправочникузТекущиеДела.Вопрос, СправочникузТекущиеДела.Порядок, СправочникузТекущиеДела.Предопределенный, - СправочникузТекущиеДела.ИмяПредопределенныхДанных + СправочникузТекущиеДела.ИмяПредопределенныхДанных, + СправочникузТекущиеДела.ГруппаТекущегоДела ИЗ Справочник.узТекущиеДела КАК СправочникузТекущиеДела ГДЕ - СправочникузТекущиеДела.Автор = &Автор + СправочникузТекущиеДела.Автор = &Автор Catalog.узТекущиеДела diff --git a/src/cf/DataProcessors/узТекущиеДела.xml b/src/cf/DataProcessors/узТекущиеДела.xml index 6d5589c78..d0478df12 100644 --- a/src/cf/DataProcessors/узТекущиеДела.xml +++ b/src/cf/DataProcessors/узТекущиеДела.xml @@ -102,6 +102,108 @@ Auto + + + ПоказыватьСегодня + + + ru + Сегодня + + + + + xs:boolean + + false + + + + false + + false + false + + + DontCheck + Items + + + Auto + Auto + + + Auto + + + + + ПоказыватьНаНеделе + + + ru + На неделе + + + + + xs:boolean + + false + + + + false + + false + false + + + DontCheck + Items + + + Auto + Auto + + + Auto + + + + + ПоказыватьПозже + + + ru + Позже + + + + + xs:boolean + + false + + + + false + + false + false + + + DontCheck + Items + + + Auto + Auto + + + Auto + + @@ -241,6 +343,42 @@ Auto + + + ГруппаТекущегоДела + + + ru + Когда + + + + + cfg:CatalogRef.узГруппыТекущихДел + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + + Автор diff --git a/src/cf/DataProcessors/узТекущиеДела/Ext/ObjectModule.bsl b/src/cf/DataProcessors/узТекущиеДела/Ext/ObjectModule.bsl index 7e20cb37e..b5f2dced0 100644 --- a/src/cf/DataProcessors/узТекущиеДела/Ext/ObjectModule.bsl +++ b/src/cf/DataProcessors/узТекущиеДела/Ext/ObjectModule.bsl @@ -6,6 +6,7 @@ "ВЫБРАТЬ | узТекущиеДела.Ссылка КАК ТекущееДело, | узТекущиеДела.Выполнено КАК Выполнено, + | узТекущиеДела.ГруппаТекущегоДела, | узТекущиеДела.ТекстСодержания, | узТекущиеДела.Автор, | узТекущиеДела.ДатаТекущегоДела, @@ -18,6 +19,7 @@ | Справочник.узТекущиеДела КАК узТекущиеДела |ГДЕ | узТекущиеДела.Автор = &Автор + | И узТекущиеДела.ГруппаТекущегоДела В(&МассивГруппыТекущихДел) | И ВЫБОР | КОГДА узТекущиеДела.ДатаВыполнения = ДАТАВРЕМЯ(1, 1, 1) | ТОГДА ВЫБОР @@ -37,6 +39,19 @@ | Порядок |"; + МассивГруппыТекущихДел = Новый Массив(); + МассивГруппыТекущихДел.Добавить(ПредопределенноеЗначение("Справочник.узГруппыТекущихДел.ПустаяСсылка")); + Если ПоказыватьСегодня Тогда + МассивГруппыТекущихДел.Добавить(ПредопределенноеЗначение("Справочник.узГруппыТекущихДел.Сегодня")); + Конецесли; + Если ПоказыватьНаНеделе Тогда + МассивГруппыТекущихДел.Добавить(ПредопределенноеЗначение("Справочник.узГруппыТекущихДел.НаНеделе")); + Конецесли; + Если ПоказыватьПозже Тогда + МассивГруппыТекущихДел.Добавить(ПредопределенноеЗначение("Справочник.узГруппыТекущихДел.Позже")); + Конецесли; + Запрос.УстановитьПараметр("МассивГруппыТекущихДел", МассивГруппыТекущихДел); + Запрос.УстановитьПараметр("Автор", ПараметрыСеанса.ТекущийПользователь); Запрос.УстановитьПараметр("НаДату", НаДату); diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml index 833bd48f6..ff3c6c801 100644 --- a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml +++ b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form.xml @@ -115,6 +115,12 @@ + + Объект.ТЧТекущиеДела.ГруппаТекущегоДела + EnterOnInput + + + Объект.ТЧТекущиеДела.ТекстСодержания EnterOnInput @@ -239,8 +245,46 @@ + + + + + Horizontal + None + false + + + + Объект.ПоказыватьСегодня + Auto + + + + ПоказыватьСегодняПриИзменении + + + + Объект.ПоказыватьНаНеделе + Auto + + + + ПоказыватьНаНеделеПриИзменении + + + + Объект.ПоказыватьПозже + Auto + + + + ПоказыватьПозжеПриИзменении + + + + diff --git a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl index 242506408..6433f03e9 100644 --- a/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl +++ b/src/cf/DataProcessors/узТекущиеДела/Forms/Форма/Ext/Form/Module.bsl @@ -15,6 +15,9 @@ Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) Объект.НаДату = ТекущаяДата(); Объект.НаДатуКонецДня = КонецДня(Объект.НаДату); + Объект.ПоказыватьСегодня = Истина; + Объект.ПоказыватьНаНеделе = Истина; + Объект.ПоказыватьПозже = Истина; ЗаполнитьТекущиеДелаНаСервере(); УстановитьВидимостьДоступность(); КонецПроцедуры @@ -267,4 +270,19 @@ &НаКлиенте Процедура СохранитьТекущиеДелаНаКлиенте() СохранитьТекущиеДелаНаСервере(); -КонецПроцедуры \ No newline at end of file +КонецПроцедуры + +&НаКлиенте +Процедура ПоказыватьСегодняПриИзменении(Элемент) + ОбновитьТекущиеДелаНаСервере(); +КонецПроцедуры + +&НаКлиенте +Процедура ПоказыватьНаНеделеПриИзменении(Элемент) + ОбновитьТекущиеДелаНаСервере(); +КонецПроцедуры + +&НаКлиенте +Процедура ПоказыватьПозжеПриИзменении(Элемент) + ОбновитьТекущиеДелаНаСервере(); +КонецПроцедуры diff --git a/src/cf/Roles/узПользователь/Ext/Rights.xml b/src/cf/Roles/узПользователь/Ext/Rights.xml index 79df7bee4..4b7166e9e 100644 --- a/src/cf/Roles/узПользователь/Ext/Rights.xml +++ b/src/cf/Roles/узПользователь/Ext/Rights.xml @@ -4805,6 +4805,21 @@ true + + Catalog.узГруппыТекущихДел + + Read + true + + + View + true + + + InputByString + true + + Catalog.ГруппыВнешнихПользователей diff --git a/src/cf/Subsystems/узУправлениеЗадачами.xml b/src/cf/Subsystems/узУправлениеЗадачами.xml index 6de8080b8..0721dfe98 100644 --- a/src/cf/Subsystems/узУправлениеЗадачами.xml +++ b/src/cf/Subsystems/узУправлениеЗадачами.xml @@ -103,6 +103,7 @@ Catalog.узКонтрагенты CommonModule.API InformationRegister.узСвязанныеЗадачи + Catalog.узГруппыТекущихДел