oracle字定义类型数组

--自定义类型
--用户对象
create or replace type user_type as object(
       username varchar2(20),
       sex varchar2(2)
);
--用户数组类型
create or replace type user_array is table of user_type;

create or replace function fun_userlist
return user_array
as
      type type_array is table of tuser%rowtype index by binary_integer;
      var_array type_array;
      var_user_array user_array:=user_array();
      var_user user_type;
begin
       select * bulk collect into var_array from tuser;
       for i in 1.. var_array.count loop
           var_user:=user_type(var_array(i).username,var_array(i).sex);
           --扩展
           var_user_array.extend;
           var_user_array(i):=var_user;
       end loop;         
       return var_user_array;
end;

--调用
declare
       var_user_array user_array;
begin
       var_user_array:=fun_userlist;
       for i in 1..var_user_array.count loop
           dbms_output.put_line(var_user_array(i).username);
       end loop;
end;