Форум Администрирование Общие вопросы администрирования (Admin)

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

Конфигурации 1cv7 Платформа 1С v7.7
0. 5 23.08.12 11:19 Сейчас в теме
Запрет редактирования/пометки на удаление/отмены проведения задним числом для каждого пользователя.

Перейти к публикации

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

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

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

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


А далее передавать на проверку удаления и т.д.
+ – Ответить
2. Иваныч 23 09.11.12 21:18 Сейчас в теме
Я делал устанавливал запрет редактирования документов:( Текущая дата - 1 день.), всем пользователям на торговых точках поставил минимальные полномочия и исключил возможность нагадить в чужом документе "ОтчетККМ", т.н. "защита от глупости". Завтра постараюсь выложить куски кода с описанием, может кому и сгодится.
+ – Ответить
4. Umka23 10 04.08.17 11:30 Сейчас в теме
"В Справочнике Пользователи надо добавить Реквизит "ЗапрРед" (число) и добавить его в форму." (Число) в смысле (Дата)?
+ – Ответить
Оставьте свое сообщение
Вопросы с вознаграждением
Ошибка post запроса  1 $m Dev
Изменился "ПервыйВидВремени" в программе  0.32 $m Dev УПП1
Атол 30Ф платформа v5 печать номера чека в чеке, формат чека.  1 $m Admin
Запретить печатать документ "Товарный чек", пока статус Чека ККМ не будет "Чек пробит", а сам Чек ККМ не будет проведен.  1 $m Dev УТ11 v8
Помогите добавить в запрос поле с выборкой со счета 90.03  0.87 $m Dev
Почему 27 счёт не попадает в поле счёт учёта ?  0.27 $m Dev БГУ
Необходимо в вузе разработать информационную систему для отчетности преподавателей по выполнению научных показателей  2 $m Управление персоналом Обучение, бизнес-тренинг, курсы Автоматизация Аналитика УУ
УТ 10.3 изменяет количетсво товара в чеке ККМ при продаже БезПередачиТовара  0.4 $m Dev
Ошибка СУБД при входе в базу 1С  0.55 $m Admin СУБД PostgreSQL
Работа с файлами на мобильном клиенте  0.3 $m MobileDev v8::Mobile
Грейды программистов 1с  10 $m Общие вопросы управления
MDF SQL ищу битый файл для теста DataNumen SQL Recovery  1 $m Utils
Как получить значение имея НавигационнуюСсылку к полю  0.25 $m Dev
Мобильный клиент. Android. Обрезает строку ввода от сканера  0.35 $m MobileDev
Не приходит письмо от apple после ввода карты для оплаты.  5 $m MobileDev
Прикрепленная подпись и БСП. Возможно ли?  1 $m БСП 8.3.14
заглушка на запуск (управляемое приложение)  1 $m Dev
Сложный расчет ЗП в бухгалтерии (Нужен совет по реализации)  2 $m Зарплата БП3.0 v8
Перетаскивание в списке справочника  0.15 $m Dev
загрузка базы из dt  2 $m Admin