Show locks per user session

--
-- View locked objects, object types and user info
--
SELECT d.owner, d.object_id, d.object_name, d.object_type, l.type, s.username, s.sid,
s.serial#
FROM dba_objects d, v$lock l, v$session s 
WHERE d.object_id = l.id1
AND l.sid = s.sid
AND owner <> 'SYS' 
ORDER BY d.object_name
/