select b.MACHINE, b.PROGRAM , count(*) from v$process a, v$session b where a.ADDR = b.PADDR and b.USERNAME isnotnullgroupby b.MACHINE , b.PROGRAM orderbycount(*) desc;
CURSOR cursor_session_info isselect sid,serial# from v$session where type!='BACKGROUND'and status='INACTIVE'and last_call_et>2700 and username='ICWEB'and machine='orc';
BEGIN
open cursor_session_info;
loop
fetch cursor_session_info into v_sid,v_serial;
exit when cursor_session_info%notfound;
killer:='alter system disconnect session '''||v_sid||','||v_serial||''' post_transaction immediate';
execute immediate killer;
end loop;
dbms_output.PUT_LINE(cursor_session_info%rowcount||' users with idle_time>2700s have been killed!');