SELECT a.include_flag,
       a.queue_application_id,
       c.user_concurrent_queue_name,
       d.user_concurrent_program_name
  FROM applsys.fnd_concurrent_queue_content a,
       applsys.fnd_concurrent_programs b,
       apps.fnd_concurrent_queues_vl c,
       fnd_concurrent_programs_tl d
 WHERE     type_id = b.concurrent_program_id
       AND c.concurrent_queue_id = a.concurrent_queue_id
       AND b.concurrent_program_id = d.concurrent_program_id
       AND d.user_concurrent_program_name LIKE '&concurrent_program_name'

  SELECT q.concurrent_queue_id,
         q.concurrent_queue_name,
         q.user_concurrent_queue_name,
         q.target_node,
         q.max_processes,
         q.running_processes,
         running.run running,
         pending.pend,
         DECODE (q.control_code,
                 'D', 'Deactivating',
                 'E', 'Deactivated',
                 'N', 'Node unavai',
                 'A', 'Activating',
                 'X', 'Terminated',
                 'T', 'Terminating',
                 'V', 'Verifying',
                 'O', 'Suspending',
                 'P', 'Suspended',
                 'Q', 'Resuming',
                 'R', 'Restarting')
            status
    FROM (  SELECT concurrent_queue_name, COUNT (phase_code) run
              FROM fnd_concurrent_worker_requests
             WHERE     phase_code = 'R'
                   AND hold_flag != 'Y'
                   AND requested_start_date <= SYSDATE
          GROUP BY concurrent_queue_name) running,
         (  SELECT concurrent_queue_name, COUNT (phase_code) pend
              FROM fnd_concurrent_worker_requests
             WHERE     phase_code = 'P'
                   AND hold_flag != 'Y'
                   AND requested_start_date <= SYSDATE
          GROUP BY concurrent_queue_name) pending,
         apps.fnd_concurrent_queues_vl q
   WHERE     q.concurrent_queue_name = running.concurrent_queue_name(+)
         AND q.concurrent_queue_name = pending.concurrent_queue_name(+)
         AND q.enabled_flag = 'Y'
ORDER BY DECODE (q.application_id,
                 0, DECODE (q.concurrent_queue_id, 1, 1, 4, 2)),
         SIGN (q.max_processes) DESC,
         q.concurrent_queue_name,
         q.application_id;