DECLARE
TYPE InteArrayTyp IS TABLE OF integer(20) INDEX BY
BINARY_INTEGER;
v_1 InteArrayTyp;
k INTEGER :=0;
Temp INTEGER := 0;
cursor bb is SELECT SNO FROM STUDENT where SNAME = 'ldh';
BEGIN
open bb;
loop
fetch bb into v_1(k);
exit when bb%notfound;
dbms_output.put_line(v_1(k));
--对数组中的数据进行排序,这个总报找不到数据的错误。
IF (v_1(k-1)>=v_1(k)) then
TEMP:= V_1(k-1);
V_1(k-1):= V_1(k);
v_1(k):= v_1(k-1);
k := k+1;
End If;
end loop;
--输出游标活动的次数
dbms_output.put_line('The times of cursor to fetch ' || k);
close bb;
end;
/*定一个数组,然后用游标在数据库中取得数据单元,把数据单元赋值
给数组,
然后对数组进行排序,然后再把这个数组更新到原来的单元显示出来
也就是数据库中的排序效果*/
本文介绍了一个PL/SQL程序实例,演示如何定义并初始化一个整型数组,通过游标从数据库中获取数据填充该数组,并实现对数组元素的排序。此外,还展示了如何输出排序过程中的游标活动次数。
701

被折叠的 条评论
为什么被折叠?



