DATE(3F) — FORTRAN LIBRARY ROUTINES

NAME

date − return date in character form

SYNOPSIS

subroutine date (str)
character∗9 str

DESCRIPTION

The date subroutine gets the current date and puts it into the character string str .
The form is dd-mmm-yy.
dd is the day of the month as a 2-digit inrteger.
mmm is the name of the month as a 3-letter abbreviation.
yy is the year as a 2-digit integer. The month will be in the range 1-12.

NOTES

To use this VMS routine, you need the −lV77 option. If you use −lV77, then invoking idate() or time() gets the VMS version. Usage:

character∗9 str
call date (str)

Example:

demo% cat dat1.f
∗ dat1.f -- Get the date as a character string.
        character c∗9
        call date ( c )
        write (∗, "(’ The date today is: ’, A9 )" ) c
        end
demo% f77 −silent dat1.f −lV77
demo% a.out
The date today is:   01 February 93
demo%

FILES

libF77.a, libV77.a

Museum