declare
id int ;
idname int ; 
begin
cursor a is select sid,serial# from v$session ;
open a ;
loop
fetch a into id,idname  ;
alter system kill session id,idname;
Exit When a%NOTFOUND;
end loop ;
end ;