Функция для настройки доступности реквизитов на форме

Одна из распространенных задач при разработке новых справочников и карточек документов - гибкая настройка доступности реквизитов в зависимости от некоторых условий. Условия могут быть самые разные - от комбинации значений реквизитов самой записи справочника или документа, до вхождения текущего пользователя в определенные группы или роли.

Для решения этой задачи, предлагаю следующую функцию:

BRDFormControlAccess(ControlObject: Object; ReqEnabled: Array; ReqDisabled: Array; DisableRequisites: Boolean)

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

Если один из параметров ReqEnabled или ReqDisabled равен "ALL", то отработка его будет выполняться раньше отработки параметра со списком реквизитов. При равнозначных параметрах включение контролы отрабатывает раньше выключения, т.е. выключение доминирует. Если данные параметры равны NULL, то такой параметр не учитывается, например, ReqEnabled = NULL означает, что функция не будет включать никаких реквизитов.

Параметр DisableRequisites определяет действие, которое нужно сделать с реквизитами - управлять свойством ReadOnly (при значении DisableRequisites = FALSE) или Enabled (при значении DisableRequisites = TRUE). При этом, ReadOnly позволяет пользователю зайти в поле реквизита курсором и скопировать значение. Свойство Enabled способно отключить реквизит так, что он будет виден на форме, но зайти в него будет нельзя.

Например, включить все реквизиты, кроме "Дополнение" и "Состояние" - их выключить:

BRDFormControlAccess(ControlObject; "ALL"; ArrayOf("Дополнение"; "Состояние"); FALSE)

или - включить реквизит "Состояние" при этом не изменять доступность других реквизитов:

BRDFormControlAccess(ControlObject; ArrayOf("Состояние"); NULL; FALSE)

В пакет разработки входит так же служебная функция BRDGetControlsByRequisite, которую использует BRDFormControlAccess.

Разработка для DIRECTUM 4.6: ДоступностьКонтроловФормы.zip (4,89 Кб)