若得山花插满头,莫问奴归处!

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::
  1375 随笔 :: 0 文章 :: 752 评论 :: 23 引用

公告

CREATE OR REPLACE PROCEDURE kill_processes IS
v_c_kill varchar2(80);
BEGIN
/*  WARNING: If you use MTS (Shared Server) do not kill Shared     server processes*/
   FOR i IN (select sid,serial# from v$session where status='INACTIVE') LOOP
   V_c_kill := 'ALTER SYSTEM KILL SESSION ' ||''''||i.sid||','||i.serial#||'''';
   execute immediate v_c_kill;
   END LOOP;
END kill_processes;



set serveroutput on
set linesize 10000
variable x number;
begin
   DBMS_OUTPUT.enable(100000);  
   dbms_job.submit(:x,'kill_processes;',sysdate,'sysdate+2/24');
   commit;
   dbms_output.put_line(TO_char(:x));
end;
posted on 2012-03-12 12:57 莫问奴归处 阅读(...) 评论(...) 编辑 收藏
轩轩娃