정선생의 블로그

create or replace
FUNCTION FN_JMC_SPLIT (str IN VARCHAR, del IN VARCHAR,  idx IN INTEGER)
RETURN CHAR IS
/***************************************
abc:de:fghi 를 구분자(:)를
기준으로 idx번째 데이터를 가져옴

만약 해당 데이터가 없다면 null
@make by 정민철
****************************************/
temp_idxst INTEGER; --시작
temp_idxed INTEGER; --끝
temp_leng INTEGER;  --길이
temp_limit INTEGER;
cnt INTEGER;
codersb VARCHAR2(100);
BEGIN
  codersb := '';
  temp_limit := length(str);
  cnt := 0;
  temp_idxst := 1;
  temp_idxed := 1;
 
  for cnt IN 1..idx loop
      temp_idxed := instr(str, del, temp_idxst);
     
      -- 구분자를 찾을수 없을때(마지막데이터임)
      if temp_idxed = 0  then 
        temp_idxed := temp_limit + 1;
      end if;
      temp_leng  := temp_idxed - temp_idxst;
     
      -- 해당 index라면 codersb값을 세팅해줌
      if cnt = idx then
        codersb := substr(str,temp_idxst, temp_leng);
      end if;
     
      -- 시작 index를 갱신
      temp_idxst := temp_idxed + 1;
  end loop;

 
  RETURN codersb;
END FN_JMC_SPLIT;

create or replace
TRIGGER kw_logtest
AFTER INSERT OR DELETE OR UPDATE  ON KONAN_TEST
FOR EACH ROW
DECLARE 
    tbl_name VARCHAR2(30) := '';      --테이블명
BEGIN
 
  -- 테이블코드 가져오기
  IF INSERTING THEN
    IF   (UPPER(:new.BBS_CODE) in ('BBS_01', 'BBS_02', 'BBS_03')) THEN
      tbl_name := '게시판1-3';
    ELSIF (UPPER(:new.BBS_CODE) in ('BBS_04', 'BBS_05', 'BBS_06')) THEN
      tbl_name := '게시판4-6'
    ELSE
      tbl_name := '기타게시판';
    END IF;
  ELSE
    IF   (UPPER(:old.BBS_CODE) in ('BBS_01', 'BBS_02', 'BBS_03')) THEN
      tbl_name := '멀티미디어게시판';
    ELSIF (UPPER(:old.BBS_CODE) in ('BBS_04', 'BBS_05', 'BBS_06')) THEN
      tbl_name := '게시판1-3';
    ELSE
      tbl_name := '게시판4-6'
    END IF;
  END IF;
  
 
  --실제로그쌓기
 IF INSERTING THEN
  INSERT INTO KONAN_TEST_LOG(LOGID,TABLENAME, event)
               VALUES(:new.rowid, tbl_name ,'I');
 ELSIF DELETING THEN
  INSERT INTO KONAN_TEST_LOG(LOGID,TABLENAME, event)
                  VALUES(:old.rowid, tbl_name, 'D');
 ELSIF UPDATING THEN 
  INSERT INTO KONAN_TEST_LOG(LOGID,TABLENAME, event)
                  VALUES(:old.rowid,tbl_name, 'U');
 END IF;
END;