文章作者 100test 发表时间 2007:05:15 12:19:41
来源 100Test.Com百考试题网
一、先在oracle中编写测试过程
1、首选建一个测试表
-- Create table
create table BOOK
(
BOOKID VARCHAR2(50) not null,
BOOKNAME VARCHAR2(50) not null,
PUBLISHER VARCHAR2(50) not null,
PRICE VARCHAR2(50) null
)
2、编写ORACLE测试过程
CREATE OR REPLACE PACKAGE pkg_test
AS
TYPE myrctype IS REF CURSOR.
PROCEDURE get (p_id VARCHAR2, p_str OUT VARCHAR2, p_rc OUT myrctype).
END pkg_test.
/
CREATE OR REPLACE PACKAGE BODY pkg_test
AS
PROCEDURE get (p_id VARCHAR2, p_str OUT VARCHAR2,p_rc OUT myrctype)
IS
sqlstr VARCHAR2 (500).
BEGIN
p_str := Hello,may~ .
IF p_id = all THEN
OPEN p_rc FOR
SELECT *
FROM BOOK.
ELSE
sqlstr :=
0select *
from BOOK where BOOKID=:w_id .
OPEN p_rc FOR sqlstr USING p_id.
END IF.
END get.
END pkg_test.
/
在这里我们建立了一个输入参数,为普通类型,两个输出参数,其中一个为普通VARCHAR2型,另一个为特殊的记录集类型。
(注:在数据库端测试一下这个过程,以确保没有问题,开始下面的操作~:)