TIME
Return the current system time
WTSupported in traditional Synergy on Windows
|
WNSupported in Synergy .NET on Windows
|
USupported on UNIX
|
VSupported on OpenVMS
|
xcall TIME(time)
Arguments
time
The variable that will be loaded with the current time. (d)
Discussion
The TIME subroutine returns the current time, as maintained by the operating system.
Synergy DBL returns the time in 24-hour notation in the format hhmmss, where hh is the number of hours elapsed since midnight, mm is the number of minutes elapsed since the last hour, and ss is the number of seconds elapsed since the last minute.
If the length of the time variable is less than 6, an “Argument specified with wrong size” error ($ERR_ARGSIZ) is generated.
Examples
If the time is currently 12 seconds past 7:43 in the evening, the following program displays the time as 19:43:12.
.define TTCHN ,1 record time ,d6 fmt ,a8 proc open(TTCHN, i, "tt:") xcall time(time) fmt = time, "XX:XX:XX" display(TTCHN, "The time is ", fmt) forms(TTCHN, 1) stop end