
  PROCEDURE [XREF] amp$get_next_primary_key_list
    (    file_identifier: amt$file_identifier;
         high_key: ^cell;
         major_high_key: amt$major_key_length;
         high_key_relation: amt$key_relation;
         working_storage_area: ^cell;
         working_storage_length: amt$working_storage_length;
     VAR end_of_primary_key_list: boolean;
     VAR transferred_byte_count: amt$working_storage_length;
     VAR transferred_key_count: amt$key_count_limit;
     VAR file_position: amt$file_position;
         wait: ost$wait;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc amt$file_position
*copyc amt$key_relation
*copyc amt$key_count_limit
*copyc amt$major_key_length
*copyc amt$working_storage_length
*copyc ost$wait
*copyc ost$status
?? POP ??
