
  PROCEDURE [XREF] rap$open_file
    (    path_ref_p: ^fst$file_reference;
         access_level: amt$access_level;
         file_attachment: fst$file_access_option;
         create_file: boolean;
         attribute_override_p: ^array [1 .. 1] of fst$file_cycle_attribute;
     VAR file_id: {output} amt$file_identifier;
     VAR file_opened: {output} boolean;
     VAR status: ost$status);


?? PUSH (LISTEXT := ON) ??
*copyc fsp$open_file
*copyc ost$status
?? POP ??



