1: PACKAGE BODY igidosl AS
2: -- $Header: igidoslb.pls 120.37 2011/10/27 08:42:51 dramired ship $
3: --
4:
5: /* ============== FND LOG VARIABLES ================== */
6: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
2: -- $Header: igidoslb.pls 120.37 2011/10/27 08:42:51 dramired ship $
3: --
4:
5: /* ============== FND LOG VARIABLES ================== */
6: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
3: --
4:
5: /* ============== FND LOG VARIABLES ================== */
6: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
11: l_error_level number := FND_LOG.LEVEL_ERROR ;
4:
5: /* ============== FND LOG VARIABLES ================== */
6: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
11: l_error_level number := FND_LOG.LEVEL_ERROR ;
12: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
5: /* ============== FND LOG VARIABLES ================== */
6: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
11: l_error_level number := FND_LOG.LEVEL_ERROR ;
12: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
13:
6: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL ;
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
11: l_error_level number := FND_LOG.LEVEL_ERROR ;
12: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
13:
14: /* ============== WORKFLOW VARAIBLES =================
7: l_state_level number := FND_LOG.LEVEL_STATEMENT ;
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
11: l_error_level number := FND_LOG.LEVEL_ERROR ;
12: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
13:
14: /* ============== WORKFLOW VARAIBLES =================
15: ## Variables for framing and coloring the Table.
8: l_proc_level number := FND_LOG.LEVEL_PROCEDURE ;
9: l_event_level number := FND_LOG.LEVEL_EVENT ;
10: l_excep_level number := FND_LOG.LEVEL_EXCEPTION ;
11: l_error_level number := FND_LOG.LEVEL_ERROR ;
12: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED ;
13:
14: /* ============== WORKFLOW VARAIBLES =================
15: ## Variables for framing and coloring the Table.
16: ## copied FROM WF_NOTIFICATION package
75: IF (P_error_type = 'DEFAULT') THEN
76: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
77: FND_MESSAGE.SET_TOKEN('CODE',sqlcode);
78: FND_MESSAGE.SET_TOKEN('MSG',sqlerrm);
79: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidosl.' || P_module ,TRUE);
80: ELSIF (P_error_type = 'USER') THEN
81: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidosl.' || P_module ,TRUE);
82: END IF;
83:
77: FND_MESSAGE.SET_TOKEN('CODE',sqlcode);
78: FND_MESSAGE.SET_TOKEN('MSG',sqlerrm);
79: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidosl.' || P_module ,TRUE);
80: ELSIF (P_error_type = 'USER') THEN
81: FND_LOG.MESSAGE(l_unexp_level, 'igi.plsql.igidosl.' || P_module ,TRUE);
82: END IF;
83:
84: END IF;
85:
94:
95: BEGIN
96:
97: IF (P_level >= l_debug_level) THEN
98: FND_LOG.STRING(P_level, 'igi.plsql.igidosl.' || P_module, P_message) ;
99: END IF;
100:
101: END Debug_log_string;
102: