Microsoft/Digital/Compaq/HP Fortran has two built-in subroutines to return the time and date. Check the "help" on "GETDAT" and "GETTIM". You typically call these as follows:
C
CALL GETDAT( IYR, IMON, IDAY )
CALL GETTIM( IHR, IMIN, ISEC, IHUND )
C
Where all arguments are INT*2 variables.
Richard Ay
COADE, Inc.