select s.username,decode(l.type,'TM','TABLE LOCK', 'TX','ROW LOCK', NULL) LOCK_LEVEL,
o.owner,o.object_name,o.object_type,s.sid,s.serial#,s.terminal,s.machine,s.program,s.osuser
from v$session@nps27 s,v$lock@nps27 l,dba_objects@nps27 o
where s.sid=l.sid and o.object_id=l.id1 and s.username is not null order by l.type ;