Ver Mensaje Individual
  #1 (permalink)  
Antiguo 06/01/2010, 10:14
Sherezade81
 
Fecha de Ingreso: junio-2008
Mensajes: 32
Antigüedad: 12 años, 5 meses
Puntos: 0
Borrar funciones

Muy buenas tardes a todos!!
Estoy tratando de hacer un ejercicio... y me encuentro con cada complicación... Les cuento por si me pueden echar un cable.
Debo crear un procedimiento para eliminar todas las funciones y procedimientos (salvo el actual). De momento, y dado todos los problemas que me encontré estoy borrando las funciones:

CREATE OR REPLACE PROCEDURE BORRA_OBJETOS10 IS
CURSOR C1 IS SELECT * FROM USER_OBJECTS WHERE OBJECT_TYPE='FUNCTION' FOR UPDATE;
BEGIN
FOR REG IN C1 LOOP
EXECUTE IMMEDIATE 'DROP '|| C1.OBJECT_TYPE || ' "' || C1.OBJECT_NAME ||'" WHERE CURRENT OF C1';
END LOOP;
END;
/

Pero me da error: ERROR en línea 5: PLS-00225: la referencia al subprograma o cursor 'C1' está fuera del ámbito
¿Saben por qué? ¿Podrían aclararme un poquito?
Muchas gracias por su atención.
Un saludo!

Última edición por Sherezade81; 06/01/2010 a las 10:19