PROC terminate_output_tasks, terot (
  status)

  create_variable proc_status kind=status
  proc_status.normal = TRUE
  deactivate_system_task task_name=rhoutput status=proc_status
  IF NOT proc_status.normal THEN
    IF $condition(proc_status.condition) <> 'PME$TASK_NOT_CURRENT_CHILD' THEN
      putl ' Deactivation of RHOUTPUT failed for the following reason:' o=$response
      disv proc_status o=$response
      disv proc_status o=$job_log
    IFEND
    proc_status.normal = TRUE
  IFEND
  deactivate_system_task task_name=dump_broken_job status=proc_status
  IF NOT proc_status.normal THEN
    IF $condition(proc_status.condition) <> 'PME$TASK_NOT_CURRENT_CHILD' THEN
      putl ' Deactivation of DUMP_BROKEN_JOB failed for the following reason:' o=$response
      disv proc_status o=$response
      disv proc_status o=$job_log
    IFEND
    proc_status.normal = TRUE
  IFEND

PROCEND terminate_output_tasks
