杀死锁

Select 'alter system kill session ''' || s.Sid || ',' || s.Serial# || ''';' Sql_Test,
       s.Username,
       Decode(l.Type, 'TM', '表 LOCK', 'TX', '行 LOCK', Null) Lock_Level,
       o.Owner,
       o.Object_Name,
       o.Object_Type,
       s.Sid,
       s.Serial#,
       s.Terminal,
       s.Machine,
       s.Program,
       s.Osuser
  From V$session s, V$lock l, Dba_Objects o
 Where l.Sid = s.Sid
   And l.Id1 = o.Object_Id(+)
      --And l.Type = 'TM'
   And s.Username Is Not Null;