oracle数组例子

• 博客分类：
• Oracle

Pl/sql代码  

1. --固定数组
2. declare
3. type type_array is varray(10) of varchar2(20);
4. var_array type_array:=type_array('ggs','jjh','wsb','csl','dd','bb');
5. begin
6. for i in 1..var_array.count loop
7. dbms_output.put_line(var_array(i));
8. end loop;
9. end;
10. --可变数组
11. declare
12. type type_array is table of varchar2(20) index by binary_integer;
13. var_array type_array;
14. begin
15. var_array(1):='aa';
16. var_array(2):='bb';
17. for i in 1..var_array.count loop
18. dbms_output.put_line( var_array(i));
19. end loop;
20. end;
21. --可变数组取表
22. declare
23. begin
24. end;
25. create or replace procedure proc_stock(n number)
26. as
27. var_stock_code varchar2(10);
28. var_stock_price number;
29. begin
30. for i in 1..n loop
31. var_stock_code:= lpad(STR1 =>i ,LEN =>6 ,PAD =>'0' ) ;
32. var_stock_price:=trunc(dbms_random.value*100)+1;
33. --dbms_output.put_line(var_stock_code);
34. --dbms_output.put_line(var_stock_price);
35. insert into t_stock (stockcode,stockprice)
36. values(var_stock_code,var_stock_price);
37. commit;
38. end loop;
39. end;
40. declare
41. begin
42. proc_stock(1000000);
43. end;
44. --用游标访问 14.578秒 13.5 13.8
45. declare
46. cursor cur is select * from t_stock;
47. row_stock t_stock%rowtype;
48. begin
49. open cur;
50. loop
51. fetch cur into row_stock;
52. exit when cur%notfound;
53. null;
54. end loop;
55. close cur;
56. end;
57. --用数组实现 4.813 1.953 2
58. declare
59. type type_array is table of t_stock%rowtype index by binary_integer;
60. var_array type_array;
61. begin
62. select * bulk collect into var_array from t_stock;
63. for i in 1..var_array.count loop
64. null;
65. end loop;
66. end;
67. --访问自定义表
68. declare
69. type type_record is record(
70. username varchar2(20),
71. sex varchar2(2)
72. );
73. type_record_user  type_record;
74. type type_array is table of type_record_user%type index by binary_integer;
75. var_array type_array;
76. begin
77. select username,sex bulk collect into var_array from tuser;
78. for i in 1..var_array.count loop
79. dbms_output.put_line(var_array(i).username);
80. dbms_output.put_line(var_array(i).sex);
81. end loop;
82. end;