
  PROCEDURE [XREF] pmp$status_queue (qid: pmt$queue_connection;
    VAR counts: pmt$queue_status;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc PMT$QUEUE_STATUS
*copyc OST$STATUS
*copyc PME$LOCAL_QUEUE_EXCEPTIONS
?? POP ??
