Recompile all invalid stored procedures in Oracle

In Sql_plus
Spool Execcompproc.sql
Select ' Alter PROCEDURE ' | | object_name| | ' compile; ' From all_objects where status = ' INVALID ' and object_type = ' PROCEDURE ';
Spool off
@ExecCompProc. Sql; Organize into a stored procedure
Create Or Replace Procedure zl_compile_invalid_procedure as
strSQL VARCHAR2 (200);
Begin
For x in (Select object_name from all_objects Where Status = ' INVALID ' and object_type = ' PROCEDURE ') Loop
strSQL: = ' Alter Procedure ' | | X.object_name | | ' Compile ';
Begin
Execute Immediate strSQL;
Exception
--when others Then Null;
When others Then Dbms_output.put_line (SQLERRM);
End;
End Loop;
End;

Perform
exec zl_compile_invalid_procedure;
If you want to see an error message for a procedure that cannot be recompiled, you need to set up set serverout on before you perform