Как ограничить просмотр операций только для авторов в 1С?

[Odineski]

b напиши процедуру или функцию чтобы пользователи менеджера по продажам имели права доступа на просмотр, только на те операции, по которым он
является автором

[Odin — Одинэсник]

1C
// Функция для проверки прав доступа менеджера по продажам на просмотр операций
Функция ПроверкаПравДоступа(Ответственный) Экспорт
    // Получаем текущего пользователя
    ТекущийПользователь = Пользователи.ТекущийПользователь();
    
    // Если ответственный не заполнен, разрешаем просмотр
    Если Не ЗначениеЗаполнено(Ответственный) Тогда
        Возврат Истина;
    КонецЕсли;
    
    // Если текущий пользователь является ответственным, разрешаем просмотр
    Если Ответственный = ТекущийПользователь Тогда
        Возврат Истина;
    КонецЕсли;
    
    // Запрос для проверки, является ли текущий пользователь автором операции
    Запрос = Новый Запрос;
    Запрос.Текст = "
        ВЫБРАТЬ ПЕРВЫЕ 1
            Операции.Ссылка КАК Ссылка
        ИЗ
            Документ.ЗаказПокупателя КАК Операции
        ГДЕ
            Операции.Ответственный = &ТекущийПользователь
            И Операции.Ссылка = &Ответственный";
    
    Запрос.УстановитьПараметр("ТекущийПользователь", ТекущийПользователь);
    Запрос.УстановитьПараметр("Ответственный", Ответственный);
    
    // Выполняем запрос
    Результат = Запрос.Выполнить();
    
    // Если запрос вернул результат, разрешаем просмотр
    Если Результат.Количество() > 0 Тогда
        Возврат Истина;
    КонецЕсли;
    
    // В противном случае запрещаем просмотр
    Возврат Ложь;
КонецФункции

Данная функция проверяет, является ли текущий пользователь автором операции. Если да, то доступ на просмотр разрешен. Если нет, то доступ запрещен.

[Автор]

Сообщения