ST2ERR

Fortran

ST2ERR(IERR, SUBR, MESS)

C-interface

tq_st2err(TC_INT ierr,TC_STRING subr,TC_STRING mess);

Full name:

Set Error Code.

Purpose:

Called when an error occurs that cannot be handled by the current program unit. The program unit should return to the calling program.

Comments:

Identical to ST1ERR except that it is silent, i.e., no error message is printed.  This should be the normal subroutine to call when detecting errors that should be handled by a higher level of the program.

Arguments

Name

Type

Value set on call or returned

IERR

Integer

Set to an error code.

SUBR

Character*6

Set to the current subroutine name.

MESS

Character*72

Set to the error message to be printed