
  PROCEDURE [XREF] ocp$dtb_define_entry_point (name: pmt$program_name;
        pva: ost$pva;
    VAR status: ost$status);

