Find out session with highest redo generation

Find out session with highest redo generation

set lines 200 pages 100
column program for a20 trunc
column module for a20 trunc
select * from (
select s.sid, s.program, s.module, s.username, round(t.value/1024/1024,2) "in MB"
from v$session s, v$sesstat t
where s.sid = t.sid
and username is not null
and   t.statistic#=(select statistic# from v$statname where name='redo size')
order by 5 desc)
where rownum<=20
/