DBA Data[Home] [Help]

APPS.ARP_CALCULATE_DISCOUNT dependencies on ARPCURR

Line 1354: arpcurr.CurrRound(l_max_allowed_discount, p_ps_rec.invoice_currency_code);

1350: --
1351: -- Added Logic for Rounding Nov 12, 96: Bug #408762
1352: --
1353: l_max_allowed_discount :=
1354: arpcurr.CurrRound(l_max_allowed_discount, p_ps_rec.invoice_currency_code);
1355: --
1356: --
1357: -- Subtract discounts already taken from max total discount.
1358: l_max_allowed_discount := l_max_allowed_discount -

Line 1556: - arpcurr.CurrRound(l_amt_due_remaining*l_earned_disc_pct,

1552: --
1553:
1554: l_amt_due_remaining := p_ps_rec.amount_due_remaining;
1555: l_temp := l_amt_due_remaining
1556: - arpcurr.CurrRound(l_amt_due_remaining*l_earned_disc_pct,
1557: p_ps_rec.invoice_currency_code);
1558:
1559: IF PG_DEBUG in ('Y', 'C') THEN
1560: arp_standard.debug( 'l_temp = ' || to_char(l_temp));

Line 1698: arpcurr.CurrRound(p_earned_disc, p_ps_rec.invoice_currency_code);

1694: --
1695: -- Added Logic for Rounding Nov 12, 96: Bug #408762
1696: --
1697: p_earned_disc :=
1698: arpcurr.CurrRound(p_earned_disc, p_ps_rec.invoice_currency_code);
1699: p_unearned_disc :=
1700: arpcurr.CurrRound(p_unearned_disc, p_ps_rec.invoice_currency_code);
1701: --
1702: -- make sure max discount is not exceeded. reduce discounts as needed

Line 1700: arpcurr.CurrRound(p_unearned_disc, p_ps_rec.invoice_currency_code);

1696: --
1697: p_earned_disc :=
1698: arpcurr.CurrRound(p_earned_disc, p_ps_rec.invoice_currency_code);
1699: p_unearned_disc :=
1700: arpcurr.CurrRound(p_unearned_disc, p_ps_rec.invoice_currency_code);
1701: --
1702: -- make sure max discount is not exceeded. reduce discounts as needed
1703: --
1704: IF NVL(l_ps_disc_partial_pay_flag,'N') = 'N'

Line 1874: arpcurr.CurrRound(p_earned_disc, p_ps_rec.invoice_currency_code);

1870: END IF;
1871: --
1872: -- Added logic for rounding: Nov 12, 96 Bug #408762
1873: p_earned_disc :=
1874: arpcurr.CurrRound(p_earned_disc, p_ps_rec.invoice_currency_code);
1875: p_unearned_disc :=
1876: arpcurr.CurrRound(p_unearned_disc, p_ps_rec.invoice_currency_code);
1877: --
1878: --

Line 1876: arpcurr.CurrRound(p_unearned_disc, p_ps_rec.invoice_currency_code);

1872: -- Added logic for rounding: Nov 12, 96 Bug #408762
1873: p_earned_disc :=
1874: arpcurr.CurrRound(p_earned_disc, p_ps_rec.invoice_currency_code);
1875: p_unearned_disc :=
1876: arpcurr.CurrRound(p_unearned_disc, p_ps_rec.invoice_currency_code);
1877: --
1878: --
1879: -- make sure max discount is not exceeded. reduce discounts as needed
1880: IF PG_DEBUG in ('Y', 'C') THEN