[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
669: dbms_session.set_nls('NLS_DATE_LANGUAGE', '"' || l_cur_date_lang || '"');
670: dbms_session.set_nls('NLS_SORT', '"' || l_cur_sort || '"');
671:
672:
673: /* Unique exception enhancement: Check fnd_log_unique_exceptions table for a row */
674: /* with this same message. If one exists already, increment the exception count */
675: /* If this is the first one, insert a new row into fnd_log_unique_exceptions */
676: begin
677: l_is_new_alert := false;
671:
672:
673: /* Unique exception enhancement: Check fnd_log_unique_exceptions table for a row */
674: /* with this same message. If one exists already, increment the exception count */
675: /* If this is the first one, insert a new row into fnd_log_unique_exceptions */
676: begin
677: l_is_new_alert := false;
678: select unique_exception_id, count
679: into l_ex_id, l_occ_count
676: begin
677: l_is_new_alert := false;
678: select unique_exception_id, count
679: into l_ex_id, l_occ_count
680: from fnd_log_unique_exceptions
681: where encoded_message = l_enc_msg
682: and status in ('N', 'O');
683:
684: /** Check if limit for occrrences has been reached **/
688: DEBUG('Not Logging occ l_occ_count = l_max_occ_count'|| l_max_occ_count);
689: return FALSE;
690: end if;
691:
692: update fnd_log_unique_exceptions flue
693: set flue.count = flue.count + 1
694: where flue.unique_exception_id = l_ex_id;
695:
696: exception
698: select fnd_log_unique_exception_s.nextval
699: into l_ex_id
700: from dual;
701:
702: insert into fnd_log_unique_exceptions (
703: UNIQUE_EXCEPTION_ID,
704: ENCODED_MESSAGE,
705: ENGLISH_MESSAGE,
706: STATUS,