DBA Data[Home] [Help]

APPS.WSM_LOG_PVT dependencies on FND_LOG

Line 4: g_log_level_procedure NUMBER := FND_LOG.LEVEL_PROCEDURE;

1: PACKAGE BODY WSM_log_PVT AS
2: /* $Header: WSMVLOGB.pls 120.4 2006/09/08 00:52:05 nlal noship $ */
3:
4: g_log_level_procedure NUMBER := FND_LOG.LEVEL_PROCEDURE;
5: g_log_level_unexpected NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6:
7: G_MSG_LVL_UNEXP_ERROR NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ;
8: G_MSG_LVL_ERROR NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR ;

Line 5: g_log_level_unexpected NUMBER := FND_LOG.LEVEL_UNEXPECTED;

1: PACKAGE BODY WSM_log_PVT AS
2: /* $Header: WSMVLOGB.pls 120.4 2006/09/08 00:52:05 nlal noship $ */
3:
4: g_log_level_procedure NUMBER := FND_LOG.LEVEL_PROCEDURE;
5: g_log_level_unexpected NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6:
7: G_MSG_LVL_UNEXP_ERROR NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ;
8: G_MSG_LVL_ERROR NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR ;
9: G_MSG_LVL_SUCCESS NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS ;

Line 17: p_fnd_log_level IN number

13:
14: -- Log the parameters...
15: PROCEDURE LogProcParams ( p_module_name IN varchar2 ,
16: p_param_tbl IN WSM_log_PVT.param_tbl_type,
17: p_fnd_log_level IN number
18: )
19:
20: IS
21:

Line 25: --IF (g_log_level_procedure >= p_fnd_log_level) and fnd_log.test(g_log_level_procedure , p_module_name) then

21:
22: BEGIN
23: -- ( This code is correct : Unforutnately due to
24: -- inefficient GSCC warning/error check, forced to refer to the package public variable
25: --IF (g_log_level_procedure >= p_fnd_log_level) and fnd_log.test(g_log_level_procedure , p_module_name) then
26: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE and fnd_log.test(g_log_level_procedure , p_module_name)
27: THEN
28: FND_LOG.String(LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
29: MESSAGE => 'Parameters for [--> ' || p_module_name || ' <---]',

Line 26: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE and fnd_log.test(g_log_level_procedure , p_module_name)

22: BEGIN
23: -- ( This code is correct : Unforutnately due to
24: -- inefficient GSCC warning/error check, forced to refer to the package public variable
25: --IF (g_log_level_procedure >= p_fnd_log_level) and fnd_log.test(g_log_level_procedure , p_module_name) then
26: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE and fnd_log.test(g_log_level_procedure , p_module_name)
27: THEN
28: FND_LOG.String(LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
29: MESSAGE => 'Parameters for [--> ' || p_module_name || ' <---]',
30: MODULE => p_module_name);

Line 28: FND_LOG.String(LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,

24: -- inefficient GSCC warning/error check, forced to refer to the package public variable
25: --IF (g_log_level_procedure >= p_fnd_log_level) and fnd_log.test(g_log_level_procedure , p_module_name) then
26: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE and fnd_log.test(g_log_level_procedure , p_module_name)
27: THEN
28: FND_LOG.String(LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
29: MESSAGE => 'Parameters for [--> ' || p_module_name || ' <---]',
30: MODULE => p_module_name);
31:
32: for i in 1..p_param_tbl.count loop

Line 33: --IF p_fnd_log_level <= FND_LOG.LEVEL_PROCEDURE

29: MESSAGE => 'Parameters for [--> ' || p_module_name || ' <---]',
30: MODULE => p_module_name);
31:
32: for i in 1..p_param_tbl.count loop
33: --IF p_fnd_log_level <= FND_LOG.LEVEL_PROCEDURE
34: -- ( This code is correct : Unforutnately due to
35: -- inefficient GSCC warning/error check, forced to refer to the package public variable
36:
37: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE then

Line 37: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE then

33: --IF p_fnd_log_level <= FND_LOG.LEVEL_PROCEDURE
34: -- ( This code is correct : Unforutnately due to
35: -- inefficient GSCC warning/error check, forced to refer to the package public variable
36:
37: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE then
38: FND_LOG.String(
39: LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
40: MESSAGE => '[ ' || p_param_tbl(i).paramName || ' ] : ' || p_param_tbl(i).paramValue,
41: MODULE => p_module_name);

Line 38: FND_LOG.String(

34: -- ( This code is correct : Unforutnately due to
35: -- inefficient GSCC warning/error check, forced to refer to the package public variable
36:
37: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE then
38: FND_LOG.String(
39: LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
40: MESSAGE => '[ ' || p_param_tbl(i).paramName || ' ] : ' || p_param_tbl(i).paramValue,
41: MODULE => p_module_name);
42: END IF;

Line 39: LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,

35: -- inefficient GSCC warning/error check, forced to refer to the package public variable
36:
37: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE then
38: FND_LOG.String(
39: LOG_LEVEL => FND_LOG.LEVEL_PROCEDURE,
40: MESSAGE => '[ ' || p_param_tbl(i).paramName || ' ] : ' || p_param_tbl(i).paramValue,
41: MODULE => p_module_name);
42: END IF;
43: end loop;

Line 61: p_fnd_log_level IN NUMBER ,

57: -- pass 1 to p_wsm_warning if the message is a a warning message
58: p_wsm_warning IN NUMBER DEFAULT NULL,
59: -- p_fnd_msg_level has default NULL b'cos we dont do statement level logging into FND_MSG_PUB
60: p_fnd_msg_level IN NUMBER DEFAULT NULL,
61: p_fnd_log_level IN NUMBER ,
62: p_run_log_level IN NUMBER
63: )
64:
65: IS

Line 71: -- FND_LOG_MESSAGES alone...

67: l_message VARCHAR2(2000);
68: l_msg_type NUMBER;
69: BEGIN
70: -- If p_msg_text is NOT NULL then it is a statement level logging message which will be logged into
71: -- FND_LOG_MESSAGES alone...
72:
73: IF (p_msg_text IS NOT NULL) AND
74: (p_fnd_log_level < FND_LOG.LEVEL_EXCEPTION)
75: -- ST : Added this clause as we need the error messages from the old procedures that don't follow

Line 74: (p_fnd_log_level < FND_LOG.LEVEL_EXCEPTION)

70: -- If p_msg_text is NOT NULL then it is a statement level logging message which will be logged into
71: -- FND_LOG_MESSAGES alone...
72:
73: IF (p_msg_text IS NOT NULL) AND
74: (p_fnd_log_level < FND_LOG.LEVEL_EXCEPTION)
75: -- ST : Added this clause as we need the error messages from the old procedures that don't follow
76: -- Logging framework also have their error statements logged similar to the error messages from the
77: -- new procedures...
78: THEN

Line 82: --IF (p_fnd_log_level >= p_run_log_level) and fnd_log.test(p_fnd_log_level , p_module_name) then

78: THEN
79:
80: -- ( This code is correct : Unforutnately due to
81: -- inefficient GSCC warning/error check, forced to refer to the package public variable
82: --IF (p_fnd_log_level >= p_run_log_level) and fnd_log.test(p_fnd_log_level , p_module_name) then
83: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and fnd_log.test(p_fnd_log_level , p_module_name)
84: THEN
85:
86: FND_LOG.String(

Line 83: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and fnd_log.test(p_fnd_log_level , p_module_name)

79:
80: -- ( This code is correct : Unforutnately due to
81: -- inefficient GSCC warning/error check, forced to refer to the package public variable
82: --IF (p_fnd_log_level >= p_run_log_level) and fnd_log.test(p_fnd_log_level , p_module_name) then
83: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and fnd_log.test(p_fnd_log_level , p_module_name)
84: THEN
85:
86: FND_LOG.String(
87: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

Line 86: FND_LOG.String(

82: --IF (p_fnd_log_level >= p_run_log_level) and fnd_log.test(p_fnd_log_level , p_module_name) then
83: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and fnd_log.test(p_fnd_log_level , p_module_name)
84: THEN
85:
86: FND_LOG.String(
87: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
88: MESSAGE => '[ ' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS') || ' ] : '
89: || p_module_name || ' : ' || p_stmt_num
90: || ' : ' || p_msg_text,

Line 87: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,

83: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and fnd_log.test(p_fnd_log_level , p_module_name)
84: THEN
85:
86: FND_LOG.String(
87: LOG_LEVEL => FND_LOG.LEVEL_STATEMENT,
88: MESSAGE => '[ ' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS') || ' ] : '
89: || p_module_name || ' : ' || p_stmt_num
90: || ' : ' || p_msg_text,
91: MODULE => p_module_name);

Line 97: IF (p_msg_name IS NOT NULL OR (p_msg_text IS NOT NULL AND p_fnd_log_level >= FND_LOG.LEVEL_EXCEPTION))

93: RETURN;
94: END IF;
95:
96:
97: IF (p_msg_name IS NOT NULL OR (p_msg_text IS NOT NULL AND p_fnd_log_level >= FND_LOG.LEVEL_EXCEPTION))
98: -- ST : Added the above check on p_msg_text for bug 5233265 as the older procedures will return a error_message to a
99: -- newer API that invokes it rather than a msg_count and msg_txt combination...
100: -- Hence those error messages also have to be logged..
101: AND

Line 103: (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_run_log_level,p_module_name))

99: -- newer API that invokes it rather than a msg_count and msg_txt combination...
100: -- Hence those error messages also have to be logged..
101: AND
102: (FND_MSG_PUB.Check_Msg_Level(p_fnd_msg_level) OR
103: (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_run_log_level,p_module_name))
104: )
105: THEN
106: -- ST : Added the IF clause for bug 5233265 --
107: IF p_msg_name IS NOT NULL THEN

Line 176: --IF (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_fnd_log_level,p_module_name))

172: END IF;
173:
174: -- ( This code is correct : Unforutnately due to
175: -- inefficient GSCC warning/error check, forced to refer to the package public variable
176: --IF (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_fnd_log_level,p_module_name))
177: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and FND_LOG.TEST(p_fnd_log_level,p_module_name)
178: THEN
179: -- To log into fnd_log_messages ...
180: fnd_log.string(log_level => FND_LOG.LEVEL_STATEMENT,

Line 177: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and FND_LOG.TEST(p_fnd_log_level,p_module_name)

173:
174: -- ( This code is correct : Unforutnately due to
175: -- inefficient GSCC warning/error check, forced to refer to the package public variable
176: --IF (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_fnd_log_level,p_module_name))
177: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and FND_LOG.TEST(p_fnd_log_level,p_module_name)
178: THEN
179: -- To log into fnd_log_messages ...
180: fnd_log.string(log_level => FND_LOG.LEVEL_STATEMENT,
181: module => p_module_name,

Line 179: -- To log into fnd_log_messages ...

175: -- inefficient GSCC warning/error check, forced to refer to the package public variable
176: --IF (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_fnd_log_level,p_module_name))
177: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and FND_LOG.TEST(p_fnd_log_level,p_module_name)
178: THEN
179: -- To log into fnd_log_messages ...
180: fnd_log.string(log_level => FND_LOG.LEVEL_STATEMENT,
181: module => p_module_name,
182: message => '[ ' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS') || ' ] : '
183: || p_module_name || ' : ' || p_stmt_num

Line 180: fnd_log.string(log_level => FND_LOG.LEVEL_STATEMENT,

176: --IF (p_fnd_log_level >= p_run_log_level and FND_LOG.TEST(p_fnd_log_level,p_module_name))
177: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT and FND_LOG.TEST(p_fnd_log_level,p_module_name)
178: THEN
179: -- To log into fnd_log_messages ...
180: fnd_log.string(log_level => FND_LOG.LEVEL_STATEMENT,
181: module => p_module_name,
182: message => '[ ' || to_char(sysdate,'DD-MON-YYYY HH24:MI:SS') || ' ] : '
183: || p_module_name || ' : ' || p_stmt_num
184: || ' : ' || l_message);

Line 193: p_fnd_log_level IN NUMBER,

189: END LogMessage;
190:
191: PROCEDURE handle_others ( p_module_name IN varchar2,
192: p_stmt_num IN NUMBER,
193: p_fnd_log_level IN NUMBER,
194: p_run_log_level IN NUMBER
195: )
196:
197: IS

Line 200: IF (G_LOG_LEVEL_UNEXPECTED >= p_fnd_log_level) THEN

196:
197: IS
198: l_msg_tokens token_rec_tbl;
199: BEGIN
200: IF (G_LOG_LEVEL_UNEXPECTED >= p_fnd_log_level) THEN
201:
202: l_msg_tokens.delete;
203: WSM_log_PVT.logMessage (p_module_name => p_module_name ,
204: p_msg_text => SUBSTRB('Unexpected Error : SQLCODE '|| SQLCODE ||' : SQLERRM : '|| SQLERRM, 1, 2000),

Line 207: p_fnd_log_level => G_LOG_LEVEL_UNEXPECTED ,

203: WSM_log_PVT.logMessage (p_module_name => p_module_name ,
204: p_msg_text => SUBSTRB('Unexpected Error : SQLCODE '|| SQLCODE ||' : SQLERRM : '|| SQLERRM, 1, 2000),
205: p_stmt_num => p_stmt_num ,
206: p_msg_tokens => l_msg_tokens ,
207: p_fnd_log_level => G_LOG_LEVEL_UNEXPECTED ,
208: p_run_log_level => p_fnd_log_level
209: );
210:
211: END IF;

Line 208: p_run_log_level => p_fnd_log_level

204: p_msg_text => SUBSTRB('Unexpected Error : SQLCODE '|| SQLCODE ||' : SQLERRM : '|| SQLERRM, 1, 2000),
205: p_stmt_num => p_stmt_num ,
206: p_msg_tokens => l_msg_tokens ,
207: p_fnd_log_level => G_LOG_LEVEL_UNEXPECTED ,
208: p_run_log_level => p_fnd_log_level
209: );
210:
211: END IF;
212:

Line 213: IF G_LOG_LEVEL_UNEXPECTED >= p_fnd_log_level OR

209: );
210:
211: END IF;
212:
213: IF G_LOG_LEVEL_UNEXPECTED >= p_fnd_log_level OR
214: FND_MSG_PUB.check_msg_level(G_MSG_LVL_UNEXP_ERROR)
215: THEN
216: --
217: l_msg_tokens.delete;

Line 223: p_fnd_log_level => G_LOG_LEVEL_UNEXPECTED ,

219: p_msg_name => 'WSM_GENERIC_ERROR' ,
220: p_msg_appl_name => 'WSM' ,
221: p_msg_tokens => l_msg_tokens ,
222: p_fnd_msg_level => G_MSG_LVL_UNEXP_ERROR ,
223: p_fnd_log_level => G_LOG_LEVEL_UNEXPECTED ,
224: p_run_log_level => p_fnd_log_level
225: );
226: END IF;
227: END handle_others;

Line 224: p_run_log_level => p_fnd_log_level

220: p_msg_appl_name => 'WSM' ,
221: p_msg_tokens => l_msg_tokens ,
222: p_fnd_msg_level => G_MSG_LVL_UNEXP_ERROR ,
223: p_fnd_log_level => G_LOG_LEVEL_UNEXPECTED ,
224: p_run_log_level => p_fnd_log_level
225: );
226: END IF;
227: END handle_others;
228: