select p.spid, 
        c.object_name,
        b.session_id,
        b.oracle_username,
        b.os_user_name,
        a.machine,
        a.program
   from v$process p, v$session a, v$locked_object b, all_objects c
  where p.addr = a.paddr
    and a.process = b.process
    and c.object_id = b.object_id
  order by b.session_id
原文:https://www.cnblogs.com/miracle2020/p/14033442.html