35: l_msg_count NUMBER;
36: l_msg_data VARCHAR2(4000);
37: l_source_id IEO_LNA_SOURCES.SOURCE_ID%TYPE;
38: l_record_id IEO_LNA_RECORDS.RECORD_ID%TYPE;
39: l_desc_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
40: l_desc_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
36: l_msg_data VARCHAR2(4000);
37: l_source_id IEO_LNA_SOURCES.SOURCE_ID%TYPE;
38: l_record_id IEO_LNA_RECORDS.RECORD_ID%TYPE;
39: l_desc_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
40: l_desc_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
44: l_parm_value_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
37: l_source_id IEO_LNA_SOURCES.SOURCE_ID%TYPE;
38: l_record_id IEO_LNA_RECORDS.RECORD_ID%TYPE;
39: l_desc_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
40: l_desc_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
44: l_parm_value_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
45: l_parm_value_type_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
38: l_record_id IEO_LNA_RECORDS.RECORD_ID%TYPE;
39: l_desc_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
40: l_desc_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
44: l_parm_value_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
45: l_parm_value_type_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
46:
39: l_desc_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
40: l_desc_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
44: l_parm_value_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
45: l_parm_value_type_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
46:
47: BEGIN
40: l_desc_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
44: l_parm_value_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
45: l_parm_value_type_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
46:
47: BEGIN
48: X_RETURN_CODE := 'S';
41: l_desc_pos_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
42: l_param_msg_name_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
43: l_param_msg_app IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
44: l_parm_value_arr IEC_SQL_LOGGER_PVT.VARCHAR2_TABLE;
45: l_parm_value_type_arr IEC_SQL_LOGGER_PVT.NUMBER_TABLE;
46:
47: BEGIN
48: X_RETURN_CODE := 'S';
49:
65:
66: -- If any errors happen abort API.
67: IF X_RETURN_CODE <> FND_API.G_RET_STS_SUCCESS THEN
68: l_msg_count := FND_MSG_PUB.count_msg;
69: IEC_SQL_LOGGER_PVT.log( P_SOURCE_ID
70: , IEC_SQL_LOGGER_PVT.G_TL_INFO
71: , SYSDATE
72: , 0
73: , IEC_SQL_LOGGER_PVT.G_ALERT_NONE
66: -- If any errors happen abort API.
67: IF X_RETURN_CODE <> FND_API.G_RET_STS_SUCCESS THEN
68: l_msg_count := FND_MSG_PUB.count_msg;
69: IEC_SQL_LOGGER_PVT.log( P_SOURCE_ID
70: , IEC_SQL_LOGGER_PVT.G_TL_INFO
71: , SYSDATE
72: , 0
73: , IEC_SQL_LOGGER_PVT.G_ALERT_NONE
74: , IEC_SQL_LOGGER_PVT.G_TL_DEBUG
69: IEC_SQL_LOGGER_PVT.log( P_SOURCE_ID
70: , IEC_SQL_LOGGER_PVT.G_TL_INFO
71: , SYSDATE
72: , 0
73: , IEC_SQL_LOGGER_PVT.G_ALERT_NONE
74: , IEC_SQL_LOGGER_PVT.G_TL_DEBUG
75: , 'IEC_COMM_TRACE'
76: , 'IEC'
77: , ''
70: , IEC_SQL_LOGGER_PVT.G_TL_INFO
71: , SYSDATE
72: , 0
73: , IEC_SQL_LOGGER_PVT.G_ALERT_NONE
74: , IEC_SQL_LOGGER_PVT.G_TL_DEBUG
75: , 'IEC_COMM_TRACE'
76: , 'IEC'
77: , ''
78: , l_record_id);
79: FOR i IN 1..FND_MSG_PUB.count_msg LOOP
80: l_msg_data := FND_MSG_PUB.GET(i, FND_API.G_FALSE);
81: l_desc_arr(1) := 'IEC_COMM_TRACE_DESC';
82: l_desc_app(1) := 'IEC';
83: IEC_SQL_LOGGER_PVT.LOG_DESCRIPTION( l_record_id, l_desc_arr, l_desc_app);
84: l_desc_pos_arr(1) := 1;
85: l_param_msg_name_arr(1) := 'IEC_TRACE_TOKEN';
86: l_param_msg_app(1) := 'IEC';
87: l_parm_value_arr(1) := l_msg_data;
85: l_param_msg_name_arr(1) := 'IEC_TRACE_TOKEN';
86: l_param_msg_app(1) := 'IEC';
87: l_parm_value_arr(1) := l_msg_data;
88: l_parm_value_type_arr(1) := 1;
89: IEC_SQL_LOGGER_PVT.DESCRIPTION_PARAMS( l_record_id
90: , l_desc_pos_arr
91: , l_param_msg_name_arr
92: , l_param_msg_app
93: , l_parm_value_arr