 TYPE
    cmt$controller_protocol = record
      control: cmt$control_protocol,
      data: cmt$data_protocol,
    recend;

*copyc cmt$control_protocol
*copyc cmt$data_protocol
