做监控用的SQL部分，整理到一列输出主要内容，不喜欢就自己拆开用，或添加其他需要使用的列信息。
解析：
1、只输出有阻塞者跟被阻塞者，并且阻塞时间>=60s部分；
2、chr(10)换行输出，sqlplus命令行中可见效果，PLSQL Dev里面没啥用；
3、考虑执行效率，不查找SQL_TEXT，只抓SQL_ID，Prev_SQL_ID，基于此辅助定位程序问题点；
4、最后生成查找锁住数据的语句。
SELECT 'Blocker_SID: ' || A.SID || ', ' || A_S.SCHEMANAME || ', From: ' ||
A_S.MACHINE || ', ' || A_S.PROGRAM || ', Cur_SQL: ' || A_S.SQL_ID ||
',Prev_SQL: ' || A_S.PREV_SQL_ID || ', Status:' || A_S.STATUS ||
', Lock_Time: ' || A.CTIME || 's.' || CHR(10) || ' -> Locked_SID: ' ||
B.SID || ', Blocked_SQL: ' || B_S.SQL_ID || ' , Locked_ON: ' ||
OBJ.OWNER || '.' || OBJ.OBJECT_NAME || ', Lock_Mode: ' ||
DECODE(A.LMODE,
0,
'0,none',
1,
'1,NULL',
2,
'2,row-S(SS)',
3,
'3,row-X(SX)',
4,
'4,share(S)',
5,
'5,S/Row-X(SSX)',
6,
'6,exclusive(X)') || CHR(10) || ' -> Locked_data_query_SQL: ' ||
(DECODE(OBJ.OBJECT_TYPE,
'TABLE',
'SELECT * FROM ' || OBJ.OWNER || '.' || OBJ.OBJECT_NAME ||
' WHERE ROWID = ''' ||
DBMS_ROWID.ROWID_CREATE(1,
OBJ.DATA_OBJECT_ID,
B_S.ROW_WAIT_FILE#,
B_S.ROW_WAIT_BLOCK#,
B_S.ROW_WAIT_ROW#) || ''';',
NULL)) AS BLOCK_DETAIL
FROM GV$LOCK A,
GV$LOCK B,
GV$SESSION A_S,
GV$SESSION B_S,
DBA_OBJECTS OBJ
WHERE A.ID1 = B.ID1
AND A.ID2 = B.ID2
AND A.CTIME >= 60
AND A.BLOCK > 0
AND B.REQUEST > 0
AND A.SID = A_S.SID
AND A.INST_ID = A_S.INST_ID
AND B.SID = B_S.SID
AND B.INST_ID = B_S.INST_ID
AND B_S.ROW_WAIT_OBJ# = OBJ.OBJECT_ID(+)
ORDER BY A.INST_ID, A.SID;
附基于SQL_ID查找SQL_TEXT语句：
SELECT Q.SQL_ID, Q.SQL_TEXT, Q.SQL_FULLTEXT
FROM V$SQL Q
WHERE Q.SQL_ID = '&SQL_ID';
-- 执行后，将变量SQL_ID录入上面提取的SQL_ID即可