DBA Data[Home] [Help]

APPS.AP_INVOICE_DISTRIBUTIONS_PKG dependencies on AP_UTILITIES_PKG

Line 1526: ap_utilities_pkg.ap_round_currency(

1522: UPDATE AP_INVOICE_DISTRIBUTIONS_ALL
1523: SET base_amount =
1524: DECODE(l_base_currency_code,
1525: l_invoice_currency_code, NULL,
1526: ap_utilities_pkg.ap_round_currency(
1527: amount * l_exchange_rate,
1528: l_base_currency_code)),
1529: last_update_login = l_last_update_login,
1530: last_updated_by = l_last_updated_by,

Line 1538: ap_utilities_pkg.ap_round_currency(

1534: AND NVL(posted_flag,'N') = 'N'
1535: AND ( ( base_amount is null AND
1536: DECODE(l_base_currency_code,
1537: l_invoice_currency_code, NULL,
1538: ap_utilities_pkg.ap_round_currency(
1539: amount * l_exchange_rate,
1540: l_base_currency_code)) is not null)
1541: OR
1542: (NVL(base_amount,0) <>

Line 1545: ap_utilities_pkg.ap_round_currency(

1541: OR
1542: (NVL(base_amount,0) <>
1543: DECODE(l_base_currency_code,
1544: l_invoice_currency_code, NULL,
1545: ap_utilities_pkg.ap_round_currency(
1546: amount * l_exchange_rate,
1547: l_base_currency_code))))
1548: RETURNING invoice_distribution_id
1549: BULK COLLECT INTO l_key_value_list;

Line 3929: AP_UTILITIES_PKG.GET_CURRENT_GL_DATE(

3925: BEGIN
3926: l_open_period_name := NULL;
3927:
3928: l_open_period_name :=
3929: AP_UTILITIES_PKG.GET_CURRENT_GL_DATE(
3930: l_invoice_line_rec.accounting_date,
3931: l_invoice_line_rec.org_id);
3932:
3933: IF (l_open_period_name is NULL) then

Line 3934: AP_UTILITIES_PKG.GET_OPEN_GL_DATE(l_invoice_line_rec.accounting_date,

3930: l_invoice_line_rec.accounting_date,
3931: l_invoice_line_rec.org_id);
3932:
3933: IF (l_open_period_name is NULL) then
3934: AP_UTILITIES_PKG.GET_OPEN_GL_DATE(l_invoice_line_rec.accounting_date,
3935: l_open_period_name,
3936: l_open_gl_date);
3937: --Invoice Lines: Distributions
3938: --For the case when the accounting_date on the line fell in an open

Line 4160: IF ( NOT (AP_UTILITIES_PKG.pa_flexbuild(

4156: IF (l_invoice_line_rec.project_id is not null
4157: and l_invoice_type_lookup_code<>'PREPAYMENT') then
4158: -- Need to create a utility to flexbuild. Look at import code. Utility
4159: -- there is PA_FLEXBUILD
4160: IF ( NOT (AP_UTILITIES_PKG.pa_flexbuild(
4161: p_vendor_id => X_vendor_id, --IN
4162: p_employee_id => l_employee_id, --IN
4163: p_set_of_books_id =>
4164: l_invoice_line_rec.set_of_books_id, --IN

Line 4204: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(

4200: RETURN(FALSE);
4201: END IF;
4202:
4203: IF (l_pa_allows_overrides = 'N') then
4204: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(
4205: l_dist_ccid,
4206: l_chart_of_accounts_id,
4207: l_open_gl_date,
4208: current_calling_sequence))) then

Line 4222: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(

4218: IF (l_invoice_line_rec.overlay_dist_code_concat is NULL AND
4219: l_invoice_line_rec.balancing_segment is NULL AND
4220: l_invoice_line_rec.account_segment is NULL AND
4221: l_invoice_line_rec.cost_center_segment is NULL) then
4222: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(
4223: l_dist_ccid,
4224: l_chart_of_accounts_id,
4225: l_open_gl_date,
4226: current_calling_sequence))) then

Line 4231: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (

4227: X_error_code := 'AP_INVALID_ACCOUNT';
4228: RETURN(FALSE);
4229: END IF;
4230: ELSE
4231: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (
4232: l_invoice_line_rec.balancing_segment,
4233: l_invoice_line_rec.cost_center_segment,
4234: l_invoice_line_rec.account_segment,
4235: l_invoice_line_rec.overlay_dist_code_concat,

Line 4257: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(

4253: IF (l_invoice_line_rec.overlay_dist_code_concat is NULL AND
4254: l_invoice_line_rec.balancing_segment is NULL AND
4255: l_invoice_line_rec.account_segment is NULL AND
4256: l_invoice_line_rec.cost_center_segment is NULL) then
4257: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(
4258: l_dist_ccid,
4259: l_chart_of_accounts_id,
4260: l_open_gl_date,
4261: current_calling_sequence))) THEN

Line 4266: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (

4262: X_error_code := 'AP_INVALID_ACCOUNT';
4263: RETURN(FALSE);
4264: END IF;
4265: ELSE
4266: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (
4267: l_invoice_line_rec.balancing_segment,
4268: l_invoice_line_rec.cost_center_segment,
4269: l_invoice_line_rec.account_segment,
4270: l_invoice_line_rec.overlay_dist_code_concat,

Line 4360: l_invoice_line_rec.base_amount := ap_utilities_pkg.ap_round_currency(

4356: --bug6653070
4357:
4358: /*l_invoice_line_rec.amount := l_invoice_line_rec.amount -
4359: NVL(l_invoice_line_rec.included_tax_amount,0);*/
4360: l_invoice_line_rec.base_amount := ap_utilities_pkg.ap_round_currency(
4361: l_invoice_line_rec.amount * x_exchange_rate,
4362: l_base_currency_code);
4363:
4364: ----------------------------------------------------------------------------

Line 5024: -- l_dist_ccid := AP_UTILITIES_PKG.PA_FLEXBUILD

5020: ----------------------------------------------------------------------------
5021: --Bug5003249 added condition on invoice type lookup code
5022: IF (X_project_id IS NOT NULL AND X_item_dist_project_id IS NULL
5023: AND l_invoice_type_lookup_code<>'PREPAYMENT') THEN
5024: -- l_dist_ccid := AP_UTILITIES_PKG.PA_FLEXBUILD
5025:
5026: IF ( NOT (AP_UTILITIES_PKG.pa_flexbuild(
5027: p_vendor_id => X_vendor_id, --IN
5028: p_employee_id => l_employee_id, --IN

Line 5026: IF ( NOT (AP_UTILITIES_PKG.pa_flexbuild(

5022: IF (X_project_id IS NOT NULL AND X_item_dist_project_id IS NULL
5023: AND l_invoice_type_lookup_code<>'PREPAYMENT') THEN
5024: -- l_dist_ccid := AP_UTILITIES_PKG.PA_FLEXBUILD
5025:
5026: IF ( NOT (AP_UTILITIES_PKG.pa_flexbuild(
5027: p_vendor_id => X_vendor_id, --IN
5028: p_employee_id => l_employee_id, --IN
5029: p_set_of_books_id => X_sob_id, --IN
5030: p_chart_of_accounts_id => X_chart_of_accounts_id, -- IN

Line 5064: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (

5060: X_balancing_segment IS NOT NULL OR
5061: X_account_segment IS NOT NULL OR
5062: X_cost_center_segment IS NOT NULL)) THEN
5063:
5064: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (
5065: X_balancing_segment,
5066: X_cost_center_segment,
5067: X_account_segment,
5068: X_overlay_dist_code_concat,

Line 5116: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (

5112: X_cost_center_segment IS NOT NULL)
5113:
5114: ) THEN
5115:
5116: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (
5117: X_balancing_segment,
5118: X_cost_center_segment,
5119: X_account_segment,
5120: X_overlay_dist_code_concat,

Line 5135: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(

5131: RETURN(FALSE);
5132: END IF;
5133:
5134: ELSE
5135: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(
5136: l_dist_ccid,
5137: X_chart_of_accounts_id,
5138: X_GL_date,
5139: 'Create Charge Account'))) THEN

Line 5153: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (

5149: X_balancing_segment IS NOT NULL OR
5150: X_account_segment IS NOT NULL OR
5151: X_cost_center_segment IS NOT NULL) THEN
5152:
5153: IF ( NOT (AP_UTILITIES_PKG.OVERLAY_SEGMENTS (
5154: X_balancing_segment,
5155: X_cost_center_segment,
5156: X_account_segment,
5157: X_overlay_dist_code_concat,

Line 5171: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(l_dist_ccid,

5167: X_error_code := 'AP_CANNOT_OVERLAY';
5168: RETURN(FALSE);
5169: END IF;
5170: ELSE
5171: IF ( NOT (AP_UTILITIES_PKG.IS_CCID_VALID(l_dist_ccid,
5172: X_chart_of_accounts_id,
5173: X_GL_date,
5174: 'Create Charge Account'))) then
5175: X_error_code := 'AP_INVALID_ACCOUNT';

Line 5726: l_open_period_name := AP_UTILITIES_PKG.GET_CURRENT_GL_DATE(

5722: debug_info :=
5723: 'Get gl date from open period if line gl date is in a closed one';
5724: BEGIN
5725: l_open_period_name := NULL;
5726: l_open_period_name := AP_UTILITIES_PKG.GET_CURRENT_GL_DATE(
5727: l_accounting_date,
5728: l_org_id);
5729:
5730: IF (l_open_period_name is NULL) then

Line 5731: AP_UTILITIES_PKG.GET_OPEN_GL_DATE(l_accounting_date, l_open_period_name,

5727: l_accounting_date,
5728: l_org_id);
5729:
5730: IF (l_open_period_name is NULL) then
5731: AP_UTILITIES_PKG.GET_OPEN_GL_DATE(l_accounting_date, l_open_period_name,
5732: l_open_gl_date,l_org_id);
5733: --Invoice Lines: Distributions, added the ELSE part of the IF condition
5734: ELSE
5735: l_open_gl_date := l_accounting_date;

Line 5805: AP_UTILITIES_PKG.Ap_Round_Currency(

5801:
5802: FOR t IN 0..l_alloc_line_tab.COUNT-1
5803: LOOP
5804: l_alloc_line_tab(t).amount :=
5805: AP_UTILITIES_PKG.Ap_Round_Currency(
5806: (l_alloc_line_tab(t).amount * l_line_amount) /
5807: l_sum_applic_lines,
5808: l_invoice_currency_code);
5809: IF (ABS(l_alloc_line_tab(t).amount) >= ABS(nvl(l_max_alloc,0)) OR

Line 5865: AP_UTILITIES_PKG.Ap_Round_Currency(

5861: l_alloc_line_tab(t).invoice_line_number :=
5862: l_alloc_rule_line_number;
5863: l_alloc_line_tab(t).percentage := l_alloc_rule_line_percent;
5864: l_alloc_line_tab(t).amount :=
5865: AP_UTILITIES_PKG.Ap_Round_Currency(
5866: (l_line_amount * l_alloc_rule_line_percent) / 100,
5867: l_invoice_currency_code);
5868: l_alloc_line_tab(t).sum_amount_dists := l_sum_dists_applic_line;
5869:

Line 6022: AP_UTILITIES_PKG.Ap_Round_Currency(

6018: l_dist_tab(i).attribute15 := NULL;
6019: l_dist_tab(i).type_1099 := l_type_1099;
6020: l_dist_tab(i).income_tax_region := l_income_tax_region;
6021: l_dist_tab(i).amount:=
6022: AP_UTILITIES_PKG.Ap_Round_Currency(
6023: (l_alloc_line_tab(t).amount * l_dist_amount) /
6024: l_alloc_line_tab(t).sum_amount_dists,
6025: l_invoice_currency_code);
6026: l_dist_tab(i).base_amount :=

Line 6027: AP_UTILITIES_PKG.Ap_Round_Currency(

6023: (l_alloc_line_tab(t).amount * l_dist_amount) /
6024: l_alloc_line_tab(t).sum_amount_dists,
6025: l_invoice_currency_code);
6026: l_dist_tab(i).base_amount :=
6027: AP_UTILITIES_PKG.Ap_Round_Currency(
6028: NVL(l_dist_tab(i).amount, 0) * l_exchange_rate ,
6029: l_base_currency_code);
6030: l_dist_tab(i).rounding_amt := 0;
6031:

Line 6148: AP_UTILITIES_PKG.Ap_Round_Currency(

6144: l_running_total_alloc);
6145: l_running_total_base_amt := l_running_total_base_amt -
6146: l_dist_tab(l_max_I).base_amount;
6147: l_dist_tab(l_max_i).base_amount :=
6148: AP_UTILITIES_PKG.Ap_Round_Currency(
6149: NVL(l_dist_tab(l_max_i).amount, 0) * l_exchange_rate ,
6150: l_base_currency_code);
6151: l_running_total_base_amt := l_running_total_base_amt +
6152: l_dist_tab(l_max_i).base_amount;

Line 6981: x_erv := AP_UTILITIES_PKG.ap_round_currency(

6977:
6978: IF (l_rate_diff = 0) THEN
6979: x_erv := 0;
6980: ELSE
6981: x_erv := AP_UTILITIES_PKG.ap_round_currency(
6982: l_corrected_qty * l_po_price *
6983: l_rate_diff
6984: ,l_base_currency_code);
6985: END IF;

Line 6987: x_ipv := AP_UTILITIES_PKG.ap_round_currency(

6983: l_rate_diff
6984: ,l_base_currency_code);
6985: END IF;
6986:
6987: x_ipv := AP_UTILITIES_PKG.ap_round_currency(
6988: l_corrected_qty * l_price_diff
6989: ,l_inv_currency_code);
6990:
6991: IF (x_ipv = 0) THEN

Line 6996: /* x_bipv := AP_UTILITIES_PKG.ap_round_currency(

6992: x_bipv := 0;
6993: ELSE
6994: -- Bug 5484167 base invoice price variance should be calculated directly from the invoice price variance
6995: --to avoid incorrect rounding logic
6996: /* x_bipv := AP_UTILITIES_PKG.ap_round_currency(
6997: l_corrected_qty * l_inv_rate * l_price_diff
6998: , l_base_currency_code);*/
6999: x_bipv := AP_UTILITIES_PKG.ap_round_currency(x_ipv * l_inv_rate, l_base_currency_code);
7000:

Line 6999: x_bipv := AP_UTILITIES_PKG.ap_round_currency(x_ipv * l_inv_rate, l_base_currency_code);

6995: --to avoid incorrect rounding logic
6996: /* x_bipv := AP_UTILITIES_PKG.ap_round_currency(
6997: l_corrected_qty * l_inv_rate * l_price_diff
6998: , l_base_currency_code);*/
6999: x_bipv := AP_UTILITIES_PKG.ap_round_currency(x_ipv * l_inv_rate, l_base_currency_code);
7000:
7001: END IF;
7002:
7003: ELSIF ( l_dist_match_type = 'PRICE_CORRECTION' ) THEN

Line 7018: x_erv := AP_UTILITIES_PKG.ap_round_Currency( l_original_dist_amt *

7014: AP_INVOICE_DISTRIBUTIONS D
7015: where D.invoice_distribution_id = l_corrected_inv_dist_id
7016: and D.invoice_id = AI.invoice_id;
7017:
7018: x_erv := AP_UTILITIES_PKG.ap_round_Currency( l_original_dist_amt *
7019: (l_corrected_inv_rate - l_inv_rate)
7020: , l_base_currency_code);
7021:
7022: x_ipv := 0;

Line 7037: x_erv := AP_UTILITIES_PKG.ap_round_currency(

7033:
7034: IF (l_rate_diff = 0) THEN
7035: x_erv := 0;
7036: ELSE
7037: x_erv := AP_UTILITIES_PKG.ap_round_currency(
7038: l_qty_invoiced * l_po_price * l_rate_diff
7039: ,l_base_currency_code);
7040: END IF;
7041:

Line 7046: x_ipv := AP_UTILITIES_PKG.ap_round_currency(

7042: IF (l_price_diff = 0) THEN
7043: x_ipv := 0;
7044: x_bipv := 0;
7045: ELSE
7046: x_ipv := AP_UTILITIES_PKG.ap_round_currency(
7047: l_qty_invoiced * l_price_diff
7048: , l_inv_currency_code );
7049:
7050: IF (x_ipv = 0) THEN

Line 7055: /* x_bipv := AP_UTILITIES_PKG.ap_round_currency(

7051: x_bipv := 0;
7052: ELSE
7053: -- Bug 5484167 base invoice price variance should be calculated directly from the invoice price variance
7054: --to avoid incorrect rounding logic
7055: /* x_bipv := AP_UTILITIES_PKG.ap_round_currency(
7056: l_qty_invoiced * l_inv_rate * l_price_diff
7057: , l_base_currency_code);*/
7058: x_bipv := AP_UTILITIES_PKG.ap_round_currency(x_ipv * l_inv_rate, l_base_currency_code);
7059:

Line 7058: x_bipv := AP_UTILITIES_PKG.ap_round_currency(x_ipv * l_inv_rate, l_base_currency_code);

7054: --to avoid incorrect rounding logic
7055: /* x_bipv := AP_UTILITIES_PKG.ap_round_currency(
7056: l_qty_invoiced * l_inv_rate * l_price_diff
7057: , l_base_currency_code);*/
7058: x_bipv := AP_UTILITIES_PKG.ap_round_currency(x_ipv * l_inv_rate, l_base_currency_code);
7059:
7060: END IF;
7061:
7062: END IF; -- end of check l_price_diff

Line 7083: x_erv := AP_UTILITIES_PKG.ap_round_Currency( l_original_dist_amt *

7079: AP_INVOICE_DISTRIBUTIONS D
7080: where D.invoice_distribution_id = l_corrected_inv_dist_id
7081: and D.invoice_id = AI.invoice_id;
7082:
7083: x_erv := AP_UTILITIES_PKG.ap_round_Currency( l_original_dist_amt *
7084: (l_corrected_inv_rate - l_inv_rate)
7085: , l_base_currency_code);
7086:
7087: x_ipv := 0;

Line 7102: x_erv := AP_UTILITIES_PKG.ap_round_currency(

7098:
7099: IF (l_rate_diff = 0) THEN
7100: x_erv := 0;
7101: ELSE
7102: x_erv := AP_UTILITIES_PKG.ap_round_currency(
7103: l_original_dist_amt * l_rate_diff
7104: ,l_base_currency_code);
7105: END IF;
7106: