idate
- Date:
10-12-2011
NAME
IDATE - Returns date in numerical form
SYNOPSIS
CALL IDATE ([I=]month [,J=]day [,K=]year)
integer :: month, day, year
STANDARDS
Extensions
DESCRIPTION
The IDATE intrinsic subroutine returns the current date in the variables day, month, and year, in that order. The month variable is in the range 1-12; year is returned as the last two digits.