
  PROCEDURE [XREF] pmp$define_queue (name: pmt$queue_name;
        removal_bracket: ost$ring;
        usage_bracket: ost$ring;
    VAR status: ost$status);

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