Oracle中的记录Record-IT徐胖子的专栏

狼狼

　　一、什么是记录(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，数据库系统都会去查看对应表字段类型，会造成一定的数据库开销，如果系统中大量使用记录类型，则对性能会有一定影响。
　　③若删除了某一字段，而自定义记录中使用了该字段，也会有可能忘记删除该字段。对数据库负荷偏低的系统，性能问题一般可以不重点关注，但是对于高负荷数据库服务器，各个环节都要考虑性能问题，每处节省一点出来，性能整体就有很大提高。
　　例子：记录可以整体赋值
　　Declare
　　Type EmpType is Record(
　　EMPNO number(4),
　　ENAME  varchar2(10),
　　JOB varchar2(15),
　　SAL number(7,2),
　　DEPTNO number(2)
　　);
　　EmpRec1  EmpType;
　　EmpRec2  EmpType;
　　Begin
　　EmpRec1.Empno:=7369;
　　EmpRec1.Ename:='SMITH';
　　EmpRec1.Job:='CLERK';
　　EmpRec1.Sal:=800;
　　EmpRec1.Deptno:=10;
　　EmpRec2 := EmpRec1;
　　DBMS_output.put_line(EmpRec2.empno);
　　End;
　　例子：记录不可以整体比较，只可以比较记录字段
　　Declare
　　Type EmpType is Record(
　　EMPNO number(4),
　　ENAME  varchar2(10),
　　JOB varchar2(15),
　　SAL number(7,2),
　　DEPTNO number(2)
　　);
　　EmpRec1  EmpType;
　　EmpRec2  EmpType;
　　Begin
　　EmpRec1.Empno:=7369;
　　EmpRec1.Ename:='SMITH';
　　EmpRec1.Job:='CLERK';
　　EmpRec1.Sal:=800;
　　EmpRec1.Deptno:=10;
　　if EmpRec1.sal < EmpRec2.sal then
　　DBMS_output.put_line('Xiao Xiao Xiao');
　　end if;
　　End;
　　例子：记录不可以整体判断为空，只可以判断记录字段
　　Declare
　　Type EmpType is Record(
　　EMPNO number(4),
　　ENAME  varchar2(10),
　　JOB varchar2(15),
　　SAL number(7,2),
　　DEPTNO number(2)
　　);
　　EmpRec  EmpType;
　　Begin
　　if EmpRec.ename is null then
　　DBMS_output.put_line('Kong Kong Kong');
　　end if;
　　End;
　　例子：使用%TYPE和%ROWTYPE动态指定记录字段
　　DECLARE
　　Type MyRecType Is  Record
　　(
　　RENO  EMPA.EMPNO%Type,
　　RENAME   EMPA.ENAME%Type,
　　RJOB   EMPA.JOB%Type
　　);
　　EmpRec  MyRecType;
　　Begin
　　Select   EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '7369';
　　If  EmpRec.RJOB  = 'CLERK'  Then
　　DBMS_OUTPUT.PUT_LINE('Name: '||EmpRec.RENAME);
　　End If;
　　End;
　　例子：数据集中的记录和记录类型中的数据关系
　　DECLARE
　　Type MyRecType Is  Record
　　(
　　RENO  EMPA.EMPNO%Type,
　　RENAME   EMPA.ENAME%Type,
　　RJOB   EMPA.JOB%Type
　　);
　　EmpRec  MyRecType;
　　vJob  EMPA.JOB%Type;
　　Begin
　　Select   EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '7369';
　　DBMS_OUTPUT.PUT_LINE('MyRecType.RJOB: '||EmpRec.RJOB);
　　EmpRec.RJOB  := '修改值后'  ;
　　DBMS_OUTPUT.PUT_LINE('MyRecType.RJOB: '||EmpRec.RJOB);
　　Select JOB  InTo vJob  from empa  Where empa.EMPNO = EmpRec.RENO;
　　DBMS_OUTPUT.PUT_LINE('EMPA.JOB: '||vJob);
　　End;
　　/
　　四、使用记录向表中插入数据
　　根据表结构合理安排记录字段。比如主外键。如果用记录(RECORD)插入数据，那么只能使用记录成员；如果用%ROWTYPE插入数据,可以直接使用%ROWTYPE。
　　例子：使用记录成员向表中插入数据
　　DECLARE
　　Type MyRecType Is  Record
　　(
　　RENO  EMPA.EMPNO%Type,
　　RENAME   VARCHAR2(10),
　　RJOB   EMPA.JOB%Type
　　);
　　EmpRec MyRecType;
　　Begin
　　Select   EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '7369';
　　DBMS_OUTPUT.PUT_LINE(EmpRec.RENO||'  '||EmpRec.RENAME||'  '||EmpRec.RJOB);
　　EmpRec.RENO  := 1001;
　　EmpRec.RENAME := '杰克';
　　EmpRec.RJOB  := '办事员';
　　Insert InTo  empa(EMPNO,ENAME,JOB)  Values(EmpRec.RENO, EmpRec.RENAME,EmpRec.RJOB);
　　Select  EMPNO, ENAME, JOB  InTo  EmpRec  From empa Where empa.EMPNO = '1001';
　　DBMS_OUTPUT.PUT_LINE(EmpRec.RENO||'  '||EmpRec.RENAME||'  '||EmpRec.RJOB);
　　End;
　　五、使用记录更新数据
　　如果用记录(RECORD)更新数据，那么只能使用记录成员；如果用%ROWTYPE更新数据,可以直接使用%ROWTYPE。
　　例子：使用%ROWTYPE向表中插入数据
　　DECLARE
　　vEmp empa%RowType;
　　Begin
　　Select  *  InTo  vEmp  From empa Where empa.EMPNO = '7369';
　　UpDate empa Set ROW = vEmp Where EMPNO = 1001;
　　End;
　　六、使用记录删除数据
　　删除记录时，只能在delete语句的where子句中使用记录成员。
　　原帖地址：http://blog.csdn.net/qfs_v/article/details/2446941