还有一个问题，麻烦大家回答！！！！在线等1！！
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;

------解决方案--------------------
SQLERRM是一个系统变量，记录了最近一次执行的错误信息
------解决方案--------------------
sqlerrm函数返回指定错误代码的错误信息
------解决方案--------------------
oracle sqlerrm函数 sqlerrm函数返回指定错误代码的错误信息