IF SQL%NOTFOUND THEN
oEndStatus:=Log_Util.BATCHENDSTATUS_ERROR_ABORT;
mErrMsgLst.wErrorRecordKey:='COMPANYID:'|| iCompanyId || 'OWNERCONTRACTNO:' || iOwnerContractNo;
mErrMsgLst.wMessageId:='EBLS0001';
mErrMsgLst.wErrorItemValue:=iOwnerContractNo;
mErrMsgLst.wBatchErrorClass:=oEndStatus;
mLogger.WRITE_LOG(mErrMsgLst.wErrorRecordKey,
mErrMsgLst.wMessageId,
mErrMsgLst.wErrorItemValue,
mErrMsgLst.wBatchErrorClass);
RAISE ownercnclrentadjNotFound;
ELSE
wOwnerCancellationDate:=ownercnclrentadjEntity.CANCELLATIONDATE;
END IF;
EXCEPTION WHEN OTHERS THEN
oEndStatus:=Log_Util.BATCHENDSTATUS_ERROR_ABORT;
END; 这样写 是错的。。
oEndStatus:=Log_Util.BATCHENDSTATUS_ERROR_ABORT;
mErrMsgLst.wErrorRecordKey:='COMPANYID:'|| iCompanyId || 'OWNERCONTRACTNO:' || iOwnerContractNo;
mErrMsgLst.wMessageId:='EBLS0001';
mErrMsgLst.wErrorItemValue:=iOwnerContractNo;
mErrMsgLst.wBatchErrorClass:=oEndStatus;
mLogger.WRITE_LOG(mErrMsgLst.wErrorRecordKey,
mErrMsgLst.wMessageId,
mErrMsgLst.wErrorItemValue,
mErrMsgLst.wBatchErrorClass);
RAISE ownercnclrentadjNotFound;
ELSE
wOwnerCancellationDate:=ownercnclrentadjEntity.CANCELLATIONDATE;
END IF;
EXCEPTION WHEN OTHERS THEN
oEndStatus:=Log_Util.BATCHENDSTATUS_ERROR_ABORT;
END; 这样写 是错的。。
O_error_message VARCHAR2(1000);
EXCEPTION
when OTHERS then
O_error_message := SUBSTR(SQLERRM, 1, 1000);
return FALSE;
END;