Hi , i'm not good in FORTRAN programming. i have FORTRAN source code. i need to run it for validation my work. i try to run this code with Intel compiler and Microsoft Visual Studio IDE.
compiling and linking source code files successes. when start debug, at reading the data file, the file is read and we reach the end of file (EOF) but, the code is frozen (do not go out from loop).
i don't know the problem reason,but i know the problem place (in attachment the red box is the place or between the line 1 and 3) the problem is " it read the last line in the data file by READ (line 1) and the condition in (line 3) is true go to 500. the code is freezing between lines 1 and 3
- 500 READ(LUPEP,1800,ERR=500,END=600) IDLIN,IYEAR,IMONTH,IDAY,
- & IHOUR,IMIN,SEC
- IF( IDLIN .NE. '* ' ) GO TO 500
the subroutine where the problem is found and data file in attachment.
my Gratitude Abou Galalh