Bütün PL/SQL bloklarını recompile eden script

Aşağıdakı script ile veritabanında kullanıcıların yarattığınız bütün pl/sql bloklarını recompile edebilirsiniz.
( Not: Script 11g R2 de test edilmiştir. )

begin
for cnst in (SELECT OWNER, OBJECT_NAME, OBJECT_TYPE FROM ALL_OBJECTS WHERE OBJECT_TYPE IN ('TRIGGER','FUNCTION','PROCEDURE','PACKAGE') and OWNER not in ('SYS','SYSTEM','SYSMAN','DBSNMP','OLAPSYS','ORACLE_OCM','WMSYS','OUTLN')) loop
begin
execute immediate 'alter '|| cnst.OBJECT_TYPE || ' '|| cnst.OWNER || '.' ||cnst.OBJECT_NAME || ' compile';
exception
when Others then null;
--raise_application_error(-20004, 'alter '|| cnst.OBJECT_TYPE || ' '|| cnst.OWNER || '.' ||cnst.OBJECT_NAME || ' compile');
end;
end loop;
end;