[Home] [Help]
70: l_inv_rec fa_api_types.inv_rec_type;
71: l_inv_trans_rec fa_api_types.inv_trans_rec_type;
72: l_period_rec fa_api_types.period_rec_type;
73:
74: l_tax_book_tbl fa_cache_pkg.fazctbk_tbl_type;
75: l_initial_book boolean := TRUE;
76:
77: -- For primary and reporting books
78: l_reporting_flag varchar2(1) := 'P';
75: l_initial_book boolean := TRUE;
76:
77: -- For primary and reporting books
78: l_reporting_flag varchar2(1) := 'P';
79: l_rsob_tbl fa_cache_pkg.fazcrsob_sob_tbl_type;
80: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
81: l_mrc_asset_fin_rec_adj fa_api_types.asset_fin_rec_type;
82: l_mrc_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
83: l_mrc_asset_deprn_rec_adj fa_api_types.asset_deprn_rec_type;
143: raise add_err1;
144: end if;
145:
146: -- Call the cache for the primary transaction book
147: if (NOT fa_cache_pkg.fazcbc (
148: X_book => px_asset_hdr_rec.book_type_code,
149: p_log_level_rec => g_log_level_rec)) then
150: raise add_err1;
151: end if;
195: end if;
196: end if;
197:
198: -- Call the cache to get the dependent tax books
199: if (fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') then
200: if (NOT fa_cache_pkg.fazctbk (
201: x_corp_book => px_asset_hdr_rec.book_type_code,
202: x_asset_type => px_asset_type_rec.asset_type,
203: x_tax_book_tbl => l_tax_book_tbl,
196: end if;
197:
198: -- Call the cache to get the dependent tax books
199: if (fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') then
200: if (NOT fa_cache_pkg.fazctbk (
201: x_corp_book => px_asset_hdr_rec.book_type_code,
202: x_asset_type => px_asset_type_rec.asset_type,
203: x_tax_book_tbl => l_tax_book_tbl,
204: p_log_level_rec => g_log_level_rec)) then
237: l_initial_book := FALSE;
238: end if;
239:
240: -- call the cache for the primary transaction book
241: if (NOT fa_cache_pkg.fazcbc (
242: X_book => l_asset_hdr_rec.book_type_code,
243: p_log_level_rec => g_log_level_rec)) then
244: raise add_err1;
245: end if;
244: raise add_err1;
245: end if;
246:
247: l_asset_hdr_rec.set_of_books_id :=
248: fa_cache_pkg.fazcbc_record.set_of_books_id;
249:
250: if (g_log_level_rec.statement_level) then
251: fa_debug_pkg.add('Corporate/Tax Book','c_t_book',
252: l_asset_hdr_rec.book_type_code
264: p_log_level_rec => g_log_level_rec)) then
265: raise add_err1;
266: end if;
267:
268: if (fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') then
269: -- Set the transaction_header_id for the corp book for later.
270: px_trans_rec.transaction_header_id :=
271: l_trans_rec.transaction_header_id;
272:
399: -- ignore group assets that might be coming from mass additions
400: -- as we don't want the invoice info maintained
401:
402: if (px_inv_tbl.count > 0) and
403: (fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') and
404: (px_asset_type_rec.asset_type <> 'GROUP')then
405:
406: if (l_trans_rec.calling_interface = 'FAMAPT') then
407: l_inv_trans_rec.transaction_type := 'MASS ADDITION';
449:
450:
451: if (px_asset_type_rec.asset_type <> 'CIP') then
452: l_asset_fin_rec_new.cip_cost := 0;
453: elsif (nvl(fa_cache_pkg.fazcbc_record.allow_cip_dep_group_flag, 'N') = 'Y') then
454: l_asset_fin_rec_new.cip_cost := l_cip_cost;
455: else
456: l_asset_fin_rec_new.cip_cost := l_asset_fin_rec_new.cost;
457: end if;
475: to_char (l_asset_hdr_rec.set_of_books_id),g_log_level_rec);
476: end if;
477:
478: -- Call cache to verify whether this is a primary or reporting book
479: if (NOT fa_cache_pkg.fazcsob (
480: X_set_of_books_id => l_asset_hdr_rec.set_of_books_id,
481: X_mrc_sob_type_code => l_reporting_flag,
482: p_log_level_rec => g_log_level_rec)) then
483: raise add_err1;
484: end if;
485:
486: -- Call the reporting books cache to get rep books.
487: if (l_reporting_flag <> 'R') then
488: if (NOT fa_cache_pkg.fazcrsob (
489: x_book_type_code => l_asset_hdr_rec.book_type_code,
490: x_sob_tbl => l_rsob_tbl,
491: p_log_level_rec => g_log_level_rec)) then
492: raise add_err1;
514: fnd_client_info.set_currency_context (
515: l_mrc_asset_hdr_rec.set_of_books_id);
516:
517: -- Need to always call fazcbcs
518: if (NOT fa_cache_pkg.fazcbcs (
519: X_book => l_mrc_asset_hdr_rec.book_type_code,
520: p_log_level_rec => g_log_level_rec)) then
521: raise add_err1;
522: end if;
626: end if;
627:
628: -- If this is the corp primary book, we need to store the revised
629: -- data back in the original recs.
630: if ((fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') AND
631: (l_reporting_flag <> 'R')) then
632: px_asset_fin_rec := l_mrc_asset_fin_rec_new;
633: end if;
634:
786:
787: -- copy the delta cost if any into the group's fin_rec
788: if (px_asset_type_rec.asset_type = 'CIP') then
789:
790: if (fa_cache_pkg.fazcbc_record.allow_cip_dep_group_flag = 'Y') then
791: l_group_asset_fin_rec_adj.cip_cost := nvl(l_mrc_asset_fin_rec_new.cip_cost, 0);
792: l_group_asset_fin_rec_adj.cost := nvl(l_mrc_asset_fin_rec_new.cost, 0) - nvl(l_mrc_asset_fin_rec_new.cip_cost, 0);
793: else
794: l_group_asset_fin_rec_adj.cip_cost := nvl(l_mrc_asset_fin_rec_new.cip_cost, 0);
826: end if; -- group asset id not null
827:
828:
829: -- add asset to the Asset Hierarchy for CORP book
830: if ((fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') AND
831: (l_reporting_flag <> 'R')) then
832: if px_asset_hierarchy_rec.parent_hierarchy_id is not null then
833: if not fa_asset_hierarchy_pvt.add_asset(
834: p_asset_hdr_rec => l_mrc_asset_hdr_rec,
1049:
1050: -- For a tax book, we need to use the rate from the corporate book
1051: -- if it is not a manual transaction.
1052: if (p_trans_rec.source_transaction_header_id is not null and
1053: fa_cache_pkg.fazcbc_record.book_class = 'TAX') then
1054: if not FA_MC_UTIL_PVT.get_existing_rate
1055: (p_set_of_books_id => p_report_asset_hdr_rec.set_of_books_id,
1056: p_transaction_header_id => p_trans_rec.source_transaction_header_id,
1057: px_rate => l_exchange_rate,