pl/sql查询锁表用户

SELECT
  A.OWNER,                        --OBJECT所属用户
  A.OBJECT_NAME,                  --OBJECT名称（表名）
  B.XIDUSN,
  B.XIDSLOT,
  B.XIDSQN,
  B.SESSION_ID,                   --锁表用户的session
  B.ORACLE_USERNAME,              --锁表用户的Oracle用户名
  B.OS_USER_NAME,                 --锁表用户的操作系统登陆用户名
  B.PROCESS,
  B.LOCKED_MODE,
  C.MACHINE,                      --锁表用户的计算机名称（例如：WORKGROUP\UserName）
  C.STATUS,                       --锁表状态
  C.SERVER,
  C.SID,
  C.SERIAL#,
  C.PROGRAM                       --锁表用户所用的数据库管理工具（例如：ob9.exe）
FROM
  ALL_OBJECTS A,
  V$LOCKED_OBJECT B,
  SYS.GV_$SESSION C
WHERE
  A.OBJECT_ID = B.OBJECT_ID
  and a.OBJECT_NAME='表名'
  AND B.PROCESS = C.PROCESS
ORDER BY 1,2