 TYPE
    cmt$data_channel_definition = record
      concurrent : boolean, { True implies capable of asynchronous transfer. }
      connection: cmt$data_channel_connectivity,
      direct_memory_access: boolean, { True implies capable of DMA transfer. }
      iou : cmt$element_name,
      kind : cmt$channel_type,
      number : ost$physical_channel_number,
      port : cmt$channel_port,
      pps_capable_of_access : cmt$pp_vector,
      ordinal: cmt$channel_ordinal,
      mainframe_ownership : cmt$element_name,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc cmt$data_channel_connectivity
*copyc cmt$element_name
*copyc cmt$channel_type
*copyc ost$physical_channel_number
*copyc cmt$channel_port
*copyc cmt$channel_ordinal
*copyc cmt$pp_vector
?? POP ??
