CREATE OR REPLACE PACKAGE REF_CURSOR_TEST IS
     TYPE T_ACCOUNTS_CURSOR IS REF CURSOR;
     FUNCTION GET_ACCOUNTS_FUNCTION RETURN T_ACCOUNTS_CURSOR;

-- =============================================
-- Declare a SCROLL cursor and use various FETCH options
-- =============================================
DECLARE <cursor_name, sysname, test_cursor> SCROLL CURSOR FOR

-- =============================================
-- Declare a SCROLL cursor and use various FETCH options
-- =============================================
DECLARE <cursor_name, sysname, test_cursor> SCROLL CURSOR FOR

-- =============================================
-- Declare and using a KEYSET cursor
-- =============================================
DECLARE <cursor_name, sysname, test_cursor> CURSOR

-- =============================================
-- Declare and using a KEYSET cursor
-- =============================================
DECLARE <cursor_name, sysname, test_cursor> CURSOR

-- =======================================================
-- Create stored procedure with CURSOR OUTPUT parameters 
-- =======================================================
-- drop stored procedure if it already exists

-- =======================================================
-- Create stored procedure with CURSOR OUTPUT parameters 
-- =======================================================
-- drop stored procedure if it already exists

-- =============================================
-- Declare and using a READ_ONLY cursor
-- =============================================
DECLARE <cursor_name, sysname, test_cursor> CURSOR

-- =============================================
-- Declare and using a READ_ONLY cursor
-- =============================================
DECLARE <cursor_name, sysname, test_cursor> CURSOR

DECLARE vReferencia     articulos.referencia%TYPE;
     --
     -- cursor para obtener la divisa por defecto
         --
     DECLARE DIVISA_Cursor CURSOR FOR

DECLARE UNombre               ubicaciones.nombre%TYPE;
     --
     -- cursor para la tabla Ubicaciones
         --
     DECLARE Almacen_Cursor CURSOR FOR

DECLARE snota          notas_credito.idnota%TYPE;
     --     
     -- cursor para la tabla cxc
         --
            DECLARE fact_Cursor CURSOR FOR

 DECLARE Editable     presupuestoscli.editable%TYPE;
     --
     -- cursor para el campo editable
         --
     DECLARE PRESUPUESTOTABLE_Cursor CURSOR FOR

 DECLARE Editable     pedidoscli.editable%TYPE;
     --
     -- cursor para el campo editable
         --
     DECLARE PRESUPUESTOTABLE_Cursor CURSOR FOR

-- =============================================
-- Declare and using an UPDATE cursor
-- =============================================
DECLARE <@variable_1, sysname, @v1> <datatype_for_variable_1, sysname, varchar(20)>,

-- =============================================
-- Declare and using an UPDATE cursor
-- =============================================
DECLARE <@variable_1, sysname, @v1> <datatype_for_variable_1, sysname, varchar(20)>,

 DECLARE Saldoini       cxc.saldoini%TYPE;
     --
     -- cursor para la tabla aplicaciones
         --
            DECLARE cxc_Cursor CURSOR FOR

 DECLARE rHasta          ALIAS FOR $2;
     --
     -- cursor para guardar las fechas
         --
DECLARE Reporte_Facturas_Cursor CURSOR FOR

 DECLARE rHasta          ALIAS FOR $2;
     --
     -- cursor para guardar las fechas
         --
DECLARE Reporte_Compras_Cursor CURSOR FOR

--
BEGIN;
DECLARE foo13 CURSOR FOR 
   SELECT * FROM onek WHERE unique1 = 50;
DECLARE foo14 CURSOR FOR

--
BEGIN;
DECLARE foo13 CURSOR FOR 
   SELECT * FROM onek WHERE unique1 = 50;
DECLARE foo14 CURSOR FOR

--
BEGIN;
DECLARE foo13 CURSOR FOR 
   SELECT * FROM onek WHERE unique1 = 50;
DECLARE foo14 CURSOR FOR

--
BEGIN;
DECLARE foo13 CURSOR FOR 
   SELECT * FROM onek WHERE unique1 = 50;
DECLARE foo14 CURSOR FOR

--
BEGIN;
DECLARE foo13 CURSOR FOR 
   SELECT * FROM onek WHERE unique1 = 50;
DECLARE foo14 CURSOR FOR

--
BEGIN;
DECLARE foo13 CURSOR FOR 
   SELECT * FROM onek WHERE unique1 = 50;
DECLARE foo14 CURSOR FOR