Имя: Пароль:
1C
1С v8
Можно ли как то синхронизировать время в документе?
0 AlexBor
 
naïve
10.12.14
10:21
База самописная, файловая 8.1. В документе закрыты для пользователя поля номер и дата. Подразумевается что в процессе работы нумерация будет соответствовать дате создания документа, но иногда происходит что пользователи меняют рабочую дату на компе и соотвественно происходит нарушение нумерации. Можно ли как тянуть в документ дату ну например с сервера?
1 pessok
 
10.12.14
10:22
в обработке проведения можно указать Дата = ТекущаяДата()
2 Maxus43
 
10.12.14
10:23
файловая? нет, там нет понятия сервер. только извращениями, типа из интернета время стянуть или ещё что. А лучше - прострелить коленку пользователям, делающим такие вещи
3 AlexBor
 
naïve
10.12.14
10:24
(2) Наказуемо .... УК РФ ))
4 pessok
 
10.12.14
10:24
(2) разве текущая дата берется из данных 1С, хм? я думал, что это РабочаяДата()
5 AlexBor
 
naïve
10.12.14
10:25
(1) И будет текущая дата которая в системе и что?
6 pessok
 
10.12.14
10:25
Функция ПолучитьДатуИзИнтернета()
    
    ИмяВРФайла = Новый УникальныйИдентификатор;
    Соединение = Новый HTTPСоединение("time.nist.gov", 13);
    Соединение.Получить("time.nist.gov", ИмяВРФайла);
    
    Текст = Новый ЧтениеТекста(ИмяВРФайла);
    СтрокаТекста = Текст.Прочитать();
    ПервыйДефис = Найти(СтрокаТекста, "-");
    ДатаСайта = Сред(СтрокаТекста, ПервыйДефис-2, 8);
    
    ПреобразованнаяДата = Дата("20"+Лев(ДатаСайта, 2), Сред(ДатаСайта, 4, 2), Прав(ДатаСайта, 2));

    Возврат ПреобразованнаяДата;    
    
КонецФункции
7 Maxus43
 
10.12.14
10:26
(4) не принципиально, поменяли в настройках - поменяют в винде, если пойму что старый фокус не прокатил
8 Ник второй
 
10.12.14
10:26
(0) Какой практический смысл привязывать номер документа к дате?
9 pessok
 
10.12.14
10:26
(7) а вот это уже доменными политиками должно контролироваться
10 AlexBor
 
naïve
10.12.14
10:26
(6) Ух ты и если будет работать то спасибо
11 pessok
 
10.12.14
10:27
(10) будет, это рабочий механизм проверки лицензий в одной старой нетленке :)
12 AlexBor
 
naïve
10.12.14
10:27
(8) Требование заказчика
13 Maxus43
 
10.12.14
10:28
(9) не надёжно это, если так юзеры шалят - не будут админы ломать голову тоже
14 pessok
 
10.12.14
10:30
(13) ну тогда брать из тырнетов время остается
15 Ник второй
 
10.12.14
10:32
(12) У них же есть обоснование? или так каприз?
16 pessok
 
10.12.14
10:33
на самом деле такие вещи я клиентам всегда предлагаю решать административным путем.
первое китайское
второе китайское
заточенная линейка
третье китайское
штраф
заточенная линейка
несоответствие занимаемой должности
17 kortun
 
10.12.14
10:42
заведи какую-нить константу себе типа ПоследняяДата
и проверяй перед записью
если текущаядата()<последняядата тогда
отказ = истина;
сообщить("ай-яй-яй");
конецесли;
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан