17,075
社区成员
发帖
与我相关
我的任务
分享
while numRowCount < 10 loop
numRand := TRUNC(dbms_random.value(1,30),0);
select count(1) into i from dc_middle_rand where midRand = numRand;
if i=0 then
EXECUTE IMMEDIATE 'Insert into dc_middle_rand values('|| numRand ||')';
commit;
numRowCount := numRowCount + 1;
end if;
end Loop;
PROCEDURE s IS
v_yhbh varchar2(10);
v_yhmc varchar2(60);
cursor bh_list is select distinct yhbh,yhmc from dbuser_manager order by yhmc ;
begin
open bh_list;
fetch bh_list into v_yhbh,v_yhmc;
while bh_list %found loop
--你的操作
fetch bh_list into v_yhbh,v_yhmc;
end loop;
close bh_list;
END;