创建:
create or replace procedure insert_tbuser
(
username nvarchar2,usersex nvarchar2,userage number
)
as
begin
insert into tbuser values(username,usersex,userage);
end insert_tbuser;
调用:
begin
insert_tbuser('linhuide','nan',20);
commit;
end; 创建输出结果集的存储过程:
create or replace procedure up_test(o out sys_refcursor) is
begin
open o for select * from tbuser;
end; --声明包头CREATE OR REPLACE PACKAGE PACK_TESTAS --这个是游标 TYPE TESTCUR IS REF CURSOR;--这个是过程 PROCEDURE sp_test1(DWMC in VARCHAR2, LX in VARCHAR2,P_CUR OUT TESTCUR); END PACK_TEST; --声明包体CREATE OR REPLACE PACKAGE BODY PACK_TESTASPROCEDURE sp_test1(DWMC in VARCHAR2, LX in VARCHAR2,P_CUR OUT TESTCUR) isstrsql varchar2(1000);beginstrsql:='select * from test_table where dwmc=:dwmc and lx=:lx';open p_cur for strsql using dwdc,lx;--上一句的:及这一句为绑定变量end sp_test1; end PACK_TEST;