Visible to Intel only — GUID: GUID-2A118234-66DD-4772-91AA-B54B3A0EFBDF
Visible to Intel only — GUID: GUID-2A118234-66DD-4772-91AA-B54B3A0EFBDF
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: Wed Jan 31 04:37:23 2024 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()