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

Нelp! Пользователи ИБ

Автор Алексей_1985_06, 18 ноя 2019, 20:51

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

Yotram

Вы сами ответили на свой вопрос. Осталось только оформит все в код


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

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

buketov.av

чтобы лишнего не накодить, почитайте вот это - https://wiseadvice-it.ru/o-kompanii/blog/articles/ogranichenie-prav-na-urovne-zapisi-1s-rls/
возможно это Вам подойдет не только в этом случае, а вообще для подобных целей

Алексей_1985_06

Цитата: Yotram от 22 ноя 2019, 08:26
Вы сами ответили на свой вопрос. Осталось только оформит все в код


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

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



Почему-то не получилось, реквизиты формы недоступны при входе под любым пользователем.....

Теги:

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

Рейтинг@Mail.ru

Поиск