1: PACKAGE BODY IGI_RPI_STANDING_CHARGES_PKG as
2: --- $Header: igirstcb.pls 120.7.12000000.1 2007/08/31 05:53:44 mbremkum ship $
3:
4: l_debug_level number:=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_state_level number:=FND_LOG.LEVEL_STATEMENT;
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
1: PACKAGE BODY IGI_RPI_STANDING_CHARGES_PKG as
2: --- $Header: igirstcb.pls 120.7.12000000.1 2007/08/31 05:53:44 mbremkum ship $
3:
4: l_debug_level number:=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_state_level number:=FND_LOG.LEVEL_STATEMENT;
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
9: l_error_level number:=FND_LOG.LEVEL_ERROR;
2: --- $Header: igirstcb.pls 120.7.12000000.1 2007/08/31 05:53:44 mbremkum ship $
3:
4: l_debug_level number:=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_state_level number:=FND_LOG.LEVEL_STATEMENT;
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
9: l_error_level number:=FND_LOG.LEVEL_ERROR;
10: l_unexp_level number:=FND_LOG.LEVEL_UNEXPECTED;
3:
4: l_debug_level number:=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_state_level number:=FND_LOG.LEVEL_STATEMENT;
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
9: l_error_level number:=FND_LOG.LEVEL_ERROR;
10: l_unexp_level number:=FND_LOG.LEVEL_UNEXPECTED;
11:
4: l_debug_level number:=FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: l_state_level number:=FND_LOG.LEVEL_STATEMENT;
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
9: l_error_level number:=FND_LOG.LEVEL_ERROR;
10: l_unexp_level number:=FND_LOG.LEVEL_UNEXPECTED;
11:
12: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
5: l_state_level number:=FND_LOG.LEVEL_STATEMENT;
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
9: l_error_level number:=FND_LOG.LEVEL_ERROR;
10: l_unexp_level number:=FND_LOG.LEVEL_UNEXPECTED;
11:
12: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
13: X_Standing_Charge_Id IN OUT NOCOPY NUMBER,
6: l_proc_level number:=FND_LOG.LEVEL_PROCEDURE;
7: l_event_level number:=FND_LOG.LEVEL_EVENT;
8: l_excep_level number:=FND_LOG.LEVEL_EXCEPTION;
9: l_error_level number:=FND_LOG.LEVEL_ERROR;
10: l_unexp_level number:=FND_LOG.LEVEL_UNEXPECTED;
11:
12: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
13: X_Standing_Charge_Id IN OUT NOCOPY NUMBER,
14: X_Charge_Reference VARCHAR2,
218: CLOSE C;
219: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
220: --Bug 3199481 (start)
221: If (l_unexp_level >= l_debug_level) then
222: FND_LOG.MESSAGE(l_unexp_level,'igi.plsql.igi_rpi_standing_charges_pkg.lock_row.Msg1',FALSE);
223: End if;
224: --Bug 3199481 (end)
225: APP_EXCEPTION.Raise_Exception;
226: end if;
314: else
315: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
316: --Bug 3199481 (start)
317: If (l_unexp_level >= l_debug_level) then
318: FND_LOG.MESSAGE(l_unexp_level,'igi.plsql.igi_rpi_standing_charges_pkg.lock_row.Msg2',FALSE);
319: End if;
320: --Bug 3199481 (end)
321: APP_EXCEPTION.Raise_Exception;
322: end if;