数据库对象(二)

第六章 数据库对象（ 数据库对象（二）
课程目标
游标，触发器， 游标，触发器，回退段 使用游标的各种程序 创建和使用触发器的各种程序
体验项目——<游标里的判断及表的监控 > 游标里的判断及表的监控
本程序启动后，会自动判断游标是否有数据，如果有数据，就输出数据， 且输出发现数据，如果没有数据，就输出没有数据，程序运行结果如图6-1 所示。
2．通过SQL创建回退段 ．通过 创建回退段 创建回退段，也可以在SQL Plus中使用如下的代码： CREATE PUBLIC ROLLBACK SEGMENT "TEMPROLLBACKSEGMENT" TABLESPACE "UNDOTBS" STORAGE ( INITIAL 10K NEXT 10K MAXEXTENTS 5); ALTER ROLLBACK SEGMENT "TEMPROLLBACKSEGMENT" ONLINE;
触发器
触发器介绍 数据库触发器（DataBase Trigger）是存储在数据库中的过程，当表被修 改时它隐式地被激发（执行）。在Oracle中允许在对表进行insert、update或 delete操作时隐式地执行所定义的过程，这些过程称为数据库触发器。 触发器一般用于： 自动生成导出的列值。 防止无效的事务。 实施更复杂的安全性检查。 在分布式数据库中实施跨越结点的引用完整性。 实施复杂的事务规则。 提供透明事件日志。 提供高级的审计。 维护同步表复制。 收集关于存取表的统计。
3．创建触发器语法 ． 创建触发器的语法如下： create [or replace] trigger 触发器名 触发时间 触发事件 on 表名 [for each row] pl/sql 语句 其中： 触发器名：触发器对象的名称。由于触发器是数据库自动执行的， 因此该名称只是一个名称，没有实质的用途。 触发时间：指明触发器何时执行，该值可取：before、after 触发事件：指明哪些数据库动作会触发此触发器，该值可取： insert：数据库插入会触发此触发器； update：数据库修改会触发此触发器； delete：数据库删除会触发此触发器。
回退段的删除
（1）如果要删除回退段，可以在企业管理器里先使得回退段脱机，如 图6-15所示，打开“回退段”节点，选择要删除的回退段，在窗口右侧的 “一般信息”选项卡中，选择状态为“脱机”，点击窗口下方的“应用” 按钮。
图6-15删除回退段
（2）然后右键选中要删除的回退段，在弹出的右键菜单中选择“移去” 菜单项，如图6-16所示，此操作将删除回退段。
1．%isopen属性 ． 属性 该属性功能是测试游标是否打开，如果没有打开游标使用fetch语句将 提示错误。示例代码如下： set serveroutput on declare tempsal scott.emp.sal%type; 该程序利用%isopen属性 该程序利用 属性 cursor mycursor is 判断游标是否打开 select * from scott.emp where sal>tempsal; cursorrecord mycursor%rowtype; begin tempsal:=800; if mycursor%isopen then fetch mycursor into cursorrecord; dbms_output.put_line(to_char(cursorrecord.deptno)); else dbms_output.put_line('游标没有打开！'); end if; end;
二、实现步骤
1．判断游标是否有数据程序的实现过程： ．判断游标是否有数据程序的实现过程：
（1）set serveroutput on; （2）声明一个与scott.emp.sal类型相同的变量tempsal （3）创建一个游标用于查询scott.emp表中sal列的值 大于tempsal的所有记录 （4）声明一个与游标的行类型一致的变量 ，对游标 的行记录进行控制 （5）判断是否发现数据，用dbms_output.put_line将 判5结果输出
3．%rowcount属性 ． 属性 该属性用于返回游标的数据行数，若返回值为0，表明游标已经打开， 但没有提取出数据。示例代码如下： set serveroutput on declare tempsal scott.emp.sal%type; cursor mycursor is 该程序利用%rowcount属性 该程序利用 属性 select * from scott.emp 判断游标数据行数 where sal>tempsal; cursorrecord mycursor%rowtype; begin tempsal:=800; open mycursor; fetch mycursor into cursorrecord; dbms_output.put_line('记录总数:'||mycursor%rowcount); end;
在Oracle中，还有一个类似的属性叫%notfound属性，该属性是 %found属性的反逻辑。在执行任何SQL语句前SQL%found和SQL%notfound 的值都是NULL，在执行SQL语句后，SQL%found的属性值是： true：insert ： true：delete和update，至少有一行被 ： 和 ，至少有一行被delete或update 或 true：select into至少返回一行 ： 至少返回一行 当SQL%found为true时，SQL%notfound为false 为 时 为 SQL%notfound，常被用于退出循环 ，
图6-16 移去回退段
实践项目——<游标里的判断及表的监控 > 游标里的判断及表的监控
一、程序的实现要求如下： 程序的实现要求如下： （1）编写程序判断游标是否有数据，如果有数据，就 ）编写程序判断游标是否有数据，如果有数据， 输出数据，且输出“发现数据” 如果没有数据， 输出数据，且输出“发现数据”；如果没有数据，就 提示用户“输出没有数据” 提示用户“输出没有数据”。 （2）编写触发器监控是哪个用户在什么时间对表进行 ） 了操作。 了操作。
游标的打开操作 如果要使用创建好的游标，需要先打开游标，语法结构如下： open 游标名; 打开游标的过程有以下两个步骤： （1）将符合条件的记录送入内存。 （2）将指针指向第一条记录。
游标提取数据的操作 如果要提取游标中的数据，需要使用fetch命令，语法形式如下。 fetch 游标名 into 变量名 变量名 变量名1, 变量名2,……; 记录型变量名; 或fetch 游标名 into 记录型变量名 示例代码： 示例代码： 定义cursorrecord变量是游标 定义 变量是游标 set serveroutput on mycursor的记录行变量 的记录行变量 declare tempsal scott.emp.sal%type; cursor mycursor is select * from scott.emp where sal>tempsal; 在游标mycursor的结果中找到 的结果中找到sal 在游标 的结果中找到 cursorrecord mycursor%rowtype; 字段大于800的第一个记录 字段大于 的第一个记录 begin tempsal:=800; open mycursor; 显示deptno字段的内容 显示 字段的内容 fetch mycursor into cursorrecord; dbms_output.put_line(cursorrecord.deptno); end;
游标的关闭 使用完游标后，要关闭游标，使用close命令，语法形式如下： close 游标名 游标名; 例如，如果要关闭上例中的游标，就需要在end前加上如下的语句： close mycursor; 游标的属性 游标提供的一些属性可以帮助编写PL/SQL程序，游标属性的使 用方法为： 游标名[属性 属性] 游标名 属性 例如mycursor%isopen，表示 游标使用了属性%isopen 例如 ，表示mycursor游标使用了属性 游标使用了属性 主要的游标属性如下： %isopen 、%found 、%rowcount 。
回退段
回退段的定义
回退段是一种特殊类型的数据段，记录着数据库被某个事务操作后 的资料的原值，即存储着需要撤消的信息，有的书籍上也称为回滚段， 因此回退段里的资料可以用来对数据库进行恢复操作。
回退段的创建
1．通过企业管理器创建 ，步骤如下： ． （1）打开企业管理器，在窗口左侧选中的数据库下选择“存 储” “回退段”节点，右键点击“回退段”节点 （2）点击右键菜单中的“创建”菜单项 （3）在“创建回退段”对话框中输入回退段的名称，选择需要 的表空间，然后选中复选框“公用”，然后点击“存储”选项卡 （4）在“存储”选项卡中输入需要设置的数据，点击“创建” 按钮 （5）这时，需要打开数据库的初始化文件init.ora （6）然后保存文件，重新启动Oracle服务，按照上面的方法再次 创建回退段，就会创建成功
触发器和说明性完整性约束都可用于约束数据的输入，但它们之间有 一定区别： 说明性完整性约束是关于数据库总是为“ 说明性完整性约束是关于数据库总是为“真”的语句。 的语句。 一个完整性约束应用于表中已有数据和操纵表的任何语句。 一个完整性约束应用于表中已有数据和操纵表的任何语句。

触发器约束事务不可应用于在定义触发器前已装入的数据，所以它不能保 证表中全部数据服从该触发器的规则。触发器实施瞬时约束，即在数据改 变时实施约束。
2．%found属性 ． 属性 该属性功能是测试前一个fetch语句是否有值，有值将返回true，否则 为false。示例代码如下： set serveroutput on declare tempsal scott.emp.sal%type; 该程序利用%found属性判断 该程序利用 属性判断 cursor mycursor is 游标是否有数据， 游标是否有数据，如果有数 select * from scott.emp 就输出数据； 据，就输出数据；如果没有 where sal>tempsal; 数据， 数据，就输出没有数据 cursorrecord mycursor%rowtype; begin tempsal:=800; open mycursor; fetch mycursor into cursorrecord; if mycursor%found then dbms_output.put_line(cursorrecord.deptno); else dbms_output.put_line('没有数据！'); end if; end;