  TYPE
    nft$btf_task_status = record
      system_file_name: jmt$system_supplied_name,
      copies_printed: nft$copies,
      transfer_status: nft$btf_transfer_status,
      status: ost$status,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc jmt$system_supplied_name
*copyc nft$copies
*copyc nft$btf_transfer_status
*copyc ost$status
?? POP ??
