Oracle定义数据类型Type

Oracle提供自定义类型功能，用户可以根据自己的情况定义记录数据类型(Record)和记录表类型(Table)，其中记录数据类型Record存储是

Oracle提供自定义类型功能，用户可以根据自己的情况定义记录数据类型(Record)和记录表类型(Table)，其中记录数据类型Record存储是一条记录，记录表类型Table用来存储多条记录。如果记录数据类型Record是一维数组的话，记录表类型Table就是二维数组。

自定义类型有两种写法：TYPE...IS和CREATE TYPE，两种定义方式的区别是：前者一般在存储过程和函数中定义，使用范围也限于所在过程或函数，而后者方式声明对象类型，对象类型则是作为一个方案对象（像表、索引、视图、触发器一样，是一个方案对象），可以过程或函数中使用，还可以在定义表时，作为字段的类型。

下面分别介绍：

TYPE IS定义类型

1. 定义数据记录类型

语法：

TYPE type_name IS RECORD ( 字段1 类型1, 字段2 类型2, ... 字段n 类型n );

说明：

1) type_name：类型名称。

举例：

declare
  TYPE type_student IS RECORD(
          name VARCHAR2(100),
          age  NUMBER(3),
          sex  VARCHAR2(1)
  );
 
  r_student type_student;
  v_name VARCHAR2(100);
  i_age  NUMBER(3);
  v_sex  VARCHAR(1);
  i integer;
begin
  select name, age, sex into r_student from t_student where gid = 1;
  v_name := r_student.name;
  i_age := r_student.age;
  v_sex := r_student.sex;
  dbms_output.put_line(v_name);
  dbms_output.put_line(v_sex);
  dbms_output.put_line(i_age);
end;

输出结果：

zhansan

1

12

2.定义表记录

语法：

TYPE type_name IS TABLE OF element_type INDEX BY [BINARY_INTEGER | PLS_INTEGER | VARRAY2];

说明：

1) type_name：类型名称。

2) element_type:可以是基本类型(如varchar2, Ingeger, number等)、记录数据类型(即TYPEtype_nameIS RECORD定义的类型)、%ROWTYPE。

3) INDEX BY:该语句的作用是使Number类型的下标自增长，自动初始化，并分配空间，有了该语句，，向表记录插入元素

时，不需要显示初始化，也不需要通过extend分配空间。Binary_Integer 与 Pls_Integer 都是整型类型.

Binary_Integer类型变量值计算是由Oracle来执行，不会出现溢出，但是执行速度较慢，因为它是由Oracle

模拟执行。而Pls_Integer的执行是由硬件即直接由CPU来运算，因而会出现溢出，但其执行速度较前者快许多。

如果没有使用这个语句，又没有使用extend就会报错：ORA-06531:Reference to uninitialized

collection，具体请参考《ORA-06531:Reference to uninitialized collection 问题解决》

举例：

声明
  TYPE type_student IS RECORD(
          name VARCHAR2(100),
          年龄  NUMBER(3),
          性别 VARCHAR2(1)
  );
 
  类型t_student_var 是按 BINARY_INTEGER 排列的 VARCHAR2(100) 索引表；
 
  类型 t_student_rec 是按 BINARY_INTEGER 排列的 type_student 索引表；
 
  类型 t_student_rowtype 是 t_student%ROWTYPE 索引表BY BINARY_INTEGER;
 
  v_tbl_name t_student_var;
  v_tbl_record t_student_rec;
  v_tbl_rowtype t_student_rowtype;
begin
  dbms_output.put_line('------------基本类型VARCHAR2表记录---- --------');
  从 t_student 中选择姓名到 v_tbl_name(1)，其中 gid = 1；
  从 t_student 中选择姓名到 v_tbl_name(2)，其中 gid = 2;
  从 t_student 中选择姓名到 v_tbl_name(3)，其中 gid = 3 ;
  dbms_output.put_line(v_tbl_name(1));
  dbms_output.put_line(v_tbl_name(2));
  dbms_output.put_line(v_tbl_name(3));
 
  dbms_output.put_line( '------------自定义RECORD类型表记录------------');
 从 t_student 中选择姓名、年龄、性别到 v_tbl_record(1) 中where gid = 1;
  从 t_student where gid = 2 选择姓名、年龄、性别到 v_tbl_record(2);
  从 t_student where gid = 3;
选择姓名、年龄、性别到 v_tbl_record(3);
dbms_output.put_line('姓名：'||v_tbl_record(1).姓名||', '||'年龄:'||v_tbl_record(1).年龄||', '||'性别:'||v_tbl_record( 1).sex);
  dbms_output.put_line('名称:'||v_tbl_record(2).name||', '||'年龄:'||v_tbl_record(2).age||', '| |'性别：'||v_tbl_record(2).sex);
  dbms_output.put_line('姓名：'||v_tbl_record(3).姓名||', '||'年龄：'||v_tbl_record(3 ).age||', '||'sex:'||v_tbl_record(3).sex);
 
  dbms_output.put_line('------------表记录类型表记录------------');
  select * into v_tbl_rowtype(1) from t_student where gid = 1;
  select * into v_tbl_rowtype(2) from t_student where gid = 2 ;
  从 t_student 中选择 * 到 v_tbl_rowtype(3)，其中 gid = 3;
  dbms_output.put_line('name:'||v_tbl_rowtype(1).name||', '||'age:'|| v_tbl_rowtype(1).age||', '||'性别:'||v_tbl_rowtype(1).sex||', '||'年级:'||v_tbl_rowtype(1).grade);
  dbms_output .put_line('姓名:'||v_tbl_rowtype(2).name||', '||'年龄:'||v_tbl_rowtype(2).年龄||', '||'性别:'||v_tbl_rowtype(2 ).sex||', '||'成绩:'||v_tbl_rowtype(2).grade);
  dbms_output.put_line('name:'||v_tbl_rowtype(3).name||', '|| '年龄：'||v_tbl_rowtype(3).age||'，'||'性别：'||v_tbl_rowtype(3).sex||'，'||'年级：'||v_tbl_rowtype(3).grade );
 

结束;

输出结果：