查找无效对象
你可以根据这个查询结果来判断使用下面的哪种方法来编译你数据库里面的无效对象.
COLUMN object_name FORMAT A30
SELECT owner,
object_type,
object_name,
STATUS
FROM dba_objects
WHERE STATUS = 'INVALID'
ORDER BY owner, object_type, object_name;
1.手动编译
如果无效对象的数量很少,那么你可以逐个编译这些对象.
如:
ALTER PACKAGE my_package COMPILE;
ALTER PACKAGE my_package COMPILE BODY;
ALTER PROCEDURE my_procedure COMPILE;
ALTER FUNCTION my_function COMPILE;
ALTER TRIGGER my_trigger COMPILE;
ALTER VIEW my_view COMPILE;
你也可以用DBMS_DDL包来编译(但只用于PL/SQL对象,所以你不用它来编译视图等):
EXEC DBMS_DDL('PACKAGE', 'MY_SCHEMA', 'MY_PACKAGE');
EXEC DBMS_DDL('PACKAGE BODY', 'MY_SCHEMA', 'MY_PACKAGE');
EXEC DBMS_DDL('PROCEDURE', 'MY_SCHEMA', 'MY_PROCEDURE');
EXEC DBMS_DDL('FUNCTION', 'MY_SCHEMA', 'MY_FUNCTION');
EXEC DBMS_DDL('TRIGGER', 'MY_SCHEMA', 'MY_TRIGGER');
2.通用脚本
在某些情况下你可能有很多无效对象要编译,这样话手工编译就显得效率太低了.
在这种情况下你可以些一个通用的脚本生成编译脚本.
下面的脚本用来查询无效的package 和package body并生成便宜这些对象的脚本.
但是这方法不会考虑ORACLE对象之间的依赖关系.
SET SERVEROUTPUT ON SIZE 1000000
BEGIN
FOR cur_rec IN (SELECT owner,
object_name,
object_type,
DECODE(object_type, 'PACKAGE', 1,
'PACKAGE BODY', 2, 2) AS recompile_order
FROM dba_objects
WHERE object_type IN ('PACKAGE', 'PACKAGE BODY')
AND STATUS != 'VALID'
ORDER BY 4)
LOOP
BEGIN
IF cur_rec.object_type = 'PACKAGE' THEN
EXECUTE IMMEDIATE 'ALTER ' || cur_rec.object_type ||
' "' || cur_rec.owner || '"."' || cur_rec.object_name || '" COMPILE';
ElSE
EXECUTE IMMEDIATE 'ALTER PACKAGE "' || cur_rec.owner ||
'"."' || cur_rec.object_name || '" COMPILE BODY';
END IF;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.put_line(cur_rec.object_type || ' : ' || cur_rec.owner ||
' : ' || cur_rec.object_name);
END;
END LOOP;
END;
/
3.使用DBMS_UTILITY.compile_schema
使用这个包将会编译指定schema下的所有procedures, functions, packages, and triggers.
你可以在sqlplus 下使用它,如:
EXEC DBMS_UTILITY.compile_schema(schema => ‘SCOTT’);
4.使用UTL_RECOMP
UTL_RECOMP包有两个存储过程:RECOMP_SERIAL和RECPMP_PARALLEL
从存储过程的名字可以看出一个是非并行,一个是并行方式.
使用并行方式会加快编译速度,包的定义如下:
PROCEDURE RECOMP_SERIAL(
schema IN VARCHAR2 DEFAULT NULL,
flags IN PLS_INTEGER DEFAULT 0);
PROCEDURE RECOMP_PARALLEL(
threads IN PLS_INTEGER DEFAULT NULL,
schema IN VARCHAR2 DEFAULT NULL,
flags IN PLS_INTEGER DEFAULT 0);
参数使用方法:
schema
- 想编译的模式,如果为NULL,将编译数据库的所有无效对象.
threads
- 并行度,如果为NULL,会使用参数job_queue_processes的值.
通常threads的值最好和CPU的数量想匹配,以发挥并行的最大优势.
flags -
ORACLE内部使用的诊断测试参数.
如:
-- Schema level.
EXEC UTL_RECOMP.recomp_serial('SCOTT');
EXEC UTL_RECOMP.recomp_parallel(4, 'SCOTT');
-- Database level.
EXEC UTL_RECOMP.recomp_serial();
EXEC UTL_RECOMP.recomp_parallel(4);
-- Using job_queue_processes value.
EXEC UTL_RECOMP.recomp_parallel();
EXEC UTL_RECOMP.recomp_parallel(NULL, 'SCOTT');
UTL_RECOMP包的一些使用限制
(1).并行执行使用的是job队列.当运行并行编译的时候所有job都会被diable直到编译完成.
(2).包必须在sqlplus中以sys用户或者有sysdba权限的用户运行.
(3).UTL_RECOMP依赖于DBMS_STANDARD,DBMS_JOB,DBMS_RANDOM
(4).如果在运行这个包的时候执行DDL语句可能会导致死锁.
4.utlrp.sql 和 utlprp.sql
utlrp和utlprp脚本可以用来重编译数据库的所有无效对象.通常我们会在Oracle的升级指导中看到这个脚本,Oracle强烈推荐在migration/upgrade/downgrade之后,通过运行此脚本编译失效对象.脚本位于$ORACLE_HOME/rdbms/admin目录.你可以看到utlrp.sql只是调用utlprp.sql,utlrp.sql在调用utlprp.sql的时候会传递给它一个参数,默认为0,这个参数其实就是并行度,其实utlprp.sql调用的是utl_recomp.recomp_parallel:
0 - 基于CPU_COUNT参数设置并行度.
1 - 以串行方式编译对象,一次编译一个.
N - 以N个并行度进行编译.
脚本需要以sys用户或者有sysdba权限的用户来运行.