
{* cyp$open_display_file *}

  PROCEDURE [XREF] cyp$open_display_file (file_name: cyt$file_name;
        file_access: cyt$file_access;
        file_attachment: ^fst$attachment_options;
        default_creation_attribute: ^fst$file_cycle_attributes;
        mandated_creation_attribute: ^fst$file_cycle_attributes;
        attribute_validation: ^fst$file_cycle_attributes;
        attribute_override: ^fst$file_cycle_attributes;
    VAR file_control: cyt$file;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc cyt$file_name
*copyc cyt$file_access
*copyc cyt$file
*copyc cye$exception_conditions
*copyc fst$attachment_options
*copyc fst$file_cycle_attributes
?? POP ??
