INTEGER FUNCTION GETDATE( DEFAULT , PROMPT )
INTEGER DEFAULT ! Default return value
CHARACTER*(*) PROMPT ! Prompt for user
YYYYDDD or YYYYMMDD, and get the
user's response and convert it into the corresponding value
according to EDSS/Models-3 date and
time conventions. Returns DEFAULT if the user hits <RET>.
Reprompts on error for up to 5 attempts; exits in case of more than
5 entry errors.
Logs the value returned, for tracking and validation purposes.
The default is displayed in square brackets at the end of the prompt [LIKE THIS].
See also GETNUM().
...
INTEGER L, M
INTEGER GETDATE
...
L = GETDATE( 1993201, 'Enter the starting date for the run' )
...
Up: Date and Time Manipulation Routines
To: Models-3/EDSS I/O API: The Help Pages