科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道PL/SQL 中应该如何使用Array

PL/SQL 中应该如何使用Array

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

  ---------------------- 单维数组 ------------------------   DECLARE   TYPE emp_ssn_array IS TABLE OF NUMBER   INDEX BY BINARY_IN

作者:中国IT实验室 来源:中国IT实验室 2007年9月25日

关键字: 编程 java

  • 评论
  • 分享微博
  • 分享邮件

  ---------------------- 单维数组 ------------------------
  DECLARE
  TYPE emp_ssn_array IS TABLE OF NUMBER
  INDEX BY BINARY_INTEGER;
  
  best_employees emp_ssn_array;
  worst_employees emp_ssn_array;
  
  BEGIN
  best_employees(1) := '123456';
  best_employees(2) := '888888';
  
  worst_employees(1) := '222222';
  worst_employees(2) := '666666';
  
  FOR i IN 1..best_employees.count LOOP
  DBMS_OUTPUT.PUT_LINE('i='|| i || ', best_employees= ' ||best_employees(i)
  || ', worst_employees= ' ||worst_employees(i));
  END LOOP;
  
  END;
  ---------------------- 多维数组 ------------------------
  DECLARE
  
  TYPE emp_type IS RECORD
  ( emp_id employee_table.emp_id%TYPE,
  emp_name employee_table.emp_name%TYPE,
  emp_gender employee_table.emp_gender%TYPE );
  
  TYPE emp_type_array IS TABLE OF
  emp_type INDEX BY BINARY_INTEGER;
  
  emp_rec_array emp_type_array;
  emp_rec emp_type;
  
  BEGIN
  emp_rec.emp_id := 300000000;
  emp_rec.emp_name := 'Barbara';
  emp_rec.emp_gender := 'Female';
  
  emp_rec_array(1) := emp_rec;
  
  emp_rec.emp_id := 300000008;
  emp_rec.emp_name := 'Rick';
  emp_rec.emp_gender := 'Male';
  
  emp_rec_array(2) := emp_rec;
  
  FOR i IN 1..emp_rec_array.count LOOP
  DBMS_OUTPUT.PUT_LINE('i='||i
  ||', emp_id ='||emp_rec_array(i).emp_id
  ||', emp_name ='||emp_rec_array(i).emp_name
  ||', emp_gender = '||emp_rec_array(i).emp_gender);
  END LOOP;
  
  END;
  -------------- Result --------------
  i=1, emp_id =300000000, emp_name =Barbara, emp_gender = Female
  i=2, emp_id =300000008, emp_name =Rick, emp_gender = Male

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件