config_ora.sql

很好用的数据库连接组件

END;
END;
/

BEGIN
DECLARE
cnt integer := 0;
BEGIN
    SELECT 1 INTO cnt FROM dual WHERE exists(SELECT * FROM user_tables WHERE table_name = 'NEW_MONITORPARAMINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_monitorparaminfo 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_MONITORLINEINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_monitorlineinfo 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_MONITORCODEINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_monitorcodeinfo 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_MODULEINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_moduleinfo 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_LINKINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_linkinfo 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_LINKGROUPCONFIG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_linkgroupconfig 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_LINKCONFIG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_linkconfig 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_LANINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_laninfo 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_JXTKGPINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_jxtkgpinfo 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_JXJXINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_jxjxinfo 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_JXCONFIG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_jxconfig 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_JX1CONFIG');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_jx1config 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_DIRECTIONINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_directioninfo 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_CENTREXINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_centrexinfo 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_BUSYINDEXINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_busyindexinfo 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_BILLINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_billinfo 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_ALARMTYPEINFO');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table new_alarmtypeinfo 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 = 'CPU_TABLE');
    IF cnt!=0 THEN
        DECLARE s  VARCHAR2(500);
        BEGIN
            s := 'drop table cpu_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;
/

/*==============================================================*/
/* Table: cpu_table                                             */
/*==============================================================*/


create table cpu_table  (
   offinum              CHAR(8)                          not null,
   cpu_name             CHAR(10)                         not null,
   billno               SMALLINT                       default 0  not null,
   content              VARCHAR2(32),
   starttime            DATE,
   endtime              DATE,
   period               NUMBER(2)                       default 60,
   constraint PK_CPU_TABLE primary key (offinum, cpu_name, billno)
)
/


/*==============================================================*/
/* Table: new_alarmtypeinfo                                     */
/*==============================================================*/


create table new_alarmtypeinfo  (
   almtypeid            NUMBER(2)                         not null,
   almtypename          VARCHAR2(32),
   tablename            VARCHAR2(32),
   constraint PK_NEW_ALARMTYPEINFO primary key (almtypeid)
)
/


/*==============================================================*/
/* Table: new_billinfo                                          */
/*==============================================================*/


create table new_billinfo  (
   billid               CHAR(4)                          not null,
   billname             VARCHAR2(60),
   constraint PK_NEW_BILLINFO primary key (billid)
)
/


/*==============================================================*/
/* Table: new_busyindexinfo                                     */
/*==============================================================*/


create table new_busyindexinfo  (
   offinum              CHAR(8)                          not null,
   indexid              SMALLINT,
   constraint PK_NEW_BUSYINDEXINFO primary key (offinum)
)
/