Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 3/31/2023
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

IDATE4

Portability Subroutine: Returns the month, day, and year of the current system.

Module

USE IFPORT

CALL IDATE4 (i,j,k)

-or-

CALL IDATE4 (iarray)

i

(Output) INTEGER(4). The current system month.

j

(Output) INTEGER(4). The current system day.

k

(Output) INTEGER(4). The current system year as an offset from 1900.

iarray

(Output) INTEGER(4). A three-element array that holds day as element 1, month as element 2, and year as element 3. The month is between 1 and 12. The year is returned as an offset from 1900, if the year is less than 2000. For years greater than or equal to 2000, this element simply returns the integer year, such as 2003.