1: Package Body IGI_DOS_FUNDS AS
2: -- $Header: igidoseb.pls 120.15.12010000.2 2010/02/09 10:28:34 dramired ship $
3:
4: /* ============== FND LOG VARIABLES ================== */
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
1: Package Body IGI_DOS_FUNDS AS
2: -- $Header: igidoseb.pls 120.15.12010000.2 2010/02/09 10:28:34 dramired ship $
3:
4: /* ============== FND LOG VARIABLES ================== */
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
2: -- $Header: igidoseb.pls 120.15.12010000.2 2010/02/09 10:28:34 dramired ship $
3:
4: /* ============== FND LOG VARIABLES ================== */
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
10: l_error_level number := FND_LOG.LEVEL_ERROR ;
3:
4: /* ============== FND LOG VARIABLES ================== */
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
10: l_error_level number := FND_LOG.LEVEL_ERROR ;
11: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
4: /* ============== FND LOG VARIABLES ================== */
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
10: l_error_level number := FND_LOG.LEVEL_ERROR ;
11: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
12:
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
10: l_error_level number := FND_LOG.LEVEL_ERROR ;
11: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
12:
13: /* =================== DEBUG_LOG_UNEXP_ERROR =================== */
6: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
10: l_error_level number := FND_LOG.LEVEL_ERROR ;
11: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
12:
13: /* =================== DEBUG_LOG_UNEXP_ERROR =================== */
14: --bug 9128478
7: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
8: l_event_level number := FND_LOG.LEVEL_EVENT ;
9: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
10: l_error_level number := FND_LOG.LEVEL_ERROR ;
11: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
12:
13: /* =================== DEBUG_LOG_UNEXP_ERROR =================== */
14: --bug 9128478
15: TYPE packet_data_type IS TABLE OF GL_BC_PACKETS.PACKET_ID%TYPE;
26: IF (P_error_type = 'DEFAULT') THEN
27: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
28: FND_MESSAGE.SET_TOKEN('CODE',sqlcode);
29: FND_MESSAGE.SET_TOKEN('MSG',sqlerrm);
30: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidoseb.' || P_module ,TRUE);
31: ELSIF (P_error_type = 'USER') THEN
32: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidoseb.' || P_module ,TRUE);
33: END IF;
34:
28: FND_MESSAGE.SET_TOKEN('CODE',sqlcode);
29: FND_MESSAGE.SET_TOKEN('MSG',sqlerrm);
30: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidoseb.' || P_module ,TRUE);
31: ELSIF (P_error_type = 'USER') THEN
32: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidoseb.' || P_module ,TRUE);
33: END IF;
34:
35: END IF;
36:
45:
46: BEGIN
47:
48: IF (P_level >= l_debug_level) THEN
49: FND_LOG.STRING(P_level, 'igi.plsql.igidoseb.' || P_module, P_message) ;
50: END IF;
51:
52: END Debug_log_string;
53: