1818IP-服务器技术教程,云服务器评测推荐,服务器系统排错处理,环境搭建,攻击防护等

当前位置:首页 - 数据库 - 正文

君子好学,自强不息!

Oracle触发器

2022-11-19 | 数据库 | 1818ip | 513°c
A+ A-

触发器是个特殊的存储过程,它的执行不是由程序调用,也不是手工启动,而是由事件来触发,下文中就为大家详细讲解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触发器的知识点,希望对大家能够有所帮助。

本文来源:1818IP

本文地址:https://www.1818ip.com/post/10174.html

免责声明:本文由用户上传,如有侵权请联系删除!

发表评论

必填

选填

选填

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。