
  PROCEDURE [XREF] jmp$install_profile
    (    access_id: ost$binary_unique_name;
         job_class_entries_p: ^jmt$job_class_table;
         service_class_entries_p: ^jmt$service_class_table;
         application_entries_p: ^jmt$application_table;
         controls_entry: jmt$job_scheduler_table;
         category_data: jmt$job_category_data;
         move_job_classes: jmt$job_class_set;
         deleted_job_classes: jmt$job_class_set;
         deleted_service_classes: jmt$service_class_set;
         deleted_applications: jmt$application_set;
         delete_profile_cycle2: boolean;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc jmt$application_set
*copyc jmt$application_table
*copyc jmt$job_category_data
*copyc jmt$job_class_set
*copyc jmt$job_class_table
*copyc jmt$job_scheduler_table
*copyc jmt$service_class_set
*copyc jmt$service_class_table
*copyc ost$binary_unique_name
*copyc ost$status
?? POP ??
