How can drop procedure through pl.sql
hi
i want drop all invalid procedure how can do that
SQL> ED
Wrote file afiedt.buf
1 create or replace procedure DROPINVALIDPROCEDURE
2 is
3 CURSOR C1 IS select distinct(object_name) from user_objects where OBJECT_t
pe = 'PROCEDURE' AND STATUS = 'INVALID';
4 v1 varchar2(100);
5 begin
6 OPEN C1;
7 LOOP
8 FETCH C1 INTO V1;
9 EXECUTE IMMEDIATE 'DROP PROCEDURE' || V1;
10 EXIT WHEN C1%NOTFOUND;
11 END LOOP;
12 CLOSE C1;
13* END;
SQL> /
Procedure created.
SQL> EXEC DROPINVALIDPROCEDURE;
BEGIN DROPINVALIDPROCEDURE; END;
*
ERROR at line 1:
ORA-00950: invalid DROP option
ORA-06512: at "SCOTT.DROPINVALIDPROCEDURE", line 9
ORA-06512: at line 1
regards
Mohammadi