[Home] [Help]
302: l_amt NUMBER := 0;
303:
304: BEGIN
305: l_amt := x_amount;
306: l_ret := IGI_IAC_COMMON_UTILS.Iac_Round(l_amt,
307: g_book_type_code);
308: RETURN l_amt;
309: END DoRnding;
310:
768: -- is greater than zero and is the second Depreciation transaction
769: IF (p_transaction_run = 'SECOND') THEN
770: IF (l_elapsed_periods > 0) THEN
771: -- get the ccid for the account type Depreciation Expense
772: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
773: g_asset_id,
774: l_det_bal.distribution_id,
775: 'DEPRN_EXPENSE_ACCT',
776: p_trxhdr_id_reinstate,
802: x_event_id => p_event_id );
803: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Done Expense: '||l_rsv_catchup_amt);
804: -- insert RESERVE journal into igi_iac_adjustments with the reserve catchup amount
805: -- get the ccid for the account type
806: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
807: g_asset_id,
808: l_ren_dist_id,
809: 'DEPRN_RESERVE_ACCT',
810: p_trxhdr_id_reinstate,
838: -- insert GENERAL FUND journal into igi_iac_adjustments with the catchup amount
839: -- only if adjustment amount is greater than zero
840: IF (l_det_bal.adjustment_cost > 0) THEN
841: -- get the ccid for the account type Reval Reserve
842: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
843: g_asset_id,
844: l_ren_dist_id,
845: 'REVAL_RESERVE_ACCT',
846: p_trxhdr_id_reinstate,
874: x_mode => 'R',
875: x_event_id => p_event_id );
876:
877: -- get the ccid for the account type General Fund
878: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
879: g_asset_id,
880: l_ren_dist_id,
881: 'GENERAL_FUND_ACCT',
882: p_trxhdr_id_reinstate,
1255: CLOSE c_trx_prev_ret;
1256: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Adjustment id previous to retirement: '||l_prev_adj_id);
1257:
1258: -- get the cost retirement factor
1259: IF NOT igi_iac_common_utils.get_cost_retirement_factor(g_book_type_code,
1260: g_asset_id,
1261: g_retirement_id,
1262: l_prorate_factor)
1263: THEN
1297:
1298: IF (l_fully_reserved <= 0) THEN
1299: If l_det_bal.adjustment_cost >= 0 THEN
1300: l_gf_catchup_amt := l_det_bal.general_fund_acc + (l_elapsed_periods * l_det_bal.deprn_period * l_prorate_factor);
1301: l_ret:= igi_iac_common_utils.iac_round(l_gf_catchup_amt,g_book_type_code) ;
1302: l_general_fund_acc := l_gf_catchup_amt;
1303: END IF;
1304: ELSE
1305: l_gf_catchup_amt := 0;
1310: l_rsv_catchup_amt := l_elapsed_periods * l_det_bal.deprn_period;
1311:
1312: If l_det_bal.adjustment_cost >= 0 THEN
1313: l_gf_catchup_amt := l_elapsed_periods * l_det_bal.deprn_period ;
1314: l_ret:= igi_iac_common_utils.iac_round(l_gf_catchup_amt,g_book_type_code) ;
1315: l_general_fund_acc:= l_det_bal.general_fund_acc + l_gf_catchup_amt;
1316: END IF;
1317: ELSE
1318: l_rsv_catchup_amt := 0;
1480: RETURN FALSE;
1481: END IF;
1482: CLOSE c_deprn_expense;
1483: -- get the ccid for the account type Depreciation Expense
1484: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
1485: g_asset_id,
1486: l_det_bal.distribution_id,
1487: 'DEPRN_EXPENSE_ACCT',
1488: p_trxhdr_id_reinstate,
1521: -- insert RESERVE journal into igi_iac_adjustments with the reserve catchup amount
1522: -- calculate the catchup amount
1523: --l_de_catchup := l_deprn_reserve - l_latest_dep_rsv;
1524: -- get the ccid for the account type
1525: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
1526: g_asset_id,
1527: l_det_bal.distribution_id,
1528: 'DEPRN_RESERVE_ACCT',
1529: p_trxhdr_id_reinstate,
1560: -- insert GENERAL FUND a REVAL RESERVE journal into igi_iac_adjustments with the catchup amount
1561: -- only if adjustment amount is greater than zero
1562: IF (l_det_bal.adjustment_cost > 0) THEN
1563: -- get the ccid for the account type REVAL RESERVE
1564: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
1565: g_asset_id,
1566: l_det_bal.distribution_id,
1567: 'REVAL_RESERVE_ACCT',
1568: p_trxhdr_id_reinstate,
1598: );
1599: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Done Reval Reserve: '||l_rsv_catchup);
1600:
1601: -- get the ccid for the account type General Fund
1602: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
1603: g_asset_id,
1604: l_det_bal.distribution_id,
1605: 'GENERAL_FUND_ACCT',
1606: p_trxhdr_id_reinstate,
2253: -- create catchup adjustment entries only for the second
2254: -- depreciation transaction
2255: IF (p_transaction_run = 'SECOND') THEN
2256: -- get the ccid for the account type Depreciation Expense
2257: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2258: g_asset_id,
2259: l_det_bal.distribution_id,
2260: 'DEPRN_EXPENSE_ACCT',
2261: p_trxhdr_id_reinstate,
2288: );
2289: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'FULL:Done Expense: '||l_rsv_catchup_amt);
2290: -- insert RESERVE journal into igi_iac_adjustments with the reserve catchup amount
2291: -- get the ccid for the account type
2292: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2293: g_asset_id,
2294: l_ren_dist_id,
2295: 'DEPRN_RESERVE_ACCT',
2296: p_trxhdr_id_reinstate,
2325: -- insert GENERAL FUND journal into igi_iac_adjustments with the catchup amount
2326: -- only if adjustment amount is greater than zero
2327: IF (l_det_bal.adjustment_cost > 0) THEN
2328: -- get the ccid for the account type Reval Reserve
2329: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2330: g_asset_id,
2331: l_ren_dist_id,
2332: 'REVAL_RESERVE_ACCT',
2333: p_trxhdr_id_reinstate,
2362: x_event_id => p_event_id );
2363: -- igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'FULL:Done Reval Reserve: '||l_gf_catchup_amt);
2364:
2365: -- get the ccid for the account type
2366: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2367: g_asset_id,
2368: l_ren_dist_id,
2369: 'GENERAL_FUND_ACCT',
2370: p_trxhdr_id_reinstate,
2498: RETURN FALSE;
2499: END IF;
2500: CLOSE c_deprn_expense;
2501: -- get the ccid for the account type Depreciation Expense
2502: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2503: g_asset_id,
2504: l_ren_dist_id,
2505: 'DEPRN_EXPENSE_ACCT',
2506: p_trxhdr_id_reinstate,
2536: x_event_id => p_event_id );
2537: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'PARTIAL:Done Expense: '||l_rsv_catchup);
2538: -- insert RESERVE journal into igi_iac_adjustments with the reserve catchup amount
2539: -- get the ccid for the account type
2540: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2541: g_asset_id,
2542: l_ren_dist_id,
2543: 'DEPRN_RESERVE_ACCT',
2544: p_trxhdr_id_reinstate,
2572: -- insert GENERAL FUND journal into igi_iac_adjustments with the catchup amount
2573: -- only if adjustment amount is greater than zero
2574: IF (l_det_bal.adjustment_cost > 0) THEN
2575: -- get the ccid for the account type Revaluaion Reserve
2576: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2577: g_asset_id,
2578: l_ren_dist_id,
2579: 'REVAL_RESERVE_ACCT',
2580: p_trxhdr_id_reinstate,
2609: x_event_id => p_event_id );
2610: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'PARTIAL:Done Reval Reserve: '||l_rsv_catchup);
2611:
2612: -- get the ccid for the account type General Fund
2613: IF NOT igi_iac_common_utils.get_account_ccid(g_book_type_code,
2614: g_asset_id,
2615: l_ren_dist_id,
2616: 'GENERAL_FUND_ACCT',
2617: p_trxhdr_id_reinstate,
2929: BEGIN
2930: l_path := g_path||'First_Transaction';
2931:
2932: -- get the latest transaction for the asset
2933: IF NOT igi_iac_common_utils.get_latest_transaction(p_fa_reins_rec_info.book_type_code,
2934: p_fa_reins_rec_info.asset_id,
2935: l_latest_trx_type,
2936: l_latest_trx_id,
2937: l_latest_mref_id,
3168: e_reinstate_failed EXCEPTION;
3169: BEGIN
3170: l_path := g_path||'Second_Transaction';
3171: -- get the latest transaction for the asset
3172: IF NOT igi_iac_common_utils.get_latest_transaction(p_fa_reins_rec_info.book_type_code,
3173: p_fa_reins_rec_info.asset_id,
3174: l_latest_trx_type,
3175: l_latest_trx_id,
3176: l_latest_mref_id,
3408: END IF;
3409: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'IAC is enabled');
3410:
3411: -- check if the FA book is an IAC book
3412: IF NOT igi_iac_common_utils.is_iac_book(p_book_type_code)
3413: THEN
3414: RAISE e_not_iac_book;
3415: END IF;
3416: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,' This is an IAC book: '|| p_book_type_code);
3415: END IF;
3416: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,' This is an IAC book: '|| p_book_type_code);
3417:
3418: -- check if there is an IAC effect on the asset
3419: IF NOT igi_iac_common_utils.is_asset_proc(p_book_type_code,
3420: p_asset_id)
3421: THEN
3422: RAISE e_no_iac_effect;
3423: END IF;
3430: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'There is an IAC effect on the asset: '||l_asset_num);
3431:
3432: -- bug 2480915 start, call ytd preprocessor to populate igi_iac_fa_deprn
3433: -- if no entries exist for the book in the table
3434: IF NOT igi_iac_common_utils.populate_iac_fa_deprn_data(p_book_type_code,
3435: 'REINSTATEMENT')
3436: THEN
3437: igi_iac_debug_pkg.debug_other_string(g_state_level,l_path,'Problems creating rows in igi_iac_fa_deprn');
3438: RAISE e_iac_fa_deprn;
3444: g_asset_id := p_asset_id;
3445: g_retirement_id := p_retirement_id;
3446:
3447: -- get the period counter value
3448: IF NOT igi_iac_common_utils.get_open_period_info(p_book_type_code,
3449: l_prd_rec)
3450: THEN
3451: RAISE e_no_period_info_avail;
3452: END IF;
3451: RAISE e_no_period_info_avail;
3452: END IF;
3453:
3454: -- get the GL set of books id
3455: IF NOT igi_iac_common_utils.get_book_GL_info(p_book_type_code,
3456: l_sob_id,
3457: l_coa_id,
3458: l_currency,
3459: l_precision)
3479: -- reinstatement
3480:
3481: -- get the period info for the effective retirement date
3482: -- get the period counter value
3483: IF NOT igi_iac_common_utils.Get_Period_Info_for_Date(p_book_type_code,
3484: l_ret_rec.date_retired,
3485: l_eff_ret_rec)
3486: THEN
3487: RAISE e_no_period_info_avail;
3506:
3507:
3508: -- check if type of retirement is full, partial cost or partial unit as the
3509: -- cases have to be handled somewhat differently
3510: IF NOT igi_iac_common_utils.get_retirement_type(p_book_type_code,
3511: p_asset_id,
3512: p_retirement_id,
3513: l_retirement_type
3514: )