Locks Holders and Waiters..............

SELECT DECODE(request,0,'Holder: ','Waiter: ')||sid sess,         
       id1, id2, lmode, request, type   
FROM V$LOCK  
WHERE (id1, id2, type) IN (SELECT id1, id2, type FROM V$LOCK WHERE request>0)   ORDER BY id1, request  ;