我上网搜索过，但找不到答案，也我已经问了很多人，这问题难道没有人能回答一下吗？

Question

create or replace procedure test (table_name varchar2)
as
  type ref_cursor  is ref cursor;
  cursor_table     ref_cursor;
  tablename        varchar2(100);
begin
  tablename := table_name;
  open   cursor_table for select * from tablename;
  close  cursor_table;
end test;
/

Answer 1

to ATCG(novel gene) 大哥
你写的编译有错的
我根据dinya2003大哥所教的将其修改为
create  or  replace  procedure  test  (table_name  varchar2)  
as  
   type  ref_cursor    is  ref  cursor;  
   cursor_table          ref_cursor;  
   tablename                varchar2(100);  
    ssql                varchar2(100); 
begin  
   tablename  :=  table_name;  
   ssql:='select  *  from  '||tablename||''; 
   open      cursor_table  for  ssql; 
   close    cursor_table;  
end  test; 
才没出错

Answer 2

根据ATCG(novel gene) 大哥和dinya2003大哥所教的
我的问题解决了，谢谢