Oracle Lock Query

--v$lock in ID1 when lock mode is TX, the first 2 segments of the physical ID are saved
SELECT *
From (SELECT S.sid,
TRUNC (Id1/power (2,)) RBS,
Bitand (ID1, To_number (' ffff ', ' xxxx ')) + 0 slots,
Id2 seq,
Lmode,
Request
S.username
From V$lock L, v$session s
where l.sid = s.sid) ls,
V$transaction T
WHERE T.xidusn = Ls.rbs
and T.xidslot = Ls.slot
and t.xidsqn = Ls.seq

--v$lock the object ID in ID1 when lock mode is TM
SELECT * from V$lock l,dba_objects d where d.object_id = L.ID1;

--DDL Lock
SELECT * from Dba_ddl_locks;

Oracle Lock Query