ITIME

Portability Subroutine: Returns the time in numeric form.

Module

USE IFPORT

Syntax

CALL ITIME (array)

array

(Output) INTEGER(4). A rank one array with three elements used to store numeric time data:

  • array(1) - the hour

  • array(2) - the minute

  • array(3) - the second

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

Example

USE IFPORT
 INTEGER(4) time_array(3)
 CALL ITIME (time_array)
 write(*,10) time_array
 10 format (1X,I2,':',I2,':',I2)
 END
Parent topic: H to I

See Also

DATE_AND_TIME

Submit feedback on this help topic

Copyright © 1996-2011, Intel Corporation. All rights reserved.