getMonitoredMessage (get monitored message)

Syntax:

msgInfo_t = getMonitoredMessage( *ON|*OFF );

Description:

Retrieves the latest *ESCAPE message from the job log.
Optionally removes the message from the log. Usually called within the 'on-error' section of a 'monitor' block.

Return value:

Returns a data structure with the following information:
id -Message ID.
text -First level text.
pgm -Sender: program name.
mod -Sender: module name.
proc -Sender: procedure name.
specNb-Sender: statement number.

Example: 


monitor;                                             
  a = 10;                                            
  b = 0;     // Attempt made to divide by zero for   
  c = a / b; // fixed point operation. (MCH1211)     
  fail( 'Division by zero did not raise an error.' );
on-error;                                            
  msgInfo = getMonitoredMessage(*ON); // remove message  
endmon;                               // from job log    
                                                     
aEqual( 'MCH1211': msgInfo.Id );