
  PROCEDURE [XREF] clp$fetch_named_task_entry
    (    task_name: ost$name;
     VAR named_task: clt$named_task);

?? PUSH (LISTEXT := ON) ??
*copyc clt$named_task
*copyc ost$name
?? POP ??
