745: BEGIN
746:
747: if( FND_LOG.LEVEL_UNEXPECTED >=
748: FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
749: FND_MESSAGE.SET_NAME('AZ', 'AZ_R12_PLSQL_EXCEPTION'); -- Seeded Message
750: -- Runtime Information
751: FND_MESSAGE.SET_TOKEN('ERROR_CODE', ErrCode);
752: FND_MESSAGE.SET_TOKEN('ERROR_MESG', ErrMsg);
753: FND_MESSAGE.SET_TOKEN('ERROR_PROC', 'az_comp_reporter.' || ProcedureName);
747: if( FND_LOG.LEVEL_UNEXPECTED >=
748: FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
749: FND_MESSAGE.SET_NAME('AZ', 'AZ_R12_PLSQL_EXCEPTION'); -- Seeded Message
750: -- Runtime Information
751: FND_MESSAGE.SET_TOKEN('ERROR_CODE', ErrCode);
752: FND_MESSAGE.SET_TOKEN('ERROR_MESG', ErrMsg);
753: FND_MESSAGE.SET_TOKEN('ERROR_PROC', 'az_comp_reporter.' || ProcedureName);
754: IF (Statement IS NOT NULL) THEN
755: FND_MESSAGE.SET_TOKEN('ERROR_STMT', Statement);
748: FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
749: FND_MESSAGE.SET_NAME('AZ', 'AZ_R12_PLSQL_EXCEPTION'); -- Seeded Message
750: -- Runtime Information
751: FND_MESSAGE.SET_TOKEN('ERROR_CODE', ErrCode);
752: FND_MESSAGE.SET_TOKEN('ERROR_MESG', ErrMsg);
753: FND_MESSAGE.SET_TOKEN('ERROR_PROC', 'az_comp_reporter.' || ProcedureName);
754: IF (Statement IS NOT NULL) THEN
755: FND_MESSAGE.SET_TOKEN('ERROR_STMT', Statement);
756: ELSE
749: FND_MESSAGE.SET_NAME('AZ', 'AZ_R12_PLSQL_EXCEPTION'); -- Seeded Message
750: -- Runtime Information
751: FND_MESSAGE.SET_TOKEN('ERROR_CODE', ErrCode);
752: FND_MESSAGE.SET_TOKEN('ERROR_MESG', ErrMsg);
753: FND_MESSAGE.SET_TOKEN('ERROR_PROC', 'az_comp_reporter.' || ProcedureName);
754: IF (Statement IS NOT NULL) THEN
755: FND_MESSAGE.SET_TOKEN('ERROR_STMT', Statement);
756: ELSE
757: FND_MESSAGE.SET_TOKEN('ERROR_STMT', 'none');
751: FND_MESSAGE.SET_TOKEN('ERROR_CODE', ErrCode);
752: FND_MESSAGE.SET_TOKEN('ERROR_MESG', ErrMsg);
753: FND_MESSAGE.SET_TOKEN('ERROR_PROC', 'az_comp_reporter.' || ProcedureName);
754: IF (Statement IS NOT NULL) THEN
755: FND_MESSAGE.SET_TOKEN('ERROR_STMT', Statement);
756: ELSE
757: FND_MESSAGE.SET_TOKEN('ERROR_STMT', 'none');
758: END IF;
759: raise_application_error(-20001, FND_MESSAGE.GET);
753: FND_MESSAGE.SET_TOKEN('ERROR_PROC', 'az_comp_reporter.' || ProcedureName);
754: IF (Statement IS NOT NULL) THEN
755: FND_MESSAGE.SET_TOKEN('ERROR_STMT', Statement);
756: ELSE
757: FND_MESSAGE.SET_TOKEN('ERROR_STMT', 'none');
758: END IF;
759: raise_application_error(-20001, FND_MESSAGE.GET);
760: end if;
761: END raise_error_msg;
755: FND_MESSAGE.SET_TOKEN('ERROR_STMT', Statement);
756: ELSE
757: FND_MESSAGE.SET_TOKEN('ERROR_STMT', 'none');
758: END IF;
759: raise_application_error(-20001, FND_MESSAGE.GET);
760: end if;
761: END raise_error_msg;
762:
763: