{
{ RHP$OPEN_B56_FILE
{
{  This procedure is called by rhp$get/rhp$replace to open a B56 file.
{
{           RHP$OPEN_B56_FILE (FILE, FILE_ATTACHMENT_OPTIONS, LOCAL_FILE_INFO,
{               STATUS);
{
{  FILE: (input) This parameter specifies the file to be opened.
{
{  FILE_ATTACHMENT_OPTIONS: (input) This parameter contains the access
{      requirements to get the file.
{
{  LOCAL_FILE_INFO: (input,output) This parameter contains all the local
{      file information.
{
{  STATUS: (output) This parameter specifies the status returned to the
{      calling procedure.
{
  PROCEDURE [XREF] rhp$open_b56_file (
    file: fst$file_reference;
    file_attachment_options: rht$attachment_option;
    VAR local_file_info: rht$local_file_info;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc fst$file_reference
*copyc rht$attachment_option
?? POP ??
