3_0_1_311
This commit is contained in:
Компания 1С committed
1 parent
9672edb6d0
commit
ee99d385fe
63 files changed
+8799
-5009
No files matched your search
@@ -75,18 +75,20 @@
|
||||
// Информационная база заблокирована для обновления.
|
||||
ГДЕ ЛОЖЬ
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&ВерсииШаблоновОграниченияДоступа, ",ДляРегистра2,") #Тогда
|
||||
И Не СтрСодержит(&ВерсииШаблоновОграниченияДоступа, ",ДляРегистра2ТребуетсяПерезапуститьСеанс,") #Тогда
|
||||
#ИначеЕсли Не СтрСодержит(&ВерсииШаблоновОграниченияДоступа, ",ДляРегистра3,") #Тогда
|
||||
И Не СтрСодержит(&ВерсииШаблоновОграниченияДоступа, ",ДляРегистра3ТребуетсяПерезапуститьСеанс,") #Тогда
|
||||
Ошибка: Требуется обновить шаблон на актуальную версию, поставляемую в роли ИзменениеУчастниковГруппДоступа по причине: Используется устаревшая версия 1 шаблона ограничения доступа ДляРегистра. Объект: #ИмяТекущейТаблицы, Право: #ИмяТекущегоПраваДоступа.
|
||||
|
||||
#ИначеЕсли &СпискиСОтключеннымОграничениемЧтения = "Все" #Тогда
|
||||
// У пользователя отключены все виды доступа или
|
||||
// ограничение на уровне записей не используется.
|
||||
ГДЕ ИСТИНА
|
||||
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОтключеннымОграничениемЧтения, #ИмяТекущейТаблицы) #Тогда
|
||||
// У пользователя отключено ограничение для текущей таблицы.
|
||||
ГДЕ ИСТИНА
|
||||
|
||||
#ИначеЕсли СтрСодержит(&ВерсииШаблоновОграниченияДоступа, ",ДляРегистра2ТребуетсяПерезапуститьСеанс,") #Тогда
|
||||
#ИначеЕсли СтрСодержит(&ВерсииШаблоновОграниченияДоступа, ",ДляРегистра3ТребуетсяПерезапуститьСеанс,") #Тогда
|
||||
Ошибка: Версия программы обновлена, требуется перезапустить сеанс. Объект: #ИмяТекущейТаблицы, Право: #ИмяТекущегоПраваДоступа.
|
||||
|
||||
#ИначеЕсли #ИмяТекущегоПраваДоступа <> "Чтение" #Тогда
|
||||
@@ -128,148 +130,52 @@
|
||||
И КлючиДоступаКРегистрам.ДляВнешнихПользователей = ИСТИНА
|
||||
#КонецЕсли
|
||||
|
||||
#Если Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;") #Тогда
|
||||
#Если СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле1=Поле1;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле1
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле1=Поле2;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле2
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле1=Поле3;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле3
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле1=Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле4
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле1=Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле5
|
||||
#КонецЕсли
|
||||
|
||||
#Если "#Поле2" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;") #Тогда
|
||||
#Если Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле2
|
||||
#Иначе
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле2
|
||||
#КонецЕсли
|
||||
#Если СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле2=Поле2;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле2
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле2=Поле3;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле3
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле2=Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле4
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле2=Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле2=Null;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#Если "#Поле3" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле3;") #Тогда
|
||||
#Если Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;") #Тогда
|
||||
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле3
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле3
|
||||
#Иначе
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле3
|
||||
#КонецЕсли
|
||||
#Если СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле3=Поле3;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле3
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле3=Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле4
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле3=Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле3=Null;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#Если "#Поле4" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле4;") #Тогда
|
||||
#Если Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле3;") #Тогда
|
||||
|
||||
И КлючиДоступаКРегистрам.Поле4 = ТекущаяТаблица.#Поле4
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;") #Тогда
|
||||
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле4
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле4
|
||||
#Иначе
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле4
|
||||
#КонецЕсли
|
||||
#Если СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле4=Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = ТекущаяТаблица.#Поле4
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле4=Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле4=Null;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#Если "#Поле5" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле5;") #Тогда
|
||||
#Если Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле3;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле4;") #Тогда
|
||||
|
||||
И КлючиДоступаКРегистрам.Поле5 = ТекущаяТаблица.#Поле5
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле3;") #Тогда
|
||||
|
||||
И КлючиДоступаКРегистрам.Поле4 = ТекущаяТаблица.#Поле5
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;") #Тогда
|
||||
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле5
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле5
|
||||
#Иначе
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле5
|
||||
#КонецЕсли
|
||||
#КонецЕсли
|
||||
|
||||
#Если Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле3;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле4;") #Тогда
|
||||
|
||||
#Если "#Поле5" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли "#Поле5" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле3;") #Тогда
|
||||
|
||||
#Если "#Поле5" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли "#Поле4" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле5" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;")
|
||||
И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле2;") #Тогда
|
||||
|
||||
#Если "#Поле5" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли "#Поле3" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле3;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле4" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле5" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#ИначеЕсли Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле1;") #Тогда
|
||||
#Если "#Поле5" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли "#Поле2" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле2;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле3" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле3;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле4" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле5" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Иначе
|
||||
#Если "#Поле5" <> "" И Не СтрСодержит(&СпискиСОтключеннымОграничениемПоПолям, #ИмяТекущейТаблицы + ":#Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле1 = ТекущаяТаблица.#Поле5
|
||||
#Иначе
|
||||
И КлючиДоступаКРегистрам.Поле1 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле2" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле2;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле2 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле3" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле3;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле3 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле4" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле4;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле4 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если "#Поле5" <> "" Или Не СтрСодержит(&СпискиССокращеннымНаборомПолейВРегистрахКлючей, #ИмяТекущейТаблицы + ":Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
#Если СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле5=Поле5;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = ТекущаяТаблица.#Поле5
|
||||
#ИначеЕсли СтрСодержит(&СпискиСОграничениемПоПолям, #ИмяТекущейТаблицы + ":Поле5=Null;") #Тогда
|
||||
И КлючиДоступаКРегистрам.Поле5 = Значение(Перечисление.ДополнительныеЗначенияДоступа.Null)
|
||||
#КонецЕсли
|
||||
|
||||
#Если Не СтрСодержит(&СпискиСОграничениемЧерезКлючиДоступаПользователей, #ИмяТекущейТаблицы + ":[#Регистр]:#Поле1:#Поле2:#Поле3:#Поле4:#Поле5;") #Тогда
|
||||
|
||||
Reference in new issue
Block a user