批量删除oracle session

操作oracle，有时候需要删除某个用户的连接，一个个的删除连接显然太费事，现找出两种批量删除session方法：

方法1：通过提示输入用户名，直接删除

begin
  for x in (select a.sid,a.SERIAL# from v$session a where a.USERNAME='&SAMPLE')
    loop
      execute immediate 'alter system kill session '''||x.sid||','||x.serial#||'''';
            end loop;
  end;

方法2：生成批量删除的sql，拷贝出来执行

SELECT CONCAT('ALTER SYSTEM KILL SESSION ''',CONCAT(CONCAT(CONCAT(SID,','),SERIAL#),''';')) FROM V$SESSION WHERE USERNAME='用户'