DATE_AND_TIME intrinsic

I cannot get the DATE_AND_TIME intrinsic function to link no matter what I try. Here is sample code:

      Program TIME_TEST
C	  
      CHARACTER*10  JDATE, JTIME, JZONE
C
      DIMENSION  IREST ( 8 )
C	  
	  CALL DATE_AND_TIME ( JDATE, JTIME, JZONE, IREST )
C	  
	  WRITE(*,*) 'JDATE, JTIME, JZONE, IREST', JDATE, JTIME, JZONE, IREST
C	  
	  END

I have tried everything to no avail, I always get an error LNK2019: unresolved external symbol, and then the symbol name is different depending on which compile flags I use, i.e.:

pgf77 time_test.for gives unresolved external symbol _DATE_AND_TIME@28

-Munix & Miface=unix
pgf77 -Munix time_test.for
gives unresolved external symbol date_and_time

-Miface=cref
pgf77 -Miface=cref time_test.for
gives unresolved external symbol _DATE_AND_TIME

I am working in 32 bit Windows XP.

Thanks in advance for your help.

Justin C.

Hi Justin,

DATE_AND_TIME is an F90 intrinsic so you’ll need to use pgfortran instead of pgf77 to use this intrinsic.

Hope this helps,
Mat