트리거에서 트리거 응용 프로그램 오류 발생 및 테이블 업데이트

Question

고객이 60 일 이내에 지불하지 않은 경우 문제가 발생합니다. 트리거가 고객 테이블을 업데이트하고 여전히 오류 -20003을 발생시킵니다.

내가 알고있는 점은 raise 예외가 발생하면 업데이트 기능이 취소된다는 것입니다.

이 작업을 수행 할 수있는 방법이 있습니까?

CREATE OR REPLACE TRIGGER cut_supply 
BEFORE INSERT ON reading 
FOR EACH ROW 
DECLARE 
    cust_ID BILL.custID%TYPE; 
    sent_date BILL.sentDate%TYPE; 
    payment_date BILL.paymentdate%TYPE; 
    bad_Status CUSTOMER.badStatus%TYPE; 
    first_name CUSTOMER.firstName%TYPE; 
    last_name CUSTOMER.lastName%TYPE; 
    NRIC_No CUSTOMER.NRIC%TYPE; 
    pRate_ID CUSTOMER.pRateID%TYPE; 
    no_new_reading EXCEPTION; 
CURSOR cust_cursor IS 
     SELECT b.custID, b.sentDate, b.paymentDate, c.badStatus, c.firstName, c.lastName, c.NRIC, c.pRateID 
     FROM bill b, customer c, reading r 
     WHERE (sysdate - sentDate) > 20 
     AND paymentDate is null 
     AND b.custID = c.custID 
     AND r.readingID = b.readingID 
     FOR UPDATE OF c.badStatus; 
BEGIN 
    OPEN cust_cursor; 
    LOOP 
     FETCH cust_cursor INTO cust_ID, sent_date, payment_date, 
          bad_Status, first_name, last_name, NRIC_No, pRate_ID; 
     IF cust_cursor%NOTFOUND THEN 
      EXIT; 
     END IF; 
     IF cust_cursor%ROWCOUNT = 0 THEN 
      DBMS_OUTPUT.PUT_LINE('No customer found'); 
     ELSE 
      UPDATE customer 
      SET pRateID= 801, badStatus='Non Payment' 
      WHERE CURRENT OF cust_cursor; 
      RAISE no_new_reading; 
     END IF; 
    END LOOP; 
    CLOSE cust_cursor; 
    COMMIT; 
EXCEPTION 
    WHEN no_new_reading THEN 
    RAISE_APPLICATION_ERROR (-20003, 
     'Customer ' || first_name||''||last_Name || 
     ' water supply has been cut off'); 
    WHEN OTHERS THEN 
     DBMS_OUTPUT.PUT_LINE(SQLERRM); 
END; 
/

Answer 1

이, 다음과 같은 방식으로 해결 고객 테이블

create or replace procedure update_customer 
as 
pragma autonomous_transaction; 
begin 
update customer c set c.badStatus='Non Payment', c.pRateID=801 
where c.custID= 
(
    select distinct c.custID 
    FROM bill b, reading r 
     WHERE (sysdate - sentDate) > 20 
     AND paymentDate is null 
     AND b.custID = c.custID 
     AND r.readingID = b.readingID 
); 
commit; 
end; 
/

사용을 절차 자체를 호출하는 트리거를 업데이트하는 프로 시저를 만들 수 있습니다.

CREATE OR REPLACE TRIGGER cut_supply 
BEFORE INSERT ON reading 
FOR EACH ROW 
DECLARE 
    cust_ID BILL.custID%TYPE; 
    sent_date BILL.sentDate%TYPE; 
    payment_date BILL.paymentdate%TYPE; 
    bad_Status CUSTOMER.badStatus%TYPE; 
    first_name CUSTOMER.firstName%TYPE; 
    last_name CUSTOMER.lastName%TYPE; 
    NRIC_No CUSTOMER.NRIC%TYPE; 
    reject_new_reading_excep EXCEPTION; 
CURSOR cust_cursor IS 
    SELECT b.custID, b.sentDate, b.paymentDate, c.badStatus, c.firstName, c.lastName, c.NRIC 
     FROM bill b, customer c, reading r 
     WHERE (sysdate - sentDate) > 20 
     AND paymentDate is null 
     AND b.custID = c.custID 
     AND r.readingID = b.readingID; 
BEGIN 
    OPEN cust_cursor; 
    LOOP 
     FETCH cust_cursor INTO cust_ID, sent_date, payment_date, 
          bad_Status, first_name, last_name, NRIC_No; 

     IF cust_cursor%NOTFOUND THEN 
      EXIT; 
     END IF; 
     IF cust_cursor%ROWCOUNT = 0 THEN 
      DBMS_OUTPUT.PUT_LINE('No customer found'); 
     ELSE 
     update_customer; 
     RAISE reject_new_reading_excep; 
     END IF; 
    END LOOP; 
    CLOSE cust_cursor; 
    COMMIT; 
EXCEPTION 
    WHEN reject_new_reading_excep THEN 
    RAISE_APPLICATION_ERROR (-20003, 
     'Customer ' || first_name||''||last_Name || 
     ' water supply has been cut off'); 
    WHEN OTHERS THEN 
     DBMS_OUTPUT.PUT_LINE(SQLERRM); 
END; 
/