select owner,object_name,object_type,'alter' ||decode(object_type,'VIEW','VIEW','TRIGGER','TRIGGER','PROCEDURE','PROCEDURE'
,'FUNCTION','FUNCTION','PACKAGE','PACKAGE','PACKAGE BODY','PACKAGE','NONE') ||' ' ||OWNER ||'.' || OBJECT_NAME ||
' compile'|| decode(object_type,'PACKAGE BODY','BODY') || ';' sql
from dba_objects
where 1=1
and status='INVALID'
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/30201626/viewspace-1586068/
,如需转载,请注明出处,否则将追究法律责任。