e1_tab IS NOT NULL THEN
dbms_output.put_line('type1_tab is not null');
END IF;
--type1_tab := NULL;
--或者
type1_tab := type1_tab2;
IF type1_tab IS NULL THEN
dbms_output.put_line('type1_tab is null');
END IF;
END;
/
--7.超出变长数组长度的值将会被丢弃 www.2cto.com
--8.记录类型的嵌套表的初始化,赋值以及元素的引用
DECLARE
TYPE object_rec IS RECORD(
object_id all_objects_loc.object_id%TYPE,
object_name all_objects_loc.object_name%TYPE,
object_type all_objects_loc.object_type%TYPE);
TYPE object_tab_type IS TABLE OF object_rec;
object_tab object_tab_type;
TYPE obj_cur_type IS REF CURSOR; --声明游标变量类型
obj_cur obj_cur_type;
BEGIN
OPEN obj_cur FOR
SELECT a.object_id, a.object_name, a.object_type
FROM all_objects_loc a
WHERE rownum <= 10;
FETCH obj_cur BULK COLLECT
INTO object_tab;
CLOSE obj_cur;
FOR i IN 1 .. object_tab.count LOOP
dbms_output.put_line('object_tab(' || i || '):' || object_tab(i)
.object_id || ',' || object_tab(i).object_name || ',' || object_tab(i)
.object_type);
END LOOP;
END;
/