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 '
,'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博客 ” ,链接:http://blog.itpub.net/30201626/viewspace-1586068/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/30201626/viewspace-1586068/