一，定义抽象数据类型

/*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;