
  PROCEDURE [XREF] jmp$get_length_of_sched_tables
    (VAR maximum_job_classes: jmt$job_class;
     VAR maximum_job_class_index: jmt$job_class;
     VAR maximum_service_classes: jmt$service_class_index;
     VAR maximum_service_class_index: jmt$service_class_index;
     VAR maximum_applications: jmt$application_index;
     VAR maximum_categories: integer;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$application_index
*copyc jmt$job_class
*copyc jmt$service_class_index
*copyc ost$status
?? POP ??
