
  PROCEDURE [XREF] fsp$change_segment_number
    (    file_identifier: amt$file_identifier;
         new_segment_number: ost$segment;
         validation_ring: ost$valid_ring;
         pointer_kind: amt$pointer_kind;
     VAR segment_pointer: amt$segment_pointer;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amc$condition_code_limits
*copyc ame$access_validation_errors
*copyc ame$device_class_validation
*copyc ame$improper_file_id
*copyc ame$ring_validation_errors
*copyc ame$segment_validation_errors
*copyc amt$file_identifier
*copyc amt$segment_pointer
*copyc osd$virtual_address
*copyc ost$status

?? POP ??
