declare
type ename is table of scott.emp.ename%type;
e_n ename;
begin
e_n:=ename('a','b','v','d'); --构造方法初始化
select ename into e_n(1) from scott.emp where empno=7369;
select ename into e_n(3) from scott.emp where empno=7788;
select ename into e_n(4) from scott.emp where empno=7839;
dbms_output.put_line(e_n(1));
dbms_output.put_line(e_n(3));
dbms_output.put_line(e_n(4));
end;
c.数组，元素个数有限制，使用方法完全和嵌套表相同
declare
type ename is varray(20) of scott.emp.ename%type;
e_n ename;
begin
e_n:=ename('a','b','v','d'); --构造方法初始化
select ename into e_n(1) from scott.emp where empno=7369;
select ename into e_n(3) from scott.emp where empno=7788;
select ename into e_n(4) from scott.emp where empno=7839;
dbms_output.put_line(e_n(1));
dbms_output.put_line(e_n(3));
dbms_output.put_line(e_n(4));
end;

DECLARE
TYPE T_VARRAY IS VARRAY(100) OF VARCHAR2(20);
V_VAR T_VARRAY := T_VARRAY('I', 'LOVE', 'STUDY');
BEGIN
FOR I IN 1 .. V_VAR.COUNT LOOP
DBMS_OUTPUT.PUT(V_VAR(I));
END LOOP;
DBMS_OUTPUT.PUT_line('');
END;

ITPub博客

81

最新文章