SET ECHO OFF
SET LINESIZE 1000
COLUMN SID FORMAT 999
COLUMN Sl. FORMAT 999
COLUMN MACHINE FORMAT A10
COLUMN USER FORMAT A9
COLUMN OSUSER FORMAT A9
COLUMN PROGRAM FORMAT A20
COLUMN MODULE FORMAT A15
COLUMN SCHEMANAME HEADING SCHEMA FORMAT A10

select a.sid SID,b.serial# "Sl.",round(a.seconds_in_wait/60) waitime,b.username "User",
substr(b.machine,1,15) machine,
substr(to_char(b.logon_time,'HH24:MI:SS'),1,10) logontime,
b.status,rtrim(b.osuser)"OSUser",b.type,b.schemaname,b.program,b.module
from v$session_wait a, v$session b
where a.sid=b.sid and
b.type <>'BACKGROUND'
order by waitime desc ,machine

/