*COMDECK UTCDFDCLS
  
# ******************************************************************** #
  
# FOLLOWING DEF WORDS USED BY CST BUILDER FOR EASIER CODE READABILITY#
  
        DEF CALL # #;        # USED FOR INTERNAL MODULE CALLS # 
        DEF CASE #GOTO#;     # USED FOR SWITCHES TO SIMULATE A CASE # 
        DEF LOOP #FOR DUMMYINDUCTN=DUMMYINDUCTN#;          #FOR WHILE#
        DEF OF # #;          # USED WITH CASE, E.G. CASE CHOICE[I] OF#
        DEF THRU #STEP 1 UNTIL#;       # USED FOR FOR-LOOPS # 
        DEF XCALL # #;       # USED FOR EXTERNAL MODULE CALLS # 
  
# THE FOLLOWING DECLARATION IS HERE TO ENSURE THAT LOOP IS USED OKAY #
  
        ITEM DUMMYINDUCTN I; # USED IN THE DEF OF "LOOP" ABOVE #
  
# THE FOLLOWING DEF CONSTANTS ARE USED BY THE CST BUILDER MODULES # 
  
        DEF DFBITSWD #60#;   # THE NUMBER OF BITS IN A COMPUTER WORD #
        DEF DFBLOCKS #9#;    # MEMORY BLOCKS ALLOCATED BY CST BUILDER#
        DEF DFCAPMAX #262143#;         # MAPPING CAPSULE MAXIMUM SIZE#
        DEF DFCHARWD #10#;   # THE NUMBER OF CHARACTERS IN A WORD # 
        DEF DFCSTMAX #32767#;# CST MAXIMUM LENGTH EXCLUDING CAPSULES #
        DEF DFDDLVEROL #O"365734"#;   # DDL VERSION NO - "3.1" DISPLAY #
        DEF DFDDLVER #O"365735"#;     # DDL VERSION NO - "3.2" DISPLAY #
  
        DEF DFDISZER #O"33"#;# THE DISPLAY CODE EQUIVALENT OF ZERO #
        DEF DFFUDGE  #256#;  # FUDGE FACTOR FOR COMPUTING CORE NEEDED#
        DEF DFNAMECH #30#;   # DB ELEMENT MAXIMUM NAME LENGTH IN CHAR#
        DEF DFNAMEWD #3#;    # DB ELEMENT MAXIMUM NAME LENGTH IN WORD#
        DEF DFNCITLEN #8#;   # LENGTH IN WORDS OF NEW CONSTR INTEG TBL #
        DEF DFNCITMEM #4#;   # WORD OFFSET OF MEMBER IN NEW CIT TABLE  #
        DEF DFNCITMEMNXT #6#; # WORD OFFSET OF NEXT MEMBER PTRS IN NCIT#
        DEF DFNCITNAM #1#;   # WORD OFFSET OF NAME IN NEW CIT TABLE    #
        DEF DFNCITNAMADR #2#; # WORD OFFSET OF NEXT ENTRY WA PAST NAME #
        DEF DFNCITNAMMEM #0#; # WORD OFFSET OF MEMBER WORD PAST NAME   #
        DEF DFNCITNAMOWN #1#; # WORD OFFSET OF OWNER WORD PAST NAME    #
        DEF DFNCITNXT #6#;   # WORD OFFSET OF NEXT ENTRY WA IN NCIT    #
        DEF DFNCITORD #7#;   # WORD OFFSET OF ORDINAL OF NEW CIT TABLE #
        DEF DFNCITOWN #5#;   # WORD OFFSET OF OWNER IN NEW CIT TABLE   #
        DEF DFNCITOWNNXT #7#; # WORD OFFSET OF NEXT OWNER PTRS IN NCIT #
        DEF DFORDMAX #4095#; # DB ELEMENT ORDINAL NUMBER MAXIMUM #
        DEF DFSBBUFF #195#;  # SUBSCHEMA DIRECTORY FILE BUFFER SIZE # 
        DEF DFSBFLAG #FALSE#;# SUBSCHEMA FLAG (AS OPPOSED TO SCHEMA) #
        DEF DFSBHEAD #12#;   # SUBSCHEMA ENTRY HEADER MAXIMUM WD SIZE#
        DEF DFSCBUFF #195#;  # SCHEMA DIRECTORY FILE BUFFER WORD SIZE#
        DEF DFSCFLAG #TRUE#; # SCHEMA FLAG (AS OPPOSED TO SUBSCHEMA) #
        DEF DFSCHEAD #9#;    # SCHEMA ENTRY HEADER MAXIMUM WORD SIZE #
  
*CALL MDDEFDCLS 
  
  
# ******************************************************************** #
  
