使用oracle pl / slq创建一个表

时间:2017-08-07 15:36:48

标签: oracle plsql procedure

我收到此错误ORA-00933:SQL命令未正确结束,但我看不出问题所在。

创建包:

CREATE OR REPLACE PACKAGE "TOOL_PKG" IS 
   PROCEDURE CREATE_ZTEMP_CLAIMS_TABLES;
END TOOL_PKG;
/

为包创建一个过程。我在尝试运行该程序时遇到错误。

我想要做的是创建一个包含现有表的新表。我需要它动态,因为我将在列表中添加更多表。

CREATE OR REPLACE PACKAGE BODY CUBS_OWNER."TOOL_PKG" IS 
PROCEDURE CREATE_NEW_TABLE IS

        type array_t is table of varchar2(50) index by pls_integer;
        my_table_t array_t;
        elem varchar2(50);
        c int;
    BEGIN
        my_table_t (1) := 'MY_TABLE';

        elem := my_table_t.first;
        while elem is not null loop
            select count(*) into c from user_tables where table_name = upper('ZTEST_'||my_table_t(elem));
            if c=0 then
                 Begin
                    execute immediate 'CREATE TABLE upper(NEWX_'||my_table_t(elem)||') AS SELECT * FROM upper('||my_table_t(elem)||') where rownum=0';
                    COMMIT;
                    DBMS_OUTPUT.put_line ('ZTEST_'||my_table_t(elem)||' created.');
                 EXCEPTION
                 WHEN OTHERS
                    THEN
                    DBMS_OUTPUT.put_line (
                        'tool_pkg.create_new_table...failed creating table '
                        || CHR (10)
                        || SQLERRM);
                 END;
            end if;
            elem := my_table_t.next(elem);
        end loop;

    EXCEPTION
        WHEN OTHERS
        THEN
            DBMS_OUTPUT.put_line (
               'tool_pkg.create_new_table...failed creating table  '
            || CHR (10)
            || SQLERRM);
   END;

END tool_pkg;
/

1 个答案:

答案 0 :(得分:0)

我必须确保上面的方法不在引号之内。

而不是这个

execute immediate 'CREATE TABLE upper(NEWX_'||my_table_t(elem)||') AS SELECT * FROM upper('||my_table_t(elem)||') where rownum=0';

必须采用这种形式

execute immediate 'CREATE TABLE '||upper('NEWX_'||my_table_t(elem))||' AS SELECT * FROM '||upper(my_table_t(elem))||' where rownum=0';