Имя: Пароль:
1C
1С v8
Программно записать дату запрета редактирования
0 ВежливаяТварь
 
10.07.12
15:18
Добрый день. Необходимо программно изменять дату запрета редактирования(УТП 8.2 ред 1.2). Дата хранится в регистре ГраницаЗапретаИзменененияДанных, записать в него изменения как не пытался не получается. Даже объектом не могу его сделать. Полез в модуль формы которая позволяет интерактивно ставить, но там уж больно все замудрено. Вопрос: есть ли способы записать дату проще или все таки брать код из модуля формы?
1 Stim
 
10.07.12
15:19
зачем?
2 Stim
 
10.07.12
15:20
+ в БП по крайней мере этот РС меняется элеентарно
3 ВежливаяТварь
 
10.07.12
15:22
Если имеется ввиду зачем программно записывать дату запрета редактирования, то потому что в 8.2 дата запрета не участвует в обмене. Ломать конфигурацию не хочется. Поэтому пишу обработку которая на узлах будет автоматические менять дату.
4 Stim
 
10.07.12
15:26
это обычный регистр сведений, не вижу проблем
5 ВежливаяТварь
 
10.07.12
15:27
Может моя проблема в том что я пытаюсь регистр сделать объектом а не его элементы?
6 Stim
 
10.07.12
15:30
НаборЗаписей = РегистрыСведений.Валюты.СоздатьНаборЗаписей();

НаборЗаписей.Отбор.Период.Установить(ДатаЗаписи);
   
НаборЗаписей.Прочитать();

Для Каждого Запись Из НаборЗаписей Цикл

   // Чтение и сообщение данных полей записи.    
   Сообщить(Строка(Запись.Период) + " " + Строка(Запись.Валюта) + " " + Строка(Запись.Курс));

    // Изменение данных полей записи.
    Запись.Курс = 0;

КонецЦикла;    
   
НаборЗаписей.Записать();
7 ВежливаяТварь
 
10.07.12
15:32
Понял спасибо. Сейчас попробую.
8 Stim
 
10.07.12
15:33
(7) и выгоняй пользователей после изменения. потому что граница запрета берется из параметров сеанса, и даже если ты установишь программно дату, параметр сеанса у них не изменится, пока они не перезапустят 1С
9 ВежливаяТварь
 
10.07.12
15:36
(8) Спасибо за ценный совет, учту.
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс