錯誤與查詢選擇光標

Question

我有問題，我在光標選擇。選擇在其他窗口中正常工作，但我用光標在程序中出錯了爲什麼？ 我改變Tabele和數據庫的名稱，但選擇是OK這個過程之外

我的錯誤： PL/SQL：ORA-04052： ORA-00604： ORA-03106：

CREATE OR REPLACE PROCEDURE ChangeDismissDate 
IS 
BEGIN 
    DECLARE 
      v_id VARCHAR2(40); 
      v_dateABC DATE; 
      v_dateDismiss DATE; 
     CURSOR cur IS 
       select emp.EMP_NO, abc.date, emp.DISMISS_DATE 
       from bazaabc.EmployeesDetails@BAZA_ABC abc, 
         employee_tab emp, 
         person_info_tab pin, 
         oracle_account oa 
       where bhd.emp_no = emp.EMP_NO 
       and pin.PERSON_ID = emp.EMP_NO 
       and oa.USERNAME = pin.USER_ID 
       and emp.EMP_NO in ( 
       select pi.PERSON_ID from tab_person pi 
       where fu.active = 'TRUE' 
       and fu.IDENTITY = pi.USER_ID) AND emp.EMP_NO like '%L%' 
       and nvl(abc.date,to_date('20491231','yyyymmdd')) <> nvl(emp.DISMISS_DATE,to_date('20491231','yyyymmdd')); 

     BEGIN 
         OPEN cur; 
          LOOP 
           FETCH cur INTO v_id,v_dateABC,v_dateDismiss; 

           DBMS_OUTPUT.PUT_LINE('v_id: ' || v_id); 
           DBMS_OUTPUT.PUT_LINE('v_dateABC: ' || v_dateABC); 
           DBMS_OUTPUT.PUT_LINE('v_dateDismiss: ' ||v_dateDismiss); 

          EXIT WHEN cur%NOTFOUND; 
          END LOOP; 
         CLOSE cur; 
     END; 

END; 
/

Answer 1

你可以嘗試通過添加異常塊來獲得什麼錯誤

CREATE OR REPLACE PROCEDURE ChangeDismissDate 
IS 
BEGIN 
    DECLARE 
      v_id VARCHAR2(40); 
      v_dateABC DATE; 
      v_dateDismiss DATE; 
     CURSOR cur IS 
       select emp.EMP_NO, abc.date, emp.DISMISS_DATE 
       from bazaabc.EmployeesDetails@BAZA_ABC abc, 
         employee_tab emp, 
         person_info_tab pin, 
         oracle_account oa 
       where bhd.emp_no = emp.EMP_NO 
       and pin.PERSON_ID = emp.EMP_NO 
       and oa.USERNAME = pin.USER_ID 
       and emp.EMP_NO in ( 
       select pi.PERSON_ID from tab_person pi 
       where fu.active = 'TRUE' 
       and fu.IDENTITY = pi.USER_ID) 
       AND emp.EMP_NO like '%L%' 
       and nvl(abc.date,to_date('20491231','yyyymmdd')) <> 
       nvl(emp.DISMISS_DATE,to_date('20491231','yyyymmdd')); 

     BEGIN 
         OPEN cur; 
          LOOP 
        FETCH cur INTO v_id,v_dateABC,v_dateDismiss;  
        DBMS_OUTPUT.PUT_LINE('v_id: ' || v_id); 
        DBMS_OUTPUT.PUT_LINE('v_dateABC: ' || v_dateABC); 
        DBMS_OUTPUT.PUT_LINE('v_dateDismiss: ' ||v_dateDismiss); 

          EXIT WHEN cur%NOTFOUND; 
          END LOOP; 
         CLOSE cur; 
     END; 
EXCEPTION 
    WHEN NO_DATA_FOUND 
    THEN 
     DBMS_OUTPUT.put_line (DBMS_UTILITY.format_error_stack); 
    WHEN OTHERS 
    THEN 
     DBMS_OUTPUT.put_line (DBMS_UTILITY.format_error_stack); 

END; 
/