
  PROCEDURE [XREF] pmp$execute (program_description: pmt$program_description;
        parameters: pmt$program_parameters;
        wait: ost$wait;
    VAR task_id: pmt$task_id;
    VAR task_status: pmt$task_status;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc PMT$PROGRAM_DESCRIPTION
*copyc PMT$PROGRAM_PARAMETERS
*copyc OST$WAIT
*copyc PMT$TASK_ID
*copyc PMT$TASK_STATUS
*copyc OST$STATUS
*copyc PME$EXECUTION_EXCEPTIONS
?? POP ??
