存储过程实现
declare
Type arr_tab_type Is Table Of Number(2) Index By Binary_Integer;
tab arr_tab_type;
begin
for i in 1..7 loop
if i<>7 then
Select trunc(dbms_random.Value(1,34)) Into tab(i) From dual;
else
select trunc(dbms_random.value(1,17)) into tab(i) from dual;
end if;
if i>=2 and i<>7 then
for j in i..1 loop
if tab(i)=tab(j-1) then
select trunc(dbms_random.Value(1,34)) into tab(i) from dual;
else
null;
end if;
end loop;
end if;
dbms_output.put_line(tab(i));
end loop; end;
本文地址：https://www.39baobao.com/show/15_3184.html
以上内容来自互联网，请自行判断内容的正确性。若本站收录的信息无意侵犯了贵司版权，请联系我们，我们会及时处理和回复，谢谢.
