DBA Data[Home] [Help]

APPS.PA_MC_CURRENCY_PKG dependencies on PA_MC_CURRENCY_PKG

Line 1: PACKAGE BODY PA_MC_CURRENCY_PKG AS

1: PACKAGE BODY PA_MC_CURRENCY_PKG AS
2: --$Header: PAXMCURB.pls 120.5 2007/12/26 09:34:19 hkansal ship $
3:
4:
5: FUNCTION CurrRound( x_amount IN NUMBER ,

Line 195: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.eiid_details';

191:
192: BEGIN
193: l_old_stack := x_err_stack;
194: x_err_code := 0;
195: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.eiid_details';
196: x_err_stage := ' Select from pa_expenditure_items_all';
197:
198: SELECT eia.orig_transaction_reference,
199: nvl(eia.adjusted_expenditure_item_id, transferred_from_exp_item_id),

Line 252: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.eiid_details';

248:
249: BEGIN
250: l_old_stack := x_err_stack;
251: x_err_code := 0;
252: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.eiid_details';
253: x_err_stage := ' Select from pa_expenditure_items_all';
254:
255: SELECT eia.orig_transaction_reference,
256: nvl(eia.adjusted_expenditure_item_id, transferred_from_exp_item_id),

Line 346: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_cost_rates';

342:
343: BEGIN
344: l_old_stack := x_err_stack;
345: x_err_code := 0;
346: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_cost_rates';
347: x_err_stage := ' Select from pa_mc_cost_dist_lines_all';
348:
349: SELECT exchange_rate,
350: conversion_date,

Line 392: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_ei_cost_rates';

388: BEGIN
389:
390: l_old_stack := x_err_stack;
391: x_err_code := 0;
392: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_ei_cost_rates';
393: x_err_stage := ' Select from pa_mc_exp_items_all';
394:
395: SELECT cost_exchange_rate,
396: cost_conversion_date,

Line 442: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_cost_amts';

438: BEGIN
439:
440: l_old_stack := x_err_stack;
441: x_err_code := 0;
442: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_cost_amts';
443: x_err_stage := ' Select from pa_mc_cost_dist_lines_all';
444:
445: SELECT amount,
446: quantity,

Line 498: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_max_cost_amts';

494: BEGIN
495:
496: l_old_stack := x_err_stack;
497: x_err_code := 0;
498: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_max_cost_amts';
499: x_err_stage := ' Select from pa_mc_cost_dist_lines_all';
500: x_raw_cost := NULL;
501: x_burdened_cost := NULL;
502:

Line 558: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_max_crdl_amts';

554: BEGIN
555:
556: l_old_stack := x_err_stack;
557: x_err_code := 0;
558: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_max_crdl_amts';
559: x_err_stage := ' Select from pa_mc_cust_rdl_all ';
560: x_revenue := NULL;
561: x_bill_amount := NULL;
562:

Line 606: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_rev_rates';

602: BEGIN
603:
604: l_old_stack := x_err_stack;
605: x_err_code := 0;
606: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_rev_rates';
607: x_err_stage := ' Select from pa_mc_cust_rdl_all';
608:
609: SELECT exchange_rate,
610: conversion_date

Line 663: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_ei_mc_rates';

659: BEGIN
660:
661: l_old_stack := x_err_stack;
662: x_err_code := 0;
663: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_ei_mc_rates';
664: x_err_stage := ' Select from pa_mc_exp_items_all';
665:
666: select RAW_COST,
667: RAW_COST_RATE,

Line 763: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_ei_mc_rates';

759:
760: BEGIN
761: l_old_stack := x_err_stack;
762: x_err_code := 0;
763: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_ei_mc_rates';
764: x_err_stage := ' Select from pa_mc_exp_items_all';
765:
766: select RAW_COST,
767: RAW_COST_RATE,

Line 870: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_event_amts';

866: BEGIN
867:
868: l_old_stack := x_err_stack;
869: x_err_code := 0;
870: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_orig_event_amts';
871: x_err_stage := ' Select from pa_mc_events';
872:
873:
874: /* Funding MRC Changes : Adding the new attributes for the revenue conversion attributes and

Line 944: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_imported_rates';

940: BEGIN
941:
942: l_old_stack := x_err_stack;
943: x_err_code := 0;
944: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_imported_rates';
945: x_err_stage := ' Select from pa_mc_txn_interface_all';
946:
947: SELECT mc.raw_cost,
948: mc.raw_cost_rate,

Line 1009: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_ap_keys';

1005: BEGIN
1006:
1007: l_old_stack := x_err_stack;
1008: x_err_code := 0;
1009: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_ap_keys';
1010: x_err_stage := ' Select from pa_cost_distribution_lines_all';
1011:
1012:
1013: SELECT cdl.system_reference2,

Line 1062: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_ap_rate';

1058: BEGIN
1059:
1060: l_old_stack := x_err_stack;
1061: x_err_code := 0;
1062: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_ap_rate';
1063: x_err_stage := ' Select from ap_mc_invoice_dists';
1064:
1065: -- To get the ap rates logic used : FC:Foreign curr, PC:Pri Curr,Rep:Reporting
1066: -- If foreign curr inv, then ap.amount = FC amount, ap.base_Amount = PC amt

Line 1446: pa_mc_currency_pkg.raise_error('PA_MRC_WO_FACTOR_ERROR', 'PAMRCDIS:9');

1442: RETURN (wo_factor);
1443:
1444: EXCEPTION
1445: WHEN NO_DATA_FOUND then
1446: pa_mc_currency_pkg.raise_error('PA_MRC_WO_FACTOR_ERROR', 'PAMRCDIS:9');
1447:
1448: WHEN OTHERS THEN
1449: RAISE;
1450: END get_wo_factor;

Line 1480: IF NVL(pa_mc_currency_pkg.Invoice_Action,'NONE') = 'CANCEL' then

1476:
1477: FUNCTION get_invoice_action RETURN VARCHAR2
1478: IS
1479: BEGIN
1480: IF NVL(pa_mc_currency_pkg.Invoice_Action,'NONE') = 'CANCEL' then
1481: RETURN ('Y');
1482: ELSE RETURN ('N');
1483: END IF;
1484: END;

Line 1608: PAAPIMP_PKG.G_err_stack := PAAPIMP_PKG.G_err_stack||'->PA_MC_CURRENCY_PKG.ins_mc_txn_interface_all';

1604: BEGIN
1605:
1606: l_old_stack := PAAPIMP_PKG.G_err_stack;
1607: PAAPIMP_PKG.G_err_code := 0;
1608: PAAPIMP_PKG.G_err_stack := PAAPIMP_PKG.G_err_stack||'->PA_MC_CURRENCY_PKG.ins_mc_txn_interface_all';
1609: PAAPIMP_PKG.G_err_stage := ' Insert into pa_mc_txn_interface_all';
1610:
1611: PAAPIMP_PKG.write_log(LOG, PAAPIMP_PKG.G_err_stack);
1612: PAAPIMP_PKG.write_log(LOG, 'Inserting transaction source: '||p_transaction_source||

Line 1627: l_currency := pa_mc_currency_pkg.functional_currency(l_org_id);

1623:
1624: /**
1625:
1626: PAAPIMP_PKG.G_err_stage := 'CALLING FUNCTIONAL_CURRENCY IN INS_MC_TXN_INTERFACE';
1627: l_currency := pa_mc_currency_pkg.functional_currency(l_org_id);
1628: **/
1629:
1630: PAAPIMP_PKG.G_err_stage := 'CALLING SET_OF_BOOKS IN INS_MC_TXN_INTERFACE';
1631: l_sob := pa_mc_currency_pkg.set_of_books();

Line 1631: l_sob := pa_mc_currency_pkg.set_of_books();

1627: l_currency := pa_mc_currency_pkg.functional_currency(l_org_id);
1628: **/
1629:
1630: PAAPIMP_PKG.G_err_stage := 'CALLING SET_OF_BOOKS IN INS_MC_TXN_INTERFACE';
1631: l_sob := pa_mc_currency_pkg.set_of_books();
1632:
1633: PAAPIMP_PKG.G_err_stage := 'GET TXN_INTERFACE_ID and BURDEN_COST IN INS_MC_TXN_INTERFACE';
1634:
1635: -- change the IF conditions to be based on p_system_refernce4

Line 1704: pa_mc_currency_pkg.get_ap_rate(x_invoice_id => p_system_reference2,

1700: p_transaction_source='AP VARIANCE') THEN
1701:
1702: PAAPIMP_PKG.G_err_stage := 'CALLING GET_AP_RATE IN INS_MC_TXN_INTERFACE';
1703:
1704: pa_mc_currency_pkg.get_ap_rate(x_invoice_id => p_system_reference2,
1705: x_line_num => p_system_reference3,
1706: x_system_reference4 => p_system_reference4,
1707: x_transaction_source => p_transaction_source,
1708: x_sob => g_rsob_tab(i).rsob_id,

Line 1721: pa_mc_currency_pkg.raise_error('PA_MRC_AP_RATES','PAMRCDIS:4',g_rsob_tab(i).rcurrency_code);

1717: END IF;
1718:
1719: IF (l_err_code <> 0 AND l_err_code <> -1403 AND l_err_code <> 100)THEN
1720:
1721: pa_mc_currency_pkg.raise_error('PA_MRC_AP_RATES','PAMRCDIS:4',g_rsob_tab(i).rcurrency_code);
1722:
1723: END IF;
1724:
1725:

Line 1732: pa_mc_currency_pkg.get_po_rate(x_po_dist_id => p_system_reference3,

1728: ,'PO RECEIPT NRTAX PRICE ADJ')) THEN -- pricing changes
1729:
1730: PAAPIMP_PKG.G_err_stage := 'CALLING GET_PO_RATE IN INS_MC_TXN_INTERFACE';
1731:
1732: pa_mc_currency_pkg.get_po_rate(x_po_dist_id => p_system_reference3,
1733: x_rcv_txn_id => p_system_reference4,
1734: x_transaction_source => p_transaction_source,
1735: x_sob => g_rsob_tab(i).rsob_id,
1736: x_exchange_rate => l_po_exchange_rate,

Line 1749: pa_mc_currency_pkg.raise_error('PA_MRC_PO_RATES','PAMRCDIS:4',g_rsob_tab(i).rcurrency_code);

1745: END IF;
1746:
1747: IF (l_err_code <> 0 AND l_err_code <> -1403 AND l_err_code <> 100)THEN
1748:
1749: pa_mc_currency_pkg.raise_error('PA_MRC_PO_RATES','PAMRCDIS:4',g_rsob_tab(i).rcurrency_code);
1750:
1751: END IF;
1752:
1753: --instead of using invoice_payment_id, use transaction_source to specify processing AP DISCOUNTS

Line 1835: l_burdened_cost := pa_mc_currency_pkg.CurrRound

1831:
1832: PAAPIMP_PKG.G_err_stage := 'CALLING CURRROUND IN INS_MC_TXN_INTERFACE PROCEDURE';
1833: IF (l_exchange_rate_type = 'User') THEN
1834:
1835: l_burdened_cost := pa_mc_currency_pkg.CurrRound
1836: ((l_burdened_cost *l_exchange_rate), g_rsob_tab(i).rcurrency_code);
1837:
1838: l_raw_cost := pa_mc_currency_pkg.CurrRound
1839: ((l_txn_raw_cost*l_exchange_rate),g_rsob_tab(i).rcurrency_code);

Line 1838: l_raw_cost := pa_mc_currency_pkg.CurrRound

1834:
1835: l_burdened_cost := pa_mc_currency_pkg.CurrRound
1836: ((l_burdened_cost *l_exchange_rate), g_rsob_tab(i).rcurrency_code);
1837:
1838: l_raw_cost := pa_mc_currency_pkg.CurrRound
1839: ((l_txn_raw_cost*l_exchange_rate),g_rsob_tab(i).rcurrency_code);
1840:
1841: ELSE
1842:

Line 1843: l_burdened_cost := pa_mc_currency_pkg.CurrRound

1839: ((l_txn_raw_cost*l_exchange_rate),g_rsob_tab(i).rcurrency_code);
1840:
1841: ELSE
1842:
1843: l_burdened_cost := pa_mc_currency_pkg.CurrRound
1844: (((l_burdened_cost/l_denominator_rate)*l_numerator_rate),
1845: g_rsob_tab(i).rcurrency_code);
1846:
1847: l_raw_cost := pa_mc_currency_pkg.CurrRound

Line 1847: l_raw_cost := pa_mc_currency_pkg.CurrRound

1843: l_burdened_cost := pa_mc_currency_pkg.CurrRound
1844: (((l_burdened_cost/l_denominator_rate)*l_numerator_rate),
1845: g_rsob_tab(i).rcurrency_code);
1846:
1847: l_raw_cost := pa_mc_currency_pkg.CurrRound
1848: (((l_txn_raw_cost/l_denominator_rate)*l_numerator_rate),
1849: g_rsob_tab(i).rcurrency_code);
1850: END IF;
1851:

Line 1892: l_burdened_cost := pa_mc_currency_pkg.CurrRound

1888: p_numerator_rate => l_numerator_rate);
1889:
1890: IF (l_exchange_rate_type = 'User') THEN
1891:
1892: l_burdened_cost := pa_mc_currency_pkg.CurrRound
1893: ((l_burdened_cost *l_exchange_rate),
1894: g_rsob_tab(i).rcurrency_code);
1895: ELSE
1896:

Line 1897: l_burdened_cost := pa_mc_currency_pkg.CurrRound

1893: ((l_burdened_cost *l_exchange_rate),
1894: g_rsob_tab(i).rcurrency_code);
1895: ELSE
1896:
1897: l_burdened_cost := pa_mc_currency_pkg.CurrRound
1898: (((l_burdened_cost/l_denominator_rate)*l_numerator_rate),
1899: g_rsob_tab(i).rcurrency_code);
1900:
1901: END IF;

Line 1985: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_ccdl_tp_amts';

1981: BEGIN
1982:
1983: l_old_stack := x_err_stack;
1984: x_err_code := 0;
1985: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_ccdl_tp_amts';
1986: x_err_stage := ' Select from pa_mc_cc_dist_lines_all';
1987: x_transfer_price := NULL;
1988:
1989: open C_TP_REC ;

Line 2043: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_invdtl_tp_amts';

2039: BEGIN
2040:
2041: l_old_stack := x_err_stack;
2042: x_err_code := 0;
2043: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_invdtl_tp_amts';
2044: x_err_stage := ' Select from pa_mc_draft_inv_details_all';
2045: x_transfer_price := NULL;
2046:
2047: OPEN C_TP_REC;

Line 2091: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_po_rate';

2087: BEGIN
2088:
2089: l_old_stack := x_err_stack;
2090: x_err_code := 0;
2091: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.get_po_rate';
2092: x_err_stage := ' Select from rcv_mc_rec_sub_ledger';
2093:
2094: l_rcv_txn_id := to_number(x_rcv_txn_id);
2095:

Line 2232: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.eiid_details';

2228: BEGIN
2229:
2230: l_old_stack := x_err_stack;
2231: x_err_code := 0;
2232: x_err_stack := x_err_stack ||'->PA_MC_CURRENCY_PKG.eiid_details';
2233: x_err_stage := ' Select from pa_expenditure_items_all';
2234:
2235: SELECT eia.orig_transaction_reference,
2236: nvl(eia.adjusted_expenditure_item_id, transferred_from_exp_item_id),

Line 2279: END PA_MC_CURRENCY_PKG;

2275: END eiid_details;
2276:
2277: -------------------------------------------------------------
2278:
2279: END PA_MC_CURRENCY_PKG;