CALL Date(Date)
Date: CHARACTER; scalar; INTENT(OUT).
Intrinsic groups: vxt.
Description:
Returns Date in the form dd-mmm-yy,
representing the numeric day of the month dd, a three-character
abbreviation of the month name mmm and the last two digits of
the year yy, e.g. 25-Nov-96.
This intrinsic is not recommended, due to the year 2000 approaching. Therefore, programs making use of this intrinsic might not be Year 2000 (Y2K) compliant. See CTime Intrinsic (subroutine), for information on obtaining more digits for the current (or any) date.