[Home] [Help]
1: PACKAGE BODY igi_iac_det_balances_pkg AS
2: -- $Header: igiiadbb.pls 120.4.12000000.1 2007/08/01 16:14:19 npandya ship $
3:
4: --===========================FND_LOG.START=====================================
5:
8: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
9: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
10: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
11: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
12: g_path VARCHAR2(100) := 'IGI.PLSQL.igiiadbb.igi_iac_det_balances_pkg.';
13:
14: --===========================FND_LOG.END=====================================
15:
16: PROCEDURE insert_row (
64:
65:
66: CURSOR c IS
67: SELECT rowid
68: FROM igi_iac_det_balances
69: WHERE adjustment_id = x_adjustment_id
70: AND asset_id = x_asset_id
71: AND distribution_id = x_distribution_id
72: AND book_type_code = x_book_type_code
97: app_exception.raise_exception;
98: END IF;
99:
100:
101: INSERT INTO igi_iac_det_balances (
102: adjustment_id,
103: asset_id,
104: distribution_id,
105: book_type_code,
238: igi_iac_debug_pkg.debug_other_msg(g_error_level,l_path,FALSE);
239: app_exception.raise_exception;
240: END IF;
241:
242: UPDATE igi_iac_det_balances SET
243: adjustment_cost = x_adjustment_cost,
244: net_book_value = x_net_book_value,
245: reval_reserve_cost = x_reval_reserve_cost,
246: reval_reserve_backlog = x_reval_reserve_backlog,
291: || (reverse chronological order - newest change first)
292: */
293: BEGIN
294:
295: DELETE FROM igi_iac_det_balances
296: WHERE adjustment_id = x_adjustment_id
297: AND asset_id = x_asset_id
298: AND distribution_id = x_distribution_id
299: AND book_type_code = x_book_type_code
308:
309: END delete_row;
310:
311:
312: END igi_iac_det_balances_pkg;