SET (INPUT_FOCUS_UNGRAB)

  Specifies the program or learn sequence TPU should execute whenever it
  processes a FocusOut event from DECwindows.

  Syntax

     SET (INPUT_FOCUS_UNGRAB, SCREEN [, {program_source | NONE}])

  Parameters

     SCREEN               A keyword used for compatibility with future
                          versions of TPU.

     program_source       A string, buffer, range, learn sequence, or
                          program specifying the ungrab routine.  If you do
                          not specify this parameter, TPU deletes the
                          current input focus ungrab routine; thereafter,
                          your application is not informed when TPU
                          processes a FocusOut event from DECwindows.

     NONE                 A keyword instructing TPU to delete the current
                          input focus ungrab routine.