1
显示游标
create
table
T1
(
sex
varchar2
(
10
),
name
varchar2
(
20
));
insert
into
t1
values
(
'
男
'
,
'
小刘
'
);
insert
into
t1
values
(
'
女
'
,
'
小陈
'
);
insert
into
t1
values
(
'
女
'
,
'
晓燕
'
);
insert
into
t1
values
(
'
女
'
,
'
小红
'
);
commit
;
select
*
from
t1
;
DECLARE
CURSOR
c_t1_cursor
is
select
sex
,
name
from
t1
where
sex=
'
女
'
;
v_sex t1
.
sex
%type
;
v_name t1
.
name
%type
;
begin
open
c_t1_cursor
;
loop
fetch
c_t1_cursor
into
v_sex
,
v_name
;
exit
when
c_t1_cursor%notfound
;
print
(
v_name||
' is '
||v_sex
);
end
loop
;
close
c_t1_cursor
;
end
;
注：游标的定义要在匿名块的定义部分定义，游标打开、提取数据、关闭都在执行部分。
2
参数游标
语法：
CURSOR cursor_name
[(parameter_name datatype, ...)]
IS
select_statement;
......
OPEN cursor_name(parameter_value,.....) ;
DECLARE
CURSOR
c_t1_cursor
(
c_sex
varchar2
(
10
))
is
select
sex
,
name
from
t1
where
sex=c_sex
;
v_sex t1
.
sex%type
;
v_name t1
.
name%type
;
begin
open
c_t1_cursor
(
'
男
'
);
loop
fetch
c_t1_cursor
into
v_sex
,
v_name
;
exit
when
c_t1_cursor%notfound
;
print
(
v_name||
' is '
||v_sex
);
end
loop
;
close
c_t1_cursor
;
end
;
注：open c_t1_cursor('
男')
也可以改为
open
c_t1_cursor
(
&sex
);
3
游标for
循环
语法：
FOR record_name IN cursor_name|select_statement LOOP
statement1;
statement2;
......
END LOOP;
begin
for
t1_record
in
(
select
sex
,
name
from
t1
where
sex=
'
女
'
)
loop
print
(
t1_record
.
name||
' is '
||t1_record
.
sex
);
end
loop
;
end
;
4
游标表达式
语法：
TYPE ref_type_name
IS REF CURSOR
[RETURN return_type];
cursor_variable ref_type_name;
ref_type_name
：用于指定自定义类型名
RETURN
：用于指定返回结果的数据类型
cursor_variable
：用于指定游标变量名
DECLARE
TYPE
t1_cursor
IS
REF
CURSOR
;
my_cursor t1_cursor
;
v_sex t1
.
sex%type
;
v_name t1
.
name%type
;
begin
OPEN
my_cursor
FOR
select
sex
,
name
from
t1
where
sex=
'
女
'
;
LOOP
FETCH
my_cursor
INTO
v_sex
,
v_name
;
EXIT
WHEN
my_cursor%NOTFOUND
;
print
(
v_name||
' is '
||v_sex
);
end
loop
;
close
my_cursor
;
end
;