Вход | Регистрация

1С:Предприятие :: 1С:Предприятие 8 общая

Программная установка даты запрета

↓ [Serg_1960, 03.07.18 - 09:02]
Программная установка даты запрета
Я
   almaz102
 
03.07.18 - 08:44
Добрый день! Подскажите пож-та как реализовать функционал. Нужно сделать так что при подключении к базе любого пользователя программно установилась дата запрета редактирования документов на вчерашний день, и так каждый день. Пробовал так
    Попытка
        ДатаУстановки = НачалоДня(ТекущаяДата()) - 86400;
        НаборЗаписей = РегистрыСведений.ГраницыЗапретаИзмененияДанных.СоздатьНаборЗаписей();
        Запись = НаборЗаписей.Добавить();
        Запись.Организация = Справочники.Организации.НайтиПоКоду("000000001");
        Запись.Пользователь =ПараметрыСеанса.ТекущийПользователь;
        Запись.ГраницаЗапретаИзменений = НачалоДня(ДатаУстановки);
        НаборЗаписей.Записать();
        Сообщить("Дата запрета установлена на дату" + ДатаУстановки);
    Исключение
        Сообщить(ОписаниеОшибки());
    КонецПопытки;


Не получилось((
Может кто то делал подобное?
 
 
   Гипервизор
 
1 - 03.07.18 - 08:51
Что именно не получилось? Конфа Управление борделем? Забыли отбор по организации в наборе установить? Всю малину портит константа ПрименятьДатуЗапретаДляПолныхПрав?
   Малыш Джон
 
2 - 03.07.18 - 08:57
Ну и записать набор записей регистра сведений без отбора - это очень хорошо. Всегда так делай.
   Serg_1960
 
3 - 03.07.18 - 09:05
(0)  Регламентное задание с расписанием раз в сутки. Алгоритм можно "подсмотреть" в своей типовой конфигурации - как регистр выгружается и загружается после редактирования.

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует