Pegasus InfoCorp: Web site design and web software development company

TRROR (2)

Print LAM system error message.

SYNOPSIS

    subroutine TRROR (strname) character strname*(*)

DESCRIPTION

    The most recent error message is displayed. Many LAM subroutines have an ierror argument that returns an error code. If TRROR() is invoked immediately after detecting an error condition from a LAM subroutine, the description corresponding to the ierror code will be displayed. The error message will be preceded by the contents of strname .

EXAMPLE

      call KENTR('app', 0, ierror)
      if (ierror .ne. 0) call TRROR('knit')