监控oracle连接状态SQL语句

select s.username,s.osuser,s.program,s.MACHINE, s.sid, s.serial#, p.spid, 'alter system kill session '||''''||trim(s.sid)||','||trim(s.serial#)||''';'
from v$session s,v$process p
where s.paddr = p.addr   and s.username is not null
order by s.username