From a90b7a9433fce9a9ef2af7375bc701b0335e39bd Mon Sep 17 00:00:00 2001
From: Anton Ivanov <iab@bk.ru>
Date: Sun, 17 Nov 2024 10:53:15 +0300
Subject: [PATCH] =?UTF-8?q?#348=20=D0=9F=D1=80=D0=B8=20=D0=B4=D0=BE=D0=B1?=
 =?UTF-8?q?=D0=B0=D0=B2=D0=BB=D0=B5=D0=BD=D0=B8=D0=B8=20=D0=B7=D0=B0=D0=B4?=
 =?UTF-8?q?=D0=B0=D1=87=D0=B8=20=D0=B2=D1=8B=D1=85=D0=BE=D0=B4=D0=B8=D1=82?=
 =?UTF-8?q?=20=D0=BE=D1=88=D0=B8=D0=B1=D0=BA=D0=B0=20=D0=BF=D1=80=D0=B0?=
 =?UTF-8?q?=D0=B2=20=D0=B4=D0=BE=D1=81=D1=82=D1=83=D0=BF=D0=B0=20=D0=B4?=
 =?UTF-8?q?=D0=BB=D1=8F=20=D0=BF=D0=BE=D0=BB=D1=8C=D0=B7=D0=BE=D0=B2=D0=B0?=
 =?UTF-8?q?=D1=82=D0=B5=D0=BB=D1=8F=20=D1=81=20=D0=BF=D1=80=D0=B0=D0=B2?=
 =?UTF-8?q?=D0=B0=D0=BC=D0=B8=20(RLS)?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .../узОбщийМодульСервер/Ext/Module.bsl        |  2 --
 .../Ext/ManagerModule.bsl                     | 21 +++++++++++++++++--
 .../Ext/Rights.xml                            | 16 ++++++++++++--
 .../Ext/Rights.xml                            |  6 +++++-
 4 files changed, 38 insertions(+), 7 deletions(-)

diff --git a/src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl b/src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl
index d5a2683c3..4e1b1ecfd 100644
--- a/src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl
+++ b/src/cf/CommonModules/узОбщийМодульСервер/Ext/Module.bsl
@@ -1397,5 +1397,3 @@
 	узВыполнитьНастройкуПанелей();	
 	
 КонецПроцедуры
-
-
diff --git a/src/cf/InformationRegisters/узАктивностиПользователей/Ext/ManagerModule.bsl b/src/cf/InformationRegisters/узАктивностиПользователей/Ext/ManagerModule.bsl
index fa975a7fc..e1ab586b9 100644
--- a/src/cf/InformationRegisters/узАктивностиПользователей/Ext/ManagerModule.bsl
+++ b/src/cf/InformationRegisters/узАктивностиПользователей/Ext/ManagerModule.bsl
@@ -1,7 +1,7 @@
 
 //+ #201 Иванов А.Б. 2020-05-23 Изменения от Дениса Урянского @d-hurricane
 // См. УправлениеДоступомПереопределяемый.ПриЗаполненииСписковСОграничениемДоступа.
-Процедура ПриЗаполненииОграниченияДоступа(Ограничение) Экспорт
+Процедура Удалить_ПриЗаполненииОграниченияДоступа(Ограничение) Экспорт
 	
 	Ограничение.Текст =
 	"РазрешитьЧтение
@@ -20,7 +20,24 @@
 	|		ИНАЧЕ ИСТИНА
 	|	КОНЕЦ";
 	
-КонецПроцедуры //- #201 Иванов А.Б. 2020-05-23 Изменения от Дениса Урянского @d-hurricane
+КонецПроцедуры //- #201 Иванов А.Б. 2020-05-23 Изменения от Дениса Урянского @d-hurricane  
+
+// Параметры:
+//   Ограничение - см. УправлениеДоступомПереопределяемый.ПриЗаполненииОграниченияДоступа.Ограничение.
+//
+Процедура ПриЗаполненииОграниченияДоступа(Ограничение) Экспорт
+	
+	Ограничение.Текст =
+	"РазрешитьЧтение
+	|ГДЕ
+	|	ИСТИНА
+	|;
+	|РазрешитьИзменениеЕслиРазрешеноЧтение
+	|ГДЕ
+	|	ИзменениеОбъектаРазрешено(СсылкаНаОбъект)";
+	
+КонецПроцедуры
+
 
 Процедура ДобавитьАктивностьПользователя(Источник, ДопПараметры,Отказ) Экспорт
 	Если Отказ Тогда
diff --git a/src/cf/Roles/узПользовательОграничениеДоступаИзменение/Ext/Rights.xml b/src/cf/Roles/узПользовательОграничениеДоступаИзменение/Ext/Rights.xml
index 01e813ffe..6815dc680 100644
--- a/src/cf/Roles/узПользовательОграничениеДоступаИзменение/Ext/Rights.xml
+++ b/src/cf/Roles/узПользовательОграничениеДоступаИзменение/Ext/Rights.xml
@@ -553,6 +553,10 @@
 	</object>
 	<object>
 		<name>Configuration.УправлениеЗадачами</name>
+		<right>
+			<name>DataAdministration</name>
+			<value>true</value>
+		</right>
 		<right>
 			<name>ActiveUsers</name>
 			<value>true</value>
@@ -3405,7 +3409,7 @@
 			<value>true</value>
 			<restrictionByCondition>
 				<condition>#Если &amp;ОграничениеДоступаНаУровнеЗаписейУниверсально #Тогда
-#ДляРегистра("ИдентификаторыОбъектовМетаданных.РегистрСведенийузАктивностиПользователей", "СсылкаНаОбъект", "", "", "", "")
+#ДляОбъекта("СсылкаНаОбъект")
 #Иначе
 #ПоЗначениям( "РегистрСведений.узАктивностиПользователей", "","",
 "ГруппыДоступаЗадач", "СсылкаНаОбъект",
@@ -3418,7 +3422,7 @@
 			<value>true</value>
 			<restrictionByCondition>
 				<condition>#Если &amp;ОграничениеДоступаНаУровнеЗаписейУниверсально #Тогда
-#ДляРегистра("ИдентификаторыОбъектовМетаданных.РегистрСведенийузАктивностиПользователей", "СсылкаНаОбъект", "", "", "", "")
+#ДляОбъекта("СсылкаНаОбъект")
 #Иначе
 #ПоЗначениям( "РегистрСведений.узАктивностиПользователей", "","",
 "ГруппыДоступаЗадач", "СсылкаНаОбъект",
@@ -3517,6 +3521,14 @@
 			<name>Read</name>
 			<value>true</value>
 		</right>
+		<right>
+			<name>Insert</name>
+			<value>true</value>
+		</right>
+		<right>
+			<name>Update</name>
+			<value>true</value>
+		</right>
 		<right>
 			<name>View</name>
 			<value>true</value>
diff --git a/src/cf/Roles/узПользовательОграничениеДоступаЧтение/Ext/Rights.xml b/src/cf/Roles/узПользовательОграничениеДоступаЧтение/Ext/Rights.xml
index 04201e025..eeb95067b 100644
--- a/src/cf/Roles/узПользовательОграничениеДоступаЧтение/Ext/Rights.xml
+++ b/src/cf/Roles/узПользовательОграничениеДоступаЧтение/Ext/Rights.xml
@@ -580,6 +580,10 @@
 	</object>
 	<object>
 		<name>Configuration.УправлениеЗадачами</name>
+		<right>
+			<name>DataAdministration</name>
+			<value>true</value>
+		</right>
 		<right>
 			<name>ActiveUsers</name>
 			<value>true</value>
@@ -3849,7 +3853,7 @@
 			<value>true</value>
 			<restrictionByCondition>
 				<condition>#Если &amp;ОграничениеДоступаНаУровнеЗаписейУниверсально #Тогда
-#ДляРегистра("ИдентификаторыОбъектовМетаданных.РегистрСведенийузАктивностиПользователей", "СсылкаНаОбъект", "", "", "", "")
+#ДляОбъекта("СсылкаНаОбъект")
 #Иначе
 #ПоЗначениям( "РегистрСведений.узАктивностиПользователей", "","",
 "ГруппыДоступаЗадач", "СсылкаНаОбъект",