
  PROCEDURE [XREF] dmp$update_tape_vsn_list
    (    sfid: gft$system_file_identifier;
         file: fst$path_handle_name;
         volume_descriptor: rmt$volume_descriptor;
         requested_volume_attributes: iot$requested_volume_attributes;
         source_pool: ost$name;
         source_pool_location: ost$name;
         tape_assignment_operation: dmt$tape_assignment_operation;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc dmt$tape_assignment_operation
*copyc fst$path_handle_name
*copyc gft$system_file_identifier
*copyc iot$requested_volume_attributes
*copyc ost$name
*copyc ost$status
*copyc rmt$volume_descriptor
?? POP ??
