没有找到好的方式不过还是附上几个有用杀会话杀进程的语句
alter system kill session 'sid,serial#';
select spid, osuser, s.program from v$session s,v$process p where s.paddr=p.addr and s.sid=:sid;
orakill orcl spid;
--查询当前会话
select s.logon_time,s.last_call_et,s.status,s.type,s.MACHINE,s.TERMINAL,s.PROGRAM,s.* from v$session s order by s.logon_time desc,s.last_call_et desc;
select count(*) num,program from v$session group by program order by num desc,program;