*COMDECK  COMDTEPT - ENTRY POINTS.
          BASED ARRAY TEPT ;       # ENTRY POINTS # 
               BEGIN
               ITEM EPTN C (0, 0,NC) ;  # EPT NAME = CAPSULE NAME, 0L  #
               ITEM EPTA I (0,ZL,AL) ;  # EPT ADDRESS = 3 # 
               END
          ITEM TEPTL ;
