
   PROCEDURE [XREF] mmp$open_file_by_sfid
     (    sfid: gft$system_file_identifier;
          r1: ost$valid_ring;
          r2: ost$valid_ring;
          sequential_random_selection: mmt$access_selections;
          read_write_access_selection: mmt$segment_access_rights;
      VAR segment_number: ost$segment;
      VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc gft$file_kind
*copyc gft$system_file_identifier
*copyc mmt$access_selections
*copyc mmt$segment_access_rights
*copyc osd$virtual_address
*copyc ost$status
?? POP ??
