发布网友 发布时间:2022-04-07 23:32
共1个回答
热心网友 时间:2022-04-08 01:01
定义包头追答create or replace package love
is
procere xt(s varchar);
end love;
/
create or replace package body love
is
procere xt(s varchar)
is
begin
declare
cursor student_cursor is select * from student where sno=s ;
begin
for r in student_cursor loop
dbms_output.put_line(r.sno || ' ');
dbms_output.put_line(r.sname || ' ');
dbms_output.put_line(r.sage || ' ');
end loop;
end;
end xt;
end love;
/
执行:
exec love.xt('1');
通过包来调用过程、过程执行游标循环输出student表中学号为输入值'1’的学生数据