Oralce存储过程中创建表

需要用到动态sql。
　1、首先要给用户赋予权限：

      grant create any table to 用户名;

　　2、创建存储过程：
　　create procedure p_create_table
　　(v_sql varchar2)--输入建表语句
　　as
　　begin
　　execute immediate v_sql;
　　end;
　　3、执行：

create or replace procedure createtable(tname in varchar2)
is
    SQLTEXT varchar2(400);
    v_createsql varchar2(400);
    v_dropsql varchar2(100);
    v_count number(9);
begin

   SQLTEXT := 'grant create any table to newsname';  --newsname为数据库用户名，这里需要给他创建表的权限
   EXECUTE IMMEDIATE SQLTEXT;
    v_createsql:='create table '||tname||'(
                    a  number(8) primary key,
                    b varchar2(20))';
    v_dropsql:='drop table '||tname||' cascade constraints';
    select count(*) into v_count from user_tables where table_name=upper(tname);
    if v_count>0 then
      execute immediate v_dropsql;
      commit;
    end if;

    execute immediate v_createsql;
    commit;
end;

所以根据上面的第一条规则，可以显示地将CREATE ANY TABLE权限授予cog就可以了，即
GRANT CREATE ANY TABLE TO COG;