
  PROCEDURE [XREF] dmp$transfer_unit_completed ALIAS 'dmxtuc'
    (    job_id: jmt$ijl_ordinal;
         system_file_id: gft$system_file_identifier;
         byte_address: amt$file_byte_address;
         write_tu_status: dmt$write_tu_status;
         au_was_previously_written: boolean;
         media_error: boolean;
         cylinder: iot$cylinder;
         mau_offset_in_cylinder: dmt$maus_per_position;
         io_function: iot$io_function;
     VAR status: syt$monitor_status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_byte_address
*copyc gft$system_file_identifier
*copyc syt$monitor_request_code
*copyc jmt$ijl_ordinal
*copyc dmt$ms_logical_device_address
*copyc iot$cylinder
*copyc dmt$minimum_allocation_unit
*copyc iot$io_function
?? POP ??
