*DECK DB$BUTX 
          IDENT  DB$BUTX
*#
* *   DB$BUTX - BASIC RECOVERY USER REPORT TEXT  PAGE  1
* *   P A MURRAY                                 DATE  06/19/81 
* 
* DC  PURPOSE 
* 
*     THIS COMPASS ROUTINE DEFINES THE USER REPORT TEXTS FOR BASIC
*     RECOVERY. 
* 
* DC  ENTRY CONDITIONS
* 
*     THIS ROUTINE IS NOT ENTERED.  IT IS REFERENCED AS A TABLE.
* 
* DC  EXIT CONDITIONS 
* 
*     NOT APPLICABLE. 
* 
* DC  CALLING ROUTINES
* 
*     DB$BURP    BASIC RECOVERY USER REPORT GENERATOR 
* 
* DC  CALLED ROUTINES 
* 
*     NONE
* 
* DC  NON-LOCAL VARIABLES MODIFIED
* 
*     NONE
* 
* DC  DESCRIPTION 
* 
*     THIS ROUTINE USES THE MSG MACRO TO DEFINE THE USER REPORT MESSAGES
*     FOR BASIC RECOVERY. 
* 
*     NOTE - THE MACRO PUTS A ZERO WORD AFTER EACH MESSAGE AND THEN 
*            BACKS UP ONE WORD BEFORE THE NEXT MESSAGE. 
* 
* D   HOW TO ADD AN ERROR 
* 
*     LOCATION FIELD IS THE MESSAGE NUMBER IN DECIMAL (REFERRED TO VIA A
*     DEF).  THE PARAMETER (ENCLOSED IN PARENTHESES) IS THE MESSAGE 
*     TEXT.  THE TEXT CAN CONTAIN ONLY BALANCED PAIRS OF PARENTHESES. 
*     THE TEXT CANNOT CONTAIN AN UP ARROW (') BECAUSE THIS IS THE 
*     INSERTION CHARACTER.  THE TEXT CANNOT CONTAIN A QUOTE BECAUSE THIS
*     IS THE MICRO SUBSTITUTION CHARACTER.  THE FIRST CHARACTER IN THE
*     TEXT IS FOR CARRIAGE CONTROL. SEE DB$UPRT FOR CARRIAGE CONTROL
*     CHARACTER TYPES.
* 
* D   HOW TO ADD AN INSERTION IN A MESSAGE
* 
*     INSERTIONS ARE MADE IN MESSAGES WHEN AN UP ARROW (') FOLLOWED BY A
*     KEY CHARACTER IS ENCOUNTERED.  SEE DB$BFTX FOR A DESCRIPTION OF 
*     THE INSERTION TYPES AND THE STRUCTURE OF THE TABLE GENERATED. 
* 
*#
  
          MACRO  MSG,NUM,M
PARM      MICRO  1,,#_M_# 
LEN       MICCNT PARM 
LENW      SET    LEN+9
LENW      SET    LENW/10
          ORG    *-1
          VFD    6/0,12/NUM,18/0,12/LEN,12/LENW+1 
          DIS    LENW,M 
+         VFD    60/0 
          ENDM
  
  
*CALL DEFMACRO
  
*CALL BURDFDCLS 
  
          ENTRY DB$BUTX 
DB$BUTX   VFD    60/0 
DFURP01   MSG    (     ALLOCATE DIRECTIVE EXECUTION COMPLETE.)
DFURP02   MSG    (         QUICK RECOVERY FILE 'B HAS BEEN ALLOCATED.)
DFURP03   MSG    (         TRANSACTION RECOVERY FILE 'B HAS BEEN ALLOCAT
,ED.) 
DFURP04   MSG    (         JOURNAL LOG FILE 'B HAS BEEN ALLOCATED.) 
DFURP05   MSG    (         RESTART IDENTIFIER FILE 'B HAS BEEN ALLOCATED
,.) 
DFURP06   MSG    (0BEGIN PROCESSING DIRECTIVES FOR SCHEMA 'A.)
DFURP07   MSG    (     DUMP DIRECTIVE EXECUTION COMPLETE.)
DFURP08   MSG    (         JOURNAL LOG FILE 'B HAS BEEN DUMPED.)
DFURP09   MSG    (         JOURNAL LOG FILE 'B HAS BEEN REINITIALIZED.) 
DFURP10   MSG    (         CDCS DETECTED A FATAL ERROR ON THE JOURNAL LO
,G FILE 'B.)
DFURP11   MSG    (         CHARACTERISTICS OF THE LAST LOG RECORD DUMPED
,-) 
DFURP12   MSG    (            USER ID OF RECORD 'F,)
DFURP13   MSG    (            PROGRAM ID OF RECORD 'F,) 
DFURP14   MSG    (            TYPE OF RECORD 'F,) 
DFURP15   MSG    (            DATE OF ENTRY 'F,)
DFURP16   MSG    (            TIME OF ENTRY 'F.)
          END 
