20 lines
1.2 KiB
Rexx
20 lines
1.2 KiB
Rexx
/* Show current date and time */
|
|
Options RESULTS
|
|
|
|
Address TIMEKEEPER.1 NOW ASCII LOCAL; SAY ('ASCII style:' RESULT)
|
|
Address TIMEKEEPER.1 NOW ASCII UTC; SAY ('ASCII style (UTC):' RESULT)
|
|
Address TIMEKEEPER.1 NOW DOS LOCAL; SAY ('DOS style:' RESULT)
|
|
Address TIMEKEEPER.1 NOW DOS UTC; SAY ('DOS style (UTC):' RESULT)
|
|
Address TIMEKEEPER.1 NOW RFC850; SAY ('RFC850:' RESULT)
|
|
Address TIMEKEEPER.1 NOW RFC1123; SAY ('RFC1123:' RESULT)
|
|
Address TIMEKEEPER.1 NOW RFC2822 LOCAL; SAY ('RFC2822:' RESULT)
|
|
Address TIMEKEEPER.1 NOW RFC2822 UTC; SAY ('RFC2822:' RESULT)
|
|
Address TIMEKEEPER.1 NOW RFC3339 LOCAL; SAY ('RFC3339:' RESULT)
|
|
Address TIMEKEEPER.1 NOW RFC3339 UTC; SAY ('RFC3339:' RESULT)
|
|
Address TIMEKEEPER.1 NOW ISO8601 LOCAL; SAY ('ISO8601:' RESULT)
|
|
Address TIMEKEEPER.1 NOW ISO8601 UTC; SAY ('ISO8601:' RESULT)
|
|
Address TIMEKEEPER.1 NOW DATE LOCAL; SAY ('ARexx compatible sorted date:' RESULT)
|
|
Address TIMEKEEPER.1 NOW DATE UTC; SAY ('ARexx compatible sorted date (UTC):' RESULT)
|
|
Address TIMEKEEPER.1 NOW TIME LOCAL; SAY ('ARexx compatible time in seconds since midnight:' RESULT)
|
|
Address TIMEKEEPER.1 NOW TIME UTC; SAY ('ARexx compatible time in seconds since midnight (UTC):' RESULT)
|