Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
21 ноя 2024, 23:36

Как разграничить доступы на записи в одном справочнике?

Автор LavrS, 12 мая 2016, 13:08

0 Пользователей и 1 гость просматривают эту тему.

LavrS

Имеется справочник, на который имеют полные права все пользователи конфигурации, требуется только чтобы все пользователи не могли изменять/удалять записи друг друга, но видеть. Это можно реализовать только через код?

Если да, то подскажите пожалуйста в какую сторону смотреть?

Благодарю

LexaK

Это можно сделать через РЛС
у каждого элемента этого справочника есть реквизит Ответственный - тип Пользователи
для роли обычного пользователя в праве изменение пишите условие
пример:
ВашСправочник ГДЕ ВашСправочник.Ответственный = ТекущийПользователь

для роли Полные права, условие не задаете, ему доступны будут все элементы справочника.

при таком варианте только пара настроек в конфигураторе в ролях

так же возможно и программное ограничение
при открытии формы проверяете
доступна ли роль Полные права
иначе является ли ТекущийПользователь ответственным данного элемента справочника
при это открываете форму только на просмотр.
но это не защитит от прогрммных изменений элементов другими пользователями, ну если еще только при записи проверять и Отказывать если
ТекущийПользователь  <> Ответственный

в общем вариантов куча и на любую схему и вкус




если помогло нажмите: Спасибо!

LavrS

Простите забыл указать - у меня Управляемое приложение, 1С 8.2
Для версии 8.2, может надо смотреть раздел Права в текущем справочнике?
И там задавать условия?

cska-fanat-kz

настройка РЛС одинакова что обычное приложение что управляемое
программное ограничение - отличается лишь событием куда помещать код...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

LavrS

В форме элемента сделал так:


&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если НЕ ЗначениеЗаполнено(Объект.Сотрудник) Тогда
Объект.Сотрудник = ПараметрыСеанса.ТекущийПользователь;
КонецЕсли;

ЭтаФорма.ТолькоПросмотр=(Объект.Сотрудник <> ПараметрыСеанса.ТекущийПользователь);

КонецПроцедуры

Все работает, подскажите пожалуйста как сделать для формы списка этого же справочника?

LavrS


В форме элемента сделал так:


&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если НЕ ЗначениеЗаполнено(Объект.Сотрудник) Тогда
Объект.Сотрудник = ПараметрыСеанса.ТекущийПользователь;
КонецЕсли;

ЭтаФорма.ТолькоПросмотр=(Объект.Сотрудник <> ПараметрыСеанса.ТекущийПользователь);

КонецПроцедуры

Все работает, подскажите пожалуйста как сделать для формы списка этого же справочника?

Может так как то:
&НаСервере
Процедура СписокПередНачаломИзменения(Элемент, Отказ)
    Если Элементы.Сотрудник <> ПараметрыСеанса.ТекущийПользователь Тогда
    ЭтаФорма.ТолькоПросмотр=Истина;
    КонецЕсли;
КонецПроцедуры

LavrS


В модуле объекта справочника:

Процедура ПередЗаписью ()
Сотр=Справочники.ЛёвинВА.НайтиПоРеквизиту(Сотрудник);
Если Сотр <> ПараметрыСеанса.ТекущийПользователь Тогда
ТолькоПросмотр=Истина;
КонецЕсли;
КонецПроцедуры

Управляемое приложение, через веб-интерфейс не работает.

Помогите пожалуйста, как правильно сделать?

LavrS

Вопрос закрыт.

Модуль Объекта:

Процедура ПередЗаписью(Отказ)
   Если НЕ ПараметрыСеанса.ТекущийПользователь = Сотрудник Тогда
      Отказ = Истина;
   КонецЕсли;
КонецПроцедуры

Процедура ПередУдалением(Отказ)
   Если НЕ ПараметрыСеанса.ТекущийПользователь = Сотрудник Тогда
      Отказ = Истина;
   КонецЕсли;
КонецПроцедуры

Процедура ПриЗаписи(Отказ)

КонецПроцедуры


ФормаЭлемента:

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Если НЕ ЗначениеЗаполнено(Объект.Сотрудник) Тогда
   Объект.Сотрудник = ПараметрыСеанса.ТекущийПользователь;
КонецЕсли;

ЭтаФорма.ТолькоПросмотр=(Объект.Сотрудник <> ПараметрыСеанса.ТекущийПользователь);

КонецПроцедуры

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск