34 lines
785 B
SQL
34 lines
785 B
SQL
prompt dbms_sqltune.create_tuning_task(task_name=>'SQLTT_&1', sql_id=>'&1', time_limit=>&2)
|
|
|
|
var c_tt refcursor
|
|
|
|
DECLARE
|
|
r CLOB;
|
|
--r varchar2(32767);
|
|
t varchar2(30) := 'SQLTT_&1';
|
|
BEGIN
|
|
|
|
begin
|
|
dbms_sqltune.drop_tuning_task(t);
|
|
exception
|
|
when others then null;
|
|
end;
|
|
|
|
r := dbms_sqltune.create_tuning_task(task_name=>t, sql_id=>'&1', time_limit=>&2);
|
|
dbms_output.put_line('r='||r);
|
|
|
|
dbms_sqltune.execute_tuning_task(t);
|
|
|
|
open :c_tt for
|
|
select dbms_sqltune.report_tuning_task(t) recommendations from dual;
|
|
|
|
END;
|
|
/
|
|
|
|
spool &_tpt_tempdir/sqltune_ctt_&_tpt_tempfile..sql
|
|
print :c_tt
|
|
spool off
|
|
prompt Output file: &_tpt_tempdir/sqltune_ctt_&_tpt_tempfile..sql
|
|
--host &_start &_tpt_tempdir/sqltune_ctt_&_tpt_tempfile..sql
|
|
|