Доступ к истории значений

Тема в разделе "1C и всё что с ней связано", создана пользователем Isabela, 4 сен 2008.

Статус темы:
Закрыта.
  1. Isabela

    Isabela Гость

    Есть необходимость закрыть доступ пользователям, не обладающим полными правами, к просмотру истории значений (желательно некоего реквизита справочника).
    Проще говоря, по набору прав, можно не показывать в форме реквизит, но он периодический, а следовательно, история значений его доступна для просмотра, что директора не устраивает
     
  2. LSH

    LSH Гость

    Процедура ПриОткрытииИстории(<?>,,)
    КонецПроцедуры
    Синтаксис:
    ПриОткрытииИстории(<ТипОбъекта>,<Объект>,<ТолькоПросмотр>)
    Назначение:
    Предопределенная процедура при открытии окна истории значения периодического реквизита элемента справочника или периодической константы.
    Параметры:
    <ТипОбъекта> - строка с названием периодического объекта конфигурации (периодического реквизита справочника или периодической константы);
    <Объект> - элемент справочника, для которого выполняется открытие окна истории периодического реквизита (для константы не используется);
    <ТолькоПросмотр> - флаг установки режима ''только просмотр'' для окна истории значения. Если значение этого параметра установить в 1 (в предопределенной процедуре), то окно истории будет открыто только для чтения. Установка значения в 0 - введет режим по умолчанию (определенный правами). Уже открытое окно истории соответствующим образом изменит режим (если это случай, когда процедура обрабатывает не открытие окна, а смену отображаемого объекта). Значение по умолчанию - 0.
    Замечание:
    Данная предопределенная процедура может располагаться только в глобальном программном модуле.
     
  3. Isabela

    Isabela Гость

    LSH Огромная благодарность
    Классно ! Как все, оказывается просто - век живи, век учись !
    Procedure OnOpenHistory(TOB,O,D)
    if TOB = "Справочник.Сотрудники.БазовыйОклад" then
    if RightName() <> "Администратор" then
    Message("Недостаточно прав доступа !");
    ReturnStatus(0);
    endif;
    endif;
    EndProcedure
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей