SET(KEYSTROKE_RECOVERY)

     Controls whether TPU interprets the /RECOVER qualifier to mean that
     the application must execute a JOURNAL_OPEN statement.  When you use
     SET (KEYSTROKE_RECOVERY, OFF), TPU allows a program to proceed
     without error, even if /RECOVER was specified at startup time and the
     program executes no corresponding JOURNAL_OPEN statement.

  Syntax

     SET (KEYSTROKE_RECOVERY, {ON | OFF})

  Parameters

     KEYSTROKE_RECOVERY   A keyword indicating that SET is being used to
                          control whether an application can use keystroke
                          journaling for recovery.

     ON                   A keyword indicating that the TPU session is to
                          perform a recovery from a keystroke journal file,
                          even if /NORECOVER is specified during invocation.

     OFF                  A keyword indicating that even if /RECOVER is
                          specified when TPU is invoked, the application
                          need not use a JOURNAL_OPEN statement opening a
                          journal file.  SET (KEYSTROKE_RECOVERY, OFF) is
                          useful in applications where you want to allow the
                          use of /RECOVER but you do not want to implement
                          keystroke journaling and recovery.

  Comments

     Note that you can use the JOURNAL_OPEN statement without error in a
     program even if you have previously used SET (KEYSTROKE_RECOVERY, OFF).

     SET (KEYSTROKE_RECOVERY) returns an error if the built-in is used after
     TPU has started accepting keyboard input.

     Te determine whether a recovery using a keystroke journal file is
     currently in progress, use GET_INFO (SYSTEM, "recover").

  Example

     SET (KEYSTROKE_RECOVERY, OFF);

     Allows your application to be invoked with the /RECOVER qualifier even
     if your application does not implement keystroke journaling and
     recovery.

  Related Topics

     GET_INFO(buffer_variable)   GET_INFO(COMMAND_LINE)

     GET_INFO(SYSTEM)   JOURNAL_OPEN   JOURNAL_CLOSE

     RECOVER_BUFFER   SET(JOURNALING)