How find by who the objects is locked

SELECT s.sid,

s.username

FROM v$lock l,

dba_objects o,

v$session s

WHERE l.id1 = o.object_id

AND s.sid = l.sid

AND o.object_name = 'OBJECT_NAME';