
  PROCEDURE [XREF] ocp$display_section_usage (object_library: ^oct$object_library;
        section_kinds: oct$section_kinds;
        access_attributes: llt$section_access_attributes;
        section_name: pmt$program_name;
        output: clt$file;
    VAR status: ost$status);
