[Home] [Help]
425: -- populate rec_types that were not provided by users
426:
427: -- pop asset_desc_rec
428: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_desc_rec', '', p_log_level_rec => g_log_level_rec); end if;
429: if not FA_UTIL_PVT.get_asset_desc_rec
430: (p_asset_hdr_rec => l_asset_hdr_rec
431: ,px_asset_desc_rec => l_asset_desc_rec
432: , p_log_level_rec => g_log_level_rec) then
433: raise FND_API.G_EXC_UNEXPECTED_ERROR;
434: end if;
435:
436: -- pop asset_type_rec
437: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_type_rec', '', p_log_level_rec => g_log_level_rec); end if;
438: if not FA_UTIL_PVT.get_asset_type_rec
439: (p_asset_hdr_rec => l_asset_hdr_rec
440: ,px_asset_type_rec => l_asset_type_rec
441: ,p_date_effective => NULL
442: , p_log_level_rec => g_log_level_rec) then
446: /* Bug# 4663092: fyi: May not needed at this level */
447: -- pop asset_fin_rec
448: -- get fa_books row where transaction_header_id_out is null
449: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => g_log_level_rec); end if;
450: if not FA_UTIL_PVT.get_asset_fin_rec
451: (p_asset_hdr_rec => l_asset_hdr_rec
452: ,px_asset_fin_rec => l_asset_fin_rec
453: ,p_transaction_header_id => NULL
454: ,p_mrc_sob_type_code => 'P'
485: --Added for IFRS
486:
487: -- pop current period_rec info
488: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop period_rec', '', p_log_level_rec => g_log_level_rec); end if;
489: if not FA_UTIL_PVT.get_period_rec
490: (p_book => l_asset_hdr_rec.book_type_code
491: ,x_period_rec => l_period_rec
492: , p_log_level_rec => g_log_level_rec) then
493: raise FND_API.G_EXC_UNEXPECTED_ERROR;
499: -- to make sure that the current_units
500: -- of asset_desc_rec is correct.
501: -- => this call shouldn't be necessary
502: -- if asset_desc_rec.current_units always reflects current units.
503: if not FA_UTIL_PVT.get_current_units
504: (p_calling_fn => l_calling_fn
505: ,p_asset_id => l_asset_hdr_rec.asset_id
506: ,x_current_units => l_asset_desc_rec.current_units
507: , p_log_level_rec => g_log_level_rec) then
608: if (nvl(l_inv_tbl.last, 0) > 0 ) then
609:
610: -- Populate asset_cat_rec
611: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_cat_rec', '', p_log_level_rec => g_log_level_rec); end if;
612: if not FA_UTIL_PVT.get_asset_cat_rec (
613: p_asset_hdr_rec => l_asset_hdr_rec,
614: px_asset_cat_rec => l_asset_cat_rec,
615: p_date_effective => NULL, p_log_level_rec => g_log_level_rec) then
616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1297:
1298: -- pop asset_fin_rec
1299: -- get fa_books row where transaction_header_id_out is null
1300: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => p_log_level_rec); end if;
1301: if not FA_UTIL_PVT.get_asset_fin_rec
1302: (p_asset_hdr_rec => l_asset_hdr_rec
1303: ,px_asset_fin_rec => l_asset_fin_rec
1304: ,p_transaction_header_id => NULL
1305: ,p_mrc_sob_type_code => 'P'
1316:
1317:
1318: -- pop current period_rec info
1319: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop period_rec', '', p_log_level_rec => p_log_level_rec); end if;
1320: if not FA_UTIL_PVT.get_period_rec
1321: (p_book => l_asset_hdr_rec.book_type_code
1322: ,p_effective_date => NULL
1323: ,x_period_rec => l_period_rec
1324: , p_log_level_rec => p_log_level_rec) then
1402: if l_asset_retire_rec.date_retired is not null then
1403:
1404: -- no transactions except Retirements and Reinstatements may be
1405: -- dated after the latest trx date
1406: if not FA_UTIL_PVT.get_latest_trans_date
1407: (p_calling_fn => l_calling_fn
1408: ,p_asset_id => l_asset_hdr_rec.asset_id
1409: ,p_book => l_asset_hdr_rec.book_type_code
1410: ,x_latest_trans_date => l_latest_trans_date
1859:
1860: -- pop asset_fin_rec
1861: -- get fa_books row where transaction_header_id_out is null
1862: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => p_log_level_rec); end if;
1863: if not FA_UTIL_PVT.get_asset_fin_rec
1864: (p_asset_hdr_rec => l_asset_hdr_rec
1865: ,px_asset_fin_rec => l_asset_fin_mrc_rec
1866: ,p_transaction_header_id => NULL
1867: ,p_mrc_sob_type_code => p_mrc_sob_type_code
1870: end if;
1871:
1872: -- pop asset_cat_rec
1873: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_cat_rec', '', p_log_level_rec => p_log_level_rec); end if;
1874: if not FA_UTIL_PVT.get_asset_cat_rec
1875: (p_asset_hdr_rec => l_asset_hdr_rec
1876: ,px_asset_cat_rec => l_asset_cat_rec
1877: ,p_date_effective => NULL
1878: , p_log_level_rec => p_log_level_rec) then
2432:
2433: -- pop asset_fin_rec
2434: -- get fa_books row where transaction_header_id_out is null
2435: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => p_log_level_rec); end if;
2436: if not FA_UTIL_PVT.get_asset_fin_rec
2437: (p_asset_hdr_rec => l_asset_hdr_rec,
2438: px_asset_fin_rec => l_asset_fin_rec,
2439: p_transaction_header_id => NULL,
2440: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
2440: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
2441: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2442: end if;
2443:
2444: if not FA_UTIL_PVT.get_asset_type_rec
2445: (p_asset_hdr_rec => l_asset_hdr_rec,
2446: px_asset_type_rec => l_asset_type_rec, p_log_level_rec => p_log_level_rec) then
2447: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2448: end if;
2723: -- stand alone assets.
2724: --
2725:
2726: -- Get asset_deprn_rec for Depreciable Basis Rule
2727: if (not FA_UTIL_PVT.get_asset_deprn_rec (
2728: p_asset_hdr_rec => l_asset_hdr_rec,
2729: px_asset_deprn_rec => l_asset_deprn_rec,
2730: p_period_counter => l_period_rec.period_counter,
2731: p_mrc_sob_type_code => p_mrc_sob_type_code
3455: -- ** Call the cache for book
3456: -- ** and do initial MRC validation
3457: -- ***********************************
3458:
3459: if not FA_UTIL_PVT.get_asset_retire_rec
3460: (px_asset_retire_rec => l_asset_retire_rec,
3461: p_mrc_sob_type_code => 'P',
3462: p_set_of_books_id => null
3463: , p_log_level_rec => g_log_level_rec) then
3466:
3467: l_asset_hdr_rec.asset_id := l_asset_retire_rec.detail_info.asset_id;
3468: l_asset_hdr_rec.book_type_code := l_asset_retire_rec.detail_info.book_type_code;
3469:
3470: if not FA_UTIL_PVT.get_asset_type_rec
3471: (p_asset_hdr_rec => l_asset_hdr_rec
3472: ,px_asset_type_rec => l_asset_type_rec
3473: ,p_date_effective => NULL
3474: , p_log_level_rec => g_log_level_rec) then
3758: -- *********************************
3759: -- populate rec_types that were not provided by users
3760:
3761: -- pop asset_retire_rec to get the rowid of retirement
3762: if not FA_UTIL_PVT.get_asset_retire_rec
3763: (px_asset_retire_rec => l_asset_retire_rec,
3764: p_mrc_sob_type_code => 'P',
3765: p_set_of_books_id => null
3766: , p_log_level_rec => p_log_level_rec) then
3779:
3780:
3781: -- pop current period_rec info
3782: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop period_rec', '', p_log_level_rec => p_log_level_rec); end if;
3783: if not FA_UTIL_PVT.get_period_rec
3784: (p_book => l_asset_hdr_rec.book_type_code
3785: ,p_effective_date => NULL
3786: ,x_period_rec => l_period_rec
3787: , p_log_level_rec => p_log_level_rec) then
3996: l_asset_hdr_rec := p_asset_hdr_rec;
3997: l_asset_retire_rec := px_asset_retire_rec;
3998:
3999: -- pop asset_retire_rec to get the rowid of retirement
4000: if not FA_UTIL_PVT.get_asset_retire_rec
4001: (px_asset_retire_rec => l_asset_retire_rec,
4002: p_mrc_sob_type_code => p_mrc_sob_type_code,
4003: p_set_of_books_id => p_asset_hdr_rec.set_of_books_id
4004: , p_log_level_rec => p_log_level_rec) then
4009: l_asset_hdr_rec.book_type_code := l_asset_retire_rec.detail_info.book_type_code;
4010:
4011: -- pop asset_desc_rec
4012: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_desc_rec', '', p_log_level_rec => p_log_level_rec); end if;
4013: if not FA_UTIL_PVT.get_asset_desc_rec
4014: (p_asset_hdr_rec => l_asset_hdr_rec
4015: ,px_asset_desc_rec => l_asset_desc_rec
4016: , p_log_level_rec => p_log_level_rec) then
4017: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4019:
4020: -- pop asset_fin_rec
4021: -- get fa_books row where transaction_header_id_out is null
4022: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => p_log_level_rec); end if;
4023: if not FA_UTIL_PVT.get_asset_fin_rec
4024: (p_asset_hdr_rec => l_asset_hdr_rec
4025: ,px_asset_fin_rec => l_asset_fin_rec
4026: ,p_transaction_header_id => NULL
4027: ,p_mrc_sob_type_code => p_mrc_sob_type_code
4126: l_old_units := l_asset_retire_rec.units_retired;
4127: END;
4128: else
4129: -- added for Bug# 5098320 get the current units of the asset from fa_asset_history table
4130: if not FA_UTIL_PVT.get_current_units
4131: (p_calling_fn => l_calling_fn
4132: ,p_asset_id => l_asset_hdr_rec.asset_id
4133: ,x_current_units => l_old_units
4134: , p_log_level_rec => p_log_level_rec) then
4541: -- *********************************
4542:
4543: -- pop asset_retire_rec to get the rowid of retirement
4544: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_retire_rec', '', p_log_level_rec => g_log_level_rec); end if;
4545: if not FA_UTIL_PVT.get_asset_retire_rec
4546: (px_asset_retire_rec => l_asset_retire_rec,
4547: p_mrc_sob_type_code => 'P',
4548: p_set_of_books_id => null
4549: , p_log_level_rec => g_log_level_rec) then
4563: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4564: end if;
4565:
4566: /*Bug# 8527619 */
4567: if not FA_UTIL_PVT.get_asset_fin_rec
4568: (p_asset_hdr_rec => l_asset_hdr_rec, /* 8808629*/
4569: px_asset_fin_rec => l_asset_fin_rec,
4570: p_transaction_header_id => NULL,
4571: p_mrc_sob_type_code => 'P',
4603:
4604: l_calculate_gain_loss_flag := l_asset_retire_rec.calculate_gain_loss;
4605:
4606: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => g_log_level_rec); end if;
4607: if not FA_UTIL_PVT.get_asset_fin_rec
4608: (p_asset_hdr_rec => l_asset_hdr_rec
4609: ,px_asset_fin_rec => l_asset_fin_rec
4610: ,p_transaction_header_id => NULL
4611: ,p_mrc_sob_type_code => 'P'
4679: if g_log_level_rec.statement_level then
4680: fa_debug_pkg.add(l_calling_fn, 'pop period_rec', '', p_log_level_rec => g_log_level_rec);
4681: fa_debug_pkg.add(l_calling_fn, 'book:', l_asset_retire_rec.detail_info.book_type_code, p_log_level_rec => g_log_level_rec);
4682: end if;
4683: if not FA_UTIL_PVT.get_period_rec
4684: (p_book => l_asset_hdr_rec.book_type_code
4685: ,p_effective_date => NULL
4686: ,x_period_rec => l_period_rec
4687: , p_log_level_rec => g_log_level_rec) then
4691: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'passed pop period_rec', '', p_log_level_rec => g_log_level_rec); end if;
4692:
4693: -- pop asset_type_rec
4694: if g_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_type_rec', '', p_log_level_rec => g_log_level_rec); end if;
4695: if not FA_UTIL_PVT.get_asset_type_rec
4696: (p_asset_hdr_rec => l_asset_hdr_rec
4697: ,px_asset_type_rec => l_asset_type_rec
4698: ,p_date_effective => NULL
4699: , p_log_level_rec => g_log_level_rec) then
5048: l_asset_hdr_rec.set_of_books_id := fa_cache_pkg.fazcbc_record.set_of_books_id;
5049:
5050: -- pop current period_rec info
5051: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop period_rec', '', p_log_level_rec => p_log_level_rec); end if;
5052: if not FA_UTIL_PVT.get_period_rec
5053: (p_book => l_asset_hdr_rec.book_type_code
5054: ,p_effective_date => NULL
5055: ,x_period_rec => l_period_rec
5056: , p_log_level_rec => p_log_level_rec) then
5091: if l_asset_retire_rec.date_retired is not null then
5092:
5093: -- no transactions except Retirements and Reinstatements may be
5094: -- dated after the latest trx date
5095: if not FA_UTIL_PVT.get_latest_trans_date
5096: (p_calling_fn => l_calling_fn
5097: ,p_asset_id => l_asset_hdr_rec.asset_id
5098: ,p_book => l_asset_hdr_rec.book_type_code
5099: ,x_latest_trans_date => l_latest_trans_date
5334:
5335: -- pop asset_fin_rec
5336: -- get fa_books row where transaction_header_id_out is null
5337: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_fin_rec', '', p_log_level_rec => p_log_level_rec); end if;
5338: if not FA_UTIL_PVT.get_asset_fin_rec
5339: (p_asset_hdr_rec => l_asset_hdr_rec
5340: ,px_asset_fin_rec => l_asset_fin_rec
5341: ,p_transaction_header_id => NULL
5342: ,p_mrc_sob_type_code => p_mrc_sob_type_code
5345: end if;
5346:
5347: -- pop asset_retire_rec
5348: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_retire_rec', '', p_log_level_rec => p_log_level_rec); end if;
5349: if not FA_UTIL_PVT.get_asset_retire_rec
5350: (px_asset_retire_rec => l_asset_retire_rec,
5351: p_mrc_sob_type_code => p_mrc_sob_type_code,
5352: p_set_of_books_id => p_asset_hdr_rec.set_of_books_id
5353: , p_log_level_rec => p_log_level_rec) then
5355: end if;
5356:
5357: -- pop asset_cat_rec
5358: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop asset_cat_rec', '', p_log_level_rec => p_log_level_rec); end if;
5359: if not FA_UTIL_PVT.get_asset_cat_rec
5360: (p_asset_hdr_rec => l_asset_hdr_rec
5361: ,px_asset_cat_rec => l_asset_cat_rec
5362: ,p_date_effective => NULL
5363: , p_log_level_rec => p_log_level_rec) then
5951: -- ** Call the cache for book
5952: -- ** and do initial MRC validation
5953: -- ***********************************
5954:
5955: if not FA_UTIL_PVT.get_asset_retire_rec
5956: (px_asset_retire_rec => l_asset_retire_rec,
5957: p_mrc_sob_type_code => 'P',
5958: p_set_of_books_id => null
5959: , p_log_level_rec => g_log_level_rec) then
5962:
5963: l_asset_hdr_rec.asset_id := l_asset_retire_rec.detail_info.asset_id;
5964: l_asset_hdr_rec.book_type_code := l_asset_retire_rec.detail_info.book_type_code;
5965:
5966: if not FA_UTIL_PVT.get_asset_type_rec
5967: (p_asset_hdr_rec => l_asset_hdr_rec
5968: ,px_asset_type_rec => l_asset_type_rec
5969: ,p_date_effective => NULL
5970: , p_log_level_rec => g_log_level_rec) then
6252: -- *********************************
6253: -- populate rec_types that were not provided by users
6254:
6255: -- pop asset_retire_rec to get the rowid of retirement
6256: if not FA_UTIL_PVT.get_asset_retire_rec
6257: (px_asset_retire_rec => l_asset_retire_rec,
6258: p_mrc_sob_type_code => 'P',
6259: p_set_of_books_id => null
6260: , p_log_level_rec => p_log_level_rec) then
6272: l_asset_hdr_rec.set_of_books_id := fa_cache_pkg.fazcbc_record.set_of_books_id;
6273:
6274: -- pop current period_rec info
6275: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'pop period_rec', '', p_log_level_rec => p_log_level_rec); end if;
6276: if not FA_UTIL_PVT.get_period_rec
6277: (p_book => l_asset_hdr_rec.book_type_code
6278: ,p_effective_date => NULL
6279: ,x_period_rec => l_period_rec
6280: , p_log_level_rec => p_log_level_rec) then
6437: l_asset_hdr_rec := p_asset_hdr_rec;
6438: l_asset_retire_rec := px_asset_retire_rec;
6439:
6440: -- pop local asset_retire_rec for retirement
6441: if not FA_UTIL_PVT.get_asset_retire_rec
6442: (px_asset_retire_rec => l_asset_retire_rec,
6443: p_mrc_sob_type_code => p_mrc_sob_type_code,
6444: p_set_of_books_id => p_asset_hdr_rec.set_of_books_id
6445: , p_log_level_rec => p_log_level_rec) then
6865: raise FND_API.G_EXC_ERROR;
6866: end if;
6867:
6868: -- get the current units of the asset from fa_asset_history table
6869: if not FA_UTIL_PVT.get_current_units
6870: (p_calling_fn => l_calling_fn
6871: ,p_asset_id => l_asset_hdr_rec.asset_id
6872: ,x_current_units => l_asset_desc_rec.current_units
6873: , p_log_level_rec => p_log_level_rec) then
6895: ,g_undo_retirement
6896: ,g_undo_reinstatement) then
6897: -- pop local asset_retire_rec for retirement
6898: lv_asset_retire_rec.retirement_id := l_asset_retire_rec.retirement_id;
6899: if not FA_UTIL_PVT.get_asset_retire_rec
6900: (px_asset_retire_rec => lv_asset_retire_rec,
6901: p_mrc_sob_type_code => 'P',
6902: p_set_of_books_id => null
6903: , p_log_level_rec => p_log_level_rec) then
7624: if (nvl(l_inv_tbl.last, 0) > 0) then
7625: -- Populate asset_cat_rec
7626: -- Populating p_asset_cat_rec which may not be necessary since
7627: -- Invoice API seems not using it as of Feb 2002
7628: if not FA_UTIL_PVT.get_asset_cat_rec (
7629: p_asset_hdr_rec => px_asset_hdr_rec,
7630: px_asset_cat_rec => l_asset_cat_rec,
7631: p_date_effective => NULL, p_log_level_rec => p_log_level_rec) then
7632: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7631: p_date_effective => NULL, p_log_level_rec => p_log_level_rec) then
7632: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7633: end if;
7634:
7635: if not FA_UTIL_PVT.get_asset_type_rec (
7636: p_asset_hdr_rec => px_asset_hdr_rec,
7637: px_asset_type_rec => l_asset_type_rec,
7638: p_date_effective => NULL, p_log_level_rec => p_log_level_rec) then
7639: raise FND_API.G_EXC_UNEXPECTED_ERROR;