DECLARE l_sid NUMBER := :SID; BEGIN FOR cur_sql IN (SELECT sql_text FROM v$sqltext_with_newlines t WHERE t.address IN (SELECT s.prev_sql_addr FROM v$session s WHERE s.sid = l_sid UNION SELECT s.sql_address --如果查询时间很短,可能存在sql_address中 FROM v$session s WHERE s.sid = l_sid) ORDER BY t.piece) LOOP dbms_output.put_line(cur_sql.sql_text); END LOOP; END;