
  PROCEDURE [XREF] sfp$get_active_job_statistics
    (    logs: sft$binary_logset;
     VAR head: ^sft$routing_control;
     VAR work_area: ^SEQ ( * );
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc sfe$insufficient_privilege
*copyc sfe$statistics_not_available
*copyc sfe$unknown_routing_ctl_access
*copyc sft$binary_logset
*copyc sft$routing_control
?? POP ??
