CREATE OR REPLACE PROCEDURE ANALYZE_TB AS NC_VER VARCHAR2(100); V_SQL VARCHAR2(300); V_TABLENAME VARCHAR2(50); CURSOR CUR_TABLE_TEMP IS SELECT TABLE_NAME FROM USER_TABLES WHERE TEMPORARY = 'Y'; BEGIN SELECT VERSION INTO NC_VER FROM SM_PRODUCT_VERSION WHERE ROWNUM = 1; IF (NC_VER < '5.0') THEN SYS.DBMS_STATS.GATHER_SCHEMA_STATS(OWNNAME => USER, ESTIMATE_PERCENT => 100, METHOD_OPT => 'FOR ALL INDEXED COLUMNS', CASCADE => FALSE); ELSE SYS.DBMS_STATS.GATHER_SCHEMA_STATS(OWNNAME => USER, ESTIMATE_PERCENT => 100, METHOD_OPT => 'FOR ALL INDEXED COLUMNS', CASCADE => TRUE); END IF; --delete temp table statistics OPEN CUR_TABLE_TEMP; LOOP FETCH CUR_TABLE_TEMP INTO V_TABLENAME; EXIT WHEN CUR_TABLE_TEMP%NOTFOUND; V_SQL := 'ANALYZE TABLE ' || V_TABLENAME || ' DELETE STATISTICS '; EXECUTE IMMEDIATE V_SQL; END LOOP; CLOSE CUR_TABLE_TEMP; EXCEPTION WHEN OTHERS THEN IF CUR_TABLE_TEMP%ISOPEN THEN CLOSE CUR_TABLE_TEMP; END IF; DBMS_OUTPUT.PUT_LINE(SQLERRM); END ANALYZE_TB;

这是一个 PL/SQL 存储过程，它的作用是分析数据库中的表并删除临时表的统计信息。首先，它会从 SM_PRODUCT_VERSION 表中获取版本信息，然后根据版本号调用不同的方法分析表的统计信息。对于版本号小于 5.0 的情况，它会调用 SYS.DBMS_STATS.GATHER_SCHEMA_STATS 进行统计信息分析，并将 CASCADE 参数设置为 FALSE；对于版本号大于等于 5.0 的情况，它会将 CASCADE 参数设置为 TRUE。接着，它会打开一个游标 CUR_TABLE_TEMP，查询数据库中所有临时表的表名，然后使用动态 SQL 语句 ANALYZE TABLE ... DELETE STATISTICS 删除这些表的统计信息。最后，它会捕获并处理可能发生的异常，并输出错误信息。