1.首先在包中定义一个类型 create or replace package pack_type as type mycur is ref cursor; end; 2.在存储过程中引用 create or replace procedure my_test_proc (cur out pack_type.mycur) as begin open cur for select * from all_tables; end my_test_proc; 3.在sql/plus显示 set pagesize 40; set linesize 1024; set serveroutput on; var v refcursor; call my_test_proc(:v); print v;