*DECK CDCS
      PRGM CDCS;
*CALL COPYRDCLS 
      BEGIN 
 #
* *   CDCS--CDCS MAIN PROGRAM                    PAGE  1
* *   C O GIMBER                                 11/04/75 
* 
* DC  PURPOSE 
* 
*     THIS IS THE MAIN MODULE FOR CDCS 2. 
* 
* DC  CALLING ROUTINES
* 
*     CONTROL CARD CALLABLE.
* 
* DC  CALLED ROUTINES 
# 
      XREF PROC CMMSHA;      #RESPECIFY HIGHEST HIGH ADDRESS           #
      XREF PROC DB$INIT;     #CDCS INITIALIZATION ROUTINE#
      XREF PROC DB$MTR;      #CDCS MONITOR# 
# 
*     EXTERNALLY DEFINED VARIABLE 
# 
          XDEF ITEM DB$HHAE;  #HIGHEST HIGH ADDRESS AT EXECUTION TIME  #
 #
# 
  
  
#     B E G I N   C D C S   E X E C U T A B L E   C O D E .            #
  
 #
* 
* DC  DESCRIPTION 
* 
*     CALL CDCS INITIALIZATION ROUTINE. 
 #
      DB$INIT;
 #
*     SPECIFY THE HIGHEST HIGH ADDRESS DURING CDCS EXECUTION. 
 #
      CMMSHA(DB$HHAE);
 #
*     CALL CDCS MONITOR.
 #
      DB$MTR; 
      END 
      TERM; 
