config_ora.sql

很好用的数据库连接组件

            s := 'drop table routes_table cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'OFFISTATUS');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table offistatus cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_USERUNITINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_userunitinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_USERLOG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_userlog cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_USERGROUPINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_usergroupinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TRAFFICALARM_CPU');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_trafficalarm_cpu cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TRAFFICALARM');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_trafficalarm cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TKGPTKGPINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_tkgptkgpinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TKGPJXINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_tkgpjxinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TKGPDESTINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_tkgpdestinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TKGPDEST_TASK');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_tkgpdest_task cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TKGPCONFIG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_tkgpconfig cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TKGP_TASK');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_tkgp_task cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_TASKINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_taskinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_STATITEMINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_statiteminfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_REPORTSAVEAS');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_reportsaveas cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_REPORTITEMINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_reportiteminfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_REPORTINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_reportinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_OFFICECONFIG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_officeconfig cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_NO7TKGPINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_no7tkgpinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);
END;
END;
/


BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_MONITORTKGPINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_monitortkgpinfo cascade constraints';
            DBMS_OUTPUT.PUT_LINE(s);
            EXECUTE IMMEDIATE  s;                
        END;
    END IF;
exception
    WHEN no_data_found  THEN
        DBMS_OUTPUT.PUT_LINE(cnt);