How to handle error while using dbms_sql.execute

Question

Hi,
I am inserting some records by using the following piece of code.
stmt := 'insert into SSI_KPI_GOAL_VALUE_H (KPI_VAL_KPI_ID, KPI_VAL_RM_CDE,'|| v_day_value ||',KPI_VAL_ACT_DLY,'||v_month_val||',KPI_VAL_BIZ_UNIT_CDE) values (:kpi_array,:rm_array,:day1_array,:day1_array,:day1_array,:busnunit_array)';
l := dbms_sql.open_cursor;
     dbms_sql.parse(l, stmt, dbms_sql.native);
     dbms_sql.bind_array(l, ':kpi_array', col1_ins,1,ins_cnt-1);
     dbms_sql.bind_array(l, ':rm_array', col2_ins,1,ins_cnt-1);
     dbms_sql.bind_array(l, ':day1_array', col3_ins,1,ins_cnt-1);
     dbms_sql.bind_array(l, ':busnunit_array', col4_ins,1,ins_cnt-1);     
     dummy := dbms_sql.execute(l);
     dbms_sql.close_cursor(l);
I am getting an error since any one of the row contains value larger than the column.
How to handle exception handling for those rows which is having errors. I would like insert the records which is having
no errors. Like SAVE EXCEPTIONS for 'forall' is there any option is available to handle exceptional records.
Please help.
Thanks & Regards,
Hari.

Answer 1

Hari,
What's oracle version? Are you looking for something similar to this? see following example
DECLARE
   TYPE array
   IS
      TABLE OF my_objects%ROWTYPE
         INDEX BY BINARY_INTEGER;
   data          array;
   errors        NUMBER;
   dml_errors exception;
   error_count   NUMBER := 0;
   PRAGMA EXCEPTION_INIT (dml_errors, -24381);
   CURSOR mycur
   IS
      SELECT *
      FROM t;
BEGIN
   OPEN mycur;
   LOOP
      FETCH mycur BULK COLLECT INTO data LIMIT 100;
      BEGIN
         FORALL i IN 1 .. data.COUNT
         SAVE EXCEPTIONS
            INSERT INTO my_new_objects
            VALUES data (i);
      EXCEPTION
         WHEN dml_errors
         THEN
            errors        := sql%BULK_EXCEPTIONS.COUNT;
            error_count   := error_count + errors;
            FOR i IN 1 .. errors
            LOOP
               DBMS_OUTPUT.put_line(   'Error occurred during iteration '
                                    || sql%BULK_EXCEPTIONS(i).ERROR_INDEX
                                    || ' Oracle error is '
                                    || sql%BULK_EXCEPTIONS(i).ERROR_CODE);
            END LOOP;
      END;
      EXIT WHEN c%NOTFOUND;
   END LOOP;
   CLOSE mycur;
   DBMS_OUTPUT.put_line (error_count || ' total errors');
END;Regards
OrionNet