发布网友
共1个回答
热心网友
v_cnt:=1;
loop
exit when v_cnt >500;
P_A(v_cnt).QTY :=v_tot;
v_cnt :=v_cnt + 1;
v_tot :=v_tot - 1;
end loop;
for i in 0..499 loop
for v_tot in reverse 0..499 loop
if P_A(j).QTY>P_A(j+1).QTY then
t_temp:=P_A(j).QTY;
P_A(j).QTY:=P_A(j+1).QTY;
P_A(j+1).QTY:=t_temp;
end if;
end loop;
end loop;
P_A(0) null