Tato odpověď je silně ovlivněna konverzací zde:http://www.tek-tips.com/viewthread.cfm?qid=1395151&page=3
ALTER SYSTEM ENABLE RESTRICTED SESSION;
begin
for x in (
select Sid, Serial#, machine, program
from v$session
where
machine <> 'MyDatabaseServerName'
) loop
execute immediate 'Alter System Kill Session '''|| x.Sid
|| ',' || x.Serial# || ''' IMMEDIATE';
end loop;
end;
Přeskočím zabíjení relací pocházejících z databázového serveru, abych se vyhnul přerušení spojení Oracle se sebou samým.