-- Скрипт показывает суммарную информацию 
-- о заблокированных объектах (locked objects)
-- Необходим доступ к:
-- - V$LOCHED_OBJECT 
-- - DBA_OBJECTS
-- - V$PROCESS
-- - V$SESSION
-- - V$SQL

SELECT O.OBJECT_NAME, S.SID, S.SERIAL#, P.SPID, S.PROGRAM,S.USERNAME,
 S.MACHINE,S.PORT , S.LOGON_TIME,SQ.SQL_FULLTEXT 
FROM V$LOCKED_OBJECT L, DBA_OBJECTS O, V$SESSION S, 
 V$PROCESS P, V$SQL SQ 
WHERE L.OBJECT_ID = O.OBJECT_ID 
 AND L.SESSION_ID = S.SID AND S.PADDR = P.ADDR 
 AND S.SQL_ADDRESS = SQ.ADDRESS;
/

SELECT O.OBJECT_NAME, S.SID, S.SERIAL#, P.SPID, S.PROGRAM,S.USERNAME,
 S.MACHINE,S.PORT , S.LOGON_TIME 
FROM V$LOCKED_OBJECT L, DBA_OBJECTS O, V$SESSION S, 
 V$PROCESS P
WHERE L.OBJECT_ID = O.OBJECT_ID 
 AND L.SESSION_ID = S.SID AND S.PADDR = P.ADDR;
/