
  PROCEDURE [XREF] cmp$convert_channel_ordinal (channel_ordinal :
                cmt$channel_ordinal;
       VAR channel_name : cmt$element_name;
       VAR channel_number : ost$physical_channel_number;
       VAR concurrent : boolean;
       VAR channel_port : cmt$channel_port;
       VAR status : ost$status);

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