PL/SQL Code For Dropping All Objects in Schema

DECLARE
v_itemcount INTEGER;
BEGIN
SELECT Count(*)
INTO   v_itemcount
FROM   all_objects AO
WHERE  AO.owner = USER
AND AO.object_type NOT IN ( ‘INDEX’ )
AND AO.object_name NOT LIKE ‘BIN$%’;

WHILE ( v_itemcount > 0 ) LOOP
FOR v_cmd IN (SELECT ‘drop ‘
|| AO.object_type
|| ‘ ‘
|| AO.object_name
|| Decode(AO.object_type, ‘TABLE’,
‘ CASCADE CONSTRAINTS’,
”) AS DROPCMD
FROM   all_objects AO
WHERE  AO.owner = USER
AND AO.object_type NOT IN ( ‘INDEX’ )
AND AO.object_name NOT LIKE ‘BIN$%’) LOOP
BEGIN
EXECUTE IMMEDIATE v_cmd.dropcmd;
EXCEPTION
WHEN OTHERS THEN
NULL; — ignore errors
END;
END LOOP;

SELECT Count(*)
INTO   v_itemcount
FROM   all_objects AO
WHERE  AO.owner = USER
AND AO.object_type NOT IN ( ‘INDEX’ )
AND AO.object_name NOT LIKE ‘BIN$%’;
END LOOP;

EXECUTE IMMEDIATE ‘purge recyclebin’;
END;

NOTE: Be Careful Before Running it On Production Environment