Introduction | Language Structure | IB Statements | File System | Comet 32 Runtime | Index |
| Mnemonic: | (GetSystemTime=FormatString) |
| Discussion: |
The (GetSystemTime) mnemonic returns the system date and time in one of
many formats depending on the FormatString supplied as the parameter.
When issued to LUN 0 (the terminal) it returns the information for the
client computer. When issued to a LUN where the system device "X00" has
been opened, it returns the information for the host. If you are not a
CometAnywhere client either format returns your workstation's local time.
If the (GetSystemTime) mnemonic fails it returns an empty string. The possible FormatString values and their meanings are: %a Abbreviated weekday name %A Full weekday name %b Abbreviated month name %B Full month name %c Date and time representation appropriate for locale %d Day of month as decimal number (01 31) %H Hour in 24-hour format (00 23) %I Hour in 12-hour format (01 12) %j Day of year as decimal number (001 366) %m Month as decimal number (01 12) %M Minute as decimal number (00 59) %p Current locales A.M./P.M. indicator for 12-hour clock %S Second as decimal number (00 59) %U Week of year as decimal number, with Sunday as first day of week (00 53) %w Weekday as decimal number (0 6; Sunday is 0) %W Week of year as decimal number, with Monday as first day of week (00 53) %x Date representation for current locale %X Time representation for current locale %y Year without century, as decimal number (00 99) %Y Year with century, as decimal number %z,%Z Time-zone name or abbreviation; no characters if time zone is unknown %#c Long date and time representation, appropriate for current locale %#x Long date representation, appropriate to current locale %#d, %#H, %#I, %#j, %#m, %#M, %#S, %#U, %#w, %#W, %#y, %#Y = Remove leading zeros |
| History: | This mnemonic was added in REL Version 07.04 and Comet Build 380. |
| Example: |
Length 100 & Local SysTime$ Length 20 & Local Format$ Set HostLun = 1 . . . Open(HostLun) "X00" Format$ = "%#c" ! Get long date and time representation appropriate for locale Print (GetSystemTime = Format$) Input SysTime$ if (SysTime$ EQ "") Goto FmtError Print "Client Time = ";SysTime$ Print (HostLun) (GetSystemTime = Format$) Input (HostLun) SysTime$ if (SysTime$ EQ "") Goto FmtError Print "Host Time = ";SysTime$ . . . FmtError: Print "Invalid format string for GetSystemTime" wait stop |