kzerg 发表于 2013-1-14 08:55:48

oracle 数组

 Oracle数组一般可以分为固定数组和可变数组
固定数组
Sql代码 
declaretype v_ar is varray(10) of varchar2(30);   my_ar v_ar:=v_ar('g','m','d','龚','帅');   begin      for i in 1..my_ar.count      loop             dbms_output.put_line(my_ar(i));         end loop;   end;declaretype v_ar is varray(10) of varchar2(30);my_ar v_ar:=v_ar('g','m','d','龚','帅');begin      for i in 1..my_ar.count      loop          dbms_output.put_line(my_ar(i));      end loop;end; 
 
可变数组
一维数组
Sql代码 
declaretype v_table is table of varchar2(30) index by binary_integer;   --类型可以是前面的类型定义,index by binary_integer子句代表以符号整数为索引,   --这样访问表类型变量中的数据方法就是“表变量名(索引符号整数)”。   my_table v_table;   begin      for i in 1..20         loop             my_table(i):=i;             dbms_output.put_line(my_table(i));         end loop;   end; 
 
declaretype v_table is table of varchar2(30) index by binary_integer;--类型可以是前面的类型定义,index by binary_integer子句代表以符号整数为索引,--这样访问表类型变量中的数据方法就是“表变量名(索引符号整数)”。my_table v_table;begin      for i in 1..20      loop          my_table(i):=i;          dbms_output.put_line(my_table(i));      end loop;end; 
多维数组--多条记录
Sql代码 
declaretype v_table is table of t_user%rowtype index by binary_integer;   my_table v_table;   begin      select * bulk collect into my_table from t_user;         for i in 1..my_table.count/10 --my_table.count/10取到的值为四舍五入值         loop             dbms_output.put_line('suser--'||my_table(i).suser);             dbms_output.put_line('name---'||my_table(i).name);             dbms_output.put_line('sex----'||my_table(i).sex);         end loop;   end; 
 
declaretype v_table is table of t_user%rowtype index by binary_integer;my_table v_table;begin      select * bulk collect into my_table from t_user;      for i in 1..my_table.count/10 --my_table.count/10取到的值为四舍五入值      loop          dbms_output.put_line('suser--'||my_table(i).suser);          dbms_output.put_line('name---'||my_table(i).name);          dbms_output.put_line('sex----'||my_table(i).sex);      end loop;end; 
多维数组--单条记录
Sql代码 
declaretype v_table is table of t_user%rowtype index by binary_integer;   my_table v_table;   begin      select * into my_table(9) from t_user where suser='admin';         --my_table(i) i可以为任意整数,但取值时必须保持以i一致;         dbms_output.put_line('--suser--'||my_table(9).suser||'--name--'||my_table(9).name);    end; 
 
declaretype v_table is table of t_user%rowtype index by binary_integer;my_table v_table;begin      select * into my_table(9) from t_user where suser='admin';      --my_table(i) i可以为任意整数,但取值时必须保持以i一致;      dbms_output.put_line('--suser--'||my_table(9).suser||'--name--'||my_table(9).name); end; 

自定义数组
Sql代码  
create or replace type varray_list as varray(30) of varchar2(50);   --使用自定义数组   create or replace procedure show_list(p_varlist in varray_list)   isv_str varchar2(50);   begin      for i in 1..p_varlist.count          loop             v_str:=p_varlist(i);             dbms_output.put_line('v_str='||v_str);             dbms_output.put_line('p_varlist('||i||')='||p_varlist(i));         end loop;   end;    
declaremy_var varray_list:=varray_list('g','m','d','龚','帅');   begin      show_list(my_var);    end; 
页: [1]
查看完整版本: oracle 数组