DBA Data[Home] [Help]

APPS.AP_ACCTG_PAY_DIST_PKG dependencies on AP_UTILITIES_PKG

Line 2711: l_pay_amount_bank_curr := AP_Utilities_Pkg.AP_Round_Currency(

2707: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2708: END IF;
2709:
2710:
2711: l_pay_amount_bank_curr := AP_Utilities_Pkg.AP_Round_Currency(
2712: p_inv_pay_rec.amount * p_pay_hist_rec.pmt_to_base_xrate
2713: /p_pay_hist_rec.bank_to_base_xrate,
2714: p_pay_hist_rec.bank_currency_code);
2715:

Line 2716: l_dist_amt_bank_curr := AP_Utilities_Pkg.AP_Round_Currency(

2712: p_inv_pay_rec.amount * p_pay_hist_rec.pmt_to_base_xrate
2713: /p_pay_hist_rec.bank_to_base_xrate,
2714: p_pay_hist_rec.bank_currency_code);
2715:
2716: l_dist_amt_bank_curr := AP_Utilities_Pkg.AP_Round_Currency(
2717: l_dist_amt_pay_curr * p_pay_hist_rec.pmt_to_base_xrate
2718: /p_pay_hist_rec.bank_to_base_xrate,
2719: p_pay_hist_rec.bank_currency_code);
2720:

Line 2920: AP_Utilities_Pkg.AP_Round_Currency(

2916: IF ( p_pay_hist_rec.pmt_currency_code <> p_pay_hist_rec.bank_currency_code
2917: AND p_pay_hist_rec.bank_currency_code is not NULL ) THEN
2918:
2919: l_tot_prepaid_amt_bank_curr :=
2920: AP_Utilities_Pkg.AP_Round_Currency(
2921: l_tot_prepaid_amt_pay_curr * p_pay_hist_rec.pmt_to_base_xrate
2922: /p_pay_hist_rec.bank_to_base_xrate,
2923: p_pay_hist_rec.bank_currency_code);
2924:

Line 2982: l_inv_dist_base_amount := AP_Utilities_Pkg.AP_Round_Currency(

2978:
2979:
2980: --bug 10179705
2981: IF p_inv_dist_rec.awt_invoice_payment_id IS NOT NULL THEN
2982: l_inv_dist_base_amount := AP_Utilities_Pkg.AP_Round_Currency(
2983: NVL((p_inv_dist_rec.base_amount * nvl(p_inv_rec.exchange_rate, 1)
2984: / (nvl(p_pay_hist_rec.pmt_to_base_xrate,1) * nvl(p_inv_rec.payment_cross_rate ,1)))
2985: + NVL(l_tot_paid_inv_base_amt,0) - NVL(l_total_prepaid_inv_base_amt,0),
2986: l_inv_dist_amount),

Line 3041: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(

3037: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
3038: END IF;
3039:
3040: ELSE
3041: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(
3042: l_prorated_amount
3043: * nvl(p_pay_hist_rec.pmt_to_base_xrate,1)
3044: / nvl(p_pay_hist_rec.bank_to_base_xrate,1)
3045: ,p_pay_hist_rec.bank_currency_code);

Line 3128: l_inv_dist_base_amount := AP_Utilities_Pkg.AP_Round_Currency(

3124: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
3125: END IF;
3126: --Bug 9282465
3127: --bug 10179705
3128: l_inv_dist_base_amount := AP_Utilities_Pkg.AP_Round_Currency(
3129: NVL(p_inv_dist_rec.base_amount * nvl(p_inv_rec.exchange_rate, 1)
3130: / (nvl(p_pay_hist_rec.pmt_to_base_xrate, 1) * nvl(p_inv_rec.payment_cross_rate , 1))
3131: , l_inv_dist_amount),
3132: ap_accounting_pay_pkg.g_base_currency_code);

Line 3234: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (

3230: ,p_inv_rec.payment_cross_rate_date
3231: ,'EMU FIXED'
3232: ,l_inv_dist_amount);
3233:
3234: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3235: l_prorated_amount
3236: ,p_pay_hist_rec.pmt_currency_code);
3237:
3238: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (

Line 3238: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (

3234: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3235: l_prorated_amount
3236: ,p_pay_hist_rec.pmt_currency_code);
3237:
3238: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3239: l_inv_dist_amount
3240: ,p_inv_rec.invoice_currency_code);
3241:
3242:

Line 3246: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(

3242:
3243: IF (p_pay_hist_rec.pmt_currency_code <> p_pay_hist_rec.bank_currency_code
3244: and p_pay_hist_rec.bank_currency_code is not null ) THEN
3245:
3246: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(
3247: l_prorated_amount
3248: * nvl(p_pay_hist_rec.pmt_to_base_xrate,1)
3249: / nvl(p_pay_hist_rec.bank_to_base_xrate,1)
3250: ,p_pay_hist_rec.bank_currency_code);

Line 3360: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(

3356: IF p_xla_event_rec.event_type_code = 'PAYMENT CLEARING ADJUSTED' THEN
3357: IF (p_pay_hist_rec.pmt_currency_code <> p_pay_hist_rec.bank_currency_code and
3358: p_pay_hist_rec.bank_currency_code is not NULL ) THEN
3359:
3360: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(
3361: l_prorated_amount * p_pay_hist_rec.pmt_to_base_xrate
3362: /p_pay_hist_rec.bank_to_base_xrate,
3363: p_pay_hist_rec.bank_currency_code) -
3364: AP_Accounting_Pay_Pkg.get_casc_bank_curr_sum(

Line 3439: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (

3435: ,p_inv_rec.payment_currency_code
3436: ,p_inv_rec.payment_cross_rate_date
3437: ,'EMU FIXED'
3438: ,l_inv_dist_amount);
3439: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3440: l_prorated_amount
3441: ,p_pay_hist_rec.pmt_currency_code);
3442: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3443: l_inv_dist_amount

Line 3442: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (

3438: ,l_inv_dist_amount);
3439: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3440: l_prorated_amount
3441: ,p_pay_hist_rec.pmt_currency_code);
3442: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY (
3443: l_inv_dist_amount
3444: ,p_inv_rec.invoice_currency_code);
3445:
3446: IF (p_pay_hist_rec.pmt_currency_code <> p_pay_hist_rec.bank_currency_code

Line 3449: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(

3445:
3446: IF (p_pay_hist_rec.pmt_currency_code <> p_pay_hist_rec.bank_currency_code
3447: and p_pay_hist_rec.bank_currency_code is not null ) THEN
3448:
3449: l_bank_curr_amount := AP_Utilities_Pkg.AP_Round_Currency(
3450: l_prorated_amount
3451: * nvl(p_pay_hist_rec.pmt_to_base_xrate,1)
3452: / nvl(p_pay_hist_rec.bank_to_base_xrate,1)
3453: ,p_pay_hist_rec.bank_currency_code);

Line 3528: l_prorated_base_amount := -1 * ap_utilities_pkg.ap_round_currency

3524: / p_inv_rec.exchange_rate
3525: ,l_prorated_amount));
3526: l_inv_dist_base_amount := -1 * l_inv_dist_base_amount;
3527: l_prorated_amount := -1 * l_prorated_amount;
3528: l_prorated_base_amount := -1 * ap_utilities_pkg.ap_round_currency
3529: (l_prorated_base_amount,ap_accounting_pay_pkg.g_base_currency_code);
3530: l_inv_dist_amount := -1 * l_inv_dist_amount;
3531: l_bank_curr_amount := -1 * l_bank_curr_amount;
3532: l_cleared_base_amount := -1 * l_cleared_base_amount; --11698822

Line 3547: l_pd_rec.cleared_base_amount := ap_utilities_pkg.ap_round_currency

3543: IF p_xla_event_rec.event_type_code IN
3544: ('PAYMENT CLEARED', 'PAYMENT CLEARING ADJUSTED') THEN
3545: --Bug 9282465
3546: IF (p_inv_dist_rec.line_type_lookup_code = 'AWT' AND l_cleared_base_amount is not null) THEN
3547: l_pd_rec.cleared_base_amount := ap_utilities_pkg.ap_round_currency
3548: (l_cleared_base_amount,ap_accounting_pay_pkg.g_base_currency_code);
3549: ELSE
3550:
3551: l_pd_rec.cleared_base_amount := AP_Accounting_Pay_Pkg.Get_Base_Amount

Line 3563: l_pd_rec.paid_base_amount :=ap_utilities_pkg.ap_round_currency

3559: END IF;
3560:
3561: --Bug 9282465
3562: IF (p_inv_dist_rec.line_type_lookup_code = 'AWT' AND (l_inv_dist_base_amount is not null or l_inv_dist_amount is not null) ) THEN
3563: l_pd_rec.paid_base_amount :=ap_utilities_pkg.ap_round_currency
3564: ( nvl(l_inv_dist_base_amount,l_inv_dist_amount)
3565: * nvl(p_inv_rec.payment_cross_rate ,1)
3566: * nvl(ap_accounting_pay_pkg.g_pmt_to_base_xrate,1)
3567: / nvl(p_inv_rec.exchange_rate,1),ap_accounting_pay_pkg.g_base_currency_code);

Line 3663: l_qty_variance := AP_Utilities_PKG.AP_Round_Currency(

3659:
3660: IF p_inv_dist_rec.amount = 0 THEN
3661: l_qty_variance := 0;
3662: ELSE
3663: l_qty_variance := AP_Utilities_PKG.AP_Round_Currency(
3664: ((p_inv_dist_rec.quantity_variance * l_inv_dist_amount) /
3665: p_inv_dist_rec.amount),
3666: p_inv_rec.invoice_currency_code);
3667: END IF;

Line 3672: l_base_qty_variance := AP_Utilities_PKG.AP_Round_Currency(

3668:
3669: IF p_inv_dist_rec.base_amount = 0 THEN
3670: l_base_qty_variance := 0;
3671: ELSE
3672: l_base_qty_variance := AP_Utilities_PKG.AP_Round_Currency(
3673: ((p_inv_dist_rec.base_quantity_variance
3674: * l_pd_rec.invoice_dist_base_amount)
3675: / p_inv_dist_rec.base_amount),
3676: ap_accounting_pay_pkg.g_base_currency_code);

Line 3690: l_amt_variance := AP_Utilities_PKG.AP_Round_Currency(

3686:
3687: IF p_inv_dist_rec.amount = 0 THEN
3688: l_amt_variance := 0;
3689: ELSE
3690: l_amt_variance := AP_Utilities_PKG.AP_Round_Currency(
3691: ((p_inv_dist_rec.amount_variance * l_inv_dist_amount) /
3692: p_inv_dist_rec.amount),
3693: p_inv_rec.invoice_currency_code);
3694: END IF;

Line 3699: l_base_amt_variance := AP_Utilities_PKG.AP_Round_Currency(

3695:
3696: IF p_inv_dist_rec.base_amount = 0 THEN
3697: l_base_amt_variance := 0;
3698: ELSE
3699: l_base_amt_variance := AP_Utilities_PKG.AP_Round_Currency(
3700: ((p_inv_dist_rec.base_amount_variance
3701: * l_pd_rec.invoice_dist_base_amount)
3702: / p_inv_dist_rec.base_amount),
3703: ap_accounting_pay_pkg.g_base_currency_code);

Line 3954: AP_Utilities_Pkg.AP_Round_Currency(

3950: END IF;
3951:
3952:
3953: l_disc_amt_bank_curr :=
3954: AP_Utilities_Pkg.AP_Round_Currency(
3955: p_inv_pay_rec.discount_taken * p_pay_hist_rec.pmt_to_base_xrate
3956: /p_pay_hist_rec.bank_to_base_xrate,
3957: p_pay_hist_rec.bank_currency_code);
3958:

Line 4018: l_prorated_disc_amt := AP_UTILITIES_PKG.AP_ROUND_CURRENCY

4014: l_bank_curr_amount := 0;
4015:
4016: ELSE
4017:
4018: l_prorated_disc_amt := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
4019: (p_inv_pay_rec.discount_taken * p_inv_dist_rec.amount
4020: / l_invoice_amount,
4021: p_pay_hist_rec.pmt_currency_code);
4022:

Line 4023: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY

4019: (p_inv_pay_rec.discount_taken * p_inv_dist_rec.amount
4020: / l_invoice_amount,
4021: p_pay_hist_rec.pmt_currency_code);
4022:
4023: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
4024: (l_disc_amt_inv_curr * p_inv_dist_rec.amount
4025: / l_invoice_amount,
4026: p_inv_rec.invoice_currency_code);
4027:

Line 4030: l_bank_curr_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY

4026: p_inv_rec.invoice_currency_code);
4027:
4028:
4029: IF ( p_pay_hist_rec.bank_currency_code is not NULL ) THEN
4030: l_bank_curr_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
4031: (l_disc_amt_bank_curr * p_inv_dist_rec.amount
4032: / l_invoice_amount,
4033: p_pay_hist_rec.bank_currency_code);
4034:

Line 4065: l_prorated_disc_amt := AP_UTILITIES_PKG.AP_ROUND_CURRENCY

4061: l_bank_curr_amount := 0;
4062:
4063: ELSE
4064:
4065: l_prorated_disc_amt := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
4066: (p_inv_pay_rec.discount_taken * p_inv_dist_rec.amount
4067: / l_invoice_amount,
4068: p_pay_hist_rec.pmt_currency_code)
4069: - ap_accounting_pay_pkg.get_casc_discount_sum

Line 4075: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY

4071: p_pay_hist_rec.related_event_id,
4072: p_inv_pay_rec.invoice_payment_id,
4073: l_curr_calling_sequence);
4074:
4075: l_inv_dist_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
4076: (l_disc_amt_inv_curr * p_inv_dist_rec.amount
4077: / l_invoice_amount,
4078: p_inv_rec.invoice_currency_code)
4079: - ap_accounting_pay_pkg.get_casc_inv_dist_disc_sum

Line 4087: l_bank_curr_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY

4083: l_curr_calling_sequence);
4084:
4085: /* bug 11056722 Changed the below assignment to assign to l_bank_curr_amount */
4086: IF ( p_pay_hist_rec.bank_currency_code is not NULL ) THEN
4087: l_bank_curr_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
4088: (l_disc_amt_bank_curr * p_inv_dist_rec.amount
4089: / l_invoice_amount,
4090: p_pay_hist_rec.bank_currency_code)
4091: - ap_accounting_pay_pkg.get_casc_bank_curr_disc_sum

Line 4326: l_erv_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(

4322:
4323: /* For Cash Basis ERV is Difference between Payment Exchange Rate and
4324: either Receipt Exchange rate or PO distributions exchange rate */
4325:
4326: l_erv_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(
4327: (p_pay_hist_rec.pmt_to_base_xrate - l_po_pay_exchange_rate) *
4328: p_prorated_amount, p_pay_hist_rec.pmt_currency_code);
4329:
4330:

Line 4337: l_inv_erv_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(

4333: Exchange Rate and either Receipt Exchange rate or PO distributions
4334: exchange rate. This calculated ERV amount will be stored in the
4335: invoice_dist_base_amount column */
4336:
4337: l_inv_erv_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(
4338: (p_inv_rec.exchange_rate - l_po_pay_exchange_rate) *
4339: p_prorated_amount, p_inv_rec.invoice_currency_code);
4340:
4341:

Line 4529: l_prorated_amt := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(

4525:
4526: IF l_total_dist_amt = l_total_pay_amt THEN
4527: l_prorated_amt := l_err_chrg_amount - l_total_prorated_amt;
4528: ELSE
4529: l_prorated_amt := AP_UTILITIES_PKG.AP_ROUND_CURRENCY(
4530: l_err_chrg_amount * l_clr_rec.amount
4531: / l_total_pay_amt, p_pay_hist_rec.pmt_currency_code);
4532: END IF;
4533: