  PROCEDURE [XREF] nfp$delete_btf_task
    (    list_index: integer;
         wait_activity_list {input, output} : ^nft$wait_activity_list;
     VAR btf_task {input, output} : ^nft$btf_task);

?? PUSH (LISTEXT := ON) ??
*copyc nft$wait_activity_list
?? POP ??
