IDATE(3F) — FORTRAN LIBRARY ROUTINES

NAME

idate, itime − return date or time in numerical form

SYNOPSIS

subroutine itime (iarray)
integer iarray(3)

For idate there are two versions available, an operating system standard version and a VMS version.

Standard Version

If you do not request the VMS library, by using the -lV77 compiler option, then you get the standard operating system version:

subroutine idate (iarray)
integer iarray(3)

DESCRIPTION

The idate subroutine gets the current date and puts it into the array iarray . The order is: day, month, year. The month will be in the range 1-12.

The itime subroutine gets the current time and puts it into the array iarray. The order is: hour, minute, second.

VMS Version

If you do request the VMS library, by using the -lV77 , then you get the VMS versions of idate and of time: IDATE Get the current system date as three integers: month, day, and year. Usage: CALL IDATE( m, d, y ) where m, d, and y are variables of type integer. and where:
m is the month, d is the day, y is the year. Example

demo% cat ida1.f
        INTEGER m, d, y
        CALL IDATE ( m, d, y )
        WRITE (∗, "(’ The date is: ’,3i3)" ) m, d, y
        END
demo% f77 ida1.f -lV77
ida1.f:
MAIN:
demo% a.out
The date is:   7 23 89
demo%

FILES

libF77.a, libV77.a

NOTE

If you do request the VMS library, by using the -lV77 , then you get the VMS versions of both time and of idate .

Museum