Oracle 中的存儲(chǔ)過(guò)程在有些情況下會(huì)變成失效狀態(tài)，在 PL/SQL Developer 中該存儲(chǔ)過(guò)程的圖標(biāo)左上角顯示一把小紅叉叉。比如儲(chǔ)過(guò)程所引用的對(duì)象失效，dblink 出問(wèn)題啦都可能引起用到它的存儲(chǔ)過(guò)程失效。再就我的存儲(chǔ)過(guò)程經(jīng)常會(huì)變成無(wú)效，至今原因都未查明。

查詢(xún) dba_dependencies 視圖可以看到存儲(chǔ)過(guò)程所引用的對(duì)象，再就在 dba_objects 視圖中可以看到對(duì)象的 created 和 last_ddl_time 時(shí)間。

上面的那種無(wú)效的存儲(chǔ)程，只要不是語(yǔ)法上有問(wèn)題，重新編譯一下又是可用的了。總不能每次發(fā)現(xiàn)時(shí)人工去編譯的，所以要實(shí)現(xiàn)自動(dòng)化，有以下兩種方法(網(wǎng)上找到的所有的 在Oracle中重新編譯所有無(wú)效的存儲(chǔ)過(guò)程?代碼排版都很混亂，所以主要是重新整理了)：

1. Oracle SQL *Plus 中 -- 用 spool 生成腳本文件，然后 @ 調(diào)入執(zhí)行，代碼如下：

spool?ExecCompProc.sql ??

??

select?'alter?procedure?'||object_name||'?compile;'?from?all_objects? ??

where?status?=?'INVALID'?and?object_type?=?'PROCEDURE'?AND?owner='UNMI';? ??

??

spool?off??

??

@ExecCompProc.sql;??

spool ExecCompProc.sql select 'alter procedure '||object_name||' compile;' from all_objects where status = 'INVALID' and object_type = 'PROCEDURE' AND owner='UNMI'; spool off @ExecCompProc.sql;
2. 寫(xiě)成一個(gè)存儲(chǔ)過(guò)程 -- 讓這個(gè)存儲(chǔ)過(guò)程在某個(gè)時(shí)機(jī)執(zhí)行，比如? Job 中，代碼如下：

create?or?replace?procedure?compile_invalid_procedures( ??

????p_owner?varchar2?--?所有者名稱(chēng)，即?SCHEMA ??

)?as??

??

--編譯某個(gè)用戶(hù)下的無(wú)效存儲(chǔ)過(guò)程 ??

??

????str_sql?varchar2(200); ??

???? ??

begin??

????for?invalid_procedures?in?(select?object_name?from?all_objects ??

???????where?status?=?'INVALID'?and?object_type?=?'PROCEDURE'?and?owner=upper(p_owner)) ??

????loop ??

????????str_sql?:=?'alter?procedure?'?||invalid_procedures.object_name?||?'?compile'; ??

????????begin??

????????????execute?immediate?str_sql; ??

????????exception ??

??????????--When?Others?Then?Null; ??

????????????when?OTHERS?Then??

????????????????dbms_output.put_line(sqlerrm); ??

????????end; ??

????end?loop; ??

end;??

create or replace procedure compile_invalid_procedures( p_owner varchar2 -- 所有者名稱(chēng)，即 SCHEMA ) as --編譯某個(gè)用戶(hù)下的無(wú)效存儲(chǔ)過(guò)程 str_sql varchar2(200); begin for invalid_procedures in (select object_name from all_objects where status = 'INVALID' and object_type = 'PROCEDURE' and owner=upper(p_owner)) loop str_sql := 'alter procedure ' ||invalid_procedures.object_name || ' compile'; begin execute immediate str_sql; exception --When Others Then Null; when OTHERS Then dbms_output.put_line(sqlerrm); end; end loop; end;
在 SQL *Plus 中執(zhí)行該存儲(chǔ)過(guò)程時(shí)，如果要看到 dbms_output.put_line(sqlerrm); 的輸出，需要執(zhí)行 set serverout on 打開(kāi)輸出。

這里述及的是如何重新編譯存儲(chǔ)過(guò)程，依次推及到，重新編譯 FUNCTION、PACKAGE、TYPE、TRIGGER 等，和重建 INDEX 等。所不同的就是查詢(xún) all_objects 時(shí)的? object_type 不一樣，還有要執(zhí)行的 alter 語(yǔ)句不一樣。

object_type 有哪些可用 select distinct object_type from all_objects 獲取到；alter 的語(yǔ)句寫(xiě)法參考下面：

alter?function?function_name?compile; ??

alter?package?package)name?compile; ??

alter?type?type_name?compile; ??

alter?index?index_name?rebuild; ??

--等等............??

alter function function_name compile; alter package package)name compile; alter type type_name compile; alter index index_name rebuild; --等等............

參考：1. 為什么我的存儲(chǔ)過(guò)程總要重新編譯??
??????? 2. 在Oracle中重新編譯所有無(wú)效的存儲(chǔ)過(guò)程

---

補(bǔ)充，請(qǐng)看這里：

1. 其實(shí)存儲(chǔ)過(guò)程、函數(shù)等是 INVALID，只要內(nèi)容無(wú)錯(cuò)誤就不要緊，因?yàn)閳?zhí)行的時(shí)候會(huì)自動(dòng)重新編譯
2. 在 SQL *Plus 或者 PL/SQL Developer 的 Command Windows 中用 show? errors? procedure? procedure_name 或 show errors function function_name 可以查看到存儲(chǔ)過(guò)程具體錯(cuò)誤
3. 可以用 Oracle 提供的工具：dbms_utility.compile_schema(schema varchar2, compile_all boolean default TRUE); 來(lái)編譯某個(gè) Schema 下的所有 PROCEDURE、FUNCTION、PACKAGE 和 TRIGGER。比如執(zhí)行 dbms_utility.compile_schema('Unmi')。

轉(zhuǎn)載于:https://www.cnblogs.com/lingxzg/archive/2009/03/09/1406967.html

總結(jié)

以上是生活随笔為你收集整理的Oracle 中重新编译无效的存储过程, 或函数、触发器等对象(转)的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。