Open Cursor的问题。急，在线等！

Question

我分别编译就OK了：---------------------------------------------SQL> create or replace package TestPackage is
  2      type tcursor is ref cursor; -- 定义游标变量
  3       procedure GetRecords(rcursor out tcursor); -- 定义过程，用游标变量作为返回参数
  4  end TestPackage;
  5  /程序包已创建。SQL> create or replace package body TestPackage is
  2            procedure GetRecords(rcursor out tcursor) as
  3            begin
  4                open rcursor for select * from jdmb;
  5            end GetRecords;
  6  end  TestPackage;
  7  /程序包主体已创建。

Answer 1

谢谢楼上的。问题已找出，是我的数据库版本太低造成的。