         << LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION >>     00000001
                                                                        00010000
COMMENT                                                                 00015000
<<**********************************************************>>          00020000
<<*                                                        *>>          00025000
<<*                 INCLDCT - Module xx                    *>>          00030000
<<*               (contains DCT and TDT)                   *>>          00035000
<<*                    MPE 5 version                       *>>          00040000
<<*                                                        *>>          00045000
<<**********************************************************>>          00050000
                                                                        00055000
EQUATE                                                                  00060000
   DCT'MPE'VERSION    =  5;                                             00065000
                                                                        00070000
EQUATE                                                                  00075000
   DCT'FIRST'LDEV     =  6; << Entry-rltv offset to LDEV #1 >>          00080000
                                                                        00085000
<< DCT header entry fields.                                 >>          00090000
                                                                        00095000
DEFINE                                                                  00100000
   DCTH'DCT'BASE        = DCT'HEAD(3) #,                                00105000
   DCTH'ENTRY'SIZE      = DCT'HEAD(1) #,                                00110000
   DCTH'NUM'DCT'ENTRIES = DCT'HEAD(2) #,                                00115000
   DCTH'NUM'TDT'ENTRIES = DCT'HEAD(4) #,                                00120000
   DCTH'SEGMENT'SIZE    = DCT'HEAD(0) #,                                00125000
   DCTH'TDT'BASE        = DCT'HEAD(5) #;                                00130000
                                                                        00135000
DEFINE                                                                  00140000
   DCT'ACCESS'TYPE    = DCT(4).(10:3)      #,                           00145000
   DCT'CLASS'ACC'TYPE = DCT(4).(10:6)      #,                           00150000
   DCT'CYCLICAL'PTR   = DCT(4).( 1:7)      #,                           00155000
   DCT'NEXT'ENTRY     = DCT'NUM'DEVICES + 6#,                           00160000
   DCT'NUM'DEVICES    = DCT(5)             #,                           00165000
   DCT'SPOOL'QUEUES   = DCT(4).( 8:1)      #,                           00170000
       DCT'OPEN       = 1                  #,                           00175000
       DCT'SHUT       = 0                  #,                           00180000
   DCT'TERM'CLASS     = DCT(4).( 9:1)      #,                           00185000
   DCTB'CLASS'NAME    = DCT'B(0)           #;                           00190000
