--
-- alterTdropFK-sql.txt
--

-- Simple script which demonstrates how to generate and then run
-- a series of SQL commands.
-- In this demo I issue 
-- ALTER TABLE blah DROP CONSTRAINT whatever;
-- commands for all tables listed in the user_tables view.


DECLARE

   CURSOR tnameCursor IS           
      SELECT table_name, constraint_name
      FROM user_constraints
      WHERE constraint_type='R';

   myTableName      VARCHAR2(222);
   myConstraintName VARCHAR2(222);
   aSQLcmd          VARCHAR2(222);

BEGIN

   FOR aRecord IN tnameCursor LOOP

     myTableName := aRecord.table_name;
     myConstraintName := aRecord.constraint_name;
     aSQLcmd := 'ALTER TABLE '||myTableName||' DROP CONSTRAINT '||myConstraintName;
     EXECUTE IMMEDIATE  aSQLcmd;

   END LOOP;

END;
/