oracle练习

declare
cursor mycur is select * from emp;
myrecord emp%rowtype;
begin
open mycur;
fetch mycur into myrecord;
while mycur%found loop
DBMS_OUTPUT.PUT_LINE(myrecord.empno||','||myrecord.ename);
fetch mycur into myrecord;
end loop;
close mycur;
end;

for游标参数
declare
cursor cur_para(no varchar2) is
select ename from emp where empno = no;
begin
DBMS_OUTPUT.PUT_LINE('******结果集为******');
for cur in cur_para('7369') Loop
DBMS_OUTPUT.PUT_LINE(cur.ename);
end loop;
end;

 

//隐式游标
begin
for cur in(select ename from emp) loop
DBMS_OUTPUT.PUT_LINE(cur.ename);
end loop;
end;

create or replace procedure myproc(id varchar2, name out varchar2)
is
begin
select ename into name from emp where empno=id;
end;
/

declare
tid varchar2(10);
tname varchar2(10);
begin
tid:='0001';
myproc(tid,tname);