DBA Data[Home] [Help]

APPS.XTR_JOURNAL_PROCESS_P dependencies on GL_CURRENCY_API

Line 1487: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (

1483:
1484: -- Calculate accounted_dr and accounted_cr amounts.
1485:
1486: BEGIN
1487: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (
1488: Q2_REC.currency,
1489: l_sob_currency,
1490: Q2_REC.amount_date,
1491: l_pty_convert_type,

Line 1494: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (

1490: Q2_REC.amount_date,
1491: l_pty_convert_type,
1492: Q2_REC.dr_amount);
1493:
1494: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (
1495: Q2_REC.currency,
1496: l_sob_currency,
1497: Q2_REC.amount_date,
1498: l_pty_convert_type,

Line 1502: when GL_CURRENCY_API.INVALID_CURRENCY then

1498: l_pty_convert_type,
1499: Q2_REC.cr_amount);
1500:
1501: EXCEPTION
1502: when GL_CURRENCY_API.INVALID_CURRENCY then
1503: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1504: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1505: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1506: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 1517: when GL_CURRENCY_API.NO_RATE then

1513: -- end 1336492 modification.
1514:
1515: Goto NEXT_Q2;
1516:
1517: when GL_CURRENCY_API.NO_RATE then
1518: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1519: FND_MESSAGE.Set_Token ('CURR1',Q2_REC.currency);
1520: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1521: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q2_REC.amount_date));

Line 1811: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (

1807:
1808: -- Calculate accounted_dr and accounted_cr amounts.
1809:
1810: BEGIN
1811: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (
1812: Q3_REC.currency,
1813: l_sob_currency,
1814: Q3_REC.amount_date,
1815: l_pty_convert_type,

Line 1818: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (

1814: Q3_REC.amount_date,
1815: l_pty_convert_type,
1816: Q3_REC.debit_amount);
1817:
1818: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (
1819: Q3_REC.currency,
1820: l_sob_currency,
1821: Q3_REC.amount_date,
1822: l_pty_convert_type,

Line 1825: when GL_CURRENCY_API.INVALID_CURRENCY then

1821: Q3_REC.amount_date,
1822: l_pty_convert_type,
1823: Q3_REC.credit_amount);
1824: EXCEPTION
1825: when GL_CURRENCY_API.INVALID_CURRENCY then
1826: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
1827: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1828: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1829: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 1838: when GL_CURRENCY_API.NO_RATE then

1834: l_updt_flag := 'N';
1835:
1836: Goto NEXT_Q3;
1837:
1838: when GL_CURRENCY_API.NO_RATE then
1839: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
1840: FND_MESSAGE.Set_Token ('CURR1',Q3_REC.currency);
1841: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
1842: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q3_REC.amount_date));

Line 2102: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (

2098: l_accounted_dr := 0;
2099: l_accounted_cr := 0;
2100:
2101: If (Q4_REC.credit_or_debit = 'DR') then
2102: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (
2103: Q4_REC.currency,
2104: l_sob_currency,
2105: Q4_REC.amount_date,
2106: l_pty_convert_type,

Line 2109: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (

2105: Q4_REC.amount_date,
2106: l_pty_convert_type,
2107: Q4_REC.accrls_amount);
2108: Else
2109: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (
2110: Q4_REC.currency,
2111: l_sob_currency,
2112: Q4_REC.amount_date,
2113: l_pty_convert_type,

Line 2118: when GL_CURRENCY_API.INVALID_CURRENCY then

2114: Q4_REC.accrls_amount);
2115: End If;
2116:
2117: EXCEPTION
2118: when GL_CURRENCY_API.INVALID_CURRENCY then
2119: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2120: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2121: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2122: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 2127: when GL_CURRENCY_API.NO_RATE then

2123: --1336492 l_error_flag := 'Y';
2124: l_ret_value := greatest(l_ret_value,2);
2125: Goto NEXT_Q4;
2126:
2127: when GL_CURRENCY_API.NO_RATE then
2128: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2129: FND_MESSAGE.Set_Token ('CURR1',Q4_REC.currency);
2130: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2131: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q4_REC.amount_date));

Line 2297: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (

2293: l_accounted_cr := 0;
2294: --l_tmp_amt := abs(l_realized_amt + l_unrealized_amt);
2295:
2296: If (Q5_REC.credit_or_debit = 'DR') then
2297: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (
2298: Q5_REC.reval_currency,
2299: l_sob_currency,
2300: Q5_REC.journal_date,
2301: l_pty_convert_type,

Line 2304: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (

2300: Q5_REC.journal_date,
2301: l_pty_convert_type,
2302: Q5_REC.amount);
2303: Else
2304: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (
2305: Q5_REC.reval_currency,
2306: l_sob_currency,
2307: Q5_REC.journal_date,
2308: l_pty_convert_type,

Line 2313: when GL_CURRENCY_API.INVALID_CURRENCY then

2309: Q5_REC.amount);
2310: End If;
2311:
2312: EXCEPTION
2313: when GL_CURRENCY_API.INVALID_CURRENCY then
2314: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2315: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2316: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2317: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 2322: when GL_CURRENCY_API.NO_RATE then

2318: --1336492 l_error_flag := 'Y';
2319: l_ret_value := greatest(l_ret_value,2);
2320: Goto NEXT_Q5;
2321:
2322: when GL_CURRENCY_API.NO_RATE then
2323: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2324: FND_MESSAGE.Set_Token ('CURR1',Q5_REC.reval_currency);
2325: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2326: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q5_REC.journal_date));

Line 2603: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (

2599: l_accounted_dr := 0;
2600: l_accounted_cr := 0;
2601:
2602: If (Q6_REC.credit_or_debit = 'DR') then
2603: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (
2604: Q6_REC.reval_currency,
2605: l_sob_currency,
2606: Q6_REC.journal_date,
2607: l_pty_convert_type,

Line 2610: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (

2606: Q6_REC.journal_date,
2607: l_pty_convert_type,
2608: Q6_REC.amount);
2609: Else
2610: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (
2611: Q6_REC.reval_currency,
2612: l_sob_currency,
2613: Q6_REC.journal_date,
2614: l_pty_convert_type,

Line 2618: when GL_CURRENCY_API.INVALID_CURRENCY then

2614: l_pty_convert_type,
2615: Q6_REC.amount);
2616: End If;
2617: EXCEPTION
2618: when GL_CURRENCY_API.INVALID_CURRENCY then
2619: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2620: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2621: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2622: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 2626: when GL_CURRENCY_API.NO_RATE then

2622: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2623: l_ret_value := greatest(l_ret_value,2);
2624: Goto NEXT_Q6;
2625:
2626: when GL_CURRENCY_API.NO_RATE then
2627: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2628: FND_MESSAGE.Set_Token ('CURR1',Q6_REC.reval_currency);
2629: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2630: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q6_REC.journal_date));

Line 2854: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (

2850: l_accounted_dr := 0;
2851: l_accounted_cr := 0;
2852:
2853: If (Q7_REC.credit_or_debit = 'DR') then
2854: l_accounted_dr := GL_CURRENCY_API.Convert_Amount (
2855: Q7_REC.reval_currency,
2856: l_sob_currency,
2857: Q7_REC.journal_date,
2858: l_pty_convert_type,

Line 2861: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (

2857: Q7_REC.journal_date,
2858: l_pty_convert_type,
2859: Q7_REC.amount);
2860: Else
2861: l_accounted_cr := GL_CURRENCY_API.Convert_Amount (
2862: Q7_REC.reval_currency,
2863: l_sob_currency,
2864: Q7_REC.journal_date,
2865: l_pty_convert_type,

Line 2870: when GL_CURRENCY_API.INVALID_CURRENCY then

2866: Q7_REC.amount);
2867: End If;
2868:
2869: EXCEPTION
2870: when GL_CURRENCY_API.INVALID_CURRENCY then
2871: FND_MESSAGE.Set_Name ('XTR','XTR_2206');
2872: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2873: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2874: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

Line 2878: when GL_CURRENCY_API.NO_RATE then

2874: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
2875: l_ret_value := greatest(l_ret_value,2);
2876: Goto NEXT_Q7;
2877:
2878: when GL_CURRENCY_API.NO_RATE then
2879: FND_MESSAGE.Set_Name ('XTR','XTR_2207');
2880: FND_MESSAGE.Set_Token ('CURR1',Q7_REC.reval_currency);
2881: FND_MESSAGE.Set_Token ('CURR2',l_sob_currency);
2882: FND_MESSAGE.Set_Token ('XCHG_DATE',to_char(Q7_REC.journal_date));