[Home] [Help]
PACKAGE BODY: APPS.XLA_ACCOUNTING_ERRORS_PKG
Source
1 package body xla_accounting_errors_pkg as
2 /* $Header: xlaaerrs.pkb 120.3 2011/04/05 13:29:46 sgullape noship $
3 * */
4 /*======================================================================+
5 * | Copyright (c) 2001-2002 Oracle Corporation |
6 * | Redwood Shores, CA, USA |
7 * | All rights reserved. |
8 * +=======================================================================+
9 * | PACKAGE NAME |
10 * | xla_accounting_errors_pkg |
11 * | |
12 * | DESCRIPTION |
13 * | Enhanced error messages |
14 * | |
15 * | HISTORY |
16 * | 08/12/2009 Vamsi Kasina Created |
17 * | |
18 * +======================================================================*/
19
20
21 --=============================================================================
22 -- *********** Local Trace Routine **********
23 --=============================================================================
24 C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25 C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26 C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27 C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28 C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29 C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30
31 C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
32 C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_accounting_errors_pkg';
33
34 g_log_level NUMBER;
35 g_log_enabled BOOLEAN;
36
37 PROCEDURE trace
38 (p_msg IN VARCHAR2
39 ,p_level IN NUMBER
40 ,p_module IN VARCHAR2) IS
41 BEGIN
42
43 IF (p_msg IS NULL AND p_level >= g_log_level) THEN
44 fnd_log.message(p_level, p_module);
45 ELSIF p_level >= g_log_level THEN
46 fnd_log.string(p_level, p_module, p_msg);
47 END IF;
48
49 EXCEPTION
50 WHEN xla_exceptions_pkg.application_exception THEN
51 RAISE;
52 WHEN OTHERS THEN
53 xla_exceptions_pkg.raise_message
54 (p_location => 'xla_accounting_errors_pkg.trace');
55 END trace;
56
57 PROCEDURE msg_bflow_pe_not_found
58 (p_application_id IN NUMBER
59 ,p_appli_s_name IN VARCHAR2
60 ,p_msg_name IN VARCHAR2
61 ,p_token_1 IN VARCHAR2
62 ,p_value_1 IN VARCHAR2
63 ,p_token_2 IN VARCHAR2 DEFAULT NULL
64 ,p_value_2 IN VARCHAR2 DEFAULT NULL
65 ,p_token_3 IN VARCHAR2 DEFAULT NULL
66 ,p_value_3 IN VARCHAR2 DEFAULT NULL
67 ,p_token_4 IN VARCHAR2 DEFAULT NULL --Bug 11776012
68 ,p_value_4 IN VARCHAR2 DEFAULT NULL --Bug 11776012
69 ,p_entity_id IN NUMBER
70 ,p_event_id IN NUMBER
71 ,p_ledger_id IN NUMBER DEFAULT NULL) IS
72
73 l_check BOOLEAN;
74 l_trx_data VARCHAR2(2000);
75 l_log_module VARCHAR2(240);
76 BEGIN
77
78 IF g_log_enabled THEN
79 l_log_module := C_DEFAULT_MODULE||'.msg_bflow_pe_not_found';
80 END IF;
81 IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
82 trace
83 (p_msg => 'BEGIN of procedure msg_bflow_pe_not_found'
84 ,p_level => C_LEVEL_PROCEDURE
85 ,p_module => l_log_module);
86 END IF;
87
88 l_check := FALSE;
89
90 IF p_value_2 IS NOT NULL THEN
91
92 --Bug 11776012
93 --l_trx_data := xla_datafixes_pub.get_transaction_details(p_application_id,p_value_2,'Y',p_value_3);
94 l_trx_data := xla_datafixes_pub.get_transaction_details(nvl(p_value_4,p_application_id),p_value_2,'Y',p_value_3);
95
96 IF l_trx_data IS NOT NULL THEN
97 l_check := TRUE;
98 xla_accounting_err_pkg.build_message
99 (p_appli_s_name => 'XLA'
100 ,p_msg_name => 'XLA_AP_BFLOW_PE_NOT_FOUND_DTL'
101 ,p_token_1 => 'APPLICATION_NAME'
102 ,p_value_1 => p_value_1
103 ,p_token_2 => 'TRX_DATA'
104 ,p_value_2 => l_trx_data
105 ,p_entity_id => p_entity_id
106 ,p_event_id => p_event_id
107 ,p_ledger_id => p_ledger_id);
108 END IF;
109 END IF;
110
111 IF NOT l_check THEN
112
113 xla_accounting_err_pkg.build_message
114 (p_appli_s_name => 'XLA'
115 ,p_msg_name => 'XLA_AP_BFLOW_PE_NOT_FOUND'
116 ,p_token_1 => 'APPLICATION_NAME'
117 ,p_value_1 => p_value_1
118 ,p_entity_id => p_entity_id
119 ,p_event_id => p_event_id
120 ,p_ledger_id => p_ledger_id);
121
122 END IF;
123
124 IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
125 trace
126 (p_msg => 'END of procedure msg_bflow_pe_not_found'
127 ,p_level => C_LEVEL_PROCEDURE
128 ,p_module => l_log_module);
129 END IF;
130
131 EXCEPTION
132 WHEN OTHERS THEN
133 xla_exceptions_pkg.raise_message
134 (p_location => 'xla_accounting_errors_pkg.msg_bflow_pe_not_found');
135
136 END msg_bflow_pe_not_found;
137
138 PROCEDURE ap_modify_message
139 (p_application_id IN NUMBER
140 ,p_appli_s_name IN VARCHAR2
141 ,p_msg_name IN VARCHAR2
142 ,p_token_1 IN VARCHAR2
143 ,p_value_1 IN VARCHAR2
144 ,p_token_2 IN VARCHAR2 DEFAULT NULL
145 ,p_value_2 IN VARCHAR2 DEFAULT NULL
146 ,p_token_3 IN VARCHAR2 DEFAULT NULL
147 ,p_value_3 IN VARCHAR2 DEFAULT NULL
148 ,p_token_4 IN VARCHAR2 DEFAULT NULL
149 ,p_value_4 IN VARCHAR2 DEFAULT NULL
150 ,p_token_5 IN VARCHAR2 DEFAULT NULL
151 ,p_value_5 IN VARCHAR2 DEFAULT NULL
152 ,p_token_6 IN VARCHAR2 DEFAULT NULL
153 ,p_value_6 IN VARCHAR2 DEFAULT NULL
154 ,p_entity_id IN NUMBER
155 ,p_event_id IN NUMBER
156 ,p_ledger_id IN NUMBER DEFAULT NULL
157 ,p_ae_header_id IN NUMBER DEFAULT NULL
158 ,p_ae_line_num IN NUMBER DEFAULT NULL
159 ,p_accounting_batch_id IN NUMBER DEFAULT NULL) IS
160
161 BEGIN
162 null;
163
164 END ap_modify_message;
165
166 PROCEDURE ar_modify_message
167 (p_application_id IN NUMBER
168 ,p_appli_s_name IN VARCHAR2
169 ,p_msg_name IN VARCHAR2
170 ,p_token_1 IN VARCHAR2
171 ,p_value_1 IN VARCHAR2
172 ,p_token_2 IN VARCHAR2 DEFAULT NULL
173 ,p_value_2 IN VARCHAR2 DEFAULT NULL
174 ,p_token_3 IN VARCHAR2 DEFAULT NULL
175 ,p_value_3 IN VARCHAR2 DEFAULT NULL
176 ,p_token_4 IN VARCHAR2 DEFAULT NULL
177 ,p_value_4 IN VARCHAR2 DEFAULT NULL
178 ,p_token_5 IN VARCHAR2 DEFAULT NULL
179 ,p_value_5 IN VARCHAR2 DEFAULT NULL
180 ,p_token_6 IN VARCHAR2 DEFAULT NULL
181 ,p_value_6 IN VARCHAR2 DEFAULT NULL
182 ,p_entity_id IN NUMBER
183 ,p_event_id IN NUMBER
184 ,p_ledger_id IN NUMBER DEFAULT NULL
185 ,p_ae_header_id IN NUMBER DEFAULT NULL
186 ,p_ae_line_num IN NUMBER DEFAULT NULL
187 ,p_accounting_batch_id IN NUMBER DEFAULT NULL) IS
188
189 BEGIN
190 null;
191
192 END ar_modify_message;
193
194
195 PROCEDURE common_modify_message
196 (p_application_id IN NUMBER
197 ,p_appli_s_name IN VARCHAR2
198 ,p_msg_name IN VARCHAR2
199 ,p_token_1 IN VARCHAR2
200 ,p_value_1 IN VARCHAR2
201 ,p_token_2 IN VARCHAR2 DEFAULT NULL
202 ,p_value_2 IN VARCHAR2 DEFAULT NULL
203 ,p_token_3 IN VARCHAR2 DEFAULT NULL
204 ,p_value_3 IN VARCHAR2 DEFAULT NULL
205 ,p_token_4 IN VARCHAR2 DEFAULT NULL
206 ,p_value_4 IN VARCHAR2 DEFAULT NULL
207 ,p_token_5 IN VARCHAR2 DEFAULT NULL
208 ,p_value_5 IN VARCHAR2 DEFAULT NULL
209 ,p_token_6 IN VARCHAR2 DEFAULT NULL
210 ,p_value_6 IN VARCHAR2 DEFAULT NULL
211 ,p_entity_id IN NUMBER
212 ,p_event_id IN NUMBER
213 ,p_ledger_id IN NUMBER DEFAULT NULL
214 ,p_ae_header_id IN NUMBER DEFAULT NULL
215 ,p_ae_line_num IN NUMBER DEFAULT NULL
216 ,p_accounting_batch_id IN NUMBER DEFAULT NULL) IS
217
218 l_log_module VARCHAR2(240);
219
220 BEGIN
221
222 IF g_log_enabled THEN
223 l_log_module := C_DEFAULT_MODULE||'.common_modify_message';
224 END IF;
225 IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
226 trace
227 (p_msg => 'BEGIN of procedure common_modify_message'
228 ,p_level => C_LEVEL_PROCEDURE
229 ,p_module => l_log_module);
230 END IF;
231
232 IF p_msg_name = 'XLA_AP_BFLOW_PE_NOT_FOUND' THEN
233
234 -- Bug 11776012
235 -- Added two parameters p_token_4, p_value_4
236 msg_bflow_pe_not_found (p_application_id => p_application_id
237 ,p_appli_s_name => p_appli_s_name
238 ,p_msg_name => p_msg_name
239 ,p_token_1 => p_token_1
240 ,p_value_1 => p_value_1
241 ,p_token_2 => p_token_2
242 ,p_value_2 => p_value_2
243 ,p_token_3 => p_token_3
244 ,p_value_3 => p_value_3
245 ,p_token_4 => p_token_4
246 ,p_value_4 => p_value_4
247 ,p_entity_id => p_entity_id
248 ,p_event_id => p_event_id
249 ,p_ledger_id => p_ledger_id);
250
251 END IF;
252
253 IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
254 trace
255 (p_msg => 'END of procedure common_modify_message'
256 ,p_level => C_LEVEL_PROCEDURE
257 ,p_module => l_log_module);
258 END IF;
259
260 EXCEPTION
261 WHEN OTHERS THEN
262 xla_exceptions_pkg.raise_message
263 (p_location => 'xla_accounting_errors_pkg.common_modify_message');
264
265 END common_modify_message;
266
267 PROCEDURE modify_message
268 (p_application_id IN NUMBER
269 ,p_appli_s_name IN VARCHAR2
270 ,p_msg_name IN VARCHAR2
271 ,p_token_1 IN VARCHAR2
272 ,p_value_1 IN VARCHAR2
273 ,p_token_2 IN VARCHAR2 DEFAULT NULL
274 ,p_value_2 IN VARCHAR2 DEFAULT NULL
275 ,p_token_3 IN VARCHAR2 DEFAULT NULL
276 ,p_value_3 IN VARCHAR2 DEFAULT NULL
277 ,p_token_4 IN VARCHAR2 DEFAULT NULL
278 ,p_value_4 IN VARCHAR2 DEFAULT NULL
279 ,p_token_5 IN VARCHAR2 DEFAULT NULL
280 ,p_value_5 IN VARCHAR2 DEFAULT NULL
281 ,p_token_6 IN VARCHAR2 DEFAULT NULL
282 ,p_value_6 IN VARCHAR2 DEFAULT NULL
283 ,p_entity_id IN NUMBER
284 ,p_event_id IN NUMBER
285 ,p_ledger_id IN NUMBER DEFAULT NULL
286 ,p_ae_header_id IN NUMBER DEFAULT NULL
287 ,p_ae_line_num IN NUMBER DEFAULT NULL
288 ,p_accounting_batch_id IN NUMBER DEFAULT NULL) IS
289
290 l_log_module VARCHAR2(240);
291
292 BEGIN
293
294 IF g_log_enabled THEN
295 l_log_module := C_DEFAULT_MODULE||'.modify_message';
296 END IF;
300 ,p_level => C_LEVEL_PROCEDURE
297 IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
298 trace
299 (p_msg => 'BEGIN of procedure modify_message'
301 ,p_module => l_log_module);
302 trace
303 (p_msg => 'p_application_id = '|| p_application_id
304 ,p_level => C_LEVEL_PROCEDURE
305 ,p_module => l_log_module);
306 trace
307 (p_msg => 'p_appli_s_name = '||p_appli_s_name
308 ,p_level => C_LEVEL_PROCEDURE
309 ,p_module => l_log_module);
310 trace
311 (p_msg => 'p_msg_name = '||p_msg_name
312 ,p_level => C_LEVEL_PROCEDURE
313 ,p_module => l_log_module);
314 trace
315 (p_msg => 'p_token_1 = '||p_token_1
316 ,p_level => C_LEVEL_PROCEDURE
317 ,p_module => l_log_module);
318 trace
319 (p_msg => 'p_value_1 = '||p_value_1
320 ,p_level => C_LEVEL_PROCEDURE
321 ,p_module => l_log_module);
322 trace
323 (p_msg => 'p_token_2 = '||p_token_2
324 ,p_level => C_LEVEL_PROCEDURE
325 ,p_module => l_log_module);
326 trace
327 (p_msg => 'p_value_2 = '||p_value_2
328 ,p_level => C_LEVEL_PROCEDURE
329 ,p_module => l_log_module);
330 trace
331 (p_msg => 'p_token_3 = '||p_token_3
332 ,p_level => C_LEVEL_PROCEDURE
333 ,p_module => l_log_module);
334 trace
335 (p_msg => 'p_value_3 = '||p_value_3
336 ,p_level => C_LEVEL_PROCEDURE
337 ,p_module => l_log_module);
338 trace
339 (p_msg => 'p_token_4 = '||p_token_4
340 ,p_level => C_LEVEL_PROCEDURE
341 ,p_module => l_log_module);
342 trace
343 (p_msg => 'p_value_4 = '||p_value_4
344 ,p_level => C_LEVEL_PROCEDURE
345 ,p_module => l_log_module);
346 trace
347 (p_msg => 'p_token_5 = '||p_token_5
348 ,p_level => C_LEVEL_PROCEDURE
349 ,p_module => l_log_module);
350 trace
351 (p_msg => 'p_value_5 = '||p_value_5
352 ,p_level => C_LEVEL_PROCEDURE
353 ,p_module => l_log_module);
354 trace
355 (p_msg => 'p_token_6 = '||p_token_6
356 ,p_level => C_LEVEL_PROCEDURE
357 ,p_module => l_log_module);
358 trace
359 (p_msg => 'p_value_6 = '||p_value_6
360 ,p_level => C_LEVEL_PROCEDURE
361 ,p_module => l_log_module);
362 trace
363 (p_msg => 'p_entity_id = '||p_entity_id
364 ,p_level => C_LEVEL_PROCEDURE
365 ,p_module => l_log_module);
366 trace
367 (p_msg => 'p_event_id = '||p_event_id
368 ,p_level => C_LEVEL_PROCEDURE
369 ,p_module => l_log_module);
370 trace
371 (p_msg => 'p_ledger_id = '||p_ledger_id
372 ,p_level => C_LEVEL_PROCEDURE
373 ,p_module => l_log_module);
374 trace
375 (p_msg => 'p_ae_header_id = '||p_ae_header_id
376 ,p_level => C_LEVEL_PROCEDURE
377 ,p_module => l_log_module);
378 trace
379 (p_msg => 'p_ae_line_num = '||p_ae_line_num
380 ,p_level => C_LEVEL_PROCEDURE
381 ,p_module => l_log_module);
382 trace
383 (p_msg => 'p_accounting_batch_id = '||p_accounting_batch_id
384 ,p_level => C_LEVEL_PROCEDURE
385 ,p_module => l_log_module);
386 END IF;
387
388 IF p_msg_name IN ('XLA_AP_BFLOW_PE_NOT_FOUND') THEN
389 common_modify_message(p_application_id => p_application_id
390 ,p_appli_s_name => p_appli_s_name
391 ,p_msg_name => p_msg_name
392 ,p_token_1 => p_token_1
393 ,p_value_1 => p_value_1
394 ,p_token_2 => p_token_2
395 ,p_value_2 => p_value_2
396 ,p_token_3 => p_token_3
397 ,p_value_3 => p_value_3
398 ,p_token_4 => p_token_4
399 ,p_value_4 => p_value_4
400 ,p_token_5 => p_token_5
401 ,p_value_5 => p_value_5
402 ,p_token_6 => p_token_6
403 ,p_value_6 => p_value_6
404 ,p_entity_id => p_entity_id
405 ,p_event_id => p_event_id
406 ,p_ledger_id => p_ledger_id
407 ,p_ae_header_id => p_ae_header_id
408 ,p_ae_line_num => p_ae_line_num
409 ,p_accounting_batch_id => p_accounting_batch_id);
410
411 ELSE
412 IF p_application_id = 200 THEN
413 ap_modify_message(p_application_id => p_application_id
414 ,p_appli_s_name => p_appli_s_name
415 ,p_msg_name => p_msg_name
416 ,p_token_1 => p_token_1
417 ,p_value_1 => p_value_1
418 ,p_token_2 => p_token_2
419 ,p_value_2 => p_value_2
420 ,p_token_3 => p_token_3
421 ,p_value_3 => p_value_3
425 ,p_value_5 => p_value_5
422 ,p_token_4 => p_token_4
423 ,p_value_4 => p_value_4
424 ,p_token_5 => p_token_5
426 ,p_token_6 => p_token_6
427 ,p_value_6 => p_value_6
428 ,p_entity_id => p_entity_id
429 ,p_event_id => p_event_id
430 ,p_ledger_id => p_ledger_id
431 ,p_ae_header_id => p_ae_header_id
432 ,p_ae_line_num => p_ae_line_num
433 ,p_accounting_batch_id => p_accounting_batch_id);
434
435 ELSIF p_application_id = 222 THEN
436 ar_modify_message(p_application_id => p_application_id
437 ,p_appli_s_name => p_appli_s_name
438 ,p_msg_name => p_msg_name
439 ,p_token_1 => p_token_1
440 ,p_value_1 => p_value_1
441 ,p_token_2 => p_token_2
442 ,p_value_2 => p_value_2
443 ,p_token_3 => p_token_3
444 ,p_value_3 => p_value_3
445 ,p_token_4 => p_token_4
446 ,p_value_4 => p_value_4
447 ,p_token_5 => p_token_5
448 ,p_value_5 => p_value_5
449 ,p_token_6 => p_token_6
450 ,p_value_6 => p_value_6
451 ,p_entity_id => p_entity_id
452 ,p_event_id => p_event_id
453 ,p_ledger_id => p_ledger_id
454 ,p_ae_header_id => p_ae_header_id
455 ,p_ae_line_num => p_ae_line_num
456 ,p_accounting_batch_id => p_accounting_batch_id);
457 END IF;
458
459 END IF;
460
461 IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
462 trace
463 (p_msg => 'END of procedure modify_message'
464 ,p_level => C_LEVEL_PROCEDURE
465 ,p_module => l_log_module);
466 END IF;
467
468 EXCEPTION
469 WHEN xla_exceptions_pkg.application_exception THEN
470 RAISE;
471 WHEN OTHERS THEN
472 IF (C_LEVEL_EXCEPTION >= g_log_level) THEN
473 trace
474 (p_msg => 'p_appli_s_name = '||p_appli_s_name
475 ,p_level => C_LEVEL_EXCEPTION
476 ,p_module => l_log_module);
477 trace
478 (p_msg => 'p_msg_name = '||p_msg_name
479 ,p_level => C_LEVEL_EXCEPTION
480 ,p_module => l_log_module);
481 trace
482 (p_msg => 'p_token_1 = '||p_token_1
483 ,p_level => C_LEVEL_EXCEPTION
484 ,p_module => l_log_module);
485 trace
486 (p_msg => 'p_value_1 = '||p_value_1
487 ,p_level => C_LEVEL_EXCEPTION
488 ,p_module => l_log_module);
489 trace
490 (p_msg => 'p_token_2 = '||p_token_2
491 ,p_level => C_LEVEL_EXCEPTION
492 ,p_module => l_log_module);
493 trace
494 (p_msg => 'p_value_2 = '||p_value_2
495 ,p_level => C_LEVEL_EXCEPTION
496 ,p_module => l_log_module);
497 trace
498 (p_msg => 'p_token_3 = '||p_token_3
499 ,p_level => C_LEVEL_EXCEPTION
500 ,p_module => l_log_module);
501 trace
502 (p_msg => 'p_value_3 = '||p_value_3
503 ,p_level => C_LEVEL_EXCEPTION
504 ,p_module => l_log_module);
505 trace
506 (p_msg => 'p_token_4 = '||p_token_4
507 ,p_level => C_LEVEL_EXCEPTION
508 ,p_module => l_log_module);
509 trace
510 (p_msg => 'p_value_4 = '||p_value_4
511 ,p_level => C_LEVEL_EXCEPTION
512 ,p_module => l_log_module);
513 trace
514 (p_msg => 'p_token_5 = '||p_token_5
515 ,p_level => C_LEVEL_EXCEPTION
516 ,p_module => l_log_module);
517 trace
518 (p_msg => 'p_value_5 = '||p_value_5
519 ,p_level => C_LEVEL_EXCEPTION
520 ,p_module => l_log_module);
521 trace
522 (p_msg => 'p_token_6 = '||p_token_6
523 ,p_level => C_LEVEL_EXCEPTION
524 ,p_module => l_log_module);
525 trace
526 (p_msg => 'p_value_6 = '||p_value_6
527 ,p_level => C_LEVEL_EXCEPTION
528 ,p_module => l_log_module);
529 trace
530 (p_msg => 'p_entity_id = '||p_entity_id
531 ,p_level => C_LEVEL_EXCEPTION
532 ,p_module => l_log_module);
533 trace
534 (p_msg => 'p_event_id = '||p_event_id
535 ,p_level => C_LEVEL_EXCEPTION
536 ,p_module => l_log_module);
537 trace
538 (p_msg => 'p_ledger_id = '||p_ledger_id
539 ,p_level => C_LEVEL_EXCEPTION
540 ,p_module => l_log_module);
541 trace
542 (p_msg => 'p_ae_header_id = '||p_ae_header_id
543 ,p_level => C_LEVEL_EXCEPTION
544 ,p_module => l_log_module);
545 trace
546 (p_msg => 'p_ae_line_num = '||p_ae_line_num
547 ,p_level => C_LEVEL_EXCEPTION
548 ,p_module => l_log_module);
549 trace
553 END IF;
550 (p_msg => 'p_accounting_batch_id = '||p_accounting_batch_id
551 ,p_level => C_LEVEL_EXCEPTION
552 ,p_module => l_log_module);
554
555 xla_exceptions_pkg.raise_message
556 (p_location => 'xla_accounting_errors_pkg.modify_message');
557
558 END modify_message;
559
560 BEGIN
561 g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
562 g_log_enabled := fnd_log.test
563 (log_level => g_log_level
564 ,module => C_DEFAULT_MODULE);
565
566 IF NOT g_log_enabled THEN
567 g_log_level := C_LEVEL_LOG_DISABLED;
568 END IF;
569
570 end xla_accounting_errors_pkg;