五

一，定义抽象数据类型 /* create or replace type animal_ty as object (breed varchar2(25), --动物种类 name varchar2(25), --名字 birthdate date, --出生日期 member function AGE(birthdate in date) return number --根据出生日期计算年龄 ); --带有方法的抽象数据类型 */ create or replace type animal_ty as object (Bread varchar2(25), --动物种类 name varchar2(25), --名字 hobby varchar2(10) --爱好 );

desc animal_ty; 查看 user_types; user_type_attrs;

二，抽象数据类型的使用

1)创建关系表 drop table animal; create table animal (id number primary key , anima animal_ty ); set desc depth 3 desc animal; 2) 插入数据(使用构造方法) insert into animal values(1, animal_ty('MULE','FRANCES','PLAY')); insert into animal values(2, animal_ty('DOG','BENJI','EAT')); insert into animal values(3, animal_ty('CROCODILE','LYLE','SWIM'));

3)操作 查看:select f.anima.name from animal f; 更新: update animal f set f.anima.hobby='PLAY1' where id=1; 删除：delete from animal a where a.anima.hobby='PLAY1';

2,删除对象类型 drop type animal_ty force;

3,查询相关性 select name,type from user_dependencies where referenced_name='ANIMAL_TY';

4,在抽象数据类型上创建索引 create index Idx on animal(anima.name);

5,final 和 not final 修饰类型 instantiable 和not instantiable 可修饰类型和方法

默认情况下，抽象数据类型是不能被继承的，同时类型提供构造函数，类型中的方法可以被实

现 声明类型加 not final 该类型可被继承 修饰方法: not instantiable 类型不提供方法实现 修饰类型: not instantiable 类型没有构造函数.不能实例化

二，可变数组

1）创建VARRAY类型 create or replace type tools_va as varray(5) of varchar2(25); 2）创建关系表，该表的字段类型是varray类型 create table borrower(name varchar2(25) primary key, tools tools_va); 字典 select typecode,attributes from user_types where type_name='TOOLS_VA'; select coll_type,elem_type_owner,elem_type_name,upper_bound, length from user_coll_types; 3）插入数据 insert into borrower values ('JED HOPKINS', Tools_va('HAMMER','SLEDGE','AX')); insert into borrower values('PK', Tools_va('PEN1','PEN2','PEN3')); 4）查看 select * from table(select t.tools from borrower t where t.name='PK'); 三，嵌套表

drop type emp_ty force; 1, create or replace type emp_ty as object ( empno number, ename char(10), sal number); 2,create or replace type emps_nt as table of emp_ty;

3, create table ntdept ( deptno number, dname varchar2(20), loc varchar2(20), dno_det emps_nt) nested table dno_det store as emp_nt_tab;

--插入数据

insert into ntdept values (10,'市场部','海珠北路',emps_nt(emp_ty(100,'MARRY',1000), emp_ty(101,'Lili',1500), emp_ty(102,'KHK',3000)) );

insert into ntdept values(20,'教务部','海珠南路',emps_nt(emp_ty(103,'JAKE',2200), emp_ty(104,'ROSE',1000), emp_ty(105,'LUSU',2000) ));

--查询 可以使用the或table select deptno,dname,loc,dno_det from ntdept; select dno_det from ntdept where deptno=10; select nt.* from table(select dno_det from ntdept where deptno=10) nt; select nt.* from table(select dno_det from ntdept where deptno=20) nt where

nt.empno=103 ; select nt.empno,nt.ename from table(select deptno from ntdept where deptno=10)

nt where nt.empno=101; --插入 insert into table(select dno_det from ntdept where deptno=10)

values(106,'HANG',3000); 或从嵌套表中选择数据插入 insert into ntdept values(40,'NEWd','NEWloc', cast(multiset(select * from table(select dno_det from ntdept where deptno=10)

nt where nt.empno=100 ) as emps_nt))

cast:将查询的结果转换成嵌套表的形式 multiset:允许cast查询中包含多条记录

--更新 update table(select dno_det from ntdept where deptno=10) nt set nt.ename='LLLL'

where nt.empno=101; --删除 delete from the(select dno_det from ntdept where deptno=10) nt where

nt.empno=101

四，对象表

1,建立对象类型 drop type animal_ty force; create type animal_ty as object (name varchar2(15), hobby varchar2(20) ) / 2,建立对象表 create table animal of animal_ty(name constraint pk primary key); 3,插入数据 insert into animal values(animal_ty('SNAKE','PLAY')); insert into animal values(animal_ty('DOG','SWIM')); insert into animal values(animal_ty('CAT','SLEEP'));

4,查看oid select ref(f) from animal f; 5,查看对象 select value(r) from animal r; 使用deref

drop table keeper; create table keeper ( keepername varchar2(10), animalkept ref animal_ty ) 插入数据

insert into keeper select 'JEK',ref(f) from animal f where name='DOG'; insert into keeper select 'BLK',ref(f) from animal f where name='CAT'; 查看数据 在关系表中看对象 select deref(animalkept) from keeper; 假设删掉一个对象 delete from animal where name='DOG';

select * from keeper; 还在引用该对象 update keeper set animalkept=null where animalkept is dangling;--去掉引用

五，对象视图

将dept关系表做为对象表访问

1，建立对象类型

create or replace type dept_type as object (dno number(2), dname varchar2(15), local varchar2(18) ); 2，建立对象视图 create view dept_view of dept_type with object oid (dno) as select * from dept ;

3,通过对象视图操纵关系表数据 insert into dept_view values(dept_type(60,'aaa','bbb')); delete from dept_view where deptno=60; 结果会反映到关系表中,当改变关系表数据时，也会反映到对象视图中

对象视图每行都有一个oid 4，当关系表之间存在引用关系时，也可以用对象视图实现 dept 和 emp 是主、外键表，emp表的deptno引用了dept表的deptno 并且已为关系表dept生成了对象视图，此时关系表的每一个行都具有oid dept表的行可以作为行对象通过dept_view视图进行访问，只要为关系表创建 了对象视图，即可将任何关系表作为行对象进行访问 --make_ref只对所提供的参数应用一个Oracle内部的算法，即可得到引用，它并没有真

正读取视图。 select make_ref(dept_view,deptno) from dept; select make_ref(dept_view,deptno) from emp; 5,通过对象视图建立引用关系 create view emp_ov as select make_ref(dept_view,deptno) dep,empno,ename,sal

from emp; 该视图第一列指向了对象视图dept_view的行 select deref(a.dep) from emp_ov a;