declare cursor mycur is   
select b.sid,b.serial#   
　　from v$locked_object a,v$session b   
　　where a.session_id = b.sid group by b.sid,b.serial#;   
   
begin   
  for cur in mycur   
    loop     
     execute immediate ( 'alter system  kill session  '''||cur.sid || ','|| cur.SERIAL# ||''' ');   
     end loop;   
end;

---

相關推薦