SQL20285N  The statement or command is not allowed because the table named "TABLE_DETACHED" has detached dependents or the asynchronous partition detach operation is not complete. Reason code = "2".

SET CURRENT SCHEMA = DB2INBVB;

SET CURRENT PATH = SYSIBM,SYSFUN,SYSPROC,SYSIBMADM,DB2INBVB;

CREATE OR REPLACE PROCEDURE BVEB_ATOM.DROP_OLD_PARTITIONED_DATA (
    START_DATE IN	VARCHAR(10),
    END_DATE IN	VARCHAR(10),
    SCHEMA_NAME IN	VARCHAR(50),
    TABLE_NAME IN	VARCHAR(50),
    PARTITION_PREFIX IN	VARCHAR(100) )
IS
  /*ПЕРЕМЕННЫЕ ПРОЦЕДУРЫ*/
  DECLARE
  
    /*СГЕНЕРИРОВАННЫЙ SQL*/
    V_EXEC_SQL VARCHAR(1000);
    
    /*ИМЯ ТАБЛИЦЫ, В КОТОРУЮ БУДЕМ ПЕРЕНОСИТЬ ПАРТИЦИЮ*/
    V_DETACHED_TABLE_NAME VARCHAR(200); 
    
    /*ИМЯ ПАРТИЦИИ*/
    V_PARTITION_NAME VARCHAR(200);

    /*ИМЯ ПЕРЕМЕННОЙ ТЕКУЩЕГО СИСТЕМНОГО ВРЕМЕНИ*/
    V_NOW TIMESTAMP;
    
    /*ИМЯ ПЕРЕМЕННОЙ ВРЕМЕНИ = ТЕКУЩЕЕ СИСТЕМНОЕ + N СЕКУНД*/
    V_NOW_PLUS_N_SEC TIMESTAMP;
    
  /*СОЗДАЕМ КУРСОВ ДЛЯ МАССИВА ДАТ*/  
  CURSOR C_TABS IS 

    SELECT
      CDR_DT_ID,
      CDR_DT
    FROM BVEB_DWH.CDR_DT
    WHERE      
      CDR_DT BETWEEN DATE(START_DATE) AND DATE(END_DATE)
    ORDER BY
      CDR_DT_ID;
                    
BEGIN

  /*ПОЛУЧАЕМ ИМЯ ТАБЛИЦЫ, В КОТОРУЮ БУДЕМ ПЕРЕНОСИТЬ ПАРТИЦИЮ*/
  V_DETACHED_TABLE_NAME := TABLE_NAME || '_DETACHED';   
  
    FOR TAB IN C_TABS LOOP
  
      /*ПОЛУЧАЕМ ПОЛНОЕ ИМЯ ПАРТИЦИИ*/
        V_PARTITION_NAME := PARTITION_PREFIX || TAB.CDR_DT_ID;       
                  
        IF EXISTS (SELECT 1 FROM SYSCAT.DATAPARTITIONS WHERE TABSCHEMA = SCHEMA_NAME AND TABNAME = TABLE_NAME AND DATAPARTITIONNAME = V_PARTITION_NAME) 
          THEN
          
            IF EXISTS (SELECT 1 FROM SYSCAT.TABLES WHERE TYPE = 'T' AND TABSCHEMA = SCHEMA_NAME AND TABNAME = V_DETACHED_TABLE_NAME) 
          THEN
            V_EXEC_SQL := 'DROP TABLE ' || SCHEMA_NAME || '.' || V_DETACHED_TABLE_NAME;
          
            /*ЗАПИСЬ ПОЛУЧИВШЕГОСЯ В ЛОГ*/    
            --TRUNCATE TEST.LOG_NEW_2;    
            --INSERT INTO TEST.LOG_NEW_2(SQL) VALUES(V_EXEC_SQL);
          
            EXECUTE IMMEDIATE V_EXEC_SQL;
        END IF;
            V_EXEC_SQL := 'ALTER TABLE ' || SCHEMA_NAME || '.' || TABLE_NAME || ' DETACH PARTITION ' || V_PARTITION_NAME || ' INTO ' || SCHEMA_NAME || '.' || V_DETACHED_TABLE_NAME;
          
            --TRUNCATE TEST.LOG_NEW_2;  
            --INSERT INTO TEST.LOG_NEW_2(SQL) VALUES(V_EXEC_SQL);
            
            EXECUTE IMMEDIATE V_EXEC_SQL; 
          
          COMMIT;             

          -------------- ТАЙМИНГ ДЛЯ ОЖИДАНИЯ ОТСОЕДИНЕНИЯ ПАРТИЦИИ И РАЗБЛОКИРОВКИ ТАБЛИЦЫ --------------
          
          SELECT SYSDATE + 5 SECOND INTO V_NOW_PLUS_N_SEC FROM DUAL;
          
          /*ЦИКЛ ДЛЯ ОПРЕДЕЛЕНИЯ ТЕКУЩЕГО ВРЕМЕНИ*/
          LOOP
            SELECT SYSDATE INTO V_NOW FROM DUAL;
            
            /*УСЛОВИЕ ДЛЯ ЗАВЕРШЕНИЯ ЦИКЛА, КОГДА ТЕКУЩЕЕ ВРЕМЯ СТАНЕТ БОЛЬШЕ ИЛИ РАВНО УСТАНОВЛЕННОМУ*/
            EXIT WHEN V_NOW >= V_NOW_PLUS_N_SEC;
          END LOOP;
          
          -------------------------------------------------------------------------------------------------
  
        END IF;
        
        COMMIT;
        
    END LOOP;
     
END;