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;
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;
(
RET OUT MYTYPE.MYCUR //去掉分号
)
IS
BEGIN
OPEN RET FOR SELECT * FROM SYSTEM.SIMLE;
END GETDAN;