--只有每个月的10日才允许办理新雇员入职与离职,其他时间不允许增加新雇员数据
create or replace trigger forbid_emp_trigger
before insert or delete
on emp
declare
v_currentdate varchar(20);
begin
select to_char(sysdate,'dd')into v_currentdate from dual;
if trim(v_currentdate)!='10'then
raise_application_error(-20008,'在每月的10号才允许办理入职手续!');
end if;
end;
insert into emp(empno,ename,job,hiredate,sal,comm,mgr,deptno)
values(8998,'mldn','MANAGER',SYSDATE,2000,500,7369,40);
rollback;
--在星期一,周末及每天下班时间(每天9:00以前,18:00以后)后不允许更新emp数据表
create or replace trigger forbid_emp_trigger
before insert or delete or update
on emp
declare
v_currentweak varchar(20);
v_currenthour varchar(20);
begin
select to_char(sysdate,'day'),to_char(sysdate,'hh24')
into v_currentweak,v_currenthour from dual;
if trim(v_currentweak)='星期一' or trim(v_currentweak)='星期六'
or trim(v_currentweak)='星期日' then
raise_application_error(-20008,'在周末及周一不允许更新emp数据表');
elsif trim(v_currenthour)<'9' or trim(v_currenthour)>'18' then
raise_application_error(-20009,'在下班时间不能够修改emp数据!');
end if;
end;
insert into emp(empno,ename,job,hiredate,sal,comm,mgr,deptno)
values(8998,'mldn','MANAGER',SYSDATE,2000,500,7369,40);
--在每天12点以后,不允许修改雇员工资和佣金
create or replace trigger forbid_emp_trigger
before update of sal,comm
on emp
declare
v_currenthour varchar(20);
begin
select to_char(sysdate,'hh24') into v_currenthour from dual;
if trim(v_currenthour)>'11' then
raise_application_error(-2009,'每天11点以后不允许更新雇员工资,佣金。');
end if;
end;
update emp set ename='史密斯' where empno='7369';
select * from emp;
rollback;
update emp set sal=10000,comm=5000 where empno=7369;
select * from emp;
select to_char(sysdate,'hh24') from dual;
定义数据库事件记录表
drop table db_event purge;
drop sequence db_envent_log_weq;
drop sequence db_event_log_seq;
create table db_envent_log(
eventid number constraint pk_eventid primary key,
eventtype varchar2(50) not null,
eventdate date not null,
eventuser varchar2(50) not null
);
create or replace trigger forbid_emp_trigger
before insert or delete
on emp
declare
v_currentdate varchar(20);
begin
select to_char(sysdate,'dd')into v_currentdate from dual;
if trim(v_currentdate)!='10'then
raise_application_error(-20008,'在每月的10号才允许办理入职手续!');
end if;
end;
insert into emp(empno,ename,job,hiredate,sal,comm,mgr,deptno)
values(8998,'mldn','MANAGER',SYSDATE,2000,500,7369,40);
rollback;
--在星期一,周末及每天下班时间(每天9:00以前,18:00以后)后不允许更新emp数据表
create or replace trigger forbid_emp_trigger
before insert or delete or update
on emp
declare
v_currentweak varchar(20);
v_currenthour varchar(20);
begin
select to_char(sysdate,'day'),to_char(sysdate,'hh24')
into v_currentweak,v_currenthour from dual;
if trim(v_currentweak)='星期一' or trim(v_currentweak)='星期六'
or trim(v_currentweak)='星期日' then
raise_application_error(-20008,'在周末及周一不允许更新emp数据表');
elsif trim(v_currenthour)<'9' or trim(v_currenthour)>'18' then
raise_application_error(-20009,'在下班时间不能够修改emp数据!');
end if;
end;
insert into emp(empno,ename,job,hiredate,sal,comm,mgr,deptno)
values(8998,'mldn','MANAGER',SYSDATE,2000,500,7369,40);
--在每天12点以后,不允许修改雇员工资和佣金
create or replace trigger forbid_emp_trigger
before update of sal,comm
on emp
declare
v_currenthour varchar(20);
begin
select to_char(sysdate,'hh24') into v_currenthour from dual;
if trim(v_currenthour)>'11' then
raise_application_error(-2009,'每天11点以后不允许更新雇员工资,佣金。');
end if;
end;
update emp set ename='史密斯' where empno='7369';
select * from emp;
rollback;
update emp set sal=10000,comm=5000 where empno=7369;
select * from emp;
select to_char(sysdate,'hh24') from dual;
定义数据库事件记录表
drop table db_event purge;
drop sequence db_envent_log_weq;
drop sequence db_event_log_seq;
create table db_envent_log(
eventid number constraint pk_eventid primary key,
eventtype varchar2(50) not null,
eventdate date not null,
eventuser varchar2(50) not null
);