DECLARE
  TYPE num_tt IS TABLE OF INT;
  num_t num_tt:=num_tt();
  mid_val INT;
  mid_j INT;
BEGIN
  num_t.extend(20);
  FOR i IN 1..20 LOOP
    num_t(i) := trunc(dbms_random.value(200,100000));
  END LOOP;
  dbms_output.put_line('before sort:');
  FOR i IN 1..num_t.count LOOP
    dbms_output.put_line(num_t(i)||',');
  END LOOP;
  FOR i IN 2..num_t.count LOOP
    mid_val := num_t(i);
    mid_j := i - 1;
    WHILE(mid_j > 0) LOOP
      IF(mid_val < num_t(mid_j)) THEN
         num_t(mid_j + 1) := num_t(mid_j);
      ELSE
         EXIT;
      END IF;
      mid_j := mid_j - 1;
    END LOOP;
    num_t(mid_j+1):= mid_val;
  END LOOP;
  dbms_output.put_line('after sort:');
  FOR i IN 1..num_t.count LOOP
    dbms_output.put_line(num_t(i)||',');
  END LOOP;
END;

  

为丰满等地区用户提供了全套网页设计制作服务，及丰满网站建设行业解决方案。主营业务为成都网站设计、成都网站制作、丰满网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！

另外有需要云服务器可以了解下创新互联cdcxhl.cn，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。

网页题目：oracle插入-创新互联
分享路径：http://pwwzsj.com/article/cojiji.html