Intel® Fortran Libraries Reference

2 Intel Fortran Libraries Reference& TA(2), 'seconds of system time.'FDATEFGETCPortability Function or Subroutine: Returns the current date and time as an ASCII string.Module: USE IFPORTFunction Syntax:result = FDATE ( )Subroutine Syntax:CALL FDATE (string)string(Optional; Output) Character*(*). It is returned as a 24-character string in the form:Mon Jan 31 04:37:23 2001Any value in string before the call is destroyed.Results:The result of the function FDATE and the value of string returned by the subroutineFDATE(string) are identical. Newline and NULL are not included in the string.When you use FDATE as a function, declare it as:CHARACTER*24 FDATECompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS LIBSee Also: the DATE_AND_TIME intrinsic procedure in the Language ReferenceExampleUSE IFPORTCHARACTER*24 today!CALL FDATE(today)write (*,*), 'Today is ', today!write (*,*), 'Today is ', fdate()Portability Function: Reads the next available character from a file specified by a Fortran unitnumber.2-76