RosettaCodeData/Task/Date-format/MUMPS/date-format-1.mumps

5 lines
97 B
Plaintext

DTZ
WRITE !,"Date format 3: ",$ZDATE($H,3)
WRITE !,"Or ",$ZDATE($H,12),", ",$ZDATE($H,9)
QUIT