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;
oracle 插入
【声明】:本博客不参与任何交易,也非中介,仅记录个人感兴趣的主机测评结果和优惠活动,内容均不作直接、间接、法定、约定的保证。访问本博客请务必遵守有关互联网的相关法律、规定与规则。一旦您访问本博客,即表示您已经知晓并接受了此声明通告。