[Home] [Help]
1: PACKAGE BODY FA_MC_UTIL_PVT as
2: /* $Header: FAVMCUB.pls 120.13.12020000.3 2012/12/11 10:22:03 spooyath ship $ */
3:
4: g_release number := fa_cache_pkg.fazarel_release;
5:
6: FUNCTION get_existing_rate
7: (p_set_of_books_id IN number,
8: p_transaction_header_id IN number,
26: where gltr.ledger_id = p_set_of_books_id
27: and gltr.currency_code = glcr.currency_code
28: and gltr.chart_of_accounts_id = glcr.chart_of_accounts_id
29: and gltr.ledger_id <> glcr.ledger_id
30: and mcbc.book_type_code = fa_cache_pkg.fazcbc_record.distribution_source_book
31: and glcr.ledger_id = mcbc.set_of_books_id;
32:
33: l_found_in_corp number := 0;
34: l_set_of_books_id number;
45: -- for the sob_id in the corp book. Get the ledger_id from the corp
46: -- which has the same currency and use the rate from that ledger_id
47:
48: l_set_of_books_id := p_set_of_books_id;
49: if fa_cache_pkg.fazcbc_record.book_class = 'TAX' then
50:
51: if (p_log_level_rec.statement_level) then
52: fa_debug_pkg.add(l_calling_fn,'Get rate for tax book: ',
53: fa_cache_pkg.fazcbc_record.book_type_code, p_log_level_rec => p_log_level_rec);
49: if fa_cache_pkg.fazcbc_record.book_class = 'TAX' then
50:
51: if (p_log_level_rec.statement_level) then
52: fa_debug_pkg.add(l_calling_fn,'Get rate for tax book: ',
53: fa_cache_pkg.fazcbc_record.book_type_code, p_log_level_rec => p_log_level_rec);
54: end if;
55:
56: select count(1)
57: into l_found_in_corp
315: error_found exception;
316:
317: BEGIN
318:
319: l_primary_sob_id := fa_cache_pkg.fazcbc_record.set_of_books_id;
320: l_result_code := 'NOT_FOUND';
321:
322: -- first check if this is a split line and if so,
323: -- attempt to get the rate from the parent. if it