Script – What Wait Events Are Sessions Waiting On

set linesize 120
col username format a10
col event format a30

select sid, serial#,username, event,
seconds_in_wait, wait_time
from v$session where state = 'WAITING'
and wait_class != 'Idle'
order by event;