Date Purpose Returns the system date nicely formatted. Decln. Date:string; Returns String Remarks The format of the returned string is the day followed by the month, day of month and year, e.g. Monday December 25, 1989 Example BEGIN CLRSCR; WRITECENTER(1,YELLOW,BLACK,DATE); END;