---------------------- 单维数组 ------------------------
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
闽公网安备 35060202000074号