Oracle常用脚本-查看哪些对象被Lock

CREATE OR REPLACE VIEW db_lock (
   username,
   lock_level,
   owner,
   object_name,
   object_type,
   sid,
   serial#,
   terminal,
   machine,
   program,
   osuser )
AS
SELECT /*+ rule */
       s.username,
       DECODE (l.TYPE,
               'TM', 'TABLE LOCK',
               'TX', 'ROW 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 s.username IS NOT NULL
/