DATABASE STEP 34 - TRIGGER

★ 트리거(Trigger)

• 프로시저의 한 종류
• 개발자가 호출하는게 아니라, 미리 지정한 특정 사건이 발생하면 자동으로 실행되는 프로시저
• 예약(사건) > 사건 발생 > 프로시저 호출
• 특정 테이블 지정 > 감시(insert or update or delete) > 미리 준비해 놓은 프로시저 호출
• 트리거 사용 양식

create or replace trigger 트리거명
        before|after
        insert|update|delete on 테이블명
        [for each row]
    declare
        선언부;
    begitn
        구현부;
    exception
        예외처리부;
end;

 

■ 사용 ex)

• ex 1) tblInsa > 직원 삭제

create or replace trigger trgInsa
    before --삭제하기직전에 프로시저를 실행해라
    update -- 삭제가 발생하는지 감시해라
    on tblInsa -- 감시 대상 > tblInsa
begin   
    dbms_output.put_line('트리거가 실행되었습니다');
end trgInsa;
/

select * from tblInsa;

• ex2) tblInsa > 직원 퇴사(단, 수요일에는 퇴사가 불가능)

create or replace trigger trgRemoveInsa
    before
    delete
    on tblInsa
begin

    dbms_output.put_line('트리거 실행');
    
    -- 수요일 퇴사 금지 > 현재 무슨 요일?
   -- if to_char(sysdate, 'day') = '수요일' then
    --if to_char(sysdate, 'dy') = '수' then
    if to_char(sysdate, 'd') = '4' then
        dbms_output.put_line('수요일');
        -- 퇴사 금지 > 지금 트리거 호출의 원인 > 실행 중인 delete문을 없었던 일로 > 취소 > 강제 예외 발생!!
        -- 자바 > throw new Exception();
        -- -20000 ~ -29999
        raise_application_error (-20000, '수요일에는 퇴사가 불가능 합니다.');
    else
        dbms_output.put_line('다른 요일');
    end if;

end trgRemoveInsa;
/
select * from tblInsa;
rollback;
delete from tblInsa where num = 1004;

• ex3) 로그 기록을 남기는 테이블

create table tblLogMen (
    seq number primary key,
    message varchar2(1000) not null,
    regdate date default sysdate not null
);

create sequence seqLogMen;

create or replace trigger trgLogMen
    after 
    insert or update or delete
    on tblMen
declare
    vmessage varchar2(1000);
begin
    
    -- 호출 : insert? update? delete?
    dbms_output.put_line('트리거 실행');
    
    if inserting then
         dbms_output.put_line('새로운 항목이 추가되었습니다.');
         vmessage := '새로운 항목이 추가되었습니다.';
    elsif updating then
        dbms_output.put_line('항목이 수정되었습니다.');
        vmessage := '항목이 수정되었습니다.';
    elsif deleting then
        dbms_output.put_line('항목이 삭제되었습니다.');
        vmessage := '항목이 삭제되었습니다.';
    end if;
    
    insert into tblLogMen values (seqLogMen.nextVal, vmessage, default);
    
end trgLogMen;
/
select * from tblMen;

insert into tblMen values ('테스트', 22, 175, 60, null);
update tblMen set weight = 65 where name = '테스트';
delete from tblMen where name = '테스트';

■ for each row

• 행(Record) 단위 트리거 
• 트리거 실행 반복
• 사용 ex)
• ex 1) delete 트리거

create or replace trigger tblWomen
    after 
    delete
    on tblWomen
    for each row
begin
    dbms_output.put_line('레코드를 삭제했습니다.' || :old.name);
    
end trgWomen;
/

delete from tblWomen where name = '하하하';
delete from tblWomen;

• ex 2) insert 트리거

create or replace trigger tblWomen
    after 
    insert
    on tblWomen
    for each row
begin
    -- 상관관계(:new) > 새롭게 추가되는 행 참조 객체
    dbms_output.put_line('레코드를 추가했습니다.' || :new.name || :new.age);
end trgWomen;
/

insert into tblWomen values ('호호호', 20, 160, 50, null);