In the following example, the function longdate
returns a character string that is suitable for printing from a date.
SET CENTURY ON
? longdate({^1998-02-16}) && Displays Monday, February 16, 1998
FUNCTION longdate
PARAMETER mdate
RETURN CDOW(mdate) + ', ' + MDY(mdate)