Ignore Numeric error with EXCEPTION

Question

Hi,
I've got a PROC that reads all records from one table and INSERT them in another table, quite simple. The Only thing is that I want to IGNORE Numeric errors. So, if a get an error (numeric), I want Oracle to IGNORE the error and continue in my FOR LOOP (Selecting records) and Inserting in the table. What seems to happen is that if I get a NUMERIC error, it exits out of the FOR LOOP... Here's the Code:
  PROCEDURE Insert_Current_Data(
   p_create_date                 IN         DATE,
   p_StatusId                      OUT      NUMBER
) IS
e_constraint_error               EXCEPTION;
e_numeric_error                 EXCEPTION;
   PRAGMA EXCEPTION_INIT (e_constraint_error, -2291);
   PRAGMA EXCEPTION_INIT (e_numeric_error, -1722);  
/*   to_number(NOC_CODE) NOC_CODE,
                  to_number(ECONOMIC_REGION_CODE) ECONOMIC_REGION_CODE, */
CURSOR ei_claimant_ext_cur
      IS
      SELECT NOC_CODE,
                  ECONOMIC_REGION_CODE,
                  CASE EI_PROV_CODE
                    WHEN '00' THEN 1
                    WHEN '01' THEN 4
                    WHEN '02' THEN 2
                    WHEN '03' THEN 3
                    WHEN '04' THEN 5
                    WHEN '05' THEN 6
                    WHEN '06' THEN 7
                    WHEN '07' THEN 8
                    WHEN '08' THEN 9
                    WHEN '09' THEN 10
                    WHEN '10' THEN 11
                    WHEN '11' THEN 12
                    ELSE 13
                  END EI_PROV_CODE,
                  POSTAL_CODE
        FROM ei_claimant_external
        WHERE ei_prov_code <> 12
        AND     economic_region_code <> 99
        AND     postal_code is NOT NULL;
--        AND     ROWNUM < 1000;
        ei_claimant_ext_rec ei_claimant_ext_cur%ROWTYPE;
        v_create_date       VARCHAR2(20);
        v_econ_reg_prov     NUMBER;
    BEGIN
     dbms_output.put_line('Date passed: '||p_create_date); 
     dbms_output.put_line('INSERT Current Data ');
--        p_StatusId := 0;
        FOR claimant_row IN ei_claimant_ext_cur LOOP
/*        OPEN ei_claimant_ext_cur;
        LOOP
            FETCH ei_claimant_ext_cur
            INTO ei_claimant_ext_rec;
            -- v_staging_count := v_staging_count + 1;
            EXIT WHEN ei_claimant_ext_cur%NOTFOUND;      */
            BEGIN
                --- Get Econ Region Province
                SELECT PROVINCE_ID
                INTO     v_econ_reg_prov
                FROM    cd_econ_regions
                WHERE  ECONOMIC_REGION_ID = ei_claimant_ext_rec.ECONOMIC_REGION_CODE;
            EXCEPTION
                WHEN NO_DATA_FOUND THEN v_econ_reg_prov := 0;
            END;
            BEGIN
                IF v_econ_reg_prov = ei_claimant_ext_rec.EI_PROV_CODE
                THEN
                    INSERT INTO ei_claimant_curr_year
                    VALUES  (EI_SEQ.nextval,
                            ei_claimant_ext_rec.noc_code,
                            ei_claimant_ext_rec.EI_PROV_CODE,                           
                            ei_claimant_ext_rec.ECONOMIC_REGION_CODE,
                            p_create_date, --- CURRENT Month
                            ei_claimant_ext_rec.POSTAL_CODE
                            COMMIT;
                END IF;                                                         
            EXCEPTION
                WHEN e_constraint_error THEN dbms_output.put_line('CONSTRAINT Error ');
                        fwutil_pkg.logerror (SQLERRM||' '||ei_claimant_ext_rec.noc_code||' Prov Code: '||ei_claimant_ext_rec.EI_PROV_CODE||'  Econ Region: '||ei_claimant_ext_rec.ECONOMIC_REGION_CODE||
                        ' Postal Code: '||ei_claimant_ext_rec.POSTAL_CODE||' Date: '||p_create_date,
                              SQLCODE,
                              NULL,
                              'Populate_EI_Claimant_Main -- Insert into EI_Claimant_curr_year '
                WHEN e_numeric_error THEN dbms_output.put_line('NUMERIC Error On INSERT');
                        fwutil_pkg.logerror (SQLERRM||' '||ei_claimant_ext_rec.noc_code||' Prov Code: '||ei_claimant_ext_rec.EI_PROV_CODE||'  Econ Region: '||ei_claimant_ext_rec.ECONOMIC_REGION_CODE||
                        ' Postal Code: '||ei_claimant_ext_rec.POSTAL_CODE||' Date: '||p_create_date,
                              SQLCODE,
                              NULL,
                              'Populate_EI_Claimant_Main -- Insert into EI_Claimant_curr_year '
                WHEN OTHERS
                    THEN
                        fwutil_pkg.logerror (SQLERRM||' '||ei_claimant_ext_rec.noc_code||' Prov Code: '||ei_claimant_ext_rec.EI_PROV_CODE||'  Econ Region: '||ei_claimant_ext_rec.ECONOMIC_REGION_CODE||
                        ' Postal Code: '||ei_claimant_ext_rec.POSTAL_CODE||' Date: '||p_create_date,
                              SQLCODE,
                              NULL,
                              'Populate_EI_Claimant_Main -- Insert into EI_Claimant_curr_year '
            END;
        END LOOP;
--        CLOSE ei_claimant_ext_cur;       
    EXCEPTION
                    WHEN e_constraint_error THEN dbms_output.put_line('CONSTRAINT Error ');
                        fwutil_pkg.logerror (SQLERRM||' '||ei_claimant_ext_rec.noc_code||' Prov Code: '||ei_claimant_ext_rec.EI_PROV_CODE||'  Econ Region: '||ei_claimant_ext_rec.ECONOMIC_REGION_CODE||
                        ' Postal Code: '||ei_claimant_ext_rec.POSTAL_CODE||' Date: '||p_create_date,
                              SQLCODE,
                              NULL,
                              'Populate_EI_Claimant_Main -- Insert into EI_Claimant_curr_year '
                    WHEN e_numeric_error THEN dbms_output.put_line('NUMERIC Error ON Cursor');
                        fwutil_pkg.logerror (SQLERRM||' '||ei_claimant_ext_rec.noc_code||' Prov Code: '||ei_claimant_ext_rec.EI_PROV_CODE||'  Econ Region: '||ei_claimant_ext_rec.ECONOMIC_REGION_CODE||
                        ' Postal Code: '||ei_claimant_ext_rec.POSTAL_CODE||' Date: '||p_create_date,
                              SQLCODE,
                              NULL,
                              'Populate_EI_Claimant_Main -- Insert into EI_Claimant_curr_year '
    END Insert_Current_Data;Here's the records that it is reading:
00094440903E4P1T5
00000000000000000
00066230703E1E1G4
AAAAAAAAAAAAAAAAA
00012210903E4K2K8
00082620803E5V1L3
99999999999999999
00084410803E5G2J3
00074120903E4N2E3
00094630903E4N1B7
00082620903E4N2J6
00082620903E4M2C4It is inserting the first 2 records, ignoring the record with '0' (which is good). Then it exits the FOR LOOP when it gets to the record with a bunch of 'A'.
Please Help !
Thanks in advance.

Answer 1

First of all correct your code..FOR LOOP has not been implemented correctly.. I think first u tried with OPEN CURSOR..LOOP..FETCH..EXIT WHEN..END LOOP..CLOSE CURSOR..then converted the same to FOR LOOP..END LOOP and forgot to change the code like
-- WHERE ECONOMIC_REGION_ID = ei_claimant_ext_rec.ECONOMIC_REGION_CODE;
try this type of code...
DECLARE
     TYPE mixed_typ IS TABLE OF VARCHAR2 (1)
                              INDEX BY PLS_INTEGER;
     mixed_ty          mixed_typ;
     e_numeric_error EXCEPTION;
     PRAGMA EXCEPTION_INIT (e_numeric_error, -6502);
     v_num               NUMBER;
BEGIN
     mixed_ty (1) := '1';
     mixed_ty (2) := 'A';
     mixed_ty (3) := '2';
     mixed_ty (4) := '3';
     FOR i IN 1 .. mixed_ty.COUNT LOOP
          BEGIN
               v_num     := TO_NUMBER ('11' || mixed_ty (i));
               DBMS_OUTPUT.PUT_LINE (v_num);
          EXCEPTION
               WHEN e_numeric_error THEN
                    DBMS_OUTPUT.PUT_LINE ('Ignore '||SQLERRM);
          END;
     END LOOP;
EXCEPTION
     WHEN OTHERS THEN
          DBMS_OUTPUT.PUT_LINE (SQLERRM);
END;