[Home] [Help]
188: * 'N' -- accrual basis
189: *----------------------------------------------------*/
190: SELECT NVL(SLA_LEDGER_CASH_BASIS_FLAG, 'N')
191: INTO l_cash_basis
192: FROM ap_system_parameters_all ASP,
193: gl_sets_of_books SOB
194: WHERE asp.org_id = x_org_id
195: AND asp.set_of_books_id = sob.set_of_books_id;
196:
454: FUNCTION Check_Cash_Basis_Paid(X_Invoice_Id NUMBER,
455: X_Calling_Sequence VARCHAR2)
456: RETURN BOOLEAN
457: IS
458: p_acct_meth ap_system_parameters.accounting_method_option%TYPE;
459: s_acct_meth ap_system_parameters.secondary_accounting_method%TYPE;
460: dummy VARCHAR2(80);
461: current_calling_sequence VARCHAR2(2000);
462: debug_info VARCHAR2(100);
455: X_Calling_Sequence VARCHAR2)
456: RETURN BOOLEAN
457: IS
458: p_acct_meth ap_system_parameters.accounting_method_option%TYPE;
459: s_acct_meth ap_system_parameters.secondary_accounting_method%TYPE;
460: dummy VARCHAR2(80);
461: current_calling_sequence VARCHAR2(2000);
462: debug_info VARCHAR2(100);
463: l_cash_basis VARCHAR2(1);
489: debug_info := 'Select accounting method from SOB';
490:
491: SELECT NVL(sla_ledger_cash_basis_flag, 'N')
492: INTO l_cash_basis
493: FROM ap_system_parameters ASP,
494: gl_sets_of_books SOB,
495: ap_invoices AI
496: WHERE AI.invoice_id = x_invoice_id
497: AND AI.org_id = ASP.org_id
1237: l_multi_currency_flag varchar2(10);
1238: l_base_dist_total number;
1239: l_dist_total number;
1240: l_base_currency_code
1241: ap_system_parameters.base_currency_code%TYPE;
1242: l_exchange_rate
1243: ap_invoices.exchange_rate%TYPE;
1244: l_exchange_rate_type
1245: ap_invoices.exchange_rate_type%TYPE;
1443: FROM ap_invoice_distributions AID,
1444: ap_invoices AI,
1445: ap_suppliers PV,
1446: po_distributions PD,
1447: ap_system_parameters ap,
1448: gl_sets_of_books gsob
1449: WHERE AI.invoice_id = X_invoice_id
1450: AND AID.invoice_id = AI.invoice_id
1451: AND AID.invoice_line_number =
1476:
1477:
1478: -- Bug 5052593 -- removed redundant code
1479: ----------------------------------------------------------
1480: --debug_info := 'Select from ap_system_parameters and
1481: -- financials_system_parameters';
1482: ----------------------------------------------------------
1483: --SELECT FSP.purch_encumbrance_flag,
1484: -- SP.multi_currency_flag,
1486: --INTO l_purch_encumbrance_flag,
1487: -- l_multi_currency_flag,
1488: -- l_base_currency_code
1489: --FROM financials_system_parameters FSP,
1490: -- ap_system_parameters SP;
1491:
1492: debug_info := 'select AP_INVOICES info';
1493:
1494: /*-----------------------------------------------------------------+
1513: l_org_id;
1514: EXIT WHEN invoice_line_cursor%NOTFOUND;
1515:
1516: ----------------------------------------------------------
1517: debug_info := 'Select from ap_system_parameters and
1518: financials_system_parameters';
1519: ----------------------------------------------------------
1520: SELECT FSP.purch_encumbrance_flag,
1521: SP.multi_currency_flag,
1523: INTO l_purch_encumbrance_flag,
1524: l_multi_currency_flag,
1525: l_base_currency_code
1526: FROM financials_system_parameters FSP,
1527: ap_system_parameters SP
1528: WHERE sp.org_id = l_org_id
1529: AND sp.org_id = fsp.org_id;
1530:
1531: ---------------------------------------------------------
3984: l_distribution_class
3985: AP_INVOICE_DISTRIBUTIONS.DISTRIBUTION_CLASS%TYPE;
3986: l_dist_ccid
3987: AP_INVOICE_DISTRIBUTIONS.DIST_CODE_COMBINATION_ID%TYPE;
3988: l_base_currency_code AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE;
3989: l_chart_of_accounts_id GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE;
3990: l_account_type GL_CODE_COMBINATIONS.ACCOUNT_TYPE%TYPE;
3991: l_assets_tracking_flag
3992: AP_INVOICE_DISTRIBUTIONS.ASSETS_TRACKING_FLAG%TYPE;
4237: debug_info := 'Get system information';
4238: BEGIN
4239: SELECT gsob.chart_of_accounts_id, ap.base_currency_code
4240: INTO l_chart_of_accounts_id, l_base_currency_code
4241: FROM ap_system_parameters ap, gl_sets_of_books gsob
4242: WHERE ap.set_of_books_id = gsob.set_of_books_id
4243: AND ap.set_of_books_id = l_invoice_line_rec.set_of_books_id
4244: AND ap.org_id = l_invoice_line_rec.org_id; -- Bug 13858818.
4245:
5230: l_invoice_line_rec AP_INVOICES_PKG.r_invoice_line_rec;
5231:
5232: l_distribution_class AP_INVOICE_DISTRIBUTIONS.DISTRIBUTION_CLASS%TYPE;
5233: l_dist_ccid AP_INVOICE_DISTRIBUTIONS.DIST_CODE_COMBINATION_ID%TYPE;
5234: l_base_currency_code AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE;
5235: l_chart_of_accounts_id GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE;
5236: l_account_type GL_CODE_COMBINATIONS.ACCOUNT_TYPE%TYPE;
5237: l_assets_tracking_flag AP_INVOICE_DISTRIBUTIONS.ASSETS_TRACKING_FLAG%TYPE;
5238: l_employee_id AP_SUPPLIERS.EMPLOYEE_ID%TYPE;
5326:
5327:
5328: SELECT DECODE(awt_include_tax_amt,'Y',1,'N',0,1)
5329: INTO l_Inc_AWT_For_Tax_Flag
5330: FROM ap_system_parameters_all
5331: WHERE org_id=l_invoice_line_rec.org_id
5332: AND rownum=1;
5333: ----------------------------------------------------------------------------
5334: -- Step 3 - Validate line does not contain other distributions
5422: debug_info := 'Get system information';
5423: BEGIN
5424: SELECT gsob.chart_of_accounts_id, ap.base_currency_code
5425: INTO l_chart_of_accounts_id, l_base_currency_code
5426: FROM ap_system_parameters ap, gl_sets_of_books gsob
5427: WHERE ap.set_of_books_id = gsob.set_of_books_id
5428: AND ap.set_of_books_id = l_invoice_line_rec.set_of_books_id
5429: AND ap.org_id = l_invoice_line_rec.org_id; -- Bug 13858818
5430:
6024: X_vendor_id IN NUMBER,
6025: X_invoice_currency_code IN AP_INVOICES.INVOICE_CURRENCY_CODE%TYPE,
6026: X_sob_id IN AP_INVOICE_LINES.SET_OF_BOOKS_ID%TYPE,
6027: X_chart_of_accounts_id IN GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE,
6028: X_base_currency_code IN AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE,
6029: X_amount IN AP_INVOICE_DISTRIBUTIONS.AMOUNT%TYPE,
6030: X_base_amount IN AP_INVOICE_DISTRIBUTIONS.BASE_AMOUNT%TYPE,
6031: X_exchange_rate_type IN AP_INVOICES.EXCHANGE_RATE_TYPE%TYPE,
6032: X_exchange_date IN AP_INVOICES.EXCHANGE_DATE%TYPE,
6695: l_batch_id AP_INVOICE_DISTRIBUTIONS.BATCH_ID%TYPE;
6696: l_distribution_class AP_INVOICE_DISTRIBUTIONS.DISTRIBUTION_CLASS%TYPE;
6697: l_org_id AP_INVOICE_LINES.ORG_ID%TYPE;
6698: l_sob_id AP_INVOICE_LINES.SET_OF_BOOKS_ID%TYPE;
6699: l_base_currency_code AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE;
6700: l_chart_of_accounts_id GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE;
6701: l_account_type GL_CODE_COMBINATIONS.ACCOUNT_TYPE%TYPE;
6702: l_invoice_date AP_INVOICES.INVOICE_DATE%TYPE;
6703: l_vendor_id AP_INVOICES.VENDOR_ID%TYPE;
6785: l_max_i BINARY_INTEGER := 0;
6786: l_max_base_i BINARY_INTEGER := 0;
6787: l_max_t BINARY_INTEGER := 0;
6788: l_pa_allows_overrides VARCHAR2(1) := 'N';
6789: l_allow_po_override AP_SYSTEM_PARAMETERS.ALLOW_FLEX_OVERRIDE_FLAG%TYPE;
6790: l_error_found VARCHAR2(1) := 'N';
6791: l_error_code VARCHAR2(4000); --bug13436794, changed length to 4000 from 80
6792: l_existing_distributions NUMBER := 0;
6793: l_count_undistributed_lines NUMBER := 1;
7188: SELECT gsob.chart_of_accounts_id, ap.base_currency_code,
7189: ap.allow_flex_override_flag
7190: INTO l_chart_of_accounts_id, l_base_currency_code,
7191: l_allow_po_override
7192: FROM ap_system_parameters ap, gl_sets_of_books gsob
7193: WHERE ap.set_of_books_id = gsob.set_of_books_id
7194: AND ap.org_id = l_org_id; -- Bug 13858818
7195:
7196: l_pa_allows_overrides :=
8279: X_CALLING_SEQUENCE IN OUT NOCOPY VARCHAR2) Return Boolean
8280:
8281: IS
8282: l_inv_currency_code ap_invoices.invoice_currency_code%TYPE;
8283: l_base_currency_code ap_system_parameters.base_currency_code%TYPE;
8284: l_dist_line_type VARCHAR2(25);
8285: l_inv_price ap_invoice_distributions.unit_price%TYPE;
8286: l_qty_invoiced NUMBER;
8287: l_po_qty NUMBER;
8341: D.corrected_quantity, -- l_corrected_quantity
8342: PLL.matching_basis, -- l_match_basis /* Amount Based Matching */
8343: ail.line_source --Bug#10416960
8344: FROM ap_invoices_all AI,
8345: ap_system_parameters_all ASP,
8346: ap_invoice_distributions D,
8347: po_distributions PD,
8348: po_lines PL,
8349: po_line_types PLT, -- Amount Based Matching
8413: PLL.matching_basis, -- l_match_basis /* Amount Based Matching */
8414: NULL --line_source
8415: FROM ap_invoices_all AI,
8416: ap_invoices retain_ai, --bug 9242891 retained invoice
8417: ap_system_parameters_all ASP,
8418: ap_invoice_distributions D,
8419: ap_invoice_distributions retain_d, --bug 9242891 retainage inv dists
8420: po_distributions PD,
8421: po_lines PL,