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

ID 767251
Date 7/13/2023
Public

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

Document Table of Contents

FDATE

Portability Function and Subroutine: Returns the current date and time as an ASCII string.

Module

USE IFPORT

Function Syntax

result = FDATE()

Subroutine Syntax:

CALL FDATE ( [string] )

string

(Output; optional) Character*(*). It is returned as a 24-character string in the form:

  Mon Jan 31 04:37:23 2001

Any value in string before the call is destroyed.

Results

The result of the function FDATE and the value of string returned by the subroutine FDATE( string) are identical. Newline and NULL are not included in the string.

When you use FDATE as a function, declare it as:

  CHARACTER*24 FDATE 

Example

USE IFPORT
CHARACTER*24 today
!
CALL FDATE(today)
write (*,*), 'Today is ', today
!
write (*,*), 'Today is ', fdate()

See Also