![]() |
|
Добавить дату запрета на каждого пользователя | ☑ | ||
---|---|---|---|---|
0
Лиза777
09.06.13
✎
18:13
|
Для разных пользователей разная дата запрета. Хочу добавить её при входе пользователя в 1С кодом
ЧетыреДняНазад = НачалоДня(НачалоДня(ТекущаяДата())-345600); МесяцНазад = НачалоДня(НачалоДня(ТекущаяДата())-2678400); Рег = РегистрыСведений.ГраницыЗапретаИзмененияДанных; Набор = Рег.СоздатьМенеджерЗаписи();// СоздатьНаборЗаписей(); Запись = Набор.Добавить(); Запись.Организация = Справочники.Организации.НайтиПоКоду("00001"); Запись.Пользователь = глЗначениеПеременной("глТекущийПользователь"); Если (РольДоступна("ФЭО")) ИЛИ (РольДоступна("КассирКемерово")) Тогда Запись.ГраницаЗапретаИзменений = МесяцНазад; Иначе Запись.ГраницаЗапретаИзменений = ЧетыреДняНазад; КонецЕсли; Набор.Записать(); только почему-то две строки таким образом в регистре не появляются. То есть если там есть строка на юзера1 с датой дата1, то при входе юзер2, эта строка заменяется на пользователя юзер2 и на его дату запрета, а по юзер1 строка пропадает. Как сделать? |
|||
1
Wobland
09.06.13
✎
18:14
|
прочитать набор перед манипуляцией с ним
|
|||
2
Лиза777
09.06.13
✎
18:14
|
ой, блин не тот код, я ж его потом переделала, вот
ЧетыреДняНазад = НачалоДня(НачалоДня(ТекущаяДата())-345600); Рег = РегистрыСведений.ГраницыЗапретаИзмененияДанных; Набор = Рег.СоздатьНаборЗаписей(); Запись = Набор.Добавить(); Запись.Организация = Справочники.Организации.НайтиПоКоду("00001"); Запись.Пользователь = глЗначениеПеременной("глТекущийПользователь"); Запись.ГраницаЗапретаИзменений = МесяцНазад; Набор.Записать(); |
|||
3
Лиза777
09.06.13
✎
18:15
|
(1) Набор = Рег.СоздатьНаборЗаписей();
Запись = Набор.Прочитать().Добавить(); Так? |
|||
4
Wobland
09.06.13
✎
18:15
|
(2) а пофих ;)
|
|||
5
Ковычки
09.06.13
✎
18:15
|
не поверите, что ваши четыре дня идут взад
|
|||
6
Wobland
09.06.13
✎
18:16
|
(3) нет
|
|||
7
Лиза777
09.06.13
✎
18:24
|
а как прочитать?
|
|||
8
Wobland
09.06.13
✎
18:26
|
(7) а что думает СП?
|
|||
9
Лиза777
09.06.13
✎
18:28
|
СП? это...?
|
|||
10
Wobland
09.06.13
✎
18:30
|
(9) синтакс-помощник
|
|||
11
Лиза777
09.06.13
✎
18:39
|
:)
|
|||
12
Лиза777
09.06.13
✎
18:59
|
что-то я запуталась, не могу разобраться :(
|
|||
13
Wobland
09.06.13
✎
19:04
|
Пример:
КурсыВалют = РегистрыСведений.КурсыВалют; НаборКурсов = КурсыВалют.СоздатьНаборЗаписей(); НаборКурсов.Прочитать(); Пример: НовыйКурс = НаборКурсов.Добавить(); |
|||
14
Wobland
09.06.13
✎
19:04
|
ну и до кучи
Пример: НаборКурсов.Записать(); |
|||
15
Лиза777
09.06.13
✎
19:07
|
получилось!!!
Набор = Рег.СоздатьНаборЗаписей(); Набор.Прочитать(); Запись = Набор.Добавить(); Запись.Организация = Справочники.Организации.НайтиПоКоду("00001"); |
|||
16
Лиза777
09.06.13
✎
19:08
|
С*П*А*С*И*Б*О!!!
|
|||
17
Wobland
09.06.13
✎
19:09
|
(16) на здоровье. скажи, трудно было после (1)? ;)
|
|||
18
Лиза777
09.06.13
✎
19:16
|
(17) да что-то не дошло как :)
|
|||
19
Славен
09.06.13
✎
19:21
|
так просто не добавится, там ещё надо в ХранилищеЗначений запись сделать
|
|||
20
Славен
09.06.13
✎
19:23
|
+(19)в регистр то добавишь но срабатывать не будет пока в хранилище запись не попадет, ну или хотя бы после записи регистра перезапустить конфу, если не ошибаюсь при запуске тоже идет проверка записей регистра и хранилища
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |