[Home] [Help]
170:
171:
172: if (l_sys_al_level >= p_msg_sev)THEN
173: l_pr_al_count := fnd_profile.value('OAM_MAX_SYSTEM_ALERT');
174: select count(*) into l_alertCount from FND_LOG_UNIQUE_EXCEPTIONS
175: where STATUS = 'N';
176: DEBUG('IS_ALERTING_ENABLED: can log msg Sevrity lower Next chek:l_pr_al_count' || l_pr_al_count);
177: DEBUG('IS_ALERTING_ENABLED::l_alertCount' || l_alertCount);
178: if (l_alertCount < l_pr_al_count) then
647: dbms_session.set_nls('NLS_DATE_LANGUAGE', '"' || l_cur_date_lang || '"');
648: dbms_session.set_nls('NLS_SORT', '"' || l_cur_sort || '"');
649:
650:
651: /* Unique exception enhancement: Check fnd_log_unique_exceptions table for a row */
652: /* with this same message. If one exists already, increment the exception count */
653: /* If this is the first one, insert a new row into fnd_log_unique_exceptions */
654: begin
655: l_is_new_alert := false;
649:
650:
651: /* Unique exception enhancement: Check fnd_log_unique_exceptions table for a row */
652: /* with this same message. If one exists already, increment the exception count */
653: /* If this is the first one, insert a new row into fnd_log_unique_exceptions */
654: begin
655: l_is_new_alert := false;
656: select unique_exception_id, count
657: into l_ex_id, l_occ_count
654: begin
655: l_is_new_alert := false;
656: select unique_exception_id, count
657: into l_ex_id, l_occ_count
658: from fnd_log_unique_exceptions
659: where encoded_message = l_enc_msg
660: and status in ('N', 'O');
661:
662: /** Check if limit for occrrences has been reached **/
666: DEBUG('Not Logging occ l_occ_count = l_max_occ_count'|| l_max_occ_count);
667: return FALSE;
668: end if;
669:
670: update fnd_log_unique_exceptions flue
671: set flue.count = flue.count + 1
672: where flue.unique_exception_id = l_ex_id;
673:
674: exception
676: select fnd_log_unique_exception_s.nextval
677: into l_ex_id
678: from dual;
679:
680: insert into fnd_log_unique_exceptions (
681: UNIQUE_EXCEPTION_ID,
682: ENCODED_MESSAGE,
683: ENGLISH_MESSAGE,
684: STATUS,