INVALID 상태의 OBJECT를 RECOMPILE하는 PROCEDURE

Question

제품 : ORACLE SERVER
작성날짜 : 2002-04-18
INVALID 상태의 OBJECT를 RECOMPILE하는 PROCEDURE
===============================================
Purpose
Import를 하거나 DDL 작업을 하고 나서 procedure 나 package등의
pl/sql object가 invalid로 빠지는 경우가 있다. 이런 object들을
찾아서 recompile해주는 procedure를 소개한다.
Explanation
이 procedure는 User 내의 모든 Invalid 상태의 procedure, function,
package 등의 Object 들을 Recompile한다. Compile에러가 발생하는 경우
dbms_output package를 이용하여 화면에 display해 주게 되므로 실행하기
전에 set serveroutput on 을 반드시 실행한다.
Invalid된 object가 많은 경우라면 compile에러의 확인을 위해 spool을
받는 것이 좋다.
CREATE OR REPLACE PROCEDURE RecompileInvalid IS
CURSOR getlist IS SELECT object_type, object_name FROM
user_objects WHERE status = 'INVALID' AND
object_type IN ('PROCEDURE', 'FUNCTION', 'PACKAGE',
'PACKAGE BODY', 'TRIGGER' );
schemaname VARCHAR2(100);
CURSOR geterr ( objname VARCHAR2, objtype VARCHAR2 ) IS
SELECT text, line, position FROM user_errors WHERE
name = objname AND type = objtype;
BEGIN
SELECT username INTO schemaname FROM user_users;
FOR getlistrec IN getlist LOOP
dbms_output.put_line( 'attempting compile on ' ||
getlistrec.object_name );
dbms_ddl.alter_compile( getlistrec.object_type,
schemaname, getlistrec.object_name );
END LOOP;
FOR getlistrec IN getlist LOOP
dbms_output.put_line( '---ERROR---' );
dbms_output.put_line( 'compile failed on ' ||
getlistrec.object_name );
FOR geterrrec IN geterr( getlistrec.object_name,
getlistrec.object_type ) LOOP
dbms_output.put_line( 'line: ' || geterrrec.line ||
' col: ' || geterrrec.position );
dbms_output.put_line( substr( geterrrec.text, 1, 100 ));
END LOOP;
END LOOP;
END;
Example
SQL> spool Compile.log
SQL> set serveroutput on
SQL> exec recompileinvalid;
attempting compile on CRYPTIT
attempting compile on CRYPTIT
attempting compile on DECRYPT
attempting compile on ENCRYPT
attempting compile on SYNC_IM_INDEX
PL/SQL procedure successfully completed.
SQL> spool off

Answer 1

우연의 일치인지 저도 어제 rac 기술지원을 나왔는데..
통계정보를 수집하려고하니 dbms_stats가 invalid되어 있더군요.
compile 명령을 하려다가 다른 패키지도 invalid되어있기도해서
utlrp.sql을 수행했습니다.
물론 백업 후 restart한 후에 세션 모두 클리어시키고 수행했습니다.
그런데 한번 해서 안되는 경우도 있으니 invalid object의 결과를 보고
utlrp.sql을 여러번 더 수행하면 해결됩니다.
## invalidobj.sql
doc
invalid 된 object에 대한 출력
col owner format a20
col object_name format a30
select owner, object_name, OBJECT_TYPE,CREATED,LAST_DDL_TIME, STATUS
from dba_objects where status<>'VALID';
글 수정:
민천사 (민연홍)
그런데 중요한 것은.. 이것이 open상태에서 수행되더라도
오라클에서는 그냥 수행해도 문제없다고 하더라도..
제 개인적인 의견으로는 서비스 중에 수행해서는 절대 안된다고
생각합니다. 서비스에 어떠한 영향이 갈지도 모르니까요. 문제가
발생하면 그건 이 작업을 수행한 DBA탓 이겠죠. 장애보고서 써야하고
골치가 아픕니다.
저같은 경우에는 백업을 2copy를 하는데 미디어(테이프장치)를
서로 다른 미디어를 써서 2copy를 해야 작업 시작하겠다고 했고
그렇게 했습니다. 또한 세션을 모두 클리어시킨 후에 작업했구요.
장애에 대한 강박관념이라고 할지 모르겠지만 지금까지 본 봐로는
이렇게 꼼꼼하게 챙기지 않고 장애가 난다면 업계에 오래에 머무르기
힘들 것 같다는 생각이 들더군요..~
제가 장애에 너무 민감해서 말씀드리는 것이지 충고를 하는 것은 아닙니다.
오해가 없으시길 바랍니다.