Mostra a utilização dos segmentos de UNDO e as sessões que estão utilizando

select u.name, s.bytes tamanho, u.ocupado, trunc(u.ocupado * 100 /
s.bytes,2) pct_usado
from (select n.name, sum(USED_UBLK*8*1024) ocupado
from v$transaction t, v$rollname n
where t.XIDUSN = n.usn
group by n.name
)u,
dba_segments s
where s.segment_name = u.name;

select r.name, s.osuser, s.username, s.sid
from v$lock l, v$rollname r, v$session s
where l.sid=s.sid
and trunc(l.id1/65536) = r.usn
and l.type = 'TX';