Finding Locks on TABLES

SELECT A.OBJECT_NAME,A.OBJECT_ID, B.ORACLE_USERNAME, B.OS_USER_NAME, B.PROCESS,

DECODE(B.locked_mode,

  1, 'No Lock',

  2, 'Row Share',

  3, 'Row Exclusive',

  4, 'Shared Table',

  5, 'Shared Row Exclusive',

  6, 'Exclusive') locked_mode

FROM DBA_OBJECTS A, GV$LOCKED_OBJECT B

WHERE A.OBJECT_ID=B.OBJECT_ID