diff --git a/Modules/cout_err.pck b/Modules/cout_err.pck index b134c69..51a10c4 100644 --- a/Modules/cout_err.pck +++ b/Modules/cout_err.pck @@ -199,31 +199,30 @@ CREATE OR REPLACE PACKAGE BODY cout_err IS l_err_loc VARCHAR2(240); BEGIN - - BEGIN - SELECT to_char(abs(exception_number)) || ': ' || message - ,exme_type - INTO p_message - ,p_exme_type - FROM exception_messages - WHERE exception_number = p_exception_number; - EXCEPTION - WHEN no_data_found THEN - p_message := 'UNABLE TO FIND MESSAGE FOR EXCEPTION ' || - to_char(p_exception_number); - p_exme_type := 'E'; - END; - - l_index := p_substitution_list.FIRST; - - LOOP - EXIT WHEN l_index IS NULL; - p_message := REPLACE(p_message - ,'
' - ,p_substitution_list(l_index)); - l_index := p_substitution_list.NEXT(l_index); - END LOOP; - + BEGIN + SELECT to_char(abs(exception_number)) || ': ' || message + ,exme_type + INTO p_message + ,p_exme_type + FROM exception_messages + WHERE exception_number = p_exception_number; + EXCEPTION + WHEN no_data_found THEN + p_message := 'UNABLE TO FIND MESSAGE FOR EXCEPTION ' || + to_char(p_exception_number); + p_exme_type := 'E'; + END; + + l_index := p_substitution_list.FIRST; + + LOOP + EXIT WHEN l_index IS NULL; + p_message := REPLACE(p_message + ,'
' + ,p_substitution_list(l_index)); + l_index := p_substitution_list.NEXT(l_index); + END LOOP; + END get_exception_message; PROCEDURE log(p_exception_number IN PLS_INTEGER := NULL @@ -271,22 +270,32 @@ CREATE OR REPLACE PACKAGE BODY cout_err IS IF g_target = c_table THEN INSERT INTO error_logs - (error_type + (erlo_id + ,error_type ,SOURCE ,severity ,ERROR_CODE ,error_message ,error_date - ,error_status) + ,error_status + ,created_on + ,created_by + ,updated_on + ,updated_by) VALUES - (p_error_group + (erlo_seq.NEXTVAL + ,p_error_group ,nvl(p_source ,l_name || ' line ' || l_lineno) ,l_exme_type ,l_exception_number ,l_exception_message ,SYSDATE - ,'N'); + ,'N' + ,SYSDATE + ,0 + ,SYSDATE + ,0); pl('Error log:' || l_caller_type || ',' || l_name || ',' || l_lineno || ',' || l_exme_type || ',' || l_exception_number || ',' ||