PLSQL 申明和游标

--从键盘输入一个数
accept b prompt '请输入一个大于零的数字';
declareanum number := &b;
beginwhile anum>0loopdbms_output.put_line(anum);anum:=anum-1;end loop;
end;declarev_num number;
begin
-- 从stsu表中选出id最大的值，并根据该值打印次数select max(id) into v_num from stsu;loopdbms_output.put_line(v_num);v_num := v_num-1;exit when v_num=0;end loop;
end;declarecursor cur is select id,math from stsu;
beginfor cur in (select id,math from stsu)loopdbms_output.put_line(cur.id ||'编号学员的数学分数：'||cur.math);end loop;
end;declare cursor cursor_id is select id,math from stsu;v_id stsu.id%type;v_math stsu.math%type;
begin --打开游标open cursor_id;loop -- 抓取数据fetch cursor_id into v_id,v_math;exit when cursor_id%notfound;dbms_output.put_line(v_id||'  '||v_math);end loop;-- 关闭游标close cursor_id;
end;