ITPub博客

首页 > Linux操作系统 > Linux操作系统 > Type table and ForAll用法

Type table and ForAll用法

原创 Linux操作系统 作者:Farmor 时间:2011-04-18 16:09:21 0 删除 编辑

DECLARE
  TYPE c_a IS TABLE OF VARCHAR2(200) INDEX BY BINARY_INTEGER;
  TYPE c_b IS TABLE OF po_vendors%ROWTYPE INDEX BY BINARY_INTEGER;
  v_1 c_a;
  CURSOR cur IS
    SELECT *  from po_vendors pv WHERE pv.vendor_id < 10;
  n NUMBER;
BEGIN
  n := 0;
  FOR i IN cur LOOP
    n := n + 1;
    v_1(n) := i.vendor_name;
  END LOOP;
  dbms_output.put_line(v_1.first);
  dbms_output.put_line(v_1.last);
  dbms_output.put_line(v_1.count);
  --v_1.delete; -- 清除数组
  FORALL j IN 1 .. v_1.count
    INSERT INTO cux_vendor (vendor_id, vendor_name) VALUES (1, v_1(j));

  FOR j IN v_1.first .. v_1.last LOOP
    INSERT INTO cux_vendor (vendor_id, vendor_name) VALUES (1, v_1(j));
  END LOOP;
END;

--create table
CREATE TABLE cux_vendor(vendor_id NUMBER, vendor_name VARCHAR2(240));
--
SELECT * FROM cux_vendor;

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/25684327/viewspace-692772/,如需转载,请注明出处,否则将追究法律责任。

上一篇: Ref Cursor用法
请登录后发表评论 登录
全部评论

注册时间:2011-04-13

  • 博文量
    22
  • 访问量
    29470