The subroutine or function is called by:
|
call fdate( string ) |
||
|
string |
character*24 |
Output |
or:
|
CHARACTER fdate*24 string = fdate() |
If used as a function, the calling routine must define the type and size of fdate. |
||
|
Return value |
character*24 |
Output |
|
Example 1: fdate as a subroutine:
character*24 string
call fdate( string )
write(*,*) string
end
|
Output:
Wed Aug 3 15:30:23 1994 |
Example 2: fdate as a function, same output:
character*24 fdate
write(*,*) fdate()
end
|
See also: ctime(3), time(3F), and idate(3F).