Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ? / 7 сообщений из 7, страница 1 из 1
15.11.2006, 22:47
    #34131743
decaml
decaml
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 10:52
    #34132374
ну я
ну я
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
decamlКак к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?

Развернуто и по шагам идея примерно такая:

USER>w 60*60*24
86400
USER>s h=$h

USER>s h=$p(h,",",1)*86400+$p(h,",",2)

USER>w

h=5234583022
USER>s h=h+123

USER>s h=h\86400_","_(h#86400)

USER>w

h="60585,39145"
USER>w $h
60585,39108
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 10:53
    #34132376
Maksim UM
Maksim UM
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
Например
Код: plaintext
1.
2.
Set a=$H
Set b=$P(a,",", 1 )_","_($P(a,",", 2 )+ 10 )
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 11:37
    #34132544
ну я
ну я
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
Maksim UMНапример
Код: plaintext
1.
2.
Set a=$H
Set b=$P(a,",", 1 )_","_($P(a,",", 2 )+ 10 )

А попадание на переход на следующий день?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 13:54
    #34133278
Maksim UM
Maksim UM
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
ну яА попадание на переход на следующий день?
Ну вот, начались придирки :)
Конечно вы правы, я поторопился.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.11.2006, 17:15
    #34134269
ZvezDuke
ZvezDuke
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
ну я Maksim UMНапример
Код: plaintext
1.
2.
Set a=$H
Set b=$P(a,",", 1 )_","_($P(a,",", 2 )+ 10 )

А попадание на переход на следующий день?

Код: plaintext
1.
2.
3.
4.
s h=$h,a=$p(h,",", 1 ),b=$p(h,",", 2 )
s b=b+ 10 
;  86399 = 23 * 60 * 60 + 59 * 60 + 59  [ 23 : 59 : 59 ]
s:(b>= 86399 ) Day= 1 ,b=b- 86399  
s hres=(a+Day)_","_b
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.11.2006, 07:22
    #34152032
Rus000
Rus000
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ?
ZvezDuke ну я Maksim UMНапример
Код: plaintext
1.
2.
Set a=$H
Set b=$P(a,",", 1 )_","_($P(a,",", 2 )+ 10 )

А попадание на переход на следующий день?

Код: plaintext
1.
2.
3.
4.
s h=$h,a=$p(h,",", 1 ),b=$p(h,",", 2 )
s b=b+ 10 
;  86399 = 23 * 60 * 60 + 59 * 60 + 59  [ 23 : 59 : 59 ]
s:(b>= 86399 ) Day= 1 ,b=b- 86399  
s hres=(a+Day)_","_b



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

Правильнее будет пользоваться операциями # и \ для вычисления дополняемых дней
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Caché, Ensemble, DeepSee, MiniM, IRIS, GT.M [игнор отключен] [закрыт для гостей] / Как к дате $Horolog прибавить X секунд и получить новую дату $Horolog ? / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]