Platform

x64, Win32

Purpose

To get the date in text form.

Syntax

CHARACTER (LEN=*) FUNCTION FDATE@()

Return value

FDATE@ returns the date in the form:
    Thursday February 11, 1988

See also

DATE_AND_TIME, DATE@, EDATE@.

Example

CHARACTER (LEN=20)::FDATE@
PRINT *,'Program run on ',FDATE@()