oracleskill

set echo off
set feedback off

DEFINE blocks_read = 1000 (NUMBER)

COLUMN parsing_user_id  FORMAT 9999999  HEADING 'User Id'
COLUMN executions       FORMAT 9999     HEADING 'Exec'
COLUMN sorts            FORMAT 99999    HEADING 'Sorts'
COLUMN command_type     FORMAT 99999    HEADING 'CmdT'
COLUMN disk_reads       FORMAT 999,999,999 HEADING 'Block Reads'
COLUMN sql_text         FORMAT a40  HEADING 'Statement' WORD_WRAPPED

SET LINES 130
SET PAGESIZE 500

SELECT parsing_user_id, executions, sorts, command_type,
       disk_reads, sql_text
FROM   v$sqlarea
WHERE disk_reads > &&blocks_read
ORDER BY disk_reads; 
/

set echo off
SET LINES 80

SQL> connect system/password@yourDB
SQL> @/path/to/high_disk_read.sql