Re: monmsg question

[Wayne McAlpine <wayne.mcalpine@xxxxxxxxxxxxxxxxx>]

A program-level MONMSG command can't be used as a way to ignore errors. 
 It must be accompanied by a GOTO command to take some specific action. 
 Normally, program-level monitoring is for messages not specifically 
monitored immediately following the command.

Jerry Draper wrote:
> I have a CL that does a monmsg at the top of my CL after the DLC's which 
> I thought would apply all the way to the end of the CL eliminating the 
> need to MONMSG each command.  I want this CL to finish without halting.
>
> Jerry
>
>
>  MONMSG     MSGID(CPF9000 CPF3000)
>
> However after doing a RSTLIB *ALLUSR I get this unmonitored message:
>
> CPF3779    Escape                  30    11/13/06   19:30:32   *N       
> *N          *N       RESTHAC
>                                      Message . . . . :   305 libraries 
> restored; 35 partially restored; 0 not
>                                        restored.
>
>
> which triggers a halt
>
> CPF9999    Escape                  40    11/13/06   19:30:32   QMHUNMSG 
>                   *N       RESTHAC
>                                      Message . . . . :   Function check. 
> CPF3779 unmonitored by RESTHAC at
>                                        statement 4100, instruction X'0029'.
>
>
> and then, in anguish:
>
> CPA0701    Inquiry                 99    11/13/06   19:30:32   QCLXERR 
>       QSYS        00C6     *EXT
>                                      Message . . . . :   CPF3779 
> received by RESTHAC at 4100. (C D I R)
>                                      Cause . . . . . :   Control 
> language (CL) program RESTHAC in library
>                                        UUJDRAPER1 detected an error at 
> statement number 4100. Message text for
>                                        CPF3779 is: 305 libraries 
> restored; 35 partially restored; 0 not restored.