CREATE OR REPLACE  PACKAGE "SYSTEM"."MYTYPE" 
AS
    TYPE MYCUR IS REF CURSOR;
END MYTYPE;CREATE OR REPLACE  PROCEDURE "SYSTEM"."GETDAN" 
 (
    RET OUT MYTYPE.MYCUR;
 )
 IS
 BEGIN
    OPEN RET FOR SELECT * FROM SYSTEM.SIMLE;
 END GETDAN;