[comp.os.vms] Protect yourself against the PRO380 console : useful procedure.

MACALLSTR@vax1.physics.oxford.ac.UK (01/07/88)

People with a VAX having a PRO380 console may find this command procedure
 useful. The comments in the procedure explain something about why it is
 necessary. Anyone who is running a VAX 8500/8700/8800-series VAX will need
 no convincing of the usefulness of this procedure!
John

--------------Cut here-----------------------------------------------------

$ ! This is file yourdevice:CONSOLE_CONTROL.COM .
$ !
$ ! Command file to switch console messages on and off.
$ ! This protects the system against 'hangs' caused by the
$ !  console's inability to handle traffic in more than one mode.
$ ! Thus if you wish to enter CONSOLE mode or POS mode you must
$ !   issue the command
$ !                      $ CONSOLE OFF
$ !   before entering the alternate mode.
$ ! On return to normal TERMINAL PROGRAM mode you should issue
$ !  the command
$ !                      $ CONSOLE ON
$ !  to reenable console messages.
$ ! The $ CONSOLE command is defined as CONSOLE:==@yourdevice:CONSOLE_CONTROL
$ set noon
$ set nover
$ if p1.eqs."" then p1="ON"
$ IF p1.eqs."ON" then goto CONSOLE_ON
$ ! Disable console messages.
$ SET TERM/PERM/NOBROADCAST OPA0:
$ ASS/USER OPA0: SYS$COMMAND
$ REPLY/DISABLE
$ GOTO CONSOLE_EXIT
$ CONSOLE_ON:
$ SET TERM/PERM/BROADCAST OPA0:
$ ASS/USER OPA0: SYS$COMMAND
$ REPLY/ENABLE
$ GOTO CONSOLE_EXIT
$ CONSOLE_EXIT:
$ EXIT