结构体的使用

-- 结构体定义和结构体变量
declare
type StudentType is record
(
id number(18),
name varchar2(255)
);
v_st1 StudentType;
v_st2 StudentType;
begin
--第一种赋值方法,注意不用类型java一样，来个StudentType() 或者new StudentType();
v_st1.id := 2;
v_st1.name := '李四';
--第二种赋值方法:通过select into,要恰好返回一行，否则报错。
select id,name
into v_st2
from bm_bandwidth
where id=2;
dbms_output.put_line('v_st1.id='||v_st1.id);
dbms_output.put_line('v_st1.name='||v_st1.name);
dbms_output.put_line('v_st2.id='||v_st2.id);
dbms_output.put_line('v_st2.name='||v_st2.name);
end;




-- 集合类型定义和集合变量
declare
type StudentType is record
(
id number(18),
name varchar2(255)
);
type StudentTab is table of StudentType;
v_sts StudentTab;
begin
--初始化一下，不初始化，没法用
v_sts := StudentTab();
--增加一个元素，没前面的初始化，这里就报错了
v_sts.extend(1);
--extend后，可以不赋值，集合字段没设置默认值的，都默认null
v_sts(1).id := 100;
v_sts(1).name := 'A100';
--再增加一个元素
v_sts.extend(1);
v_sts(2).id := 200;
v_sts(2).name := 'A200';
--最简单的循环，表示i依次取值1、2、3、4、5 ... 直到v_sts.count，集合元素为空，count为0，不进入循环.
for i in 1..v_sts.count
loop
dbms_output.put_line('v_sts('||i||').id='||v_sts(i).id);
dbms_output.put_line('v_sts('||i||').name='||v_sts(i).name);
end loop;
end;


-- 集合类型和集合变量的多种赋值方法
declare
type TestIdTab is table of gsc_test.id%type;
type TestTab is table of gsc_test%rowtype;
type VarTab is table of varchar2(255);
type IntTab is table of integer;

v_testIds1 TestIdTab;
v_testIds2 TestIdTab;
v_testrows1 TestTab;
v_testrows2 TestTab;
v_strs VarTab;
v_ints IntTab;

begin
v_testIds1 := TestIdTab(3,4,5); --初始化方法1，3个元素
v_strs := VarTab('A3','A5');--初始化方法1，2个元素

v_ints := IntTab();--初始化方法2，只是个空集合
v_ints.extend(3);--增加3个元素,没上面的初始化，就直接进行操作，那要报错的
v_ints(1) := 11; --没有上面extend来增加元素，就操作具体元素，那要报错的
v_ints(2) := 12;
v_ints(3) := 13;

--有多个字段的集合初始化方法一
v_testrows1 := TestTab();
for i in 1..5 --最简单的循环，表示i依次取值1、2、3、4、5
loop
v_testrows1.extend;--不输入(n)，表示每次扩展一个元素
v_testrows1(i).id := i;
v_testrows1(i).name := 'B'||i;
end loop;

--有多个字段的集合初始化方法二
--v_testrows2有没有通过TestTab()初始化都可以的
--注意对集合赋值，要通过bulk collect
select id,name
bulk collect
into v_testrows2
from temp_zpy_test
where id <=3; --查询不到结果集，则v_testrows2是空集(已初始化过)

-- v_testIds2 也可以类似初始化
select id
bulk collect
into v_testIds2
from temp_zpy_test;

--结果可以入库
for i in 1..v_testrows1.count
loop
insert into gsc_test values v_testrows1(i);
end loop;
end;




-- 无需初始化和定义的集合
declare
type IntTab is table of integer index by binary_integer;
v_ints IntTab;
v_idx binary_integer; --特殊的下标定义，类似java中集合的索引
begin


v_ints(2) := 1000;
v_ints(8) := 20000;
v_ints(100) := 30000;
v_ints(13) := 40000;--注意下标13在100后面初始化，对结构有影响不？

v_idx := v_ints.first;--即使上面没有对v_ints没有赋值，也不会报错，返回null
dbms_output.put_line('v_ints.count=' || v_ints.count);

--由于下标不连续，不好用for循环了
while v_idx is not null --最简单的一个while，满足条件就进入循环体，不满足就结束了
loop
dbms_output.put_line('v_ints('||v_idx||')='||v_ints(v_idx));
v_idx := v_ints.next(v_idx);
end loop;

-- DELETE(X):删除下标是X的元素
end;


-- 集合下标可以是字符
--可以实现类似key+value的数据缓存，当然，根据key取值时key要存在，否则直接取就要报错了
declare
type IntTab is table of integer index by varchar2(255);
v_ints IntTab;
v_idx varchar2(255);
begin


v_ints('ABCD') := 1000;
v_ints('ABCD') := 20000;--写个重复的看看，注意观察
v_ints('CDF') := 30000;
v_ints('中国') := 40000;

v_idx := v_ints.first;--即使上面没有对v_ints没有赋值，也不会报错，返回null
dbms_output.put_line('v_ints.count=' || v_ints.count);
while v_idx is not null --最简单的一个while，满足条件就进入循环体，不满足就结束了
loop
dbms_output.put_line('v_ints('||v_idx||')='||v_ints(v_idx));
v_idx := v_ints.next(v_idx);
end loop;

--访问不存在的下标会报错
--dbms_output.put_line('v_ints(A)='||v_ints('A'));
end;