Documentation Update: Handling Console Messages when Running an Application under ETSO. Using the DIVERT command.
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