GETDATE()

Fortran version:

    INTEGER FUNCTION GETDATE( DEFAULT , PROMPT )
        INTEGER         DEFAULT ! Default return value
        CHARACTER*(*)   PROMPT  ! Prompt for user

NO C version:

Summary:

Display the PROMPT to standard output for a date in either of two formats: 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].

For Fortran-90 declarations and interface checking:

    USE M3UTILIO

Preconditions:

none

Fortran Usage:

(See sample programs LATLON or PRESZ for additional usage examples.)

    ...
    INTEGER        L, M
    INTEGER        GETDATE
    ...
    L = GETDATE( 1993201, 'Enter the starting date for the run' )
    ...

C Usage:

don't

Previous: DT2STR

Next: GETDTTIME

Up: Date and Time Manipulation Routines

To: Models-3/EDSS I/O API: The Help Pages