User Tools

Site Tools


tutorials:fortran

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision
Previous revision
Last revision Both sides next revision
tutorials:fortran [2022/03/19 09:49]
papa
tutorials:fortran [2022/03/19 09:52]
papa [DATE subroutine bug]
Line 25: Line 25:
 DATE is supposed to return a ten-character string representing the current system date with the format: DATE is supposed to return a ten-character string representing the current system date with the format:
  
-  dd-mmm-yyb+''dd-mmm-yyb''
  
 Where: Where:
  
-| dd | Day of month (leading zero converted to blank) | +''dd'' | Day of month (leading zero converted to blank) | 
-| mmm | Three-character abbreviation of month ("Jan", "Feb", ...) | +''mmm'' | Three-character abbreviation of month ("Jan", "Feb", ...) | 
-| yy | Last two digits of year | +''yy'' | Last two digits of year | 
-| b | blank character |+''b'' | blank character |
  
-However, since the year 2000, the subroutine has set the "yybportion of the returned date to the //first// three digits of the current year, giving the same value for all years of a given decade. For example, for every year between 2010 and 2019, DATE returned "201" in the "yybportion of the date string.+However, since the year 2000, the DATE has set the ''yyb'' portion of the returned date to the //first three// digits of the current year, giving the same value for all years of a given decade. For example, for every year between 2010 and 2019, DATE returned "201" in the ''yyb'' portion of the date string.
  
-This renders the year portion of DATE's output useless for most purposes. A work-around is to program a date subroutine in another language that correctly processes the TOPS-20 system date (such as MACRO assembly language) and call that subroutine from your FORTRAN source instead of the FORTRAN DATE subroutine.+This renders the year portion of DATE's output useless for most purposes. A work-around is to program a date subroutine in another language that correctly processes the TOPS-20 system date (such as MACRO assembly language) and call that subroutine from your FORTRAN program instead of the FORTRAN DATE subroutine.
  
 ==== Input/Output Devices ==== ==== Input/Output Devices ====
tutorials/fortran.txt · Last modified: 2022/03/19 09:52 by papa