новое событие
Информационный поток
Задания вакансии материалы разработки сообщения форума

Автоматическая установка даты запрета редактирования

  • Добавить свою публикацию
  • для этого требуется регистрация

В конфигурации «1С:Управление торговлей 10.3» реализован механизм установки запрета редактирования как по пользователям базы данных так и общий для всех.
Например можно запретить менеджерам редактировать информацию ранее определенной даты, например документы старше одной недели. 
Минус этого в том, что это надо делать вручную, что часто неудобно.

Ниже приводится пример как сделать небольшую доработку, с помощью которой дата будет автоматически устанавливаться для всех пользователей.

Для этого нужно открыть в Конфигураторе, Общие модули - Полные права - Процедура УстановитьПараметрГраницыЗапретаИзмененияДанных()

И добавить следующий код: 

Попытка 
КоличествоДней = Константы.КоличествоДней.Получить();
ДатаУстановки = НачалоДня(ТекущаяДата()) - (60*60*24*КоличествоДней);
НаборЗаписей = РегистрыСведений.ГраницыЗапретаИзмененияДанных.СоздатьНаборЗаписей(); 
Запись = НаборЗаписей.Добавить();
//Запись.Организация = Организация;
//Запись.Пользователь =ТекПользователь;
Запись.ГраницаЗапретаИзменений = НачалоДня(ДатаУстановки);
НаборЗаписей.Записать();
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки; 


В коде используется константа "КоличествоДней", это сделано для большей гибкости. Чтобы была возможность менять период без изменения кода программы. Но вместо константы можно указать количество дней.

 

Если вам требуются автоматически устанавливать даты для каждого пользователя или другая доработка 1С которая требует участия программиста. Вы можете всегда рассчитывать оперативное решение вашей задачи. 
Все контакты вы найдете в соответствующем раздела сайта.

 
0
Читайте также
Обновить конфигурацию 1с
Обновить конфигурацию 1С 8.2 возможно несколькими способами
Автоматический подбор размера шрифта в объекте РисунокТабличногоДокумента
Как реализовать функцию автоматического подбора размера шрифта в поле
Универсальная замена метода "Свойство()"
"Описание подхода для определения свойства у любого типа данных, метод ""Свойство"""
Разработки
Календарь версия 1.1
Вечный календарь
Заявочный модуль для УТ 11
Докуметн запрос цен для УТ11
Загрузка данных из Excel
Обработка для загрузки данных из Эксель
≡ к списку статей