*COMDECK SKELETON 
 SKELETON TITLE  INTERNAL TABLES DEFINING CDCS (ETC) OVERLAY STRUCTURES.
          SPACE  4,10 
**        TBLBEGIN - START OF OVERLAY STRUCTURE TABLES. 
  
  
 TBLBEGIN BSS    0
          SPACE  4,10 
**        DMSLIB - OBJECT TIME ROUTINES 
* 
*              THE FIRST FILE OF THE SKELETON WILL BE THE RELOCATABLE 
*         ROUTINES TO BE INSERTED INTO DMSLIB. THESE ARE THE ROUTINES 
*         THAT WILL RESIDE IN THE USER-S FL AT THE UCP. 
  
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$ABT      ABORT OBJECT-TIME ROUTINE
          INCL   DB$ASK      INQUIRE TRANSACTION OBJECT-TIME ROUTINE
          INCL   DB$BEG      BEGIN TRANSACTION OBJECT-TIME ROUTINE
          INCL   DB$CALL     CALL PROCEDURE GIVEN ADDRESS (COMPASS) 
          INCL   DB$CDIS     CONVERT TO DISPLAY CHARACTERS
          INCL   DB$CLS      CLOSE OBJECT-TIME ROUTINE
          INCL   DB$CMT      COMMIT TRANSACTION OBJECT-TIME ROUTINE 
          INCL   DB$DBST     DATABASE STATUS OBJECT-TIME ROUTINE
          INCL   DB$DEL      DELETE OBJECT-TIME ROUTINE 
          INCL   DB$DLAY     DELAY WHILE WAITING FOR CDCS (COMPASS) 
          INCL   DB$DROP     DROP TRANSACTION OBJECT-TIME ROUTINE 
          INCL   DB$END      TERMINATE OBJECT-TIME ROUTINE
          INCL   DB$GLDF     GLOBAL DEFINITIONS 
          INCL   DB$GTID     GET RESTART IDENTIFIER OBJECT-TIME ROUTINE 
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          INCL   DB$INQ      INTERACTIVE QU INVOKE OBJECT-TIME ROUTINE
          INCL   DB$INV      INVOKE OBJECT-TIME ROUTINE 
          INCL   DB$INVS     SUB-PROGRAM INVOKE OBJECT-TIME ROUTINE 
          INCL   DB$LKAR     LOCK AREA OBJECT-TIME ROUTINE (EXCL/PROT)
          INCL   DB$LOKF     LOCK AREA OBJECT-TIME ROUTINE (PROTECTED)
          INCL   DB$MF       CMM FIXED POSITION INTERFACE (COMPASS) 
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$OPN      OPEN OBJECT-TIME ROUTINE 
          INCL   DB$PVC      PRIVACY OBJECT-TIME ROUTINE
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RDX1     READ SEQ ON INDEX FILE OBJECT-TIME ROUTINE 
          INCL   DB$RDX2     READ RAN ON INDEX FILE OBJECT-TIME ROUTINE 
          INCL   DB$RD1      READ SEQUENTIAL OBJECT-TIME ROUTINE
          INCL   DB$RD2      READ RANDOM OBJECT-TIME ROUTINE
          INCL   DB$REL      REL-READ RANDOM OBJECT-TIME ROUTINE
          INCL   DB$RELS     REL-READ SEQUENTIAL OBJECT-TIME ROUTINE
          INCL   DB$REW      REWRITE OBJECT-TIME ROUTINE
          INCL   DB$RLCK     RELATIONAL CRM ERROR CHECKING
          INCL   DB$RLDN     READ RELATION PREPROCESSOR 
          INCL   DB$RPT      RECOVERY POINT OBJECT-TIME ROUTINE 
          INCL   DB$RQST     ISSUE SCP REQUEST FROM UCP 
          INCL   DB$RSR      START RELATION OBJECT TIME ROUTINE 
          INCL   DB$RWF      REWIND AREA FILE OBJECT-TIME ROUTINE 
          INCL   DB$RWR      REWIND RELATION
          INCL   DB$RWX      REWIND INDEX FILE OBJECT-TIME ROUTINE
          INCL   DB$SIR      IMMEDIATE RETURN OBJECT-TIME ROUTINE 
          INCL   DB$SKF      SKIP ON AREA FILE OBJECT-TIME ROUTINE
          INCL   DB$SSCL     CALLSS MACRO (COMPASS) 
          INCL   DB$STR      START OBJECT-TIME ROUTINE
          INCL   DB$STX      START ON INDEX FILE OBJECT-TIME ROUTINE
          INCL   DB$TIM      GET CPU TIME 
          INCL   DB$UNLK     UNLOCK AREA OBJECT-TIME ROUTINE
          INCL   DB$VERS     VERSION CHANGE OBJECT-TIME ROUTINE 
          INCL   DB$WEF      WRITE MESSAGE TO CRM ERROR FILE
          INCL   DB$WR2      WRITE RANDOM OBJECT-TIME ROUTINE 
          WEOF
 CDCS     SPACE  5,20 
**        CDCSLIB - CDCS DYNAMIC SYSTEM ROUTINES
* 
*              THIS SECTION DEFINES THE ROUTINES THAT ARE USED ONLY 
*         SOMETIMES IN THE STRUCTURE OF CDCS. THEY WILL BE LOADED INTO
*         CDCSLIB WHERE THEY CAN BE SELECTED BY LOADER ACCORDING TO 
*         OUR NEED OF THEM. 
  
          INCL   DB$FLOP     FLOW POINT DATA COLLECTION (COMPASS) 
          INCL   DB$FLRP     FLOW POINT REPORT WRITER 
          INCL   DB$LINB     FLOW POINT PAGE BUFFER 
          INCL   DB$TRC      TRACE ROUTINES (USED BY $BEGIN/$END CODE)
          WEOF
 CDCS     SPACE  5,20 
**        CDCS2 - MAIN SCP PROGRAM
* 
*              THE PROGRAM *CDCS2* IS A DUMMY. THE REAL PROGRAM AND 
*         TRANSFER ADDRESS IS DEFINED IN *CDCS*. THE *WEOF* IS USED TO
*         ALLOW EXTERNALS TO BE SATISFIED FOR THE ROLLOUT PORTION 
*         SO ROLLING OUT CAN BE SAFE. 
  
 CDCS2    OVLAY  0,0,,(MAIN SCP PROGRAM)
          MAP    SBEX 
          LIB    (CDCSLIB,DMSLIB,FORTRAN,BAMLIB,SYMLIB,SYSLIB)
 DB$UPRT  BECOMES DB$LINE,FOREVER  DB$STD WILL USE CDCS PRINT ROUTINE 
  
*         CRM PROVIDES RM$TSYS AS AN ALTERNATIVE TO RM$SYS=.
*         RM$SYS= IS THE STANDARD CRM ROUTINE TO ISSUE RA+1 CALLS.
*         RM$TSYS DOES NOT MAKE ANY CALLS WITH RECALL.
*         INSTEAD OF ISSUING A RECALL IT CALLS TAF$RM TO CONTINUE 
*         PROCESSING. 
*         CDCS SUBSTITUTES DB$CRMR FOR TAF$RM AND OBTAINS CONTROL.
  
 RM$SYS=  BECOMES RM$TSYS,FOREVER 
 TAF$RM   BECOMES DB$CRMR,FOREVER 
          IGNORE DB$MILN     UNNEEDED ROUTINE REFERENCED BY DB$DSCN 
          IGNORE DB$ROLB     ONLY USED BY CDCSBTF.  NOS ONLY. 
          IGNORE DB$$END     CDCSBTF *END* RA+1 CALL PROCESSOR
          INCL   CPUCIO      ISSUE SYSTEM CIO REQUESTS (COMPASS)
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          INCL   DB$ROLL     ROLL OUT SCP FL (COMPASS)
          INCL   DB$SELF     ISSUE A CALLSS TO OWN SUBSYSTEM  (COMPASS) 
          WEOF               EOF FOR SATISFY OF DB$ROLL EXTERNALS 
  
          INCL   CDCS        MAIN PROGRAM FOR SCP CDCS
* 
*         ROUTINE DB$DMGI MUST LOAD BELOW ADDRESS 10000B ON NOS/BE
* 
          INCL   DB$DMGI     DISPLAY MANAGER SYSTEM INTERFACE (COMPASS) 
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$ABT$     ABORT SYMBIONT 
          INCL   DB$ACHK     CHECK AREA STATUS
          INCL   DB$ARRO     AUTO-RECOVERY ROLLOUT CONTROL
          INCL   DB$ATCH     ATTACH A FILE
          INCL   DB$ATCM     ATTACH MACRO (COMPASS) 
          INCL   DB$CALL     CALL PROCEDURE GIVEN ADDRESS (COMPASS) 
          INCL   DB$CBIN     CONVERT DISPLAY CODE TO BINARY (COMPASS) 
          INCL   DB$CDEB     BINARY TO DEC W/LEADING BLANKS (COMPASS) 
          INCL   DB$CDEC     BINARY TO DEC W/LEADING ZEROS (COMAPSS)
          INCL   DB$CFIL     BLANK/BINARY ZERO CHARACTER FILL 
          INCL   DB$CKUP     CHECK TRANSACTION UPDATE COUNT 
          INCL   DB$CLOU     CLOSE OPEN UFT'S FOR THE AREA
          INCL   DB$CLSA     CLOSE AREA AND LOG THE CLOSE 
          INCL   DB$CLS$     CLOSE CONTROL SYMBIONT 
          INCL   DB$CMOH     CMM OVERFLOW HANDLER 
          INCL   DB$COCB     BINARY TO OCTAL W/LEADING BLANKS (COMPASS) 
          INCL   DB$COCT     BINARY TO OCTAL W/LEADING ZEROS (COMPASS)
          INCL   DB$COM      FORCE COMMON AREAS LOADED IN 0,0 
          INCL   DB$CRMR     RECEIVE INPUT WITHOUT CALLING CMM
          INCL   DB$DBPL     LOAD A DATABASE PROCEDURE (COMPASS)
          INCL   DB$DBS$     DATABASE STATUS CONTROL SYMBIONT 
          INCL   DB$DDFE     DISPLAY MANAGER FRONT END
          INCL   DB$DEL$     DELETE CONTROL SYMBIONT
          INCL   DB$DMGR     CONSOLE DISPLAY MANAGER
          INCL   DB$DRT      DETERMINE RECORD ORDINAL 
          INCL   DB$DSCS     DISPLAY SEMANTICS THAT CHANGE STATUS 
          INCL   DB$DSMC     DISPLAY SEMANTICS FOR MINI COMMANDS
          INCL   DB$DUMP     PRINT MEMORY DUMP (COMPASS)
          INCL   DB$END$     TERMINATE CONTROL SYMBIONT 
          INCL   DB$ERR      ERROR/INFORMATIVE MESSAGE HANDLER
          INCL   DB$ERRI     INFORMATIONAL ERROR HANDLER
          INCL   DB$ERSF     LONG ERROR MSG SFCALL PROCESSOR
          INCL   DB$FAM      SET FAMILY NAME (COMPASS)
          INCL   DB$FKLA     ALLOCATE BLOCK IN FILE KEY LIST (FKL)
          INCL   DB$FKLR     RELEASE BLOCK IN FILE KEY LIST (FKL) 
          INCL   DB$FLSH     FLUSH ALL AREAS OF SCHEMA
          INCL   DB$FPOS     RESTORE POSITION ON A SHARED FIT 
          INCL   DB$FSAV     SAVE POSITION ON A SHARED FIT
          INCL   DB$FSET     SELECT AND SET FIT FOR REQUESTED ACCESS
          INCL   DB$FSIO     SELECT AND SET FIT FOR INTERNAL ACCESS 
          INCL   DB$FTBZ     CHECK FOR BUSY FIT 
          INCL   DB$FTDX     END-OF-DATA HANDLER
          INCL   DB$FTEX     CRM ERROR HANDLER
          INCL   DB$FTMD     MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$GET      CRM RANDOM GET PROCESSOR 
          INCL   DB$GETN     CRM SEQUENTIAL GET PROCESSOR 
          INCL   DB$GOFT     GET OFT ENTRY
          INCL   DB$GOTO     JUMP TO GIVEN ADDRESS (COMPASS)
          INCL   DB$ILL$     ABORT USER FOR ILLEGAL FUNCTION
          INCL   DB$INFO     FILINFO MACRO (COMPASS)
          INCL   DB$IO       MISC. CIO INTERFACES (COMPASS) 
          INCL   DB$IREC     INPUT RECEIVER 
          INCL   DB$ITC      INTERNAL TASK CREATOR
          INCL   DB$KMIF     KEY MAPPER INTERFACE 
          INCL   DB$LFET     DEFINE MODEL FET (COMPASS) 
          INCL   DB$LFN      GENERATE SPECIAL CDCS LFNS 
          INCL   DB$LINE     PRINT LINE ON OUTPUT LISTING 
          INCL   DB$LKA$     LOCK AREA SYMBIONT (EXCLUSIVE/PROTECTED) 
          INCL   DB$LKRU     RELEASE RUN-UNIT RECORD LOCKS
          INCL   DB$LNK      LINKED BLOCK CREATOR 
          INCL   DB$LNKD     LINKED BLOCK DELETER 
          INCL   DB$LNKG     GET LINKED BLOCK FROM SAVED LIST 
          INCL   DB$LNKS     SAVE A LINKED BLOCK FOR LATER USE
          INCL   DB$LOK      LOCK RECORD
          INCL   DB$LOK$     LOCK AREA CONTROL SYMBIONT (PROTECTED) 
          INCL   DB$MBA      ALLOCATE MANAGED BUFFER
          INCL   DB$MCAP     GET A MAPPING CAPSULE FROM MD
          INCL   DB$MDER     MD CRM ERROR PROCESSOR 
          INCL   DB$MF       CMM FIXED POSITION INTERFACE (COMPASS) 
          INCL   DB$MFI      INITIALIZE CMM.OWN EXIT (COMPASS)
          INCL   DB$MFO7     MEMORY OVERFLOW OPTION 7 
*         INCL   DB$MFO8     MEMORY OVERFLOW OPTION 8 
*         INCL   DB$MFO9     MEMORY OVERFLOW OPTION 9 
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$MTR      CDCS SCP MONITOR LOOP
          INCL   DB$NEED     COMPUTE NEED FOR INCREASED/DECREASED FITS
          INCL   DB$NRR      SET *NO RERUN* BIT 
          INCL   DB$ODMP     OPERATOR DUMP SEMANTICS
          INCL   DB$OFET     CDCS OUTPUT FET  (COMPASS) 
          INCL   DB$OFTC     OFT CREATOR
          INCL   DB$OFTR     OFT RELEASE PROCESSOR
          INCL   DB$OPNM     INTERFACE TO CRM OPEN FUNCTION 
          INCL   DB$OPN$     OPEN CONTROL SYMBIONT
          INCL   DB$OVCA     OVCAP SUPERVISOR AND LINKAGE (COMPASS) 
          INCL   DB$OVLD     INTERFACE FOR LOADING OVERLAYS (COMPASS) 
          INCL   DB$PST      PURGE SCHEMA TABLES
          INCL   DB$PUNT     FATAL INTERNAL ERROR PROCESSOR 
          INCL   DB$PUSH     PUSH/POP WORDS ON STACK IN RCB (COMPASS) 
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RCBC     RCB CREATOR
          INCL   DB$RCBF     RCB FLAGS PROCESSOR
          INCL   DB$RCBQ     PLACE RCB INTO THE EXECUTION QUEUE 
          INCL   DB$RCHK     CHECK RECORD STATUS
          INCL   DB$RCLL     RECALL MACRO (COMPASS) 
          INCL   DB$RCVD     RECOVERY CORE DUMP 
          INCL   DB$RDM      I/O MACRO INTERFACES 
          INCL   DB$RDX$     READ SEQ OR RAN ON INDEX FILE SYMBIONT 
          INCL   DB$RD$      SEQ OR RANDOM READ CONTROL SYMBIONT
          INCL   DB$REW$     REWRITE CONTROL SYMBIONT 
          INCL   DB$RFIT     DEFINE MODEL FIT (COMPASS) 
          INCL   DB$RLSA     ASL RELEASE PROCESSOR
          INCL   DB$RLSF     DATA FILE RELEASE PROCESSOR
          INCL   DB$RLSP     DATA BASE PROCEDURE FILE RELEASE PROCESSOR 
          INCL   DB$RMIF     RECORD MAPPER INTERFACE
          INCL   DB$RNRD     RANDOM READ
          INCL   DB$RNRW     RANDOM REWRITE 
          INCL   DB$ROER     ROLLOUT ERROR HANDLER
          INCL   DB$RPT$     RECOVERY POINT CONTROL SYMBIONT
          INCL   DB$RSDC     RESET DELAY COUNTS 
          INCL   DB$RTN      CIO - RETURN INTERFACE (COMPASS) 
          INCL   DB$RW$      REWIND INDEX AND AREA FILE SYMBIONT
          INCL   DB$SCHD     SCP SCHEDULER LOOP 
          INCL   DB$SEK      CRM RANDOM SEEK PROCESSOR
          INCL   DB$SFCL     ISSUE SFCALL REQUESTS
          INCL   DB$SFCM     SFCALL MACRO (COMPASS) 
          INCL   DB$SFIT     SET FIT FIELDS 
          INCL   DB$SFRD     READ FROM THE USER CONTROL POINT 
          INCL   DB$SFRT     RETURN SYSTEM FILES
          INCL   DB$SFST     NON-INTERRUPTIBLE STATUS SFCALL
          INCL   DB$SFWR     WRITE TO THE USER CONTROL POINT
          INCL   DB$SIR$     IMMEDIATE RETURN CONTROL SYMBIONT
          INCL   DB$SKF$     SKIP ON AREA FILE SYMBIONT 
          INCL   DB$SOSI     SWAP ONE USER OUT, SWAP ANOTHER USER IN
          INCL   DB$STR$     START CONTROL SYMBIONT 
          INCL   DB$STXP     SYNTAX SCANNER PARAMETERS
          INCL   DB$STX$     START ON INDEX FILE SYMBIONT 
          INCL   DB$SWI      READ TABLE FROM SWAP FILE
*                DB$SWO      WRITE TABLE TO SWAP FILE (IN DB$SWI) 
          INCL   DB$SWPI     SWAP IN TABLES FOR A USER
          INCL   DB$SWPO     SWAP OUT TABLES FOR USER 
          INCL   DB$SYMB     CONTROL SYMBIONT ADDRESS LIST (COMPASS)
          INCL   DB$TARE     TERMINATE AREA USERS 
          INCL   DB$TQTC     TQT CREATOR
          INCL   DB$TQTD     TQT DELETER
          INCL   DB$TQTT     TQT TERMINATOR 
          INCL   DB$TRU      TERMINATE RUN UNIT 
          INCL   DB$TSCH     TERMINATE SCHEMA 
          INCL   DB$ULK$     UNLOCK AREA CONTROL SYMBIONT 
          INCL   DB$UNDU     DB$UNDO INTERFACE
          INCL   DB$WAIO     CRM - WA INTERFACE (COMPASS) 
          INCL   DB$WRP      COMMAND RUN-UNIT WRAP UP 
          INCL   DB$WRRM     WRITE RECORD MACRO (COMPASS) 
          INCL   DB$WRTZ     WRITE A Z RECORD ON OUTPUT (COMPASS) 
          INCL   DB$WR2$     WRITE RANDOM CONTROL SYMBIONT
          INCL   DB$WSAR     RETURN THE WORKING STORAGE AREAS 
          WEOF
* 
*         PARTITION -- BEYOND THIS POINT IS CDCS INITIALIZATION.
* 
          INCL   DB$FARR     AUTO-RECOVERY ROLL OUT ADDRESS (COMPASS) 
          INCL   DB$AINT     CRACK CONTROL STATEMENT PARAMETERS 
          INCL   DB$ATCR     ATTACH FILES MACRO (COMPASS) 
          INCL   DB$ATWR     ATTACH FILES 
          INCL   DB$CAPL     LOAD AND LOCK CDCS OVCAPS
          INCL   DB$DRRD     READ DIRECTIVE FILE (COMPASS)
          INCL   DB$INIT     CDCS INITIALIZATION
          INCL   DB$MFLS     SET MAXIMUM FIELD LENGTH (COMPASS) 
          INCL   DB$MGFS     CMM - GET MAX FIXED BLOCK SIZE (COMPASS) 
          INCL   DB$MOE      CMM - OVERFLOW ENTRY INTERFACE (COMPASS) 
          INCL   DB$SSIN     ENTER SYSTEM CONTROL POINT STATUS (COMPASS)
          INCL   DB$STAT     FILE STATUS FUNCTION (COMPASS) 
  
 CMM$ALF  BECOMES CMM.ALF,FOREVER 
 CMM$SBL  BECOMES CMM.SBL,FOREVER 
 CMM$SBM  BECOMES CMM.SBM,FOREVER 
 FDL$LDC  BECOMES FDL.LDC,FOREVER 
 DB$ACAI  BECOMES DB.ACAI,FOREVER 
 DB$ACCL  BECOMES DB.ACCL,FOREVER 
 DB$ACCM  BECOMES DB.ACCM,FOREVER 
 DB$ACCN  BECOMES DB.ACCN,FOREVER 
 DB$ACM   BECOMES DB.ACM,FOREVER
 DB$ACM1  BECOMES DB.ACM1,FOREVER 
 DB$ACR   BECOMES DB.ACR,FOREVER
 DB$ADAX  BECOMES DB.ADAX,FOREVER 
 DB$AREH  BECOMES DB.AREH,FOREVER 
 DB$ASK$  BECOMES DB.ASK$,FOREVER 
 DB$BEG$  BECOMES DB.BEG$,FOREVER 
 DB$BRIF  BECOMES DB.BRIF,FOREVER 
 DB$CARS  BECOMES DB.CARS,FOREVER 
 DB$CEDP  BECOMES DB.CEDP,FOREVER 
 DB$CLSE  BECOMES DB.CLSE,FOREVER 
 DB$CMT$  BECOMES DB.CMT$,FOREVER 
 DB$CPRO  BECOMES DB.CPRO,FOREVER 
 DB$CPT   BECOMES DB.CPT,FOREVER
 DB$DDIF  BECOMES DB.DDIF,FOREVER 
 DB$DDVR  BECOMES DB.DDVR,FOREVER 
 DB$DPIF  BECOMES DB.DPIF,FOREVER 
 DB$DPII  BECOMES DB.DPII,FOREVER 
 DB$DPIR  BECOMES DB.DPIR,FOREVER 
 DB$DRAR  BECOMES DB.DRAR,FOREVER 
 DB$DRP$  BECOMES DB.DRP$,FOREVER 
 DB$DSFS  BECOMES DB.DSFS,FOREVER 
 DB$DSL1  BECOMES DB.DSL1,FOREVER 
 DB$DSL2  BECOMES DB.DSL2,FOREVER 
 DB$ERRE  BECOMES DB.ERRE,FOREVER 
 DB$GTI$  BECOMES DB.GTI$,FOREVER 
 DB$INV$  BECOMES DB.INV$,FOREVER 
 DB$IOER  BECOMES DB.IOER,FOREVER 
 DB$IOT   BECOMES DB.IOT,FOREVER
 DB$JFIN  BECOMES DB.JFIN,FOREVER 
 DB$JLCR  BECOMES DB.JLCR,FOREVER 
 DB$JLCT  BECOMES DB.JLCT,FOREVER 
 DB$JLH   BECOMES DB.JLH,FOREVER
 DB$JLO   BECOMES DB.JLO,FOREVER
 DB$JLRS  BECOMES DB.JLRS,FOREVER 
 DB$JRPT  BECOMES DB.JRPT,FOREVER 
 DB$LTSB  BECOMES DB.LTSB,FOREVER 
 DB$LTSC  BECOMES DB.LTSC,FOREVER 
 DB$MFP   BECOMES DB.MFP,FOREVER
 DB$NCLK  BECOMES DB.NCLK,FOREVER 
 DB$NCPT  BECOMES DB.NCPT,FOREVER 
 DB$NIOT  BECOMES DB.NIOT,FOREVER 
 DB$NO    BECOMES DB.NO,FOREVER 
 DB$OCAR  BECOMES DB.OCAR,FOREVER 
 DB$PROF  BECOMES DB.PROF,FOREVER 
 DB$PVCA  BECOMES DB.PVCA,FOREVER 
 DB$PVCR  BECOMES DB.PVCR,FOREVER 
 DB$PVC$  BECOMES DB.PVC$,FOREVER 
 DB$QFIN  BECOMES DB.QFIN,FOREVER 
 DB$QRF   BECOMES DB.QRF,FOREVER
 DB$QRFA  BECOMES DB.QRFA,FOREVER 
 DB$QRP   BECOMES DB.QRP,FOREVER
 DB$RCVR  BECOMES DB.RCVR,FOREVER 
 DB$REL$  BECOMES DB.REL$,FOREVER 
 DB$RFIN  BECOMES DB.RFIN,FOREVER 
 DB$RFOR  BECOMES DB.RFOR,FOREVER 
 DB$RSR$  BECOMES DB.RSR$,FOREVER 
 DB$RUTR  BECOMES DB.RUTR,FOREVER 
 DB$RWR$  BECOMES DB.RWR$,FOREVER 
 DB$RWTR  BECOMES DB.RWTR,FOREVER 
 DB$SFIN  BECOMES DB.SFIN,FOREVER 
 DB$STDR  BECOMES DB.STDR,FOREVER 
 DB$TERM  BECOMES DB.TERM,FOREVER 
 DB$TFIN  BECOMES DB.TFIN,FOREVER 
 DB$TIM$  BECOMES DB.TIM$,FOREVER 
 DB$TRJL  BECOMES DB.TRJL,FOREVER 
 DB$UNDO  BECOMES DB.UNDO,FOREVER 
 DB$VEFI  BECOMES DB.VEFI,FOREVER 
 DB$VEPF  BECOMES DB.VEPF,FOREVER 
 DB$VEPN  BECOMES DB.VEPN,FOREVER 
 DB$VERL  BECOMES DB.VERL,FOREVER 
 DB$VER$  BECOMES DB.VER$,FOREVER 
 DB$WART  BECOMES DB.WART,FOREVER 
 DB$WR2J  BECOMES DB.WR2J,FOREVER 
 DB$WR2K  BECOMES DB.WR2K,FOREVER 
 DB$YES   BECOMES DB.YES,FOREVER
 DC$CMPR  BECOMES DB.COMP,FOREVER 
 DC$CONV  BECOMES DB.CONV,FOREVER 
          SPACE 4 
* 
*         FIXED OVERLAYS
* 
*         ALL OVERLAYS EXCEPT 70,20 TO 70,40 ARE ORIGINED AT DB$FARR. 
*         THIS OVERLAYS THE INITIALIZATION PORTION OF THE 0,0 OVERLAY.
CDCS      SPACE  3,8
*         OVERLAY CD2BRIF    BASIC RECOVERY INTERFACE 
  
 CD2BRIF  OVLAY  04,0,DB$FARR,(BASIC RECOVERY INTERFACE)
DB$BRIF   BECOMES DB$BRIF 
          XFER   DB$BRIF
          MAP    SBX
          INCL   DB$BRIF     BASIC RECOVERY INTERFACE 
          INCL   DB$BRJB     CREATE DBREC CONTROL STATEMENTS
          INCL   DB$ROUT     CDCS ROUTE PROCESSING (COMPASS)
CDCS      SPACE  3,7
*         OVERLAY CD2CLSE    CLOSE FILES IN AN EMERGENCY
  
 CD2CLSE  OVLAY  07,0,DB$FARR,(MEMORY EMERGENCY - CLOSE FILES)
DB$CLSE   BECOMES DB$CLSE 
          XFER   DB$CLSE
          INCL   DB$CLSE     CLOSE FILES WHEN RSB IS SWAPPED OUT
          INCL   DB$OVBF     BUFFER SPACE (MUST BE AT END OF OVERLAY) 
 CDCS     SPACE  3,5
*         OVERLAY CD2DSL1    FIRST COMMAND OPTION LIST
  
 CD2DSL1  OVLAY  10,0,DB$FARR,(FIRST OPERATOR COMMAND OPTION LIST)
 DB$DSL1  BECOMES DB$DSL1 
          XFER   DB$DSL1
          INCL   DB$DSL1     GENERATE OPERATOR COMMAND OPTION LIST 1
 CDCS     SPACE  3,5
*         OVERLAY CD2DSL2    SECOND COMMAND OPTION LIST 
  
 CD2DSL2  OVLAY  20,0,DB$FARR,(SECOND OPERATOR COMMAND OPTION LIST) 
 DB$DSL2  BECOMES DB$DSL2 
          XFER   DB$DSL2
          INCL   DB$DSL2     GENERATE COMMAND OPTION LIST 2 
 CDCS     SPACE  3,5
*         OVERLAY CD2DSX1    DISPLAY SEMANTIC ROUTINES
  
 CD2DSX1  OVLAY  22,0,DB$FARR,(DISPLAY SEMANTIC ROUTINES) 
 DB$DSFS  BECOMES DB$DSFS 
  
          INCL   DB$DSX1     OVERLAY ENTRY PT TRANSFER INDEX (COMPASS)
          INCL   DB$DSFA     FIND AREA NAME OR ID 
          INCL   DB$DSFS     DISPLAY SEMANTICS - FIND SCHEMA
          INCL   DB$DSNI     DISPLAY SEMANTICS FOR NAME/ID
          INCL   DB$DSVL     DISPLAY SEMANTICS FOR VALIDATION 
 CDCS     SPACE  3,5
*         OVERLAY CD2DSX3    DISPLAY SEMANTIC ROUTINES
  
 CD2DSX3  OVLAY  24,0,DB$FARR,(DISPLAY SEMANTIC ROUTINES) 
 DB$ASLC  BECOMES DB.ASLC 
 DB$DS26  BECOMES DB$DS26 
 DB$LTSB  BECOMES DB$LTSB 
 DB$LTSC  BECOMES DB$LTSC 
  
          INCL   DB$DSX3     OVERLAY ENTRY PT TRANSFER INDEX (COMPASS)
          INCL   DB$ASLF     ASL SEARCH PROCESSOR FOR SUBSCHEMA 
          INCL   DB$DS26     DISPLAY SEMANTICS FOR *STATUS,JOB=*
          INCL   DB$LTSB     DISPLAY SEMANTICS FOR *RETAIN,SB=* 
          INCL   DB$LTSC     DISPLAY SEMANTICS FOR *RETAIN,SC=* 
 CDCS     SPACE  3,5
*         OVERLAY CD2DS27    DISPLAY SEMANTIC ROUTINE 27
  
 CD2DS27  OVLAY  26,0,DB$FARR,(DISPLAY SEMANTIC ROUTINE 27) 
          XFER   DB$DS27
 DB$DS27  BECOMES DB$DS27 
          INCL   DB$DS27     DISPLAY SEMANTICS FOR SCHEMA,AREA,JOB STAT 
          INCL   DB$DSUA     DETERMINE RUN-UNIT USING AN AREA 
 CDCS     SPACE  3,7
*         OVERLAY CD2ERRE    ERROR MESSAGE EDITOR 
  
 CD2ERRE  OVLAY  30,0,DB$FARR,(ERROR MESSAGE EDITOR)
 DB$ERRE  BECOMES DB$ERRE 
          XFER   DB$ERRE
          INCL   DB$ERRE     ERROR MESSAGE EDITOR 
          INCL   DB$ERRM     ERROR/INFORMATIVE MESSAGE TEXT (COMPASS) 
 CDCS     SPACE  3,8
*         OVERLAY CD2PROF    PRINT THE OUTPUT FILE
  
 CD2PROF  OVLAY  36,0,DB$FARR,(PRINT THE OUTPUT FILE) 
 DB$PROF  BECOMES DB$PROF 
          XFER   DB$PROF
          INCL   DB$PROF
          INCL   DB$ROPM
 CDCS     SPACE  3,7
*         OVERLAY CD2RCVR    CDCS ABNORMAL END REPRIEVE ROUTINE 
  
 CD2RCVR  OVLAY  40,0,DB$FARR,(CDCS ABNORMAL END REPRIEVE ROUTINE)
 DB$RCVR  BECOMES DB$RCVR 
          XFER   DB$RCVR
          INCL   DB$RCVR     ABNORMAL END REPRIEVE ROUTINE
 CDCS     SPACE  3,7
*         OVERLAY CD2TERM    CDCS NORMAL TERMINATION PROCEDURE
  
 CD2TERM  OVLAY  50,0,DB$FARR,(CDCS NORMAL TERMINATION PROCEDURE) 
 DB$TERM  BECOMES DB$TERM 
          XFER   DB$TERM
          NOEPT 
          INCL   DB$MGSS     CMM - GET SUMMARY STATISTICS (COMPASS) 
          INCL   DB$TERM     NORMAL TERMINATION PROCEDURE 
 CDCS     SPACE  3,8
*         OVERLAY CD2UNDO    BACK OUT A TRANSACTION 
  
 CD2UNDO  OVLAY  60,0,DB$FARR,(BACK OUT A TRANSACTION)
 DB$UNDO  BECOMES DB$UNDO 
          XFER   DB$UNDO
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
          INCL   DB$UNDO     ROLL BACK TRANSACTION UPDATES
 CDCS     SPACE  3,7
*         OVERLAY CD2CARS    PRIMARY OVERLAY FOR AUTO-RECOVERY
  
 CD2CARS  OVLAY  70,0,DB$FARR,(PRIMARY OVERLAY FOR AUTO-RECOVERY) 
 DB$CARS  BECOMES DB$CARS 
 DB$RCLL  BECOMES DB$RCLR 
          XFER   DB$CARS
          INCL   DB$CARS     CONTROL AUTO-RECOVERY SEQUENCE 
          INCL   DB$RCLR     RECALL ROUTINE FOR RECOVERY
          INCL   DB$WRAR     WRAP UP AUTO-RECOVERY FOR A SCHEMA 
 CDCS     SPACE  3,7
*         OVERLAY CD2QRFA    APPLY QRF TO A DATABASE FOR AUTO-RECOVERY
  
 CD2QRFA  OVLAY  70,20,,(APPLY QRF TO A DATABASE FOR AUTO-RECOVERY) 
 DB$ACAI  BECOMES DB.ACAI 
 DB$QRFA  BECOMES DB$QRFA 
 DB$RCLL  BECOMES DB$RCLR 
          XFER   DB$QRFA
          INCL   DB$IORE     CIO - READ INTERFACE (COMPASS) 
          INCL   DB$QRFA     APPLY QRF TO A DATABASE
 CDCS     SPACE  3,7
*         OVERLAY CD2RFOR    ROLL FORWARD FOR AUTO-RECOVERY 
  
 CD2RFOR  OVLAY  70,30,,(ROLL FORWARD FROM JOURNAL LOG FILE)
 DB$OCAR  BECOMES DB.OCAR 
 DB$RCLL  BECOMES DB$RCLR 
 DB$RDLG  BECOMES DB$RDLG 
 DB$RFOR  BECOMES DB$RFOR 
          XFER   DB$RFOR
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER 
          INCL   DB$RFOR     ROLL FORWARD FOR AUTO-RECOVERY 
 CDCS     SPACE  3,7
*         OVERLAY CD2RUTR    ROLL BACKWARD FOR AUTO-RECOVERY
  
 CD2RUTR  OVLAY  70,40,,(ROLL BACKWARD FROM TRANSACTION RECOVERY FILE)
 DB$IOER  BECOMES DB.IOER 
 DB$OCAR  BECOMES DB.OCAR 
 DB$RCLL  BECOMES DB$RCLR 
 DB$RUTR  BECOMES DB$RUTR 
 DB$WART  BECOMES DB$WART 
          XFER   DB$RUTR
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
          INCL   DB$RUTR     ROLL BACK UNCOMMITTED TRANSACTION
          INCL   DB$UNDO     ROLL BACK TRANSACTION UPDATES
          INCL   DB$WART     WRITE ART TO TRF 
 CDCS     SPACE  5,15 
*         CDCS OVCAPS 
 CDCS     SPACE  3
*         OVCAP  CD2ACAI     ATTACH AND CHECK AREA AND INDEX CAPSULE
*                            FOR AUTO-RECOVERY OR TRANSACTION.
  
 CD2ACAI  OVCAP  (ATTACH/CHECK AREA/INDEX FOR RECOVERY/TRANSACTION) 
 DB$ACAI  BECOMES DB$ACAI 
 DB$IOER  BECOMES DB.IOER 
 DB$OCAR  BECOMES DB$OCAR 
          EPT    DB$ACAI
          EPT    DB$OCAR
          INCL   DB$ACAI     ATTACH AND CHECK AREA AND INDEX
          INCL   DB$ADDP     OBTAIN ADDRESS OF DBP
          INCL   DB$OCAR     OPEN AND CHECK AREA
 CDCS     SPACE 3 
 CDCS     SPACE  3
*         OVCAP  CD2ACCN     ACCOUNTING CAPSULE 
  
 CD2ACCN  OVCAP  (CDCS ACCOUNTING)
 DB$ACCL  BECOMES DB$ACCL 
 DB$ACCM  BECOMES DB$ACCM 
 DB$ACCN  BECOMES DB$ACCN 
 DB$ACM   BECOMES DB$ACM
 DB$ACM1  BECOMES DB$ACM1 
 DB$ACR   BECOMES DB$ACR
 DB$CPT   BECOMES DB$CPT
 DB$IOT   BECOMES DB$IOT
 DB$NCLK  BECOMES DB$NCLK 
 DB$NCPT  BECOMES DB$NCPTR
 DB$NIOT  BECOMES DB$NIOT 
 DB$TIM$  BECOMES DB$TIM$ 
          EPT    DB$ACCL
          EPT    DB$ACCM
          EPT    DB$ACCN
          EPT    DB$ACM 
          EPT    DB$ACM1
          EPT    DB$ACR 
          EPT    DB$CPT 
          EPT    DB$IOT 
          EPT    DB$NCLK
          EPT    DB$NCPT
          EPT    DB$NIOT
          EPT    DB$TIM$
          NOEPT 
          INCL   DB$ACCL     LOCATE ACCOUNTING TABLE
          INCL   DB$ACCM     ESTIMATE CM USAGE FOR ACCOUNTING 
          INCL   DB$ACCN     TALLY ACCOUNTING INFORMATION 
          INCL   DB$ACCT     ACCOUNTING TABLE (COMPASS) 
          INCL   DB$ACM      INTERFACE TO DB$ACM1 FOR NOS 
          INCL   DB$ACM1     ISSUE TERMINATION ACCOUNTING MESSAGES
          INCL   DB$ACR      RELATIONAL READ ACCOUNTING 
          INCL   DB$CPT      SYSTEM TIME MACROS (COMPASS) 
          INCL   DB$TIM$     TIME CONTROL SYMBIONT
 CDCS     SPACE  3
*         OVCAP  CD2ADAX     ATTACH DATABASE AREA AND INDEX CAPSULE 
  
 CD2ADAX  OVCAP  (ATTACH DATABASE AREA/INDEX) 
 DB$ADAX  BECOMES DB$ADAX 
          EPT    DB$ADAX
          INCL   DB$ADAX     ATTACH DATABASE AREA AND INDEX FILES 
 CDCS     SPACE  3,10 
*         OVCAP  CD2AKWR     WRITE AN AK RECORD WITH ZERO KEY 
  
 CD2AKWR  OVCAP  (WRITE AN AK RECORD WITH ZERO KEY) 
 DB$WR2K  BECOMES DB$WR2K 
          EPT    DB$WR2K
          INCL   DB$WR2K     WRITE AN AK RECORD WITH ZERO KEY 
 CDCS     SPACE  3
*         OVCAP  CD2AREH     AUTO-RECOVERY OR TRANSACTION ERROR CAPSULE 
  
 CD2AREH  OVCAP  (ERROR HANDLING, AUTO-RECOVERY/TRANSACTIONS) 
 DB$AREH  BECOMES DB$AREH 
 DB$DRAR  BECOMES DB$DRAR 
          EPT    DB$AREH
          EPT    DB$DRAR
          INCL   DB$AREH     AUTO-RECOVERY ERROR HANDLER
          INCL   DB$AREM     AUTO-RECOVERY ERROR MESSAGE (COMPASS)
          INCL   DB$DRAR     DOWN AND RETURN AREA 
 CDCS     SPACE  3,8
*         OVCAP  CD2ASLC     CREATE ACTIVE SUBSCHEMA LIST 
  
 CD2ASLC  OVCAP  (CREATE ASL ENTRY) 
 DB$ASLC  BECOMES DB$ASLC    REINSTATE CAPSULE ENTRY POINT
          EPT    DB$ASLC
          INCL   DB$ASLC     ASL CREATE PROCESSOR 
 CDCS     SPACE  3,8
*         OVCAP  CD2COMP     DATA COMPARISON ROUTINES 
*                              USED BY MAPPING AND RELATIONS ROUTINES 
  
 CD2COMP  OVCAP  (DATA COMPARISON ROUTINES) 
 DC$CMPR  BECOMES DC$CMPR 
          EPT    DB$COMP
          NOEPT 
          INCL   BTFCOMP     CALLS DC$CMPR - DATA COMPARE ROUTINES
 CDCS     SPACE  3,8
*         OVCAP  CD2CONV     DATA TYPE CONVERSION ROUTINES
*                              USED BY SOME RECORD MAPPING CAPSULES 
  
 CD2CONV  OVCAP  (DATA CONVERSION ROUTINES) 
 DC$CONV  BECOMES DC$CONV 
          EPT    DB$CONV
          NOEPT 
          INCL   BTFCONV     CALLS DC$CONV - CONVERSION ROUTINES
 CDCS     SPACE  3
*         OVCAP  CD2CPRO     CONSTRAINT PROCESSOR CAPSULE 
  
 CD2CPRO  OVCAP  (CONSTRAINT PROCESSING)
 DB$CPRO  BECOMES DB$CPRO    REINSTATE CAPSULE ENTRY POINT
          EPT    DB$CPRO
          INCL   DB$CPRO     CONSTRAINT PROCESSOR 
 CDCS     SPACE  2
  
*         OVCAP  CD2DDIF     SCANNER AND SYNTAX MODS CAPSULE
  
 CD2DDIF  OVCAP  (CONSOLE DISPLAY SCANNER AND SYNTAX TABLES)
 DB$DDIF  BECOMES DB$DDIF    REINSTATE CAPSULE ENTRY POINTS 
 DB$DDVR  BECOMES DB$DDVR 
 DB$DSFS  BECOMES DB$DSFS 
 DB$DS15  BECOMES DB.DS15 
 DB$DS16  BECOMES DB.DS16 
 DB$DS17  BECOMES DB.DS17 
 DB$DS18  BECOMES DB.DS18 
 DB$DS19  BECOMES DB.DS19 
 DB$DS21  BECOMES DB.DS21 
 DB$DS22  BECOMES DB.DS22 
 DB$DS24  BECOMES DB.DS24 
 DB$DS26  BECOMES DB.DS26 
 DB$DS27  BECOMES DB.DS27 
 DB$DS29  BECOMES DB.DS29 
 DB$DS32  BECOMES DB.DS32 
 DB$DS33  BECOMES DB.DS33 
 DB$DS36  BECOMES DB.DS36    VALIDATE 7 CHARACTER NAME (DB$DSNI)
 DB$DS37  BECOMES DB.DS37    SAVE VERSION NAME         (DB$DSNI)
 DB$NO    BECOMES DB$NO 
 DB$STDR  BECOMES DB$STDR 
 DB$YES   BECOMES DB$YES
          EPT    DB$DDIF
          EPT    DB$DDVR
          EPT    DB$NO
          EPT    DB$STDR
          EPT    DB$YES 
          INCL   DB$DDGN     CONSOLE DISPLAY DIAGNOSTIC PROCESSOR 
          INCL   DB$DDIF     DISPLAY INTERFACE
          INCL   DB$DSCN     OPERATOR COMMAND LEXICAL SCANNER 
          INCL   DB$DSMF     DISPLAY SEMANTICS TO MANIPULATE FLAGS
          INCL   DB$DSTX     TABLES FOR OPERATOR COMMANDS (SYNGEN)
          INCL   DB$STD      SYNTAX TABLE DRIVE FOR COMMANDS (COMPASS)
  
  
  
*         OVCAP  CD2DBPS     DATABASE PROCEDURE INTERFACE CAPSULE 
  
 CD2DBPS  OVCAP  (DATABASE PROCEDURE INTERFACE) 
 DB$CEDP  BECOMES DB$CEDP 
 DB$DPIF  BECOMES DB$DPIF 
 DB$DPII  BECOMES DB$DPII 
 DB$DPIR  BECOMES DB$DPIR 
          EPT    DB$CEDP
          EPT    DB$DPIF
          EPT    DB$DPII
          EPT    DB$DPIR
          INCL   DB$CEDP     (PREPARE FOR) CALL ERROR DBP-S (COMPASS) 
          INCL   DB$DPIF     DATABASE PROCEDURE INTERFACE 
 CDCS     SPACE  3
*         OVCAP  CD2DROP     DROPPING TRANSACTION CAPSULE 
  
 CD2DROP  OVCAP  (DROP A TRANSACTION) 
 DB$ASK$  BECOMES DB$ASK$ 
 DB$DRP$  BECOMES DB$DRP$ 
 DB$ERRE  BECOMES DB.ERRE 
 DB$GTI$  BECOMES DB$GTI$ 
 DB$UNDO  BECOMES DB.UNDO 
          EPT    DB$ASK$
          EPT    DB$DRP$
          EPT    DB$GTI$
          INCL   DB$ASK$     INQUIRE TRANSACTION SYMBIONT 
          INCL   DB$DRP$     DROP TRANSACTION SYMBIONT
          INCL   DB$GTI$     GET RESTART IDENTIFIER SYMBIONT
 CDCS     SPACE  3
*         OVCAP  CD2INVK     RUN UNIT INVOKE CAPSULE
  
 CD2INVK  OVCAP  (RUN UNIT INVOKE)
 DB$ACCM  BECOMES DB.ACCM 
 DB$ADAX  BECOMES DB.ADAX 
 DB$AREH  BECOMES DB.AREH 
 DB$ASLC  BECOMES DB.ASLC 
 DB$INV$  BECOMES DB$INV$ 
 DB$JFIN  BECOMES DB.JFIN 
 DB$QFIN  BECOMES DB.QFIN 
 DB$RFIN  BECOMES DB.RFIN 
 DB$SFIN  BECOMES DB$SFIN 
 DB$TFIN  BECOMES DB.TFIN 
          EPT    DB$INV$
          EPT    DB$SFIN
          INCL   DB$ASLF     ASL SEARCH PROCESSOR FOR SUBSCHEMA 
          INCL   DB$DFIN     INITIALIZE DBP LIBRARY 
          INCL   DB$INV$     INVOKE CONTROL SYMBIONT
          INCL   DB$SFIN     INITIALIZE SYSTEM FILES
 CDCS     SPACE  3
*         OVCAP  CD2JFIN     INITIALIZE JOURNAL LOG CAPSULE 
  
 CD2JFIN  OVCAP  (INITIALIZE JOURNAL LOGFILE) 
 DB$AREH  BECOMES DB.AREH 
 DB$JFIN  BECOMES DB$JFIN 
          EPT    DB$JFIN
          INCL   DB$JFIN     INITIALIZE JOURNAL LOG FILE
          INCL   DB$POLE     POSITION JOURNAL LOG TO EOI
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
 CDCS     SPACE  3
*         OVCAP  CD2JLOG     JOURNAL LOG CAPSULE
  
 CD2JLOG  OVCAP  (JOURNAL LOG RECOVERY POINT) 
 DB$BRIF  BECOMES DB.BRIF 
 DB$IOER  BECOMES DB.IOER 
 DB$JRPT  BECOMES DB$JRPT 
 DB$QRP   BECOMES DB.QRP
          EPT    DB$JRPT
          INCL   DB$JRPT     JOURNAL LOG RECOVERY POINT 
 CDCS     SPACE  3
*         OVCAP  CD2JORT     JOURNAL LOG/TRANSACTION COMMON CAPSULE 
  
 CD2JORT  OVCAP  (COMMON CODE, JOURNAL LOG AND TRANSACTIONS)
 DB$AREH  BECOMES DB.AREH 
 DB$ERRE  BECOMES DB.ERRE 
 DB$IOER  BECOMES DB$IOER 
 DB$JLCR  BECOMES DB$JLCR 
 DB$JLCT  BECOMES DB$JLCT 
 DB$JLH   BECOMES DB$JLH
 DB$JLO   BECOMES DB$JLO
 DB$JLRS  BECOMES DB$JLRS 
 DB$JRPT  BECOMES DB.JRPT 
 DB$RWTR  BECOMES DB$RWTR 
 DB$WR2J  BECOMES DB$WR2J 
          EPT    DB$IOER
          EPT    DB$JLCR
          EPT    DB$JLCT
          EPT    DB$JLH 
          EPT    DB$JLO 
          EPT    DB$JLRS
          EPT    DB$RWTR
          EPT    DB$WR2J
          NOEPT 
          INCL   DB$IOER     I-O ERROR ON LOG FILE
          INCL   DB$JLCT     JOURNAL LOG CONTROLLER 
          INCL   DB$JLH      CREATE A LOGGING RECORD
          INCL   DB$JLO      OUTPUT A JOURNAL LOG RECORD
          INCL   DB$JLRS     JOURNAL LOG FILE RESERVATION 
          INCL   DB$RWTR     REWRITE RECORD 
          INCL   DB$RWTW     REWRITE WORDS TO RMS (COMPASS) 
          INCL   DB$TRFW     TRANSACTION FILE WRITE 
          INCL   DB$WR2J     JOURNAL LOGGING FOR THE WRITE SYMBIONT 
 CDCS     SPACE  3
*         OVCAP  CD2MFP      RELATIONAL PROCESSING CAPSULE
  
 CD2MFP   OVCAP  (RELATION PROCESSING)
 DB$ACR   BECOMES DB.ACR
 DB$DPIF  BECOMES DB.DPIF 
 DB$MFP   BECOMES DB$MFP
 DC$CMPR  BECOMES DB.COMP 
          EPT    DB$MFP 
          INCL   DB$AKY      RELATIONAL RETRIEVAL BY ALTERNATE KEY
          INCL   DB$CMPR     MFP COMPARE PRIMITIVE
          INCL   DB$MFP      MULTIPLE FILE PROCESSOR
          INCL   DB$MKY      RELATIONAL RETRIEVAL VIA MAJOR KEY 
          INCL   DB$NKY      RELATIONAL RETRIEVAL VIA NON KEY 
          INCL   DB$PKY      RELATIONAL RETRIEVAL VIA PRIMARY KEY 
          INCL   DB$QUAL     PROCESS RELATION QUALIFICATION STACK 
 CDCS     SPACE  3
*         OVCAP  CD2PVC      PRIVACY CAPSULE
  
 CD2PVC   OVCAP  (PRIVACY CHECKING) 
 DB$DPIF  BECOMES DB.DPIF 
 DB$JLH   BECOMES DB.JLH
 DB$JLO   BECOMES DB.JLO
 DB$PVCA  BECOMES DB$PVCA 
 DB$PVCR  BECOMES DB$PVCR 
 DB$PVC$  BECOMES DB$PVC$ 
          EPT    DB$PVCA
          EPT    DB$PVCR
          EPT    DB$PVC$
          INCL   DB$PVCA     PERFORM AREA PRIVACY CHECK 
          INCL   DB$PVCR     PERFORM RECORD PRIVACY CHECK 
          INCL   DB$PVC$     PRIVACY CONTROL SYMBIONT 
          INCL   DB$SCRM     SCRAMBLE A THREE WORD STRING 
 CDCS     SPACE  3
*         OVCAP  CD2QRF      QRF PROCESSSING CAPSULE
  
 CD2QRF   OVCAP  (QUICK RECOVERY FILE PROCESSING) 
 DB$IOER  BECOMES DB.IOER 
 DB$JRPT  BECOMES DB.JRPT 
 DB$QFIN  BECOMES DB$QFIN 
 DB$QRF   BECOMES DB$QRF
 DB$QRP   BECOMES DB$QRP
          EPT    DB$QFIN
          EPT    DB$QRF 
          EPT    DB$QRP 
          INCL   DB$QFIN     INITIALIZE QUICK RECOVERY FILE 
          INCL   DB$QRF      QUICK RECOVERY FILE PROCESSOR
 CDCS     SPACE  3
*         OVCAP  CD2RELN     RELATION CAPSULE 
  
 CD2RELN  OVCAP  (RELATION SYMBIONT)
 DB$DPIF  BECOMES DB.DPIF 
 DB$MFP   BECOMES DB.MFP
 DB$PVCR  BECOMES DB.PVCR 
 DB$REL$  BECOMES DB$REL$ 
          EPT    DB$REL$
          INCL   DB$REL$     READ RELATION CONTROL SYMBIONT 
 CDCS     SPACE  3
*         OVCAP  CD2REL1     START/REWIND RELATION CAPSULE
  
 CD2REL1  OVCAP  (START/REWIND RELATION SYMBIONTS)
 DB$DPIF  BECOMES DB.DPIF 
 DB$RSR$  BECOMES DB$RSR$ 
 DB$RWR$  BECOMES DB$RWR$ 
          EPT    DB$RSR$
          EPT    DB$RWR$
          INCL   DB$RSR$     START RELATION SYMBIONT
          INCL   DB$RWR$     REWIND RELATION SYMBONT
 CDCS     SPACE  3
*         OVCAP  CD2TFIN     INITIALIZE TRF AND RIF CAPSULE 
  
 CD2TFIN  OVCAP  (INITIALIZE TRANSACTION RECOVERY AND RESTART-ID FILES) 
 DB$RFIN  BECOMES DB$RFIN 
 DB$TFIN  BECOMES DB$TFIN 
          EPT    DB$RFIN
          EPT    DB$TFIN
          NOEPT 
          INCL   DB$RFIN     INITIALIZE RESTART IDENTIFIER FILE 
          INCL   DB$RIDI     INITIALIZE RESTART IDENTIFIER
          INCL   DB$TFIN     INITIALIZE TRANSACTION RECOVERY FILE 
 CDCS     SPACE  3
*         OVCAP  CD2TRAN     TRANSACTION CAPSULE
  
 CD2TRAN  OVCAP  (TRANSACTION PROCESSING) 
 DB$BEG$  BECOMES DB$BEG$ 
 DB$CMT$  BECOMES DB$CMT$ 
 DB$ERRE  BECOMES DB.ERRE 
 DB$IOER  BECOMES DB.IOER 
 DB$JLH   BECOMES DB.JLH
 DB$JLO   BECOMES DB.JLO
 DB$QRP  BECOMES DB.QRP 
 DB$WART  BECOMES DB$WART 
          EPT    DB$BEG$
          EPT    DB$CMT$
          EPT    DB$WART
          INCL   DB$BEG$     BEGIN TRANSACTION SYMBIONT 
          INCL   DB$CMT$     COMMIT TRANSACTION SYMBIONT
          INCL   DB$WART     WRITE ART TO TRF 
 CDCS     SPACE  3
*         OVCAP  CD2TRJL     TRANSACTION AND JOURNAL LOG CAPSULE
  
 CD2TRJL  OVCAP  (COPY TRANSACTION TO JOURNAL LOG)
 DB$IOER  BECOMES DB.IOER 
 DB$JLCT  BECOMES DB.JLCT 
 DB$JLRS  BECOMES DB.JLRS 
 DB$TRJL  BECOMES DB$TRJL 
          EPT    DB$TRJL
          NOEPT 
          INCL   DB$TRJL     COPY TRF TO JOURNAL LOG FILE 
 CDCS     SPACE  3
*         OVCAP  CD2VER      VERSION CAPSULE
  
 CD2VER   OVCAP  (VERSION PROCESSING) 
 DB$ADAX  BECOMES DB.ADAX 
 DB$JLH   BECOMES DB.JLH
 DB$JLO   BECOMES DB.JLO
 DB$VEFI  BECOMES DB$VEFI 
 DB$VEPF  BECOMES DB$VEPF 
 DB$VEPN  BECOMES DB$VEPN 
 DB$VERL  BECOMES DB$VERL 
 DB$VER$  BECOMES DB$VER$ 
          EPT    DB$VEFI
          EPT    DB$VEPF
          EPT    DB$VEPN
          EPT    DB$VERL
          EPT    DB$VER$
          INCL   DB$VEMD     FIND VERSIONS DATA ON THE MD 
          INCL   DB$VER$     VERSION CHANGE SYMBIONT
          WEOF
 CDCSBTF  SPACE  5,20 
**        CDCSBTF - BATCH TEST FACILITY 
* 
*              BECAUSE OF THE TRANSFER ADDRESS DEFINED IN *CDCS*, THE 
*         TRANSFER ADDRESS OF *CDCSBTF* IS DECLARED IN *DB$$LDR*. THIS
*         SETS *CDCSBTF* AS THE TRANSFER ADDRESS FOR THE OVERLAY. 
  
 CDCSBTF  OVLAY  0,0,,(BATCH TEST FACILITY - UCP VERSION OF CDCS) 
          MAP    SBEX 
          LIB    (CDCSLIB,DMSLIB,FORTRAN,BAMLIB,SYMLIB,SYSLIB)
          IGNORE DB$DDFE     DISPLAY DRIVER FRONT END 
          IGNORE DB$DIDM     INITIALIZATION OF OPERATOR DISPLAY MANAGER 
          IGNORE DB$DROT     DISPLAY MANAGER ROLLOUT TASKS
          IGNORE DB$DUDF     UPDATE DYNAMIC DISPLAY FIELDS
          IGNORE DB$ROLL     ROLL OUT SCP FL (COMPASS)
 DB$ERSF  BECOMES DB$SFCL,FOREVER   SFCALL(SF.REGR) IS NOT USED IN BTF
          INCL   CDCS        MAIN PROGRAM FOR SCP CDCS
          INCL   CPUCIO      ISSUE SYSTEM CIO REQUESTS (COMPASS)
          INCL   DB$$ARM     BTF - SAVE AND RESTORE REGISTER A0 
          INCL   DB$$LDR     BTF - LOADER INTERFACE (COMPASS) 
          INCL   DB$$RCM     BTF - ISSUE RECALL REQUESTS (COMPASS)
          INCL   DB$$RTA     BTF - GET SUBROUTINE RETURN ADDRESS
          INCL   DB$$SIM     BTF - SIMULATE SYSTEM CONTROL POINT
          INCL   DB$$SYS     BTF - SUBSTITUTE FOR CPU.SYS (COMPASS) 
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$ABT$     ABORT SYMBIONT 
          IGNORE DB$ACCM     ESTIMATE CM USAGE FOR ACCOUNTING 
          INCL   DB$ACHK     CHECK AREA STATUS
          INCL   DB$ARRO     AUTO-RECOVERY ROLLOUT CONTROL
          INCL   DB$ATCH     ATTACH A FILE
          INCL   DB$ATCM     ATTACH MACRO (COMPASS) 
          INCL   DB$CALL     CALL PROCEDURE GIVEN ADDRESS (COMPASS) 
          INCL   DB$CBIN     CONVERT DISPLAY CODE TO BINARY (COMPASS) 
          INCL   DB$CDEB     BINARY TO DEC W/LEADING BLANKS (COMPASS) 
          INCL   DB$CDEC     BINARY TO DEC W/LEADING ZEROS (COMPASS)
          INCL   DB$CFIL     BLANK/BINARY ZERO CHARACTER FILL 
          INCL   DB$CKUP     CHECK TRANSACTION UPDATE COUNT 
          INCL   DB$CLOU     CLOSE OPEN UFT'S FOR THE AREA
          INCL   DB$CLSA     CLOSE AREA AND LOG THE CLOSE 
          INCL   DB$CLS$     CLOSE CONTROL SYMBIONT 
          INCL   DB$CMOH     CMM OVERFLOW HANDLER 
          INCL   DB$COCB     BINARY TO OCTAL W/LEADING BLANKS (COMPASS) 
          INCL   DB$COCT     BINARY TO OCTAL W/LEADING ZEORS (COMPASS)
          INCL   DB$CRMR     RECEIVE INPUT WITHOUT CALLING CMM
          INCL   DB$COM      FORCE COMMON AREAS LOADED IN 0,0 
          INCL   DB$DBPL     LOAD A DATABASE PROCEDURE (COMPASS)
          INCL   DB$DBS$     DATABASE STATUS CONTROL SYMBIONT 
          INCL   DB$DEL$     DELETE CONTROL SYMBIONT
          INCL   DB$DRT      DETERMINE RECORD ORDINAL 
          INCL   DB$DUMP     PRINT A MEMEORY DUMP (COMPASS) 
          INCL   DB$END$     TERMINATE CONTROL SYMBIONT 
          INCL   DB$ERR      ERROR/INFORMATIVE MESSAGE HANDLER
          INCL   DB$ERRI     INFORMATIONAL ERROR HANDLER
          INCL   DB$EXT      EXTEND NOS/BE SEQ. PERM FILE (COMPASS) 
          INCL   DB$FAM      SET FAMILY NAME (COMPASS)
          INCL   DB$FKLA     ALLOCATE BLOCK IN FILE KEY LIST (FKL)
          INCL   DB$FKLR     RELEASE BLOCK IN FILE KEY LIST (FKL) 
          INCL   DB$FLSH     FLUSH ALL AREAS ON SCHEMA
          INCL   DB$FPOS     RESTORE POSITION ON A SHARED FIT 
          INCL   DB$FSAV     SAVE POSITION ON A SHARED FIT
          INCL   DB$FSET     SELECT AND SET FIT FOR REQUESTED ACCESS
          INCL   DB$FSIO     SELECT AND SET FIT FOR INTERNAL ACCESS 
          INCL   DB$FTBZ     CHECK FOR BUSY FIT 
          INCL   DB$FTDX     END-OF-DATA HANDLER
          INCL   DB$FTEX     CRM ERROR HANDLER
          INCL   DB$FTMD     MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$GET      CRM RANDOM GET PROCESSOR 
          INCL   DB$GETN     CRM SEQUENTIAL GET PROCESSOR 
          INCL   DB$GOFT     GET OFT ENTRY
          INCL   DB$GOTO     JUMP TO GIVEN ADDRESS (COMPASS)
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          INCL   DB$ILL$     ABORT USER FOR ILLEGAL FUNCTION
          INCL   DB$INFO     FILINFO MACRO (COMPASS)
          INCL   DB$IO       MISC. CIO INTERFACES (COMPASS) 
          INCL   DB$IREC     INPUT RECEIVER 
          INCL   DB$ITC      INTERNAL TASK CREATOR
          INCL   DB$KMIF     KEY MAPPER INTERFACE 
          INCL   DB$LFET     DEFINE MODEL FET (COMPASS) 
          INCL   DB$LFN      GENERATE SPECIAL CDCS LFNS 
          INCL   DB$LINE     PRINT LINE ON OUTPUT LISTING 
          INCL   DB$LKA$     LOCK AREA SYMBIONT (EXCLUSIVE/PROTECTED) 
          INCL   DB$LKRU     RELEASE RUN-UNIT RECORD LOCKS
          INCL   DB$LNK      LINKED BLOCK CREATOR 
          INCL   DB$LNKD     LINKED BLOCK DELETER 
          INCL   DB$LNKG     GET LINKED BLOCK FROM SAVED LIST 
          INCL   DB$LNKS     SAVE A LINKED BLOCK FOR LATER USE
          INCL   DB$LOK      LOCK RECORD
          INCL   DB$LOK$     LOCK AREA CONTROL SYMBIONT (PROTECTED) 
          INCL   DB$MBA      ALLOCATE MANAGED BUFFER
          INCL   DB$MCAP     GET A MAPPING CAPSULE FROM MD
          INCL   DB$MDER     MD CRM ERROR PROCESSOR 
          INCL   DB$MF       CMM FIXED POSITION INTERFACE (COMPASS) 
          INCL   DB$MFI      INITIALIZE CMM.OWN EXIT (COMPASS)
          INCL   DB$MFO7     MEMORY OVERFLOW OPTION 7 
*         INCL   DB$MFO8     MEMORY OVERFLOW OPTION 8 
*         INCL   DB$MFO9     MEMORY OVERFLOW OPTION 9 
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$MTR      CDCS SCP MONITOR LOOP
          INCL   DB$NEED     COMPUTE NEED FOR INCREASED/DECREASED FITS
          IGNORE DB$NRR      SET *NO RERUN* BIT - IS NOT NEEDED IN BTF
          INCL   DB$OFET     CDCS OUTPUT FILE FET  (COMPASS)
          INCL   DB$OFTC     OFT CREATOR
          INCL   DB$OFTR     OFT RELEASE PROCESSOR
          INCL   DB$OPNM     INTERFACE TO CRM OPEN FUNCTION 
          INCL   DB$OPN$     OPEN CONTROL SYMBIONT
          INCL   DB$OVCB     OVCAP SUPERVISOR AND LINKAGE (COMPASS) 
          INCL   DB$OVLB     INTERFACE FOR LOADING OVERLAYS (COMPASS) 
          INCL   DB$PST      PURGE SCHEMA TABLES
          INCL   DB$PUNT     FATAL INTERNAL ERROR PROCESSOR 
          INCL   DB$PUSH     PUSH/POP WORDS ON STACK IN RCB (COMPASS) 
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RCBC     RCB CREATOR
          INCL   DB$RCBF     RCB FLAGS PROCESSOR
          INCL   DB$RCBQ     PLACE RCB INTO THE EXECUTION QUEUE 
          INCL   DB$RCHK     CHECK RECORD STATUS
          INCL   DB$RCLR     RECALL WITHOUT DB$IREC INTERFACE (COMPASS) 
          INCL   DB$RCVD     RECOVERY CORE DUMP 
          INCL   DB$RDM      I/O MACRO INTERFACES 
          INCL   DB$RDX$     READ SEQ OR RAN ON INDEX FILE SYMBIONT 
          INCL   DB$RD$      SEQ OR RANDOM READ CONTROL SYMBIONT
          INCL   DB$REW$     REWRITE CONTROL SYMBIONT 
          INCL   DB$RFIT     DEFINE MODEL FIT (COMPASS) 
          INCL   DB$RLSA     ASL RELEASE PROCESSOR
          INCL   DB$RLSF     DATA FILE RELEASE PROCESSOR
          INCL   DB$RLSP     DATA BASE PROCEDURE FILE RELEASE PROCESSOR 
          INCL   DB$RMIF     RECORD MAPPER INTERFACE
          INCL   DB$RNRD     RANDOM READ
          INCL   DB$RNRW     RANDOM REWRITE 
          INCL   DB$ROER     ROLLOUT ERROR HANDLER
          INCL   DB$ROLL     ROLLOUT SCP FL (COMPASS) 
          INCL   DB$RPT$     RECOVERY POINT CONTROL SYMBIONT
          INCL   DB$RSDC     RESET DELAY COUNTS 
          INCL   DB$RTN      CIO - RETURN INTERFACE (COMPASS) 
          INCL   DB$RW$      REWIND INDEX AND AREA FILE SYMBIONT
          INCL   DB$SCHD     SCP SCHEDULER LOOP 
          INCL   DB$SEK      CRM RANDOM SEEK PROCESSOR
          INCL   DB$SFCL     ISSUE SFCALL REQUESTS
          INCL   DB$SFIT     SET FIT FIELDS 
          INCL   DB$SFRD     READ FROM THE USER CONTROL POINT 
          INCL   DB$SFRT     SYSTEM FILE RETURN 
          INCL   DB$SFST     NON-INTERRUPTIBLE STATUS SFCALL
          INCL   DB$SFWR     WRITE TO THE USER CONTROL POINT
          INCL   DB$SIR$     IMMEDIATE RETURN CONTROL SYMBIONT
          INCL   DB$SKF$     SKIP ON AREA FILE SYMBIONT 
          IGNORE DB$SOSI     SWAP ONE USER OUT, SWAP ANOTHER USER IN
          INCL   DB$STR$     START CONTROL SYMBIONT 
          INCL   DB$STX$     START ON INDEX FILE SYMBIONT 
          INCL   DB$SWI      READ TABLE FROM SWAP FILE
*                DB$SWO      WRITE TABLE TO SWAP FILE (IN DB$SWI) 
          INCL   DB$SWPI     SWAP IN TABLES FOR A USER
          INCL   DB$SWPO     SWAP OUT TABLES FOR USER 
          INCL   DB$SYMB     CONTROL SYMBIONT ADDRESS LIST (COMPASS)
          INCL   DB$TARE     TERMINATE AREA USERS 
          INCL   DB$TQTC     TQT CREATOR
          INCL   DB$TQTD     TQT DELETER
          INCL   DB$TQTT     TQT TERMINATOR 
          INCL   DB$TRU      TERMINATE RUN UNIT 
          INCL   DB$TSCH     TERMINATE SCHEMA 
          INCL   DB$ULK$     UNLOCK AREA CONTROL SYMBIONT 
          INCL   DB$UNDU     DB$UNDO INTERFACE
          INCL   DB$WAIO     CRM - WA INTERFACE (COMPASS) 
          INCL   DB$WRP      COMMAND RUN-UNIT WRAP UP 
          INCL   DB$WRRM     WRITE RECORD MACRO (COMPASS) 
          INCL   DB$WRTZ     WRITE A Z TYPE RECORD TO OUTPUT  (COMPASS) 
          INCL   DB$WR2$     WRITE RANDOM CONTROL SYMBIONT
          INCL   DB$WSAR     RETURN THE WORKING STORAGE AREAS 
          WEOF
* 
*         PARTITION -- BEYOND THIS POINT IS CDCS INITIALIZATION.
* 
          INCL   DB$FARR     SYSTEM RECOVERY ROLLOUT ADDRESS (COMPASS)
          INCL   DB$AINT     CRACK CONTROL STATEMENT PARAMETERS 
          INCL   DB$ATCR     ATTACH FILES MACRO (COMPASS) 
          INCL   DB$ATWR     ATTACH FILES 
          INCL   DB$CAPL     LOAD AND LOCK CDCS OVCAPS
          INCL   DB$DRRD     READ DIRECTIVE FILE (COMPASS)
          INCL   DB$INIT     CDCS INITIALIZATION
          INCL   DB$MFLS     SET MAXIMUM FIELD LENGTH (COMPASS) 
          INCL   DB$MGFS     CMM - GET MAX FIXED BLOCK SIZE (COMPASS) 
          INCL   DB$MOE      CMM - OVERFLOW ENTRY INTERFACE (COMPASS) 
          INCL   DB$STAT     FILE STATUS FUNCTION (COMPASS) 
  
 CMM$ALF  BECOMES CMM.ALF,FOREVER 
 CMM$SBL  BECOMES CMM.SBL,FOREVER 
 CMM$SBM  BECOMES CMM.SBM,FOREVER 
 FDL$LDC  BECOMES FDL.LDC,FOREVER 
 DB$ACAI  BECOMES DB.ACAI,FOREVER 
 DB$ACCL  BECOMES DB.ACCL,FOREVER 
 DB$ACCN  BECOMES DB.ACCN,FOREVER 
 DB$ACM   BECOMES DB.ACM,FOREVER
 DB$ACM1  BECOMES DB.ACM1,FOREVER 
 DB$ACR   BECOMES DB.ACR,FOREVER
 DB$ADAX  BECOMES DB.ADAX,FOREVER 
 DB$AREH  BECOMES DB.AREH,FOREVER 
 DB$ASK$  BECOMES DB.ASK$,FOREVER 
 DB$BEG$  BECOMES DB.BEG$,FOREVER 
 DB$BRIF  BECOMES DB.BRIF,FOREVER 
 DB$CARS  BECOMES DB.CARS,FOREVER 
 DB$CEDP  BECOMES DB.CEDP,FOREVER 
 DB$CLSE  BECOMES DB.CLSE,FOREVER 
 DB$CMT$  BECOMES DB.CMT$,FOREVER 
 DB$CPRO  BECOMES DB.CPRO,FOREVER 
 DB$CPT   BECOMES DB.CPT,FOREVER
 DB$DPIF  BECOMES DB.DPIF,FOREVER 
 DB$DPII  BECOMES DB.DPII,FOREVER 
 DB$DPIR  BECOMES DB.DPIR,FOREVER 
 DB$DRAR  BECOMES DB.DRAR,FOREVER 
 DB$DRP$  BECOMES DB.DRP$,FOREVER 
 DB$ERRE  BECOMES DB.ERRE,FOREVER 
 DB$GTI$  BECOMES DB.GTI$,FOREVER 
 DB$INV$  BECOMES DB.INV$,FOREVER 
 DB$IOER  BECOMES DB.IOER,FOREVER 
 DB$IOT   BECOMES DB.IOT,FOREVER
 DB$JFIN  BECOMES DB.JFIN,FOREVER 
 DB$JLCR  BECOMES DB.JLCR,FOREVER 
 DB$JLCT  BECOMES DB.JLCT,FOREVER 
 DB$JLH   BECOMES DB.JLH,FOREVER
 DB$JLO   BECOMES DB.JLO,FOREVER
 DB$JLRS  BECOMES DB.JLRS,FOREVER 
 DB$JRPT  BECOMES DB.JRPT,FOREVER 
 DB$MFP   BECOMES DB.MFP,FOREVER
 DB$NCLK  BECOMES DB.NCLK,FOREVER 
 DB$NCPT  BECOMES DB.NCPT,FOREVER 
 DB$NIOT  BECOMES DB.NIOT,FOREVER 
 DB$OCAR  BECOMES DB.OCAR,FOREVER 
 DB$PROF  BECOMES DB.PROF,FOREVER 
 DB$PVCA  BECOMES DB.PVCA,FOREVER 
 DB$PVCR  BECOMES DB.PVCR,FOREVER 
 DB$PVC$  BECOMES DB.PVC$,FOREVER 
 DB$QFIN  BECOMES DB.QFIN,FOREVER 
 DB$QRF   BECOMES DB.QRF,FOREVER
 DB$QRFA  BECOMES DB.QRFA,FOREVER 
 DB$QRP   BECOMES DB.QRP,FOREVER
 DB$RCVR  BECOMES DB.RCVR,FOREVER 
 DB$RCLM  BECOMES RCL=,FOREVER
 DB$REL$  BECOMES DB.REL$,FOREVER 
 DB$RFIN  BECOMES DB.RFIN,FOREVER 
 DB$RFOR  BECOMES DB.RFOR,FOREVER 
 DB$RSR$  BECOMES DB.RSR$,FOREVER 
 DB$RUTR  BECOMES DB.RUTR,FOREVER 
 DB$RWR$  BECOMES DB.RWR$,FOREVER 
 DB$RWTR  BECOMES DB.RWTR,FOREVER 
 DB$SFIN  BECOMES DB.SFIN,FOREVER 
 DB$TERM  BECOMES DB.TERM,FOREVER 
 DB$TFIN  BECOMES DB.TFIN,FOREVER 
 DB$TIM$  BECOMES DB.TIM$,FOREVER 
 DB$TRJL  BECOMES DB.TRJL,FOREVER 
 DB$UNDO  BECOMES DB.UNDO,FOREVER 
 DB$VEFI  BECOMES DB.VEFI,FOREVER 
 DB$VEPF  BECOMES DB.VEPF,FOREVER 
 DB$VEPN  BECOMES DB.VEPN,FOREVER 
 DB$VERL  BECOMES DB.VERL,FOREVER 
 DB$VER$  BECOMES DB.VER$,FOREVER 
 DB$WART  BECOMES DB.WART,FOREVER 
 DB$WR2J  BECOMES DB.WR2J,FOREVER 
 DB$WR2K  BECOMES DB.WR2K,FOREVER 
 DC$CMPR  BECOMES DB.COMP,FOREVER 
 DC$CONV  BECOMES DB.CONV,FOREVER 
 CDCSBTF  SPACE  5,10 
*         FIXED OVERLAYS
* 
*         ALL OVERLAY EXCEPT 70,20 TO 70,40 ARE ORIGINED AT DB$FARR.
*         THIS OVERLAYS THE INITIALIZATION PORTION OF THE 0,0 OVERLAY.
CDCSBTF   SPACE  3,8
*         OVERLAY BTFBRIF    BASIC RECOVERY INTERFACE 
  
 BTFBRIF  OVLAY  04,0,DB$FARR,(BASIC RECOVERY INTERFACE)
DB$BRIF   BECOMES DB$BRIF 
          XFER   DB$BRIF
          MAP    SBX
          INCL   DB$BRIF     BASIC RECOVERY INTERFACE 
          INCL   DB$BRJB     CREATE DBREC CONTROL STATEMENTS
          INCL   DB$ROUT     CDCS ROUTE PROCESSING (COMPASS)
CDCS      SPACE  3,7
*         OVERLAY BTFCLSE    CLOSE FILES IN AN EMERGENCY
  
 BTFCLSE  OVLAY  07,0,DB$FARR,(MEMORY EMERGENCY - CLOSE FILES)
DB$CLSE   BECOMES DB$CLSE 
          XFER   DB$CLSE
          INCL   DB$CLSE     CLOSE FILES WHEN RSB IS SWAPPED OUT
          INCL   DB$OVBF     BUFFER SPACE (MUST BE AT END OF OVERLAY) 
 CDCSBTF  SPACE  3,7
*         OVERLAY BTFERRE    ERROR MESSAGE EDITOR 
  
 BTFERRE  OVLAY  30,0,DB$FARR,(ERROR MESSAGE EDITOR)
 DB$ERRE  BECOMES DB$ERRE 
          XFER   DB$ERRE
          INCL   DB$ERRE     ERROR MESSAGE EDITOR 
          INCL   DB$ERRM     ERROR/INFORMATIVE MESSAGE TEXT (COMPASS) 
 CDCSBTF  SPACE  3,8
*         OVERLAY BTFPROF    PRINT THE OUTPUT FILE
  
 BTFPROF  OVLAY  36,0,DB$FARR,(PRINT THE OUTPUT FILE) 
 DB$PROF  BECOMES DB$PROF 
          XFER   DB$PROF
          INCL   DB$PROF
          INCL   DB$ROPM
 CDCSBTF  SPACE  3,7
*         OVERLAY BTFRCVR    CDCS ABNORMAL END REPRIEVE ROUTINE 
  
 BTFRCVR  OVLAY  40,0,DB$FARR,(CDCS ABNORMAL END REPRIEVE ROUTINE)
 DB$RCVR  BECOMES DB$RCVR 
          XFER   DB$RCVR
          INCL   DB$RCVR     ABNORMAL END REPRIEVE ROUTINE
 CDCSBTF  SPACE  3,7
*         OVERLAY BTFTERM    CDCS NORMAL TERMINATION PROCEDURE
  
 BTFTERM  OVLAY  50,0,DB$FARR,(CDCS NORMAL TERMINATION PROCEDURE) 
 DB$TERM  BECOMES DB$TERM 
          NOEPT 
          XFER   DB$TERM
          INCL   DB$MGSS     CMM - GET SUMMARY STATISTICS (COMPASS) 
          INCL   DB$TERM     NORMAL TERMINATION PROCEDURE 
 CDCSBTF  SPACE  3,8
*         OVERLAY BTFUNDO    BACK OUT A TRANSACTION 
  
 BTFUNDO  OVLAY  60,0,DB$FARR,(BACK OUT A TRANSACTION)
 DB$UNDO  BECOMES DB$UNDO 
          XFER   DB$UNDO
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
          INCL   DB$UNDO     ROLL BACK TRANSACTION UPDATES
 CDCSBTF  SPACE 3,7 
*         OVERLAY BTFCARS    PRIMARY OVERLAY FOR AUTO-RECOVERY
  
 BTFCARS  OVLAY  70,0,DB$FARR,(PRIMARY OVERLAY FOR AUTO-RECOVERY) 
 DB$CARS  BECOMES DB$CARS 
          XFER   DB$CARS
          INCL   DB$CARS     CONTROL AUTO-RECOVERY SEQUENCE 
          INCL   DB$WRAR     WRAP UP AUTO-RECOVERY FOR A SCHEMA 
 CDCSBTF  SPACE 3,7 
*         OVERLAY BTFQRFA    APPLY QRF TO A DATABASE FOR AUTO-RECOVERY
  
 BTFQRFA  OVLAY  70,20,,(APPLY QRF TO A DATABASE FOR AUTO-RECOVERY) 
 DB$ACAI  BECOMES DB.ACAI 
 DB$QRFA  BECOMES DB$QRFA 
          XFER   DB$QRFA
          INCL   DB$IORE     CIO - READ INTERFACE (COMPASS) 
          INCL   DB$QRFA     APPLY QRF TO A DATABASE
 CDCSBTF  SPACE 3,7 
*         OVERLAY BTFRFOR    ROLL FORWARD FOR AUTO-RECOVERY 
  
 BTFRFOR  OVLAY  70,30,,(ROLL FORWARD FROM JOURNAL LOG FILE)
 DB$OCAR  BECOMES DB.OCAR 
 DB$RDLG  BECOMES DB$RDLG 
 DB$RFOR  BECOMES DB$RFOR 
          XFER   DB$RFOR
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORD INTO WORKING BUFFER
          INCL   DB$RFOR     ROLL FORWARD FOR AUTO-RECOVERY 
 CDCSBTF  SPACE 3,7 
*         OVERLAY BTFRUTR    ROLL BACKWARD FOR AUTO-RECOVERY
  
 BTFRUTR  OVLAY  70,40,,(ROLL BACKWARD FROM TRANSACTION RECOVERY FILE)
 DB$IOER  BECOMES DB.IOER 
 DB$OCAR  BECOMES DB.OCAR 
 DB$RUTR  BECOMES DB$RUTR 
 DB$WART  BECOMES DB$WART 
          XFER   DB$RUTR
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
          INCL   DB$RUTR     ROLL BACK UNCOMMITTED TRANSACTION
          INCL   DB$UNDO     ROLL BACK TRANSACTION UPDATES
          INCL   DB$WART     WRITE ART TO TRF 
 CDCSBTF  SPACE  5,7
*         BTF OVCAPS
 CDCSBTF  SPACE  3
*         OVCAP  BTFACAI     ATTACH AND CHECK AREA AND INDEX CAPSULE
*                            FOR AUTO-RECOVERY OR TRANSACTION 
  
 BTFACAI  OVCAP  (ATTACH/CHECK AREA/INDEX FOR RECOVERY/TRANSACTION) 
 DB$ACAI  BECOMES DB$ACAI 
 DB$IOER  BECOMES DB.IOER 
 DB$OCAR  BECOMES DB$OCAR 
          EPT    DB=ACAI
          EPT    DB=OCAR
          NOEPT 
          INCL   DB$ACAI     ATTACH AND CHECK AREA AND INDEX
          INCL   DB$ADDP     OBTAIN ADDRESS OF DBP
          INCL   DB$OCAR     OPEN AND CHECK AREA
 CDCSBTF  SPACE  3
 CDCSBTF  SPACE   3 
*         OVCAP  BTFACCN     ACCOUNTING CAPSULE 
  
 BTFACCN  OVCAP  (CDCS ACCOUNTING)
 DB$ACCL  BECOMES DB$ACCL 
 DB$ACCN  BECOMES DB$ACCN 
 DB$ACM   BECOMES DB$ACM
 DB$ACM1  BECOMES DB$ACM1 
 DB$ACR   BECOMES DB$ACR
 DB$CPT   BECOMES DB$CPT
 DB$IOT   BECOMES DB$IOT
 DB$NCLK  BECOMES DB$NCLK 
 DB$NCPT  BECOMES DB$NCPTR
 DB$NIOT  BECOMES DB$NIOT 
 DB$TIM$  BECOMES DB$TIM$ 
          EPT    DB=ACCL
          EPT    DB=ACCN
          EPT    DB=ACM 
          EPT    DB=ACM1
          EPT    DB=ACR 
          EPT    DB=CPT 
          EPT    DB=IOT 
          EPT    DB=NCLK
          EPT    DB=NCPT
          EPT    DB=NIOT
          EPT    DB=TIM$
          NOEPT 
          INCL   DB$ACCL     LOCATE ACCOUNTING TABLE
          INCL   DB$ACCN     TALLY ACCOUNTING INFORMATION 
          INCL   DB$ACCT     ACCOUNTING TABLE (COMPASS) 
          INCL   DB$ACM      INTERFACE TO DB$ACM1 FOR NOS 
          INCL   DB$ACM1     ISSUE TERMINATION ACCOUNTING MESSAGES
          INCL   DB$ACR      RELATIONAL READ ACCOUNTING 
          INCL   DB$CPT      SYSTEM TIME MACROS (COMPASS) 
          INCL   DB$TIM$     TIME CONTROL SYMBIONT
 CDCSBTF  SPACE  3
*         OVCAP  BTFADAX     ATTACH DATABASE AREA & INDEX CAPSULE 
  
 BTFADAX  OVCAP  (ATTACH DATABASE AREA/INDEX) 
 DB$ADAX  BECOMES DB$ADAX 
          EPT    DB=ADAX
          NOEPT 
          INCL   DB$ADAX     ATTACH DATABASE AREA AND INDEX FILES 
 CDCSBTF  SPACE  3,10 
*         OVCAP  BTFAKWR     WRITE AN AK RECORD WITH ZERO KEY 
  
 BTFAKWR  OVCAP  (WRITE AN AK RECORD WITH ZERO KEY) 
 DB$WR2K  BECOMES DB$WR2K 
          EPT    DB=WR2K
          NOEPT 
          INCL   DB$WR2K     WRITE AN AK RECORD WITH ZERO KEY 
 CDCSBTF  SPACE  3
*         OVCAP  BTFAREH     AUTO-RECOVERY OR TRANSACTION ERROR CAPSULE 
  
 BTFAREH  OVCAP  (ERROR HANDLING, AUTO-RECOVERY/TRANSACTIONS) 
 DB$AREH  BECOMES DB$AREH 
 DB$DRAR  BECOMES DB$DRAR 
          EPT    DB=AREH
          EPT    DB=DRAR
          NOEPT 
          INCL   DB$AREH     AUTO-RECOVERY ERROR HANDLER
          INCL   DB$AREM     AUTO-RECOVERY ERROR MESSAGE (COMPASS)
          INCL   DB$DRAR     DOWN AND RETURN AREA 
 CDCS     SPACE  3,8
*         OVCAP  BTFASLC     CREATE ACTIVE SUBSCHEMA LIST 
  
 BTFASLC  OVCAP  (CREATE ASL ENTRY) 
 DB$ASLC  BECOMES DB$ASLC    REINSTATE CAPSULE ENTRY POINT
          EPT    DB=ASLC
          INCL   DB$ASLC     ASL CREATE PROCESSOR 
 CDCSBTF  SPACE  3,8
*         OVCAP  BTFCOMP     DATA COMPARISON ROUTINES 
*                              USED BY MAPPING AND RELATIONS
  
 BTFCOMP  OVCAP  (DATA COMPARISON ROUTINES) 
 DC$CMPR  BECOMES DC$CMPR 
          EPT    DB=COMP
          NOEPT 
*         INCL   DC$CMPR     DC$CMPR IS CALLED BY BTFCOMP.
*                            BTFCOMP IS INCLUDED AUTOMATICALLY. 
 CDCSBTF  SPACE  3,8
*         OVCAP  BTFCONV     DATA TYPE CONVERSION ROUTINES
*                              USED BY SOME RECORD MAPPING CAPSULES 
  
 BTFCONV  OVCAP  (DATA CONVERSION ROUTINES) 
 DC$CONV  BECOMES DC$CONV 
          EPT    DB=CONV
          NOEPT 
*         INCL   DC$CONV     DC$CONV IS CALLED BY BTFCONV.
*                            BTFCONV IS INCLUDED AUTOMATICALLY. 
 CDCSBTF  SPACE  3
*         OVCAP  BTFCPRO     CONSTRAINT PROCESSOR CAPSULE 
  
 BTFCPRO  OVCAP  (CONSTRAINT PROCESSING)
 DB$CPRO  BECOMES DB$CPRO 
          EPT    DB=CPRO
          NOEPT 
          INCL   DB$CPRO     CONSTRAINT PROCESSOR 
  
 CDCSBTF  SPACE  3
*         OVCAP  BTFDBPS     DATABASE PROCEDURE INTERFACE CAPSULE 
  
 BTFDBPS  OVCAP  (DATABASE PROCEDURE INTERFACE) 
 DB$CEDP  BECOMES DB$CEDP 
 DB$DPIF  BECOMES DB$DPIF 
 DB$DPII  BECOMES DB$DPII 
 DB$DPIR  BECOMES DB$DPIR 
          EPT    DB=CEDP
          EPT    DB=DPIF
          EPT    DB=DPII
          EPT    DB=DPIR
          NOEPT 
          INCL   DB$CEDP     (PREPARE FOR) CALL ERROR DBP-S (COMPASS) 
          INCL   DB$DPIF     DATABASE PROCEDURE INTERFACE 
 CDCSBTF  SPACE  3
*         OVCAP  BTFDROP     DROPPING TRANSACTION CAPSULE 
  
 BTFDROP  OVCAP  (DROP A TRANSACTION) 
 DB$ASK$  BECOMES DB$ASK$ 
 DB$DRP$  BECOMES DB$DRP$ 
 DB$ERRE  BECOMES DB.ERRE 
 DB$GTI$  BECOMES DB$GTI$ 
 DB$UNDO  BECOMES DB.UNDO 
          EPT    DB=ASK$
          EPT    DB=DRP$
          EPT    DB=GTI$
          INCL   DB$ASK$     INQUIRE TRANSACTION SYMBIONT 
          NOEPT 
          INCL   DB$DRP$     DROP TRANSACTION SYMBIONT
          INCL   DB$GTI$     GET RESTART IDENTIFIER SYMBIONT
 CDCSBTF  SPACE  3
*         OVCAP  BTFINVK     RUN UNIT INVOKE CAPSULE
  
 BTFINVK  OVCAP  (RUN UNIT INVOKE)
 DB$ADAX  BECOMES DB.ADAX 
 DB$AREH  BECOMES DB.AREH 
 DB$ASLC  BECOMES DB.ASLC 
 DB$INV$  BECOMES DB$INV$ 
 DB$JFIN  BECOMES DB.JFIN 
 DB$QFIN  BECOMES DB.QFIN 
 DB$RFIN  BECOMES DB.RFIN 
 DB$SFIN  BECOMES DB$SFIN 
 DB$TFIN  BECOMES DB.TFIN 
          IGNORE DB$DUDF
          EPT    DB=INV$
          EPT    DB=SFIN
          NOEPT 
          INCL   DB$ASLF     ASL SEARCH PROCESSOR FOR SUBSCHEMA 
          INCL   DB$DFIN     INITIALIZE DBP LIBRARY 
          INCL   DB$INV$     INVOKE CONTROL SYMBIONT
          INCL   DB$SFIN     INITIALIZE SYSTEM FILES
 CDCSBTF  SPACE  3
*         OVCAP  BTFJFIN     INITIALIZE JOURNAL LOG CAPSULE 
  
 BTFJFIN  OVCAP  (INITIALIZE JOURNAL LOGFILE) 
 DB$AREH  BECOMES DB.AREH 
 DB$JFIN  BECOMES DB$JFIN 
          EPT    DB=JFIN
          NOEPT 
          INCL   DB$JFIN     INITIALIZE JOURNAL LOG FILE
          INCL   DB$POLE     POSITION JOURNAL LOG TO EOI
          INCL   DB$RDLG
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
 CDCSBTF  SPACE  3
*         OVCAP  BTFJLOG     JOURNAL LOG RECOVERY POINT CAPSULE 
  
 BTFJLOG  OVCAP  (JOURNAL LOG RECOVERY POINT) 
 DB$BRIF  BECOMES DB.BRIF 
 DB$IOER  BECOMES DB.IOER 
 DB$JRPT  BECOMES DB$JRPT 
 DB$QRP   BECOMES DB.QRP
          EPT    DB=JRPT
          NOEPT 
 DB$JLCR  BECOMES DB$JLCR 
          INCL   DB$JRPT     JOURNAL LOG RECOVERY POINT 
 CDCSBTF  SPACE  3
*         OVCAP  BTFJORT     JOURNAL LOG/TRANSACTION COMMON CAPSULE 
  
 BTFJORT  OVCAP  (COMMON CODE, JOURNAL LOG AND TRANSACTIONS)
 DB$AREH  BECOMES DB.AREH 
 DB$ERRE  BECOMES DB.ERRE 
 DB$IOER  BECOMES DB$IOER 
 DB$JLCT  BECOMES DB$JLCT 
 DB$JLH   BECOMES DB$JLH
 DB$JLO   BECOMES DB$JLO
 DB$JLRS  BECOMES DB$JLRS 
 DB$JRPT  BECOMES DB.JRPT 
 DB$RWTR  BECOMES DB$RWTR 
 DB$WR2J  BECOMES DB$WR2J 
          EPT    DB=IOER
          EPT    DB=JLCR
          EPT    DB=JLCT
          EPT    DB=JLH 
          EPT    DB=JLO 
          EPT    DB=JLRS
          EPT    DB=RWTR
          EPT    DB=WR2J
          NOEPT 
          INCL   DB$IOER     I-O ERROR ON LOG FILE
          INCL   DB$JLCT     JOURNAL LOG CONTROLLER 
          INCL   DB$JLH      CREATE A LOGGING RECORD
          INCL   DB$JLO      OUTPUT A JOURNAL LOG RECORD
          INCL   DB$JLRS     JOURNAL LOG RESERVATION
          INCL   DB$RWTR     REWRITE RECORD 
          INCL   DB$RWTW     REWRITE WORD TO RMS (COMPASS)
          INCL   DB$TRFW     WRITE TRANSACTION FILE 
          INCL   DB$WR2J     JOURNAL LOGGING FOR WRITE SYMBIONT 
 CDCSBTF  SPACE  3
*         OVCAP  BTFMFP      RELATIONAL PROCESSING CAPSULE
  
 BTFMFP   OVCAP  (RELATION PROCESSING)
 DB$ACR   BECOMES DB.ACR
 DB$DPIF  BECOMES DB.DPIF 
 DB$MFP   BECOMES DB$MFP
 DC$CMPR  BECOMES DB.COMP 
          EPT    DB=MFP 
          NOEPT 
          INCL   DB$AKY      RELATIONAL RETRIEVAL BY ALTERNATE KEY
          INCL   DB$CMPR     MFP COMPARE PRIMITIVE
          INCL   DB$MFP      MULTIPLE FILE PROCESSOR
          INCL   DB$MKY      RELATIONAL RETRIEVAL VIA MAJOR KEY 
          INCL   DB$NKY      RELATIONAL RETRIEVAL VIA NON KEY 
          INCL   DB$PKY      RELATIONAL RETRIEVAL VIA PRIMARY KEY 
          INCL   DB$QUAL     PROCESS RELATION QUALIFICATION STACK 
 CDCSBTF  SPACE  3
*         OVCAP  BTFPVC      PRIVACY CAPSULE
  
 BTFPVC   OVCAP  (PRIVACY CHECKING) 
 DB$DPIF  BECOMES DB.DPIF 
 DB$JLH   BECOMES DB.JLH
 DB$JLO   BECOMES DB.JLO
 DB$PVCA  BECOMES DB$PVCA 
 DB$PVCR  BECOMES DB$PVCR 
 DB$PVC$  BECOMES DB$PVC$ 
          EPT    DB=PVCA
          EPT    DB=PVCR
          EPT    DB=PVC$
          NOEPT 
          INCL   DB$PVCA     PERFORM AREA PRIVACY CHECK 
          INCL   DB$PVCR     PERFORM RECORD PRIVACY CHECK 
          INCL   DB$PVC$     PRIVACY CONTROL SYMBIONT 
          INCL   DB$SCRM     SCRAMBLE A THREE WORD STRING 
 CDCSBTF  SPACE  3
*         OVCAP  BTFQRF      QRF PROCESSING CAPSULE 
  
 BTFQRF   OVCAP  (QUICK RECOVERY FILE PROCESSING) 
 DB$IOER  BECOMES DB.IOER 
 DB$JRPT  BECOMES DB.JRPT 
 DB$QFIN  BECOMES DB$QFIN 
 DB$QRF   BECOMES DB$QRF
 DB$QRP   BECOMES DB$QRP
          EPT    DB=QFIN
          EPT    DB=QRF 
          EPT    DB=QRP 
          NOEPT 
          INCL   DB$QFIN     INITIALIZE QUICK RECOVERY FILE 
          INCL   DB$QRF      QUICK RECOVERY FILE PROCESSOR
 CDCSBTF  SPACE  3
*         OVCAP  BTFRELN     RELATION CAPSULE 
  
 BTFRELN  OVCAP  (RELATION SYMBIONT)
 DB$DPIF  BECOMES DB.DPIF 
 DB$MFP   BECOMES DB.MFP
 DB$PVCR  BECOMES DB.PVCR 
 DB$REL$  BECOMES DB$REL$ 
          EPT    DB=REL$
          NOEPT 
          INCL   DB$REL$     READ RELATION CONTROL SYMBIONT 
 CDCSBTF  SPACE  3
*         OVCAP  BTFREL1     START/REWIND RELATION CAPSULE
  
 BTFREL1  OVCAP  (START/REWIND RELATION SYMBIONTS)
 DB$DPIF  BECOMES DB.DPIF 
 DB$RSR$  BECOMES DB$RSR$ 
 DB$RWR$  BECOMES DB$RWR$ 
          EPT    DB=RSR$
          EPT    DB=RWR$
          NOEPT 
          INCL   DB$RSR$     START RELATION SYMBIONT
          INCL   DB$RWR$     REWIND RELATION SYMBIONT 
 CDCSBTF  SPACE  3
*         OVCAP  BTFTFIN     INITIALIZE TRF & RIF CAPSULE 
  
 BTFTFIN  OVCAP  (INITIALIZE TRANSACTION RECOVERY AND RESTART-ID FILES) 
 DB$RFIN  BECOMES DB$RFIN 
 DB$TFIN  BECOMES DB$TFIN 
          EPT    DB=RFIN
          EPT    DB=TFIN
          NOEPT 
          INCL   DB$RFIN     INITIALIZE RESTART IDENTIFIER FILE 
          INCL   DB$RIDI     INITIALIZE RESTART IDENTIFIER
          INCL   DB$TFIN     INITIALIZE TRANSACTION RECOVERY FILE 
 CDCSBTF  SPACE  3
*         OVCAP  BTFTRAN     TRANSACTION CAPSULE
  
 BTFTRAN  OVCAP  (TRANSACTION PROCESSING) 
 DB$BEG$  BECOMES DB$BEG$ 
 DB$CMT$  BECOMES DB$CMT$ 
 DB$ERRE  BECOMES DB.ERRE 
 DB$IOER  BECOMES DB.IOER 
 DB$JLH   BECOMES DB.JLH
 DB$JLO   BECOMES DB.JLO
 DB$QRP  BECOMES DB.QRP 
 DB$WART  BECOMES DB$WART 
          EPT    DB=BEG$
          EPT    DB=CMT$
          EPT    DB=WART
          NOEPT 
          INCL   DB$BEG$     BEGIN TRANSACTION SYMBIONT 
          INCL   DB$CMT$     COMMIT TRANSACTION SYMBIONT
          INCL   DB$WART     WRITE ART TO TRF 
 CDCSBTF  SPACE  3
*         OVCAP  BTFTRJL    TRANSACTION AND JOURNAL LOG CAPSULE 
  
 BTFTRJL  OVCAP  (COPY TRANSACTION TO JOURNAL LOG)
 DB$IOER  BECOMES DB.IOER 
 DB$JLCT  BECOMES DB.JLCT 
 DB$JLRS  BECOMES DB.JLRS 
 DB$TRJL  BECOMES DB$TRJL 
          EPT    DB=TRJL
          NOEPT 
          INCL   DB$TRJL     COPY TRF TO JOURNAL LOG FILE 
 BTF      SPACE  3
*         OVCAP  BTFVER      VERSION CAPSULE
  
 BTFVER   OVCAP  (VERSION PROCESSING) 
 DB$ADAX  BECOMES DB.ADAX 
 DB$JLH   BECOMES DB.JLH
 DB$JLO   BECOMES DB.JLO
 DB$VEFI  BECOMES DB$VEFI 
 DB$VEPF  BECOMES DB$VEPF 
 DB$VEPN  BECOMES DB$VEPN 
 DB$VERL  BECOMES DB$VERL 
 DB$VER$  BECOMES DB$VER$ 
          EPT    DB=VEFI
          EPT    DB=VEPF
          EPT    DB=VEPN
          EPT    DB=VERL
          EPT    DB=VER$
          NOEPT 
          INCL   DB$VEMD     FIND VERSIONS DATA ON THE MD 
          INCL   DB$VER$     VERSION CHANGE SYMBIONT
          WEOF
 DBMSTRD  SPACE  5,20 
**        DBMSTRD - MASTER DIRECTORY UTILITY
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE (0,0) OVERLAY
*         OF THE MASTER DIRECTORY UTILITY.
  
 DBMSTRD  OVLAY  0,0,,(MASTER DIRECTORY UTILITY)
          MAP    SBEX 
          LIB    (CDCSLIB,DMSLIB,FORTRAN,BAMLIB,SYMLIB,SYSLIB)
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$CALL     CALL PROCEDURE GIVEN ADDRESS (COMPASS) 
          INCL   DB$CDEB     BINARY TO DEC W/LEADING BLANKS (COMPASS) 
          INCL   DB$CDEC     BINARY TO DEC W/LEADING ZEROS (COMPASS)
          INCL   DB$CFIL     BLANK/BINARY ZERO CHARACTER FILL 
          INCL   DB$COCB     BINARY TO OCTAL W/LEADING BLANKS (COMPASS) 
          INCL   DB$COCT     BINARY TO OCTAL W/LEADING ZEROS (COMPASS)
          INCL   DB$DUMP     CENTRAL MEMORY DUMP
          INCL   DB$FTMD     MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$FTOD     OLD MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          IGNORE DB$LINE     DB$LINE IS ONLY CALLED FROM DB$DUMP
          INCL   DB$MABI     ABORT DBMSTRD RUN, INTERNAL ERROR
          INCL   DB$MGSS     CMM - GET SUMMARY STATISTICS (COMPASS) 
          INCL   DB$MLDO     LOAD OVCAPS (COMPASS)
          INCL   DB$MLDV     OVERLAY LOADER FOR DBMSTRD (COMPASS) 
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$MURR     UNIT RECORD ROUTINES (COMPASS) 
          INCL   DB$MV       CMM - VARIABLE POSITION INTERFACE (COMPASS)
          INCL   DB$OVCM     ABORT DUE TO CMM OVERFLOW
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RNRD     RANDOM READ - CIO (COMPASS)
          INCL   DB$RNRW     RANDOM REWRITE - CIO (COMPASS) 
          INCL   DB$STXP     PARAMETER BLOCK FOR DB$STD 
          INCL   DB$UADR     UPDATE MANAGED MEMORY BLOCK ADDRESS WORDS
          INCL   DB$UALC     ALLOCATE A MANAGED MEMORY BLOCK
          INCL   DB$UAOS     ADJUST TABLE OFFSET FOR SEGMENTED TABLES 
          INCL   DB$UAWS     ADJUST WORK SPACE IN A BLOCK 
          INCL   DB$UFRE     FREE A MANAGED MEMORY BLOCK
          INCL   DB$UPRT     PRINT A STRING 
          INCL   DB$URDS     RELEASE DISK SEGMENTS
          INCL   DB$USDS     SHRINK A DISK SEGMENT
          INCL   DB$UTLC     TABLE LENGTH CONTROL, CREATE DISK SEGMENTS 
          INCL   DB$WAIO     CRM - WA INTERFACE (COMPASS) 
 DB$MABT  BECOMES DB.MABT,FOREVER 
 DBMSTRD  SPACE  4,10 
**        DB$M10M - MDU (1,0) 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE OVERLAY THAT 
*         PROCESSES THE MASTER DIRECTORY INPUT. IT CONTAINS THE SYNTAX
*         AND SEMANTIC ROUTINES.
  
DB$M10M   OVLAY  1,0,,(SYNTAX PROCESSOR)
          XFER   DB$M10M
          MAP    SBX
          INCL   DB$CBIN     CONVERT DISPLAY CODE TO BINARY 
          INCL   DB$CKLT     CHECK LENGTH OF CURRENT WORD 
          INCL   DB$CKVS     VALIDATE ALL VSNS
          INCL   DB$CPFN     CHECK THAT LITERAL IS VALID PFN
          INCL   DB$MDPF     PFN UNIQUENESS VALIDATION
          INCL   DB$MDPG     GET A PFN TABLE SEGMENT
          INCL   DB$MDPS     SEARCH FOR A PFN ENTRY 
          INCL   DB$MOE      CMM - OVERFLOW ENTRY INTERFACE (COMPASS) 
          INCL   DB$MLD1     LOAD 2ND LEVEL OVERLAYS (COMPASS)
          INCL   DB$MSCN     LEXICAL SCANNER FOR SYNTAX ANALYSIS
          INCL   DB$SNTX     DBMSTRD SYNTAX TABLES (SYNGEN) 
          INCL   DB$SRAB     SEMANTIC ROUTINES FOR ABORTING RUN 
          INCL   DB$SRAC     ACCOUNTING DATA RELATED ROUTINES 
          INCL   DB$SRNM     NAME SEMANTIC ROUTINES 
          INCL   DB$SRPF     PFN SEMANTIC ROUTINES
          INCL   DB$SRRI     REINITIALIZE TEMP CELLS
          INCL   DB$SRSF     SET FLAGS SEMANTIC ROUTINES
          INCL   DB$SRTF     TEST FLAGS SEMANTIC ROUTINES 
          INCL   DB$SR10     CLEAR ALL FLAGS
          INCL   DB$SR11     CLOSE SCHEMA LFN 
          INCL   DB$SR13     SET DELETE FLAG IN SS DIRECTORY
          INCL   DB$SR14     ENDSCAN AND RETURN TO (0,0)
          INCL   DB$SR15     INITIALIZE FOR CREATION RUN
          INCL   DB$SR24     CREATE A VDT ENTRY 
          INCL   DB$SR29     PROCESS PF FOR SAME AS MASTER
          INCL   DB$SR30     STORE UNIT LIMIT 
          INCL   DB$SR41     STORE UPDATE LIMIT 
          INCL   DB$SR48     STORE MASTER INTO THE VDT
          INCL   DB$SR56     CHECK FOR DUPLICATE CHANGE ENTRY 
          INCL   DB$SR57     STORE LFN INTO FILENAM 
          INCL   DB$SR64     INITIALIZE FOR A RESTART 
          INCL   DB$SR66     BUILD CONSTRAINT USE TABLE 
          INCL   DB$SR67     CHECK CONSTRAINT USE TABLE 
          INCL   DB$SR73     COMPLETE VIT FOR CURRENT VERSION 
          INCL   DB$SR84     CHANGE ACCOUNTING DATA 
          INCL   DB$SR88     CREATE PIT ENTRY AND UPDATE VIT
          INCL   DB$SR89     VERIFY THAT VERSION EXISTS 
          INCL   DB$STAT     FILE STATUS FUNCTION (COMPASS) 
          INCL   DB$STD      SYNGEN TABLE DRIVER (COMPASS)
          INCL   DB$TBSR     TABLE SEARCH FUNCTION
          INCL   DB$UALB     ALLOCATE A GROUP OF MANAGED MEMORY BLOCKS
  
 DB$DIAG  BECOMES DB.DIAG,FOREVER 
 DB$SR04  BECOMES DB.SR04 
 DB$SR06  BECOMES DB.SR06 
 DB$SR07  BECOMES DB.SR07 
 DB$SR12  BECOMES DB.SR12 
 DB$SR16  BECOMES DB.SR16 
 DB$SR18  BECOMES DB.SR18 
 DB$SR52  BECOMES DB.SR52 
 DB$SR60  BECOMES DB.SR60 
 DB$SR63  BECOMES DB.SR63 
 DB$SR68  BECOMES DB.SR68 
 DB$SR69  BECOMES DB.SR69 
 DB$SR71  BECOMES DB.SR71 
 DB$SR72  BECOMES DB.SR72 
 DB$SR74  BECOMES DB.SR74 
 DB$SR75  BECOMES DB.SR75 
 DB$SR87  BECOMES DB.SR87 
 DB$SR90  BECOMES DB.SR90 
 DB$SR94  BECOMES DB.SR94 
 DB$SR1H  BECOMES DB.SR1H 
DBMSTRD   SPACE  3,3
 DB$M11M  OVLAY  1,01,,(AREA DIRECTORY AND INFO BUILDER)
          INCL   DB$SRDM
DBMSTRD   SPACE  2,3
 DB$SR07  OVLAY  1,10,,(BUILD AND VERIFY SCHEMA ENTRY)
          XFER   DB$SR07
DBMSTRD   SPACE  2,3
 DB$SR12  OVLAY  1,12,,(REMOVE SCHEMA ENTRY FROM DIRECTORY) 
          XFER   DB$SR12
          INCL   DB$MDDP     DELETE PFN TABLE ENTRIES 
          INCL   DB$MDSC     SEARCH SCHEMA DIRECTORY
DBMSTRD   SPACE  2,3
 DB$SR16  OVLAY  1,14,,(INITIALIZE FOR ADD/DELETE/MODIFY) 
          XFER   DB$SR16
DBMSTRD   SPACE  2,3
 DB$SR18  OVLAY  1,16,,(INITIALIZE FOR A MODIFY RUN)
          XFER   DB$SR18
          INCL   DB$MDSC     SEARCH SCHEMA DIRECTORY
DBMSTRD   SPACE  2,3
 DB$SR52  OVLAY  1,22,,(CHANGE AREA TO SAME AS MASTER)
          XFER   DB$SR52
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
DBMSTRD   SPACE  2,3
 DB$SR63  OVLAY  1,26,,(CHANGE TRANSACTION RECOVERY FILE INFO)
          XFER   DB$SR63
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
          INCL   DB$MDPR     REPLACE PF DATA IN PFN TABLE 
DBMSTRD   SPACE  2,3
 DB$SR68  OVLAY  1,27,,(DELETE A VERSION) 
          XFER   DB$SR68
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
DBMSTRD   SPACE  2,3
 DB$SR69  OVLAY  1,30,,(CHANGE TRANSACTION RECOVERY FILE INFO)
          XFER   DB$SR69
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
          INCL   DB$MDPR     REPLACE PF DATA IN PFN TABLE 
DBMSTRD   SPACE  2,3
 DB$SR71  OVLAY  1,31,,(REPLACE AREA PF DATA) 
          XFER   DB$SR71
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
          INCL   DB$MDPR     REPLACE PF DATA IN PFN TABLE 
DBMSTRD   SPACE  2,3
 DB$SR72  OVLAY  1,32,,(REPLACE AREA INDEX PF DATA) 
          XFER   DB$SR72
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
          INCL   DB$MDPR     REPLACE PF DATA IN PFN TABLE 
DBMSTRD   SPACE  2,3
 DB$SR74  OVLAY  1,34,,(IS THIS A NON-DUPLICATE CHANGE OF THIS AREA)
          XFER   DB$SR74
DBMSTRD   SPACE  2,3
 DB$SR75  OVLAY  1,35,,(CLEAR *AREA CHANGED* FLAGS) 
          XFER   DB$SR75
DBMSTRD   SPACE  2,3
 DB$SR90  OVLAY  1,45,,(CHANGE PF INFO FOR CURRENT FILE TYPE) 
          XFER   DB$SR90
          INCL   DB$MDDF     DELETE ONE ENTRY FROM THE PFN TABLE
          INCL   DB$MDPR     REPLACE PF DATA IN PFN TABLE 
DBMSTRD   SPACE  2,3
 DB$SR1H  OVLAY  1,56,,(REPLACE LOG OPTIONS FOR CHANGE AREA CLAUSE) 
          XFER   DB$SR1H
 DBMSTRD  SPACE  4,10 
**        DB$M20M - MDU (2,0) 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE OVERLAY THAT 
*         READS AN OLD MASTER DIRECTORY AND WRITES THE NEW MASTER 
*         DIRECTORY (LESS THE NEW CST-S). 
  
 DB$M20M  OVLAY  2,0,,(READ OLD MD - WRITE NEW MD)
          XFER   DB$M20M
          INCL   DB$MDPG     GET A PFN TABLE SEGMENT
          INCL   DB$MDRD     READ EXISTING MD ENTRIES 
          INCL   DB$MDTR     TRANSFER ENTRIES BETWEEN MD-S
          INCL   DB$MDWD     WRITE OUT MD FROM MEMORY 
          INCL   DB$MDWS     WRITE A LENGTH CONTROLLED TABLE TO THE MD
          INCL   DB$MDWU     WRITE CW, SD, JLT, AND LFN TABLES
 DBMSTRD  SPACE  4,10 
**        DB$M30M - MDU (3,0) 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE OVERLAY THAT 
*         BUILDS THE NEW CST-S AND WRITES THEM TO THE NEW MASTER
*         DIRECTORY.
  
 DB$M30M  OVLAY  3,0,,(CST BUILDER) 
          XFER   DB$M30M
          INCL   DB$CBLD     CST BUILDER - MAIN MODULE
          INCL   DB$CCLS     CLOSE SCHEMA/SUBSCHEMA FILES 
          INCL   DB$CECM     ERROR HANDLER FOR CMM OVERFLOW 
          INCL   DB$CERM     ERROR HANDLER FOR CRM ERRORS 
          INCL   DB$CGSD     GET FROM SCHEMA/SUBSCHEMA FILE 
          INCL   DB$CLOK     BUILD PRIVACY LOCK TABLE 
          INCL   DB$CNSC     USE ENTRY NAME FOR SCHEMA GET
          INCL   DB$COPT     BUILD PROCEDURE OPTION TABLE 
          INCL   DB$CORD     FIND DATABASE PROCEDURE ORDINAL
          INCL   DB$CPUT     PUT WORDS IN MASTER DIRECTORY
          INCL   DB$MGOS     CMM - GET OVERFLOW STATISTICS (COMPASS)
          INCL   DB$MLD3     LOAD 2ND LEVEL OVERLAYS (COMPASS)
          INCL   DB$MOE      CMM - OVERFLOW ENTRY INTERFACE (COMPASS) 
          INCL   DB$SCRM     SCRAMBLE A THREE WORD STRING 
          INCL   DB$USHR     SHRINK A MANAGED MEMORY BLOCK
  
 DB$CARE  BECOMES DB.CARE 
 DB$CBEG  BECOMES DB.CBEG 
 DB$CCHK  BECOMES DB.CCHK 
 DB$CCON  BECOMES DB.CCON 
 DB$CCPP  BECOMES DB.CCPP 
 DB$CEND  BECOMES DB.CEND 
 DB$CERR  BECOMES DB.CERR,FOREVER 
 DB$COPN  BECOMES DB.COPN 
 DB$COUT  BECOMES DB.COUT 
 DB$CPRE  BECOMES DB.CPRE 
 DB$CREC  BECOMES DB.CREC 
 DB$CREL  BECOMES DB.CREL 
DBMSTRD   SPACE  4,8
* *       DB$M31M - MDU (3,1) 
* 
*         CST BUILDER INITIALIZATION ROUTINES 
  
 DB$M31M  OVLAY  3,1,,(CST BUILDER INITIALIZATION ROUTINES) 
          INCL   DB$CBEG     BEGIN CST BUILDING 
          INCL   DB$CCHK     COMPARE SCHEMA/SUBSCHEMA CHECKSUMS 
          INCL   DB$CCPP     CONSTRAINT PREPROCESSOR
          INCL   DB$COPN     OPEN SCHEMA/SUBSCHEMA FILES
          INCL   DB$CPRE     PREPARE TO BUILD WORK BLOCKS 
DBMSTRD   SPACE  4,8
* *       DB$M32M - MDU (3,2) 
* 
*         BUILD AREA WORK BLOCK 
  
 DB$M32M  OVLAY  3,2,,(BUILD AREA WORK BLOCK) 
          XFER   DB$CARE
          INCL   DB$CARE     BUILD AREA WORK BLOCK
DBMSTRD   SPACE  4,8
* *       DB$M33M - MDU (3,3) 
* 
*         BUILD RECORD WORK BLOCK 
  
 DB$M33M  OVLAY  3,3,,(BUILD RECORD WORK BLOCK) 
          XFER   DB$CREC
          INCL   DB$CREC     BUILD RECORD WORK BLOCK
DBMSTRD   SPACE  4,8
* *       DB$M34M - MDU (3,4) 
* 
*         BUILD RELATION WORK BLOCK 
  
 DB$M34M  OVLAY  3,4,,(BUILD RELATION WORK BLOCK) 
          XFER   DB$CREL
          INCL   DB$CREL     BUILD RELATION WORK BLOCK
DBMSTRD   SPACE  4,8
* *       DB$M35M - MDU (3,5) 
* 
*         BUILD CONSTRAINT WORK BLOCK 
  
 DB$M35M  OVLAY  3,5,,(BUILD CONSTRAINT WORK BLOCK) 
          XFER   DB$CCON
          INCL   DB$CCON     BUILD CONSTRAINT WORK BLOCK
DBMSTRD   SPACE  4,8
* *       DB$M36M - MDU (3,6) 
* 
*         CST BUILDER WRAP-UP ROUTINES
  
 DB$M36M  OVLAY  3,6,,(CST BUILDER WRAP-UP ROUTINES)
          INCL   DB$CEND     END CST BUILDING 
          INCL   DB$COUT     OUTPUT CST BUILDER STATISTICS
DBMSTRD   SPACE  4,8
* *       DB$M37M - MDU (3,7) 
* 
*         CST BUILDER FATAL ERROR PROCESSOR 
  
 DB$M37M  OVLAY  3,7,,(CST BUILDER FATAL ERROR PROCESSOR) 
          XFER   DB$CERR
          INCL   DB$CERR     FATAL ERROR HANDLER
 DB$CERR  BECOMES DB$CERR 
 DBMSTRD  SPACE  4,10 
**        DB$M40M - MDU (4,0) 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE OVERLAY THAT 
*         PREPARES THE MASTER DIRECTORY CONTENTS REPORT.
  
 DB$M40M  OVLAY  4,0,,(WRITE MASTER DIRECTORY CONTENTS REPORT)
          XFER   DB$M40M
          INCL   DB$MDR1     READ EXISTING MD ENTRIES 
          INCL   DB$MDR2     FORMAT AND PRINT MD CONTENTS 
          INCL   DB$USHR     SHRINK A MANAGED MEMORY BLOCK
DBMSTRD   SPACE  4,8
**        DB$MABT - MDU (5,0) 
* 
*         ABORT DBMSTRD RUN 
  
 DB$MABT  OVLAY  5,0,,(ABORT DBMSTRD RUN) 
          XFER   DB$MABT
 DB$MABT  BECOMES DB$MABT 
DBMSTRD   SPACE  4,8
*         - -  O V C A P S   - -
  
*         OVCAP  DB$DIAG     SYNTAX SCANNER DIAGNOSTICS 
  
 DB$DIAG  OVCAP  (SYNTAX SCANNER DIAGNOSTICS) 
          EPT    DB$DIAG
          NOEPT 
          INCL   DB$DADD     DIAGNOSTIC TEXT (COMPASS)
*         INCL   DB$DIAG     ISSUE DIAGNOSTIC MESSAGE 
 DB$DIAG  BECOMES DB$DIAG 
 DB$MABT  BECOMES DB.MABT 
  
          WEOF
 DBRST    SPACE  5,20 
**        DBRCN/DBRST - RECONSTRUCT/RESTORE UTILITY 
* 
*              THIS SECTION DEFINES THE ROUTINES WHICH MAKE UP THE
*         RECOVERY UTILITY (RECONSTRUCT / RESTORE). 
*         IT IS A SINGLE OVERLAY STRUCTURE, 
*         WITH TWO ENTRY POINTS, *DBRCN* AND *DBRST*. 
  
 DBRCVR   OVLAY  0,0,,(RECONSTRUCT/RESTORE UTILITY) 
          LIB    (CDCSLIB,SRT5LIB,BAMLIB,FORTRAN,SYMLIB,SYSLIB) 
          MAP    SBEX 
          IGNORE DB$FLOP     SUPPRESS FLOW POINT PROCESSING 
          IGNORE DB$IREC     SUPPRESS DB$IREC CALL FROM DB$RCLL 
          IGNORE SETUP.      AVOID CRM REPRIEVE 
          INCL   CPUCIO      ISSUE SYSTEM CIO REQUESTS (COMPASS)
          INCL   DBRCN             RECONSTRUCT - MAIN PROGRAM 
          INCL   DBRST       RESTORE - MAIN PROGRAM 
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$ARAT     ATTACH A DATABASE AREA AND INDEX FILE
          INCL   DB$ARRN     RETURN A DATABASE AREA AND INDEX FILE
          INCL   DB$ATCR     ATTACH MACRO WITH RECALL (COMPASS) 
          INCL   DB$ATWR     ATTACH A FILE WITH RECALL
          INCL   DB$CBIN     CONVERT DISPLAY CODE TO BINARY 
          INCL   DB$CDEB     BINARY TO DECIMAL W/LEADING BLANKS(COMPASS)
          INCL   DB$CDEC     BINARY TO DECIMAL W/LEADING ZEROS (COMPASS)
          INCL   DB$CDIS     CONVERT NUMBER TO DISPLAY CODE 
          INCL   DB$CFIL     BLANK/BINARY ZERO CHARACTER FILL 
          INCL   DB$CLOG     CLOSE LOG FILES
          INCL   DB$COCB     BINARY TO OCTAL W/LEADING BLANKS (COMPASS) 
          INCL   DB$COCT     BINARY TO OCTAL W/LEADING ZEROS (COMPASS)
          INCL   DB$CRCK     CHECK LOG RECORD FOR ACCEPTABILITY 
          INCL   DB$CRDL     DELETE CRITERIA TABLE ENTRY
          INCL   DB$CREV     CHECK FOR BEGIN/END CRITERIA EVENTS
          INCL   DB$CRIN     BUILD CRITERIA TABLE 
          INCL   DB$DADD     DIAGNOSTIC TEXT (COMPASS)
          INCL   DB$DBPL     LOAD A DATABASE PROCEDURE
          INCL   DB$DIAG     ISSUE DIAGNOSTIC MESSAGE 
          INCL   DB$EXT      EXTEND NOS/BE SEQ. PERM FILE (COMPASS) 
          INCL   DB$FAM      SET FAMILY NAME (COMPASS)
          INCL   DB$FTMD     MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          INCL   DB$IO       MISC. CIO INTERFACES (COMPASS) 
          INCL   DB$JFIT     JOURNAL LOG MODEL FIT (COMPASS)
          INCL   DB$JLBA     FORMAT BEFORE/AFTER LOG RECORD 
          INCL   DB$JLCL     FORMAT CLOSE LOG RECORD
          INCL   DB$JLIN     FORMAT INVOKE LOG RECORD 
          INCL   DB$JLOG     OUTPUT TO PRIMARY AND SECONDARY LOGFILES 
          INCL   DB$JLOP     FORMAT OPEN LOG RECORD 
          INCL   DB$JLRP     FORMAT RECOVERY POINT LOG RECORD 
          INCL   DB$JLST     LIST A LOG RECORD
          INCL   DB$JLTM     FORMAT TERMINATE LOG RECORD
          INCL   DB$LFN      GENERATE SPECIAL CDCS LFNS 
          INCL   DB$LNIF     ACTIVATE LOGGING FILES 
          INCL   DB$LNK      LINKED BLOCK CREATOR 
          INCL   DB$LNKD     LINKED BLOCK DELETER 
          INCL   DB$MABT     ABORT DBMSTRD RUN
          INCL   DB$MDER     MD CRM ERROR PROCESSOR 
          INCL   DB$MF       CMM FIXED POSITION INTERFACE (COMPASS) 
          INCL   DB$MGSS     CMM - GET SUMMARY STATISTICS (COMPASS) 
          INCL   DB$MSCN     LEXICAL SCANNER FOR SYNTAX ANALYSIS
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$MURR     UNIT RECORD ROUTINES (COMPASS) 
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RCLL     RECALL MACRO (COMPASS) 
          INCL   DB$RINP     RECOVER/RESTORE INPUT PROCESSOR
          INCL   DB$RPV      RPV INTERFACE (COMPASS)
          INCL   DB$RSEL     SELECT LOGFILE RECORDS 
          INCL   DB$RSTX     RECOVER/RESTORE SYNTAX TABLES (SYNGEN) 
          INCL   DB$RTN      CIO - RETURN INTERFACE (COMPASS) 
          INCL   DB$RUPD     RECOVER/RESTORE UPDATE ROUTINE 
          INCL   DB$RVRS     RECOVER/RESTORE CONTROL ROUTINE
          INCL   DB$SORT     RECOVER/RESTORE *SORT* INTERFACE 
          INCL   DB$STA      OUTPUT AREA STATISTICS 
          INCL   DB$STAT     FILE STATUS FUNCTION (COMPASS) 
          INCL   DB$STD      SYNGEN TABLE DRIVER (COMPASS)
          INCL   DB$STT      OUTPUT TOTAL STATISTICS
          INCL   DB$STXP     PARAMETER BLOCK FOR DB$STD 
          INCL   DB$UPRT     PRINT A STRING 
          INCL   DB$UQIN     QRF INITIALIZATION 
          INCL   DB$VEMD     FIND VERSIONS DATA IN MD 
          INCL   DB$WAIO     CRM - WA INTERFACE (COMPASS) 
          WEOF
 DBQRFA   SPACE  5,20 
**        DBQRFA - PROGRAM FOR APPLYING A QRF TO A DATABASE 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE UTILITY
*         WHICH APPLIES THE QUICK RECOVERY FILE TO A DATABASE.
  
 DBQRFA   OVLAY  0,0,,(APPLY A QRF TO A DATABASE) 
          LIB    (CDCSLIB,BAMLIB,SYMLIB,SYSLIB) 
          MAP    SBEX 
          IGNORE DB$FLOP     SUPPRESS FLOW POINT PROCESSING 
          IGNORE DB$IREC     SUPPRESS DB$IREC CALL FROM DB$RCLL 
          INCL   CPUCIO      ISSUE SYSTEM CIO REQUESTS (COMPASS)
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$ATCR     ATTACH MACRO WITH RECALL (COMPASS) 
          INCL   DB$ATWR     ATTACH A FILE WITH RECALL
          INCL   DB$CBIN     CONVERT DISPLAY CODE TO BINARY 
          INCL   DB$CDIS     CONVERT NUMBER TO DISPLAY CODE 
          INCL   DB$CFIL     BLANK/BINARY ZERO CHARACTER FILL 
          INCL   DB$COCB     BINARY TO OCTAL W/LEADING BLANKS (COMPASS) 
          INCL   DB$COCT     BINARY TO OCTAL W/LEADING ZEROS (COMPASS)
          INCL   DB$FAM      SET FAMILY NAME (COMPASS)
          INCL   DB$FTMD     MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          INCL   DB$IO       MISC. CIO INTERFACES (COMPASS) 
          INCL   DB$IORE     CIO - READ INTERFACE (COMPASS) 
          INCL   DB$LFN      CREATE LFN FOR FILE
          INCL   DB$LNK      LINK CMM BLOCK IN CHAIN
          INCL   DB$MDER     MD CRM ERROR PROCESSOR 
          INCL   DB$MF       CMM FIXED POSITION INTERFACE (COMPASS) 
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RCLL     RECALL MACRO (COMPASS) 
          INCL   DB$RNRW     CIO - REWRITER INTERFACE (COMPASS) 
          INCL   DB$RTN      CIO - RETURN INTERFACE (COMPASS) 
          INCL   DB$STAT     FILE STATUS FUNCTION (COMPASS) 
          INCL   DB$VEMD     FIND VERSIONS DATA ON MD 
          INCL   DB$WAIO     CRM - WA INTERFACE (COMPASS) 
          WEOF
 DBQRFI   SPACE  5,20 
**        DBQRFI - QUICK RECOVERY FILE INITIALIZER
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE UTILITY
*         THAT INITIALIZES THE QUICK RECOVERY FILE FOR USE BY CDCS. 
  
 DBQRFI   OVLAY  0,0,,(QUICK RECOVERY FILE INITIALIZER) 
          MAP    SBEX 
          INCL   CPUCIO      ISSUE SYSTEM CIO REQUESTS (COMPASS)
          WEOF
  
  
  
  
  
**        DBREC - BASIC RECOVERY UTILITY
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE (0,0)
*         OVERLAY OF THE BASIC RECOVERY UTILITY.
*              THERE WILL BE THREE OVERLAYS IN ALL COMPRISING THIS
*         UTILITY. THE MAIN OVERLAY AND TWO PRIMARY OVERLAYS. 
  
 DBREC    OVLAY  0,0,,(BASIC RECOVERY UTILITY)
          MAP    SBEX 
          LIB    (CDCSLIB,DMSLIB,FORTRAN,BAMLIB,SYSLIB,SYMLIB)
 DB$MABT  BECOMES DB$BABT,FOREVER 
 DB$PUNT  BECOMES DB$BUNT,FOREVER 
          USE    CTRL$AA     FORCE THE AAM CONTROLER INTO (0,0) OVERLAY 
          INCL   DB$ABRT     ABORT MACRO (COMPASS)
          INCL   DB$ATCR     ATTACH MACRO WITH RECALL (COMPASS) 
          INCL   DB$ATWR     ATTACH PROCESSOR 
          INCL   DB$BABT     ABORT DBREC RUN
          INCL   DB$BCCC     CRACK DBREC CONTROL CARD 
          INCL   DB$BERR     DBREC ERROR PROCESSOR
          INCL   DB$BETX     ERROR MESSAGE TEXT TABLE (COMPASS) 
          INCL   DB$BFTX     FORMAT MESSAGE TEXT
          INCL   DB$BOOM     OUT OF MEMORY -- CMM OVERFLOW
          INCL   DB$BPLD     OVERLAY LOADER FOR DBREC (COMPASS) 
          INCL   DB$BUNT     DBREC INTERNAL ERROR PROCESSOR 
          INCL   DB$CBIN     CONVERT DISPLAY TO BINARY (COMPASS)
          INCL   DB$CDEB     BINARY TO DECIML W/LEADING BLANKS (COMPASS)
          INCL   DB$CDIS     CONVERT NUMBER TO DISPLAY CODE 
          INCL   DB$COCB     BINARY TO OCTAL W/LEADING BLANKS (COMPASS) 
          INCL   DB$COCT     BINARY TO OCTAL W/LEADING ZEROS (COMPASS)
          INCL   DB$FAM      SET THE FAMILY NAME (COMPASS)
          INCL   DB$FTMD     MASTER DIRECTORY FIT (COMPASS) 
          INCL   DB$IGNR     ROUTINE FOR *IGNORE* MACRO (COMPASS) 
          IGNORE DB$IREC     SUPPRESS DB$IREC CALL FROM DB$RCLL 
          INCL   DB$MDER     MD CRM ERROR PROCESSOR 
          INCL   DB$MF       CMM FIXED POSITION INTERFACE (COMPASS) 
          INCL   DB$MGSS     GET CMM STATISTICS (COMPASS) 
          INCL   DB$MOE      CMM - OVERFLOW ENTRY INTERFACE (COMPASS) 
          INCL   DB$MSG      MESSAGE MACRO (COMPASS)
          INCL   DB$MURR     UNIT RECORD ROUTINES (COMPASS) 
          INCL   DB$RA0      ITEM WITH LOCATION OF RA+0 (COMPASS) 
          INCL   DB$RCLL     RECALL MACRO (COMPASS) 
          INCL   DB$STAT     FILE STATUS FUNCTION (COMPASS) 
          INCL   DB$STXP     PARAMETER BLOCK FOR DB$STD 
          INCL   DB$UPRT     PRINT A STRING 
          INCL   DB$WAIO     CRM - WA INTERFACE (COMPASS) 
  
  
  
**        DB$B10B - BRU (1,0) 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE OVERLAY
*         THAT PROCESSES THE DBREC INPUT. IT CONTAINS THE SYNTAX
*         AND SEMANTIC ROUTINES.
  
 DB$B10B  OVLAY  1,0,,(SYNTAX AND SEMANTIC ROUTINES)
          XFER   DB$B10B     MAIN PROC OF DBREC (1,0) OVERLAY 
          INCL   DB$BSES     END SYNTAX SCAN ON ERROR SEMANTIC ROUTINES 
          INCL   DB$BSNM     NAME SEMANTIC ROUTINES 
          INCL   DB$BSTF     TEST FLAGS SEMANTIC ROUTINES 
          INCL   DB$BSTX     BASIC RECOVERY SYNTAX CRACKER (SYNGEN) 
          INCL   DB$BS20     SEMANTIC ROUTINE TO SET UP EXTABLE ENTRIES 
          INCL   DB$BS50     TEST AND SET JOURNAL LOG FLAG
          INCL   DB$BS70     SEMANTIC ROUTINE TO VALIDATE AND STORE SIZE
          INCL   DB$BS99     END SYNTAX SCAN
          INCL   DB$DADD     DIAGNOSTIC TEXT (COMPASS)
          INCL   DB$DIAG     ISSUE DIAGNOSTIC MESSAGE 
          IGNORE DB$FLOP     SUPPRESS DB$FLOP CALL FROM DB$RDLG 
          INCL   DB$LNK      LINKED BLOCK CREATOR 
          INCL   DB$LNKD     LINKED BLOCK DELETOR 
          INCL   DB$MSCN     LEXICAL SCANNER FOR SYNTAX ANALYSIS
          INCL   DB$STD      SYNTAX TABLE DRIVER (COMPASS)
  
  
  
**        DB$B20B - BRU (2,0) 
* 
*              THIS SECTION DEFINES THE STRUCTURE OF THE OVERLAY
*         THAT WILL CONTROL THE EXECUTION OF THE DBREC DIRECTIVES.
  
 DB$B20B  OVLAY  2,0,,(EXECUTION OF DIRECTIVES) 
          XFER   DB$B20B     MAIN PROC OF DBREC (2,0) OVERLAY 
          INCL   DB$BALJ     ALLOCATE THE JOURNAL LOG FILE(S) 
          INCL   DB$BALL     ALLOCATE DIRECTIVE 
          INCL   DB$BALQ     ALLOCATE THE QUICK RECOVERY FILE 
          INCL   DB$BALR     ALLOCATE THE RESTART IDENTIFIER FILE 
          INCL   DB$BALT     ALLOCATE THE TRANSACTION RECOVERY FILE(S)
          INCL   DB$BDFT     MODEL LOGDUMP FILE FIT (COMPASS) 
          INCL   DB$BDLG     DUMP THE JOURNAL LOG FILE TO TAPE
          INCL   DB$BDPF     DUMP DIRECTIVE 
          INCL   DB$BGTF     GET A TAPE FILE
          INCL   DB$BUNS     USE NEW SCHEMA - INTERNAL DIRECTIVE
          INCL   DB$BURP     USER REPORT GENERATOR
          INCL   DB$BUTX     USER REPORT MESSAGE TEXT TABLE (COMPASS) 
          INCL   DB$DUMP     CENTRAL MEMORY DUMP INTERFACE(COMPASS) 
          INCL   DB$EXT      EXTEND NOS/BE PERM FILES (COMPASS) 
          INCL   DB$IO       MISC. CIO INTERFACES (COMPASS) 
          INCL   DB$LFET     JLF AND TRF MODEL FET (COMPASS)
          IGNORE DB$LINE     IGNORE CALL FROM DB$DUMP 
          INCL   DB$PRST     WRITE PRESET 
          INCL   DB$RDLG     READ A LOG RECORD
          INCL   DB$RDM      I/O MACRO INTERFACES (COMPASS) 
          INCL   DB$RDWW     READ WORDS INTO WORKING BUFFER (COMPASS) 
          INCL   DB$RELA     REQUEST OR LABEL MACRO (COMPASS) 
          INCL   DB$RFIT     RIF MODEL FIT (COMPASS)
          INCL   DB$RTN      CIO RETURN (COMPASS) 
          INCL   DB$WRRM     I/O MACRO INTERFACES (COMPASS) 
          WEOF
  
  
  
          ENDTBLS 
