
  IF file_instance^.private_read_information = NIL THEN
    record_info := file_instance^.global_file_information^.positioning_info.
          record_info;
  ELSE
    record_info := file_instance^.private_read_information^.positioning_info.
          record_info;
  IFEND;

