触发器是个特殊的存储过程,它的执行不是由程序调用,也不是手工启动,而是由事件来触发,下文中就为大家详细讲解Oracle触发器。
创建触发器(行级触发器)
create or replace trigger tri_update_emp_bak
after update
on emp_bak
for each row 每更新一行 就触发一次
begin
Oracle 里面 对触发器 也提供了特殊的对象 :NEW :OLD 来访问 更新前后的数据
dbms_output.put_line('更新后' || :NEW.sal);
dbms_output.put_line('更新前' || :OLD.sal);
if updating then
end if;
if inserting
end;
创建触发器(行级触发器)(前置)
create or replace trigger tri3_update_emp_bak
before update
on emp_bak
for each row 每更新一行 就触发一次
begin
oracle 里面 对触发器 也提供了特殊的对象 :NEW :OLD 来访问 更新前后的数据
dbms_output.put_line('更新后' || :NEW.sal);
dbms_output.put_line('更新前' || :OLD.sal);
end;
select * from emp_bak
update emp_bak set sal = 1000 where empno in (7788)
创建触发器(表级触发器)
//表级别触发器里面 不允许使用 :NEW :OLD 变量
create or replace trigger tri2_update_emp_bak
after update
on emp_bak
begin
dbms_output.put_line('更新后' || :NEW.sal);
dbms_output.put_line('更新前' || :OLD.sal);
end;
创建触发器(行级触发器)
create or replace trigger tri4_update_emp_bak
after update of sal
on emp_bak
for each row 每更新一行 就触发一次
begin
oracle 里面 对触发器 也提供了特殊的对象 :NEW :OLD 来访问 更新前后的数据
dbms_output.put_line('更新后' || :NEW.sal);
dbms_output.put_line('更新前' || :OLD.sal);
end;
create table userinfo
(
userid number(4) PRimary key,
username varchar2(20)
)
create table addrinfo
(
addrid number(4) primary key,
addname varchar2(20),
userid number(4) references userinfo(userid)
)
insert into userinfo values (1,'李四')
insert into addrinfo values (1,'湖北武汉',1)
select * from addrinfo
delete from userinfo where userid =1
级联删除
create or replace trigger tri_userinfo_delete
before delete
on userinfo
for each row
begin
delete from addrinfo where userid = :OLD.userid;
insert into
end;
create table dept_bak as select * from dept
create or replace view myview
as
select a.empno,a.ename,a.sal,b.dname
from emp a inner join dept b
update myview set sal = 1000,dname='aaaaa' where empno = 7499
替代触发器 用在视图上面 只能是行级的
替代触发器 特点是 真正的操作已经 变成了一个动作而已 功能由触发器来完成
create or replace trigger tri_myview
instead of update
on myview
begin
dbms_output.put_line('删除操作执行了。。。');
update emp set sal = :NEW.sal where empno = :OLD.empno;
update dept set dname = :NEW.dname where dname = :OLD.dname;
delete from emp where empno = :OLD.empno;
end;
select * from emp;
select * from dept;
update emp_bak set ename ='aaaa',sal = 10000 where empno in (7788)
系统包
产生随机数
**** **** **** ****
dbms_random.value 0-1 之间的随机小数
dbms_random.random 随机整数
select dbms_random.value from dual;
create or replace procedure proc_cardno(mycardno out varchar2)
as
tempcard varchar2(50);
cardno varchar2(19);
begin
tempcard:= dbms_random.value;
cardno:=substr(tempcard,2,4)||' '||substr(tempcard,6,4)||' '||substr(tempcard,10,4)||' '||substr(tempcard,14,4);
mycardno:=cardno;
dbms_output.put_line(tempcard);
dbms_output.put_line(cardno);
end;
使用UTL_FILE包读写文件
create directory MY_DIR as 'd:\temp';
create directory MY_DIR2 as 'd:\temp2';
declare
定义文件对象
myfile utl_file.file_type;
定义变量 用来存储每读出一行的数据
linestr varchar2(200);
begin
打开文件
myfile:= utl_file.fopen('MY_DIR','oracle.log','r');
进行读取(循环)
loop
utl_file.get_line(myfile,linestr);
dbms_output.put_line(linestr);
end loop;
exception
when others then
utl_file.fclose(myfile);
dbms_output.put_line('读取完毕!');
end;
declare
定义文件对象
myfile utl_file.file_type;
定义变量 用来存储每读出一行的数据
linestr varchar2(200);
begin
打开文件
myfile:= utl_file.fopen('MY_DIR','oracle.log','a');
追加数据
utl_file.get_line(myfile,linestr);
utl_file.put_line(myfile,'你好,这是新的数据',true);
utl_file.fclose(myfile);
exception
when others then
utl_file.fclose(myfile);
dbms_output.put_line('读取完毕!');
end;
拷贝
declare
定义文件对象
sourcefile utl_file.file_type;
targetfile utl_file.file_type;
定义变量 用来存储每读出一行的数据
linestr varchar2(200);
begin
打开文件
sourcefile:= utl_file.fopen('MY_DIR','oracle.log','r');
targetfile:= utl_file.fopen('MY_DIR2','copy.txt','a');
进行读取(循环) 并且写入到新的文件里面
loop
utl_file.get_line(sourcefile,linestr);
utl_file.put_line(targetfile,linestr,true);
dbms_output.put_line(linestr);
end loop;
exception
when others then
utl_file.fclose(sourcefile);
utl_file.fclose(targetfile);
dbms_output.put_line('拷贝完毕!');
end;
关于Oracle触发器的问题就为大家讲解到这里,还有很多Oracle触发器的知识这里没有涉及到,以后我还会继续为大家讲解更多的关于Oracle触发器的知识点,希望对大家能够有所帮助。
文章题目:Oracle触发器
文章网址:http://www.shufengxianlan.com/qtweb/news38/364638.html
网站建设、网络推广公司-创新互联,是专注品牌与效果的网站制作,网络营销seo公司;服务项目有等
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联