SELECT 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;
转载于:https://blog.51cto.com/idata/954024