
  PROCEDURE [XREF] pup$initialize_backup_listing (pf_utility_hierarchy_list:
    put$hierarchy_list;
   file_id: put$file_identifier;
    backup_information: amt$backup_information;
    VAR status: ost$status);
?? PUSH (LISTEXT := ON) ??
*copyc PUD$HIERARCHY_LIST
*copyc put$file_identifier
*copyc OST$STATUS
*copyc amt$backup_information
?? POP ??
