Documentation Update: Handling Console Messages when Running an Application under ETSO

Document ID : KB000011443
Last Modified Date : 14/02/2018
Show Technical Document Details
Question:

Documentation Update: Handling Console Messages when Running an Application under ETSO. Using the DIVERT command.

Answer:

Messages normally seen on the master console may not be seen when an application runs under Advantage CA-Roscoe Interactive ETSO Environment. An application may appear as if it is hung, when it is really waiting for a tape mount or an operator's response from a message that an operator cannot see.

To avoid this problem, the user should divert WTP's to the master console using the Advantage CA-Roscoe DIVERT command.  The following RPF can be used as a sample RPF to divert WTP and to initiate an application.

       <<SARROS>>
       : THIS RPF WILL DESTROY THE AWS - SAVE THE AWS IF REQUIRED
       PUSH 
       SET ATTACH NOPAUSE
       SET BOUNDS AWS 1 3
       Q DIVERT AWS
       FIND /WTP/
       READ AWS * L1 10 12
       DIVERT WTP CONSOLE 
       TRAP ON 
       +CALL SARROS /+A1+/ 
       TRAP OFF   
       IF INDEX(L1 '.') EQ 0    
         +DIVERT WTP +L1+  
       ELSE    
         +DIVERT WTP MEM +L1+ 
       ENDIF 
      IF (TC EQ 0)  
        RESPONSE 'SARROS ENDED, RC IS '|RC  
      ELSE   
        RESPONSE 'SARROS ENDED, RC IS '|RC|', TC IS '|TC   
        WRITE AWS B LASTERR   
        A    
      ENDIF 
     POP 
      RETURN