EXCEPTION
            WHEN DUP_VAL_ON_INDEX THEN
              strErrMess := SQLERRM;
          END;里面的SQLERRM是干什么用 ?     FOR i IN 1 .. errors LOOP
        strErrM := SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE);
        strErrMess := SQL%BULK_EXCEPTIONS(i)
                     .ERROR_INDEX - 1 || '*' || SQLCODE || '*' ||
                      SQLERRM(-SQL%BULK_EXCEPTIONS(i).ERROR_CODE) || '^';
        DBMS_LOB.WRITEAPPEND(ErrorInfo, length(strErrMess), strErrMess);
      END LOOP;