M3WARN()

Fortran version: 

        
    SUBROUTINE M3WARN( CALLER, JDATE, JTIME, ERRTXT )
        CHARACTER*(*), INTENT(IN   ) :: CALLER  !  name of caller
        INTEGER      , INTENT(IN   ) :: JDATE   !  date YYYYDDD associated with error, or 0
        INTEGER      , INTENT(IN   ) :: JTIME   !  time HHMMSS  associated with error, or 0
        CHARACTER*(*), INTENT(IN   ) :: ERRTXT  !  caller-supplied error message

C version:

m3warnc() is a C wrapper calling the Fortran M3WARN() 
    void m3warnc( const char * caller ,
                  int           jdate  ,
                  int           jtime  ,
                  const char  * errtxt ) ;

Summary:

Generates a warning message to the program log indicating the caller, the simulation date and time if appropriate (the date and time are omitted from the message if they are zero), and the user-supplied error text.

Models-3 standard: construct error messages and caller names so that it is possible to determine uniquely from the text of the error message the line at which the error occurred, and (to the extent possible) the nature of the error.

See also M3ERR() and m3errc() , M3EXIT() and m3exitc() , M3MESG() and m3mesgc() .

Preconditions:

#include "iodecl3.h" if called from C.

JDATE:JTIME represented YYYYDDD:HHMMSS according to Models-3 date and time conventions , or are 0.

Fortran Usage:

For Fortran-90 declarations and interface checking: 
    USE M3UTILIO

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

    ...
    CALL M3WARN( 'myname', 0, 0, 'Trouble with FOO' )
C              generates warning message; no date supplied to log
        ...

C Usage: 

    ...
    #include "iodecl3.h"
    ...
    m3warnc( "ME", jdate, jtime, "Bad vble 'foo'" ) ;
        /*   error message followed by SHUT3(); exit( 2 ) */
    ...

Previous: M3MESG

Next: NAMEVAL

Up: Utility Routines

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