SET TERMOUT ON
SET FEEDBACK OFF
SET VERIFY OFF
SET SCAN ON
SET LONG 1000000
SET ECHO ON
SET SERVEROUTPUT OFF
VARIABLE tuning_task VARCHAR2(30)
DECLARE
l_sql_id v$session.prev_sql_id%TYPE;
BEGIN
SELECT prev_sql_id INTO l_sql_id
FROM v$session
WHERE audsid = sys_context('userenv','sessionid');
:tuning_task := dbms_sqltune.create_tuning_task(sql_id => l_sql_id);
dbms_sqltune.execute_tuning_task(:tuning_task);
END;
/
SELECT dbms_sqltune.report_tuning_task(:tuning_task)
FROM dual;
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/184303/viewspace-700750/
,如需转载,请注明出处,否则将追究法律责任。