Caused by: java.sql.SQLException: ORA-20000: ORA-02297: Constraint (SCHEMA.SPIL_PK) kann nicht deaktiviert werden - Abhängigkeiten sind vorhanden: Fehlgeschlagen => ALTER TABLE SPIEL DISABLE CONSTRAINT SPIL_PK
ORA-06512: in "<SCHEMA>.PR_CLEAR_DATABASE", Zeile 59
ORA-06512: in "<SCHEMA>.PR_CLEAR_DATABASE", Zeile 59
ORA-06512: in Zeile 1

CREATE OR REPLACE PROCEDURE pr_CLEAR_DATABASE
AS

  CURSOR lc_select_table
  IS
    SELECT TABLE_NAME
    FROM USER_TABLES
    WHERE TABLE_NAME NOT IN ('SCHEMA_VERSION', 'KMS') 
       AND TABLE_NAME NOT LIKE 'QRTZ_%' 
    ORDER BY 1;
    
  CURSOR lc_enable_constraints
  IS
    SELECT 
     CONSTRAINT_NAME,
     TABLE_NAME
   FROM 
     USER_CONSTRAINTS
   WHERE 
     STATUS         = 'DISABLED'
     AND CONSTRAINT_TYPE IN ('P','R')
     AND TABLE_NAME NOT  IN ('SCHEMA_VERSION') 
     AND TABLE_NAME NOT LIKE 'QRTZ_%'
   ORDER BY R_CONSTRAINT_NAME DESC;
    
  CURSOR lc_disable_constraints
  IS
    SELECT 
     CONSTRAINT_NAME,
     TABLE_NAME
   FROM 
     USER_CONSTRAINTS
   WHERE 
     STATUS         = 'ENABLED'
     AND CONSTRAINT_TYPE IN ('P','R')
     AND TABLE_NAME NOT  IN ('SCHEMA_VERSION') 
     AND TABLE_NAME NOT LIKE 'QRTZ_%'
   ORDER BY R_CONSTRAINT_NAME ASC;
    
  lv_user            VARCHAR2(128);
  lv_sql             VARCHAR2(512);
BEGIN
 
  SELECT USER INTO lv_user FROM DUAL;
  IF ((lv_user='SYSTEM') OR (lv_user='SYS')) THEN
    RETURN;
  END IF;
  
  EXECUTE IMMEDIATE 'PURGE RECYCLEBIN';
  
  -- DISABLE table's constraints
  FOR lv_constraint IN lc_disable_constraints
  LOOP
    lv_sql := 'ALTER TABLE ' || lv_constraint.TABLE_NAME || ' DISABLE CONSTRAINT ' || lv_constraint.CONSTRAINT_NAME;
    BEGIN
      EXECUTE IMMEDIATE lv_sql ;
    EXCEPTION
    WHEN OTHERS THEN
      raise_application_error ( -20000, SQLERRM || ': Fehlgeschlagen => ' || lv_sql);
    END;
  END LOOP;
  
  -- TRUNCATE tables
  FOR lv_table IN lc_select_table
  LOOP
    --get table name
    lv_sql := 'TRUNCATE TABLE ' || lv_table.TABLE_NAME;
    BEGIN
      EXECUTE IMMEDIATE lv_sql ;
    EXCEPTION
    WHEN OTHERS THEN
      raise_application_error ( -20000, SQLERRM || ': Fehlgeschlagen => ' || lv_sql);
    END;
  END LOOP;
  
  -- ENABLE table's constraints
  FOR lv_constraint IN lc_enable_constraints
  LOOP
    lv_sql     := 'ALTER TABLE ' || lv_constraint.TABLE_NAME || ' ENABLE CONSTRAINT ' || lv_constraint.CONSTRAINT_NAME;
    BEGIN
      EXECUTE IMMEDIATE lv_sql ;
    EXCEPTION
    WHEN OTHERS THEN
      raise_application_error ( -20000, SQLERRM || ': Fehlgeschlagen => ' || lv_sql);
    END;
  END LOOP;
END;
/