ERRMES provides the facility for outputting error messages from user-written subroutines.
Use
Called By
Any user-written subroutine
Prerequisite
None
Calling Sequence
CALL ERRMES (errflg, mesage, id, endflg)
Input Arguments
errflg | A logical (true or false) variable. When errflg is true, ERRMES writes the message passed in to its output files. |
mesage | A character string or variable of as many as 1024 characters that you want ERRMES to document when the subroutine has an error. This character string should be a descriptive message and should include the name of the subroutine with the error. |
id | An integer variable that specifies the identifier of the statement that is currently invoking the user-written subroutine. |
endflg | A character variable that stops execution when it equals STOP. If endflg has any other value, Adams Solver continues execution. |
Extended Definition
The ERRMES data access subroutine allows you to output messages to document errors that occur in user-written subroutines. The messages always go to the message file, and during interactive execution, Adams Solver displays them on the screen.
Although ERRMES can be called in response to any execution problem, it should always be called in response to a data access or a general subroutine call that returns an error flag. For an example of a DIFSUB evaluation subroutine that calls ERRMES, see DIFSUB.