adminschool.net wiki

이 문서는 읽기 전용입니다. 원본을 볼 수는 있지만 바꿀 수는 없습니다. 문제가 있다고 생각하면 관리자에게 문의하세요.

====== 트리거 활성화 시키는 프로시져 ======
<code sql>
-- *--------------------------------------------
-- * disable 된 트리거를 찾아서 다시 활성화 시키는 프로시져

CREATE OR REPLACE PROCEDURE          RH3_COLD.SUB_TRIG_ENABLE_P02 IS

V_TRIG_NAME    USER_TRIGGERS.TRIGGER_NAME%TYPE ;
V_TRIG_STATUS  USER_TRIGGERS.STATUS%TYPE    ;
CNT    NUMBER := 0 ;
TRIG_TOT_CNT   NUMBER ;   

CURSOR TRIG_CURSOR IS
   SELECT TRIGGER_NAME, STATUS FROM USER_TRIGGERS ;

BEGIN

-- DBMS_OUTPUT.ENABLE ;

-- 트리거의 갯수를 센다.
SELECT COUNT(*) INTO TRIG_TOT_CNT FROM USER_TRIGGERS ;

-- DBMS_OUTPUT.PUT_LINE( TRIG_TOT_CNT ||' 개 트리거 작동중  !!!');

OPEN TRIG_CURSOR ;

LOOP
CNT := CNT + 1 ;

FETCH TRIG_CURSOR INTO V_TRIG_NAME , V_TRIG_STATUS ;

IF ( TRIM(V_TRIG_STATUS) = 'DISABLED' )  THEN
BEGIN
  
DBMS_OUTPUT.PUT_LINE( V_TRIG_NAME ||' ENABLED !!!');
  
EXECUTE IMMEDIATE 'ALTER TRIGGER '||V_TRIG_NAME || ' ENABLE ';

EXCEPTION WHEN OTHERS THEN
         RAISE_APPLICATION_ERROR(-20001, V_TRIG_NAME || ' trigger enable during error !!!' );
END ;
END IF ;

EXIT WHEN CNT >= TRIG_TOT_CNT ; 

END LOOP ;

CLOSE TRIG_CURSOR ;

END SUB_TRIG_ENABLE_P02;
</code>

adminschool.net wiki

사용자 도구

사이트 도구

문서 도구