Portability Subroutine: Returns the time in numeric form.
Module: USE DFPORT
Syntax
The current time is returned in array in the order hour (array(1)), minute (array(2)), and second (array(3)).
Compatibility
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
See Also: DATE_AND_TIME, Portability Library
Example
USE DFPORT
INTEGER(4) time_array(3)
CALL ITIME (time_array)
write(*,10) time_array
10 format (1X,I2,':',I2,':',I2)
END