监听/监测oracle数据库执行的SQL语句

Select a.Sid,       a.SERIAL#,              a.status,       a.USERNAME, --哪个用户运行的SQL       d.SPID 进程号,        b.sql_text SQL内容,       a.MACHINE 计算机名称,        a.MODULE 运行方式,        to_char(cast((c.sofar / totalwork * 100) as decimal(18, 1))) || '%' 执行百分比,        c.elapsed_seconds 已耗时_秒,       c.time_remaining 预计剩余_秒,       cast(c.elapsed_seconds / 60 as decimal(18, 2)) 已耗时_分,       cast(c.time_remaining / 60 as decimal(18, 2)) 预计剩余_分,       cast(c.elapsed_seconds / 3600 as decimal(18, 2)) 已耗时_时,       cast(c.time_remaining / 3600 as decimal(18, 2)) 预计剩余_时  from v$session a, v$sqlarea b, v$session_longops c, v$process d where a.sql_hash_value = b.HASH_VALUE   and a.sid = c.sid(+)   and a.SERIAL# = c.SERIAL#(+)   --and to_char(cast((c.sofar / totalwork * 100) as decimal(18, 1))) <> '100'   and a.PADDR = d.ADDR;