如何在存储过程中使用alter语句？

[bluebirdwoo]

在oracle中建立如下存储过程
create or replace procedure MoveTablespace(p_TableName in varchar2, p_TablespaceName in varchar2)
authid current_user is

v_Cursor number;
v_DDLString varchar2(100);
v_NumRows integer;

begin
v_Cursor := dbms_sql.open_cursor;
v_DDLString := 'alter table :Table_Name move tablespace :TablespaceName';
dbms_sql.parse(v_Cursor, v_DDLString, dbms_sql.native);
dbms_sql.bind_variable(v_Cursor, ':TableName', p_TableName);
dbms_sql.bind_variable(v_Cursor, ':TablespaceName', p_TablespaceName);
v_NumRows := dbms_sql.execute(v_Cursor);
dbms_output.put_line(v_NumRows || 'rows affected');
dbms_sql.close_cursor(v_Cursor);
exception
when others then
dbms_output.put_line('exception ocurred');
dbms_sql.close_cursor(v_Cursor);
end;

编译通过，但在sqlplus中执行
exec movetablespace(cjdaold, whcj)
时出错
ERROR 位于第 1 行:
ORA-06550: 第 1 行, 第 22 列:
PLS-00357: 在此上下文中不允许表，视图或序列引用 'CJDAOLD'
ORA-06550: 第 1 行, 第 7 列:
PL/SQL: Statement ignored

请问怎么解决这个问题啊？

[laofang]

这样就可以：
create or replace procedure MoveTablespace(p_TableName in varchar2,
p_TablespaceName in varchar2)
authid current_user is

v_Cursor number;
v_DDLString varchar2(100);
v_NumRows integer;

begin
v_Cursor := dbms_sql.open_cursor;

v_DDLString := 'alter table ' || p_TableName || ' move tablespace ' || p_TablespaceName;
dbms_output.put_line(v_DDLString);

dbms_sql.parse(v_Cursor, v_DDLString, dbms_sql.native); --v7

v_NumRows := dbms_sql.execute(v_Cursor);

dbms_output.put_line(v_NumRows || 'rows affected');
dbms_sql.close_cursor(v_Cursor);
exception
when others then
dbms_output.put_line('exception ocurred: '||sqlerrm);
dbms_sql.close_cursor(v_Cursor);
end;

[bluebirdwoo]

我把你写的这个重新编译后
再运行还是出现同样的错误啊

[bluebirdwoo]

自己顶一下
哪位大牛帮帮忙啊！

[HjmaAsC]

应该在新的表空间中没有权限的缘故吧？或者引用的名称不正确。

[laofang]

我在自己的机器上测试过没有问题的，你检查一下用户在程序过程中执行alter命令的权限。

[wvivw]

学习

[bluebirdwoo]

我直接运行
begin
execute immediate 'alter table cjdaold move tablespace whcj';
end;
是可以的

这说明有权限
估计是用变量作为表名的问题

[laofang]

你把你这几行语句写在存储过程中执行试试看