lud

Запретит неоперативного проведения

Jul 03, 2014 14:00

Возникла задача запретить неоперативное проведение пользователями. Данный способ работает без изменения объектов конфигурации, конфигурация остается на поддержке. Необходимо добавить Подписку на события и общий модуль в конфигурацию.

Подписка на событие:
Источник: ДокументОбъект.РеализацияТоваровУслуг
Событие: ПередЗаписью
Обработчик: ЗапретПроведения.ЗапретНеоперативногоПроведения

Общий модуль ЗапретПроведения:

Процедура ЗапретНеоперативногоПроведения(Источник, Отказ, РежимЗаписи, РежимПроведения) Экспорт
Если РежимЗаписи = РежимЗаписиДокумента.Проведение И РежимПроведения = РежимПроведенияДокумента.Неоперативный Тогда
Разрешить = РольДоступна("ПолныеПрава");
Если НЕ Разрешить Тогда
Отказ = Истина;
Сообщить("У вас нет прав на Неоперативное проведение");
КонецЕсли;
КонецЕсли;
КонецПроцедуры

Таким образом, при проведении документа пользователем без Полных прав (условия настраиваем под себя) высвечивается предупреждение и документ не проводится. При этом не нужно лезть в конфигурацию, играться с правами, ролями и т.д.

програмазм

Previous post Next post
Up