Oracle 记录类型介绍

注：以下内容来源于网络。

一，什么是记录（Record）？
 由单行多列的标量构成的复合结构。可以看做是一种用户自定义数据类型。组成类似于多维数组。
将一个或多个标量封装成一个对象进行操作。是一种临时复合对象类型。
 
 记录可以直接赋值。RECORD1 :=RECORD2；
 记录不可以整体比较.
 记录不可以整体判断为空。
 
二，%ROWTYPE和记录（Record）？
 请区别%ROWTYPE和记录（Record）类型。%ROWTYPE可以说是Record的升级简化版。
 区别在与前者结构为表结构，后者为自定义结构。二者在使用上没有很大区别。前者方便，后者灵活。在实际中根据情况来具体决定使用。
 Record + PL/SQL表可以进行数据的多行多列存储。
 
三，如何创建和使用记录？
 
  ①创建记录类型
  语法：
  TYPE  记录名  IS RECORD
　　(
   filed1 type1 [NOT NULL] [：=eXPr1],
　　     ....... ,
　　  filedN typen [NOT NULL] [：=exprn]
  ）
  其中，filed1是标量的名字。
  
  ②声明记录类型变量：
   记录类型变量名 记录类型
   
  ③填充记录。
   
  ④访问记录成员
   记录类型变量名.filed1
   .........
   记录类型变量名.filedN
   
   
  注意：
  表字段类型修改后，还需要修改记录字段类型，有时候可能会忘记，从而出现错误。
  对于记录内每个字段（filed1.。。。），可以指定也可以使用%TYPE和%ROWTYPE动态指定记录字段类型。 

  好处是表字段发生变化，记录字段自动改变。但是，由于每次执行前，遇到%TYPR或%ROWTYPE，
  数据库系统都会去查看对应表字段类型，会造成一定的数据库开销，如果系统中大量使用记录类型，则对性能会有一定影响。
  另外如果删除了某一字段，而自定义记录中使用了该字段，也会有可能忘记删除该字段。
       对数据库负荷偏低的系统，性能问题一般可以不重点关注，但是对于高负荷数据库服务器，
       各个环节都要考虑性能问题，每处节省一点出来，性能整体就有很大提高。
  
  语法：
  TYPE  记录名  IS RECORD
　　(
   filed1 table.Filed%Type [NOT NULL] [：=eXPr1] ,
   filed2 table.Filed%Type [NOT NULL] [：=eXPr1] ,
　　     ....... ,
　　  filedn table.Filed%Type [NOT NULL] [：=exprn]
  ）;
 
 例子：记录可以整体赋值
 

[sql] view plaincopy

1. /*conn scott/tiger  
2.  Create Table  empa  As  Select * From emp;  
3.  */  
4.  Declare  
5.      Type EmpType is Record(  
6.         EMPNO number(4),  
7.         ENAME  varchar2(10),  
8.         JOB varchar2(15),  
9.         SAL number(7,2),  
10.         DEPTNO number(2)  
11.      );  
12.    EmpRec1  EmpType;  
13.    EmpRec2  EmpType;  
14.  Begin  
15.    EmpRec1.Empno:=7369;  
16.    EmpRec1.Ename:='SMITH';  
17.    EmpRec1.Job:='CLERK';  
18.    EmpRec1.Sal:=800;  
19.    EmpRec1.Deptno:=10;  
20.    EmpRec2 := EmpRec1;  
21.    DBMS_output.put_line(EmpRec2.empno);  
22.  End;  

 例子：记录不可以整体比较，只可以比较记录字段

[sql] view plaincopy

1. Declare  
2.     Type EmpType is Record(  
3.        EMPNO number(4),  
4.        ENAME  varchar2(10),  
5.        JOB varchar2(15),  
6.        SAL number(7,2),  
7.        DEPTNO number(2)  
8.     );  
9.   EmpRec1  EmpType;  
10.   EmpRec2  EmpType;  
11. Begin  
12.   EmpRec1.Empno:=7369;  
13.   EmpRec1.Ename:='SMITH';  
14.   EmpRec1.Job:='CLERK';  
15.   EmpRec1.Sal:=800;  
16.   EmpRec1.Deptno:=10;  
17.   if EmpRec1.sal < EmpRec2.sal then  
18.     DBMS_output.put_line('Xiao Xiao Xiao');  
19.   end if;  
20. End;  

 例子：记录不可以整体判断为空，只可以判断记录字段。
 

[sql] view plaincopy

1. Declare  
2.      Type EmpType is Record(  
3.         EMPNO number(4),  
4.         ENAME  varchar2(10),  
5.         JOB varchar2(15),  
6.         SAL number(7,2),  
7.         DEPTNO number(2)  
8.      );  
9.    EmpRec  EmpType;  
10.  Begin  
11.    if EmpRec.ename is null then  
12.      DBMS_output.put_line('Kong Kong Kong');   
13.    end if;  
14.  End;  

 
 例子：使用%TYPE和%ROWTYPE动态指定记录字段。

[sql] view plaincopy

1. /*conn scott/tiger  
2. Create Table  empa  As  Select * From emp;  
3. */  
4. DECLARE  
5.  Type MyRecType Is  Record  
6.  (  
7.   RENO  EMPA.EMPNO%Type,  
8.   RENAME   EMPA.ENAME%Type,  
9.   RJOB   EMPA.JOB%Type  
10.  );  
11.  EmpRec  MyRecType;  
12. Begin  
13.  Select   EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '7369';  
14.  If  EmpRec.RJOB  = 'CLERK'  Then  
15.   DBMS_OUTPUT.PUT_LINE('Name: '||EmpRec.RENAME);  
16.  End If;  
17. End;  

 
 例子：数据集中的记录和记录类型中的数据关系。
 

[sql] view plaincopy

1. DECLARE  
2.   Type MyRecType Is  Record  
3.   (  
4.    RENO  EMPA.EMPNO%Type,  
5.    RENAME   EMPA.ENAME%Type,  
6.    RJOB   EMPA.JOB%Type  
7.   );  
8.   EmpRec  MyRecType;  
9.   vJob  EMPA.JOB%Type;  
10.  Begin  
11.   Select   EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '7369';  
12.   DBMS_OUTPUT.PUT_LINE('MyRecType.RJOB: '||EmpRec.RJOB);  
13.   EmpRec.RJOB  := '修改值后'  ;  
14.   DBMS_OUTPUT.PUT_LINE('MyRecType.RJOB: '||EmpRec.RJOB);  
15.   Select JOB  InTo vJob  from empa  Where empa.EMPNO = EmpRec.RENO;  
16.   DBMS_OUTPUT.PUT_LINE('EMPA.JOB: '||vJob);  
17.  End;  
18.  /  

 
 
四，使用记录向表中插入数据？
 根据表结构合理安排记录字段。比如主外键。
 如果用记录(RECORD)插入数据，那么只能使用记录成员；
 如果用%ROWTYPE插入数据,可以直接使用%ROWTYPE。
 
 例子：使用记录成员向表中插入数据
 

[sql] view plaincopy

1. DECLARE  
2.   Type MyRecType Is  Record  
3.   (  
4.    RENO  EMPA.EMPNO%Type,  
5.    RENAME   VARCHAR2(10),  
6.    RJOB   EMPA.JOB%Type  
7.   );  
8.   EmpRec MyRecType;   
9.  Begin  
10.   Select   EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '7369';  
11.   DBMS_OUTPUT.PUT_LINE(EmpRec.RENO||'  '||EmpRec.RENAME||'  '||EmpRec.RJOB);  
12.     
13.   EmpRec.RENO  := 1001;  
14.   EmpRec.RENAME := '杰克';  
15.   EmpRec.RJOB  := '办事员';  
16.   
17.   Insert InTo  empa(EMPNO,ENAME,JOB)  Values(EmpRec.RENO, EmpRec.RENAME,EmpRec.RJOB);  
18.    
19.   Select  EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '1001';  
20.   DBMS_OUTPUT.PUT_LINE(EmpRec.RENO||'  '||EmpRec.RENAME||'  '||EmpRec.RJOB);  
21.  End;  

 
五，使用记录更新数据？
 如果用记录(RECORD)更新数据，那么只能使用记录成员；
 如果用%ROWTYPE更新数据,可以直接使用%ROWTYPE。
 
 例子：使用%ROWTYPE向表中插入数据

[sql] view plaincopy

1. DECLARE  
2.  vEmp empa%RowType;  
3. Begin  
4.  Select  *  InTo  vEmp  From empa Where empa.EMPNO = '7369';  
5.  UpDate empa Set ROW = vEmp Where EMPNO = 1001;  
6. End;  

六，使用记录删除数据？
 删除记录时，只能在delete语句的where子句中使用记录成员。

----------------------------

present by dylan.