oracle 自动表分析,Oracle自动分析索引，表

--分析表

REATE OR REPLACE PROCEDURE analyze_tables IS

--rec integer;

v_date1 number(10);

v_date2 number(10);

V_SQL varchar2(512);

v_msg varchar2(512);

BEGIN

FOR rec IN (SELECT table_name FROM user_tables)

LOOP

v_date1 := dbms_utility.get_time;

V_SQL := 'ANALYZE TABLE ' || rec.table_name || ' COMPUTE STATISTICS';

BEGIN

EXECUTE IMMEDIATE V_SQL;

v_msg := V_SQL || ' OK!';

EXCEPTION

WHEN OTHERS THEN

v_msg := V_SQL || ' Error!';

END;

v_date2 := dbms_utility.get_time;

v_msg := v_msg || ' 分析花费时间:' || to_char((v_date2 - v_date1) / 100);

DBMS_OUTPUT.put_line(v_msg);

END LOOP;

END;

----分析索引

CREATE OR REPLACE PROCEDURE analyze_indexs IS

v_date1 number(10);

v_date2 number(10);

V_SQL varchar2(512);

v_msg varchar2(512);

BEGIN

FOR rec IN (SELECT index_name FROM user_indexes)

LOOP

v_date1 := dbms_utility.get_time;

V_SQL := 'ANALYZE INDEX ' || rec.index_name ||

' COMPUTE STATISTICS';

BEGIN

EXECUTE IMMEDIATE V_SQL;

v_msg := V_SQL || ' OK!';

EXCEPTION

WHEN OTHERS THEN

v_msg := V_SQL || ' Error!';

END;

v_date2 := dbms_utility.get_time;

v_msg := v_msg || ' 分析花费时间:' || to_char((v_date2 - v_date1) / 100);

DBMS_OUTPUT.put_line(v_msg);

END LOOP;

END;