Запрет редактирования/пометки на удаление/отмены проведения задним числом для каждого пользователя.

23.08.12

Администрирование - Информационная безопасность

Запрет редактирования/пометки на удаление/отмены проведения задним числом для каждого пользователя.
В Справочнике Пользователи надо добавить Реквизит "ЗапрРед" (число) и добавить его в форму. Теперь вы можете назначать для каждого пользователя свои сроки работы задним числом.
 
//в Глобальном Модуле.

Перем Запрет;
...
Функция глПроверкаПроведенияЗаднимЧислом (Конт) Экспорт
        //проверка на пользователя - проведение задним числом 
    Запрет=Число(глПользователь.ЗапрРед);
    Если ИмяПользователя()<>"Администратор" Тогда 
              //устанавливаем пользователя, которому можно всё. 
        Если (ТекущаяДата () - Конт.ДатаДок) > Запрет  Тогда 
            Возврат 1;
        КонецЕсли;
    КонецЕсли;                             
    // конец проверки на проведение задним числом 
КонецФункции

Процедура ПриУдаленииДокумента(УдаляемыйДок, Режим)
    Если Режим = 1 Тогда
        // запрет на непосредственное удаление 
        Возврат;
    КонецЕсли;  
    Если ИмяПользователя()<>"Администратор" Тогда
        Если (ТекущаяДата() - УдаляемыйДок.ДатаДок) > Запрет Тогда
            СтатусВозврата(0);
            Предупреждение("Запрещено удалять документы (операции),"+РазделительСтрок+"введенные по "+Формат((ТекущаяДата() - Запрет),"ДДДММММГГГГ")+" !");
            Возврат;
        КонецЕсли;        
    КонецЕсли;
КонецПроцедуры


Процедура ПриОтменеПроведенияДокумента(Док)
    Если ИмяПользователя()<>"Администратор" Тогда
        Если (ТекущаяДата() - УдаляемыйДок.ДатаДок) > Запрет Тогда
            СтатусВозврата(0);
            Предупреждение("Запрещено удалять проведение документов (операций),"+РазделительСтрок+"введенных по "+Формат((ТекущаяДата() - Запрет),"ДДДММММГГГГ")+" !");
            Возврат;
        КонецЕсли;
    КонецЕсли;
КонецПроцедуры

См. также

Информационная безопасность Универсальные функции Программист Платформа 1С v7.7 Бесплатно (free)

При использовании терминалок для удаленных баз, иногда при входе в базу данных необходимо исключить возможность входа пользователей с компьютеров с другим часовым поясом. Например, работают в Новосибирской базе с временем UTC +6 и пытаются зайти в базу с UTC +3.

16.05.2016    13083    kudenzov    3    

10

Информационная безопасность Защита ПО и шифрование Системный администратор Программист Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Звонит пользователь, на экране сообщение ваши данные зашифрованы, введите пароль, пишите письма и т.д.

1 стартмани

08.11.2014    40659    44    aleksch21    85    

47

Информационная безопасность Системный администратор Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Инструмент для наглядного анализа и сравнения наборов прав доступа в 1С 7.7 Работает в любых конфигурациях. В одной из обслуживаемых мной баз 40 наборов прав пользователей (120 пользователей). Этим отчетом очень наглядно выходит анализировать разницу в правах и просто описывать права пользователей в документации. Обновлено: - В новой версии отчета добавил сравнение двух разных баз и анализ внешней БД. - объекты метаданных представлены в виде дерева (объект "Дерево-Таблица значений" FormEx)

1 стартмани

11.02.2014    25446    166    Amel2010    15    

14

Информационная безопасность Закрытие периода Системный администратор Оперативный учет 7.7 1С:Торговля и склад 7.7 Россия Управленческий учет Абонемент ($m)

Установка даты запрета редактирования документов индивидуально для каждого пользователя,а также предоставление в индивидуальном порядке разрешения изменения конкретных документов в определенные периоды или в конкретные дни.Срок действия установок устанавливается вами. Вы можете спокойно настроить и уехать в отпуск.

1 стартмани

17.01.2013    31315    50    agent007_1    10    

4

Информационная безопасность Системный администратор Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Система управления правами доступа "на лету" для конфигураций на платформе 1С:Предприятие 7.7. - Онлайн :: Не требует выхода пользователей. - Умная :: Позволяет управлять доступом хоть к каждой кнопке на форме. - Универсальная :: Встраивается в любую конфигурацию за 1 минуту! - Преемственная :: Сохраняет настройки существующих наборов прав.

1 стартмани

22.11.2012    35075    171    gavlexx    48    

39
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. sournk 27 29.08.12 13:14 Сейчас в теме
'Если ИмяПользователя()<>"Администратор" Тогда' - это ужас!
Slypower; +1 Ответить
3. Иваныч 23 22.11.12 10:20 Сейчас в теме
Извиняюсь за задержку ответа.
В глобальном модуле дописана строка:
Константа.ДатаЗапретаРедактирования=ТекущаяДата()-1;

еще добавление:
Функция глПроверкаРазрешенияРедактирования(Конт) Экспорт

Конт.ПриЗаписиПерепроводить(1);
Если (Конт.Автор<>глПользователь)и(НазваниеНабораПрав()<>"Администратор") Тогда
Конт.Форма.ТолькоПросмотр(1);
Предупреждение("Вы не создавали этот документ, но можете просмотреть его!",4);
Возврат 0;
КонецЕсли;
это для того, чтобы пользователи (продавцы) на своих распределёнках не могли внести какие-либо изменения в чужой документ (например, ОтчетККМ)
5. Slypower 3 04.08.17 17:50 Сейчас в теме
Так проще проверять на администратора.

	НаборПрав = ВРег(НазваниеНабораПрав(1));
	Если (НаборПрав = "") Или (Найти(НаборПрав, "АДМИНИСТРАТОР") <> 0) Тогда
		Доступ = 1;
	Иначе
		Доступ = 0;
	КонецЕсли;


А далее передавать на проверку удаления и т.д.
2. Иваныч 23 09.11.12 21:18 Сейчас в теме
Я делал устанавливал запрет редактирования документов:( Текущая дата - 1 день.), всем пользователям на торговых точках поставил минимальные полномочия и исключил возможность нагадить в чужом документе "ОтчетККМ", т.н. "защита от глупости". Завтра постараюсь выложить куски кода с описанием, может кому и сгодится.
4. Umka23 13 04.08.17 11:30 Сейчас в теме
"В Справочнике Пользователи надо добавить Реквизит "ЗапрРед" (число) и добавить его в форму." (Число) в смысле (Дата)?
Оставьте свое сообщение