declare 
type emp_record_type is record(
      name emp.ename%type,salary emp.sal%type
      );
            emp_record emp_record_type;
begin
select ename,sal into emp_record from emp where empno=&no;
dbms_output.put_line('雇員名:'||emp_record.name);
dbms_output.put_line('雇員工資:'||emp_record.salary);
end;

declare 
emp_record emp%rowtype;
begin 
select * into emp_record from emp where empno=&no;
dbms_output.put_line('姓名: '||emp_record.ename);
dbms_output.put_line('工資: '||emp_record.sal);
end;

type 表類型  is table of  類型 
 index by binary_integer; 
表變量名  表類型;

declare 
type ename_table_type is table of emp.ename%type
index by binary_integer;
ename_table ename_table_type;
begin
select ename into ename_table(1) from emp where empno=&eno;
dbms_output.put_line('雇員名: '||ename_table(1));
end;

declare
type ename_table_type is table of emp.ename%type
index by binary_integer;
ename_table ename_table_type;
begin 
select ename bulk collect into ename_table from emp
where deptno=&dno;
for i in 1..ename_table.count loop
dbms_output.put_line('雇員名: '||ename_table(i));
end loop;
end;

TYPE table_name IS TABLE OF element_type [NOT NULL] 
INDEX BY [BINARY_INTEGER | PLS_INTEGER | VARRAY2];

declare 
type emp_table_type is table of emp%rowtype
index by binary_integer;
emp_table emp_table_type;
begin
select * bulk collect into emp_table from emp where deptno=&dno;
for i in 1..emp_table.count loop
dbms_output.put_line('雇員名: '||emp_table(i).ename||',工資: '||emp_table(i).sal);
end loop;
end;

DECLARE
--定義記錄表數(shù)據(jù)類型
   TYPE reg_table_type IS TABLE OF varchar2(25)
   INDEX BY BINARY_INTEGER;
--聲明記錄表數(shù)據(jù)類型的變量
   v_reg_table REG_TABLE_TYPE;
    
BEGIN
   v_reg_table(1) := 'Europe';
   v_reg_table(2) := 'Americas';
   v_reg_table(3) := 'Asia';
   v_reg_table(4) := 'Middle East and Africa';
   v_reg_table(5) := 'NULL';
 
   DBMS_OUTPUT.PUT_LINE('地區(qū)名稱：'||v_reg_table (1)||'、'       ||v_reg_table (2)||'、'      ||v_reg_table (3)||'、'      ||v_reg_table (4));
   DBMS_OUTPUT.PUT_LINE('第5個(gè)成員的值：'||v_reg_table(5));
END;

TYPE VARRAY_NAME IS VARRAY(SIZE) OF ELEMENT_TYPE [NOT NULL];

DECLARE
--定義一個(gè)最多保存5個(gè)VARCHAR(25)數(shù)據(jù)類型成員的VARRAY數(shù)據(jù)類型
   TYPE reg_varray_type IS VARRAY(5) OF VARCHAR(25);
--聲明一個(gè)該VARRAY數(shù)據(jù)類型的變量
   v_reg_varray REG_VARRAY_TYPE;

BEGIN
--用構(gòu)造函數(shù)語法賦予初值
   v_reg_varray := reg_varray_type
         ('中國(guó)', '美國(guó)', '英國(guó)', '日本', '法國(guó)');

   DBMS_OUTPUT.PUT_LINE('地區(qū)名稱：'||v_reg_varray(1)||'、'
                                    ||v_reg_varray(2)||'、'
                                    ||v_reg_varray(3)||'、'
                                    ||v_reg_varray(4));
   DBMS_OUTPUT.PUT_LINE('賦予初值NULL的第5個(gè)成員的值：'||v_reg_varray(5));
--用構(gòu)造函數(shù)語法賦予初值后就可以這樣對(duì)成員賦值
   v_reg_varray(5) := '法國(guó)';
   DBMS_OUTPUT.PUT_LINE('第5個(gè)成員的值：'||v_reg_varray(5));
END;