Skip to content
Snippets Groups Projects
Commit 750cf652 authored by Giuseppe Lo Presti's avatar Giuseppe Lo Presti
Browse files

Remove active queue objects from a schema

parent 481954e5
Branches
Tags
No related merge requests found
......@@ -44,6 +44,9 @@ BEGIN
EXECUTE IMMEDIATE 'DROP DATABASE LINK '||rec.object_name;
ELSIF rec.object_type = 'SYNONYM' THEN
EXECUTE IMMEDIATE 'DROP SYNONYM '||rec.object_name;
ELSIF rec.object_type = 'QUEUE' THEN
EXECUTE DBMS_AQADM.STOP_QUEUE(queue_name => rec.object_name);
EXECUTE DBMS_AQADM.DROP_QUEUE(queue_name => rec.object_name);
END IF;
EXCEPTION WHEN OTHERS THEN
-- Ignore: ORA-04043: "object string does not exist" or
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment