  PROCEDURE [XREF] ocp$search_object_file alias 'ocpsof' (module_name: pmt$program_name;
    VAR module_found: boolean;
    VAR file_descriptor: ^oct$open_file_list);

