Error in Stoerd Procedure But working in Anonymous Block.

Question

declare     
     Cursor Cur Is
     Select 'Alter '||Object_Type||' '||Object_Name||' Compile' Invalid_Obj, Object_Type, Object_Name
     From Dba_Objects A
     Where A.Owner='Dataload' And A.Status='Invalid' ;
Begin
     For I In Cur
     Loop
     Begin
          Execute Immediate I.Invalid_Obj;
     Exception
          When Others Then
          Null;--Dbms_Output.Put_Line(Sqlerrm||' : '||I.Object_Type||' '||I.Object_Name);
     End;
     End Loop;
Exception
     When Others Then
     Null;--Dbms_Output.Put_Line(Sqlerrm);
End;
Above anonymous block Run successfully.
but when I create it as stored procedure then, it give error like
Dba_Objects does not exist.
Please, suggest what I do for stored procedure?
Edited by: Nilesh Hole on Jun 2, 2010 12:00 AM

Answer 1

If you don't have any sys rights you either should
a) ask the DBA to run utlrp (preferred, as that always executes compilation in the right order)
b) do not use dba_objects but user_objects, assuming you are connected as DATALOAD
In a normal situation this shouldn't be necessary, so you should still question why you even want to do this (and are reinventing the wheel). Also the dbms_utility package has a COMPILE_SCHEMA procedure.
Sybrand Bakker
Senior Oracle DBA