[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:
446: FUNCTION Check_Cash_Basis_Paid(X_Invoice_Id NUMBER,
447: X_Calling_Sequence VARCHAR2)
448: RETURN BOOLEAN
449: IS
450: p_acct_meth ap_system_parameters.accounting_method_option%TYPE;
451: s_acct_meth ap_system_parameters.secondary_accounting_method%TYPE;
452: dummy VARCHAR2(80);
453: current_calling_sequence VARCHAR2(2000);
454: debug_info VARCHAR2(100);
447: X_Calling_Sequence VARCHAR2)
448: RETURN BOOLEAN
449: IS
450: p_acct_meth ap_system_parameters.accounting_method_option%TYPE;
451: s_acct_meth ap_system_parameters.secondary_accounting_method%TYPE;
452: dummy VARCHAR2(80);
453: current_calling_sequence VARCHAR2(2000);
454: debug_info VARCHAR2(100);
455: l_cash_basis VARCHAR2(1);
481: debug_info := 'Select accounting method from SOB';
482:
483: SELECT NVL(sla_ledger_cash_basis_flag, 'N')
484: INTO l_cash_basis
485: FROM ap_system_parameters ASP,
486: gl_sets_of_books SOB,
487: ap_invoices AI
488: WHERE AI.invoice_id = x_invoice_id
489: AND AI.org_id = ASP.org_id
1153: l_multi_currency_flag varchar2(10);
1154: l_base_dist_total number;
1155: l_dist_total number;
1156: l_base_currency_code
1157: ap_system_parameters.base_currency_code%TYPE;
1158: l_exchange_rate
1159: ap_invoices.exchange_rate%TYPE;
1160: l_exchange_rate_type
1161: ap_invoices.exchange_rate_type%TYPE;
1359: FROM ap_invoice_distributions AID,
1360: ap_invoices AI,
1361: ap_suppliers PV,
1362: po_distributions PD,
1363: ap_system_parameters ap,
1364: gl_sets_of_books gsob
1365: WHERE AI.invoice_id = X_invoice_id
1366: AND AID.invoice_id = AI.invoice_id
1367: AND AID.invoice_line_number =
1392:
1393:
1394: -- Bug 5052593 -- removed redundant code
1395: ----------------------------------------------------------
1396: --debug_info := 'Select from ap_system_parameters and
1397: -- financials_system_parameters';
1398: ----------------------------------------------------------
1399: --SELECT FSP.purch_encumbrance_flag,
1400: -- SP.multi_currency_flag,
1402: --INTO l_purch_encumbrance_flag,
1403: -- l_multi_currency_flag,
1404: -- l_base_currency_code
1405: --FROM financials_system_parameters FSP,
1406: -- ap_system_parameters SP;
1407:
1408: debug_info := 'select AP_INVOICES info';
1409:
1410: /*-----------------------------------------------------------------+
1429: l_org_id;
1430: EXIT WHEN invoice_line_cursor%NOTFOUND;
1431:
1432: ----------------------------------------------------------
1433: debug_info := 'Select from ap_system_parameters and
1434: financials_system_parameters';
1435: ----------------------------------------------------------
1436: SELECT FSP.purch_encumbrance_flag,
1437: SP.multi_currency_flag,
1439: INTO l_purch_encumbrance_flag,
1440: l_multi_currency_flag,
1441: l_base_currency_code
1442: FROM financials_system_parameters FSP,
1443: ap_system_parameters SP
1444: WHERE sp.org_id = l_org_id
1445: AND sp.org_id = fsp.org_id;
1446:
1447: ---------------------------------------------------------
3813: l_distribution_class
3814: AP_INVOICE_DISTRIBUTIONS.DISTRIBUTION_CLASS%TYPE;
3815: l_dist_ccid
3816: AP_INVOICE_DISTRIBUTIONS.DIST_CODE_COMBINATION_ID%TYPE;
3817: l_base_currency_code AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE;
3818: l_chart_of_accounts_id GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE;
3819: l_account_type GL_CODE_COMBINATIONS.ACCOUNT_TYPE%TYPE;
3820: l_assets_tracking_flag
3821: AP_INVOICE_DISTRIBUTIONS.ASSETS_TRACKING_FLAG%TYPE;
3959: debug_info := 'Get system information';
3960: BEGIN
3961: SELECT gsob.chart_of_accounts_id, ap.base_currency_code
3962: INTO l_chart_of_accounts_id, l_base_currency_code
3963: FROM ap_system_parameters ap, gl_sets_of_books gsob
3964: WHERE ap.set_of_books_id = gsob.set_of_books_id
3965: AND ap.set_of_books_id = l_invoice_line_rec.set_of_books_id;
3966:
3967: EXCEPTION
4741: X_vendor_id IN NUMBER,
4742: X_invoice_currency_code IN AP_INVOICES.INVOICE_CURRENCY_CODE%TYPE,
4743: X_sob_id IN AP_INVOICE_LINES.SET_OF_BOOKS_ID%TYPE,
4744: X_chart_of_accounts_id IN GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE,
4745: X_base_currency_code IN AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE,
4746: X_amount IN AP_INVOICE_DISTRIBUTIONS.AMOUNT%TYPE,
4747: X_base_amount IN AP_INVOICE_DISTRIBUTIONS.BASE_AMOUNT%TYPE,
4748: X_exchange_rate_type IN AP_INVOICES.EXCHANGE_RATE_TYPE%TYPE,
4749: X_exchange_date IN AP_INVOICES.EXCHANGE_DATE%TYPE,
5333: l_batch_id AP_INVOICE_DISTRIBUTIONS.BATCH_ID%TYPE;
5334: l_distribution_class AP_INVOICE_DISTRIBUTIONS.DISTRIBUTION_CLASS%TYPE;
5335: l_org_id AP_INVOICE_LINES.ORG_ID%TYPE;
5336: l_sob_id AP_INVOICE_LINES.SET_OF_BOOKS_ID%TYPE;
5337: l_base_currency_code AP_SYSTEM_PARAMETERS.BASE_CURRENCY_CODE%TYPE;
5338: l_chart_of_accounts_id GL_SETS_OF_BOOKS.CHART_OF_ACCOUNTS_ID%TYPE;
5339: l_account_type GL_CODE_COMBINATIONS.ACCOUNT_TYPE%TYPE;
5340: l_invoice_date AP_INVOICES.INVOICE_DATE%TYPE;
5341: l_vendor_id AP_INVOICES.VENDOR_ID%TYPE;
5419: l_max_i BINARY_INTEGER := 0;
5420: l_max_base_i BINARY_INTEGER := 0;
5421: l_max_t BINARY_INTEGER := 0;
5422: l_pa_allows_overrides VARCHAR2(1) := 'N';
5423: l_allow_po_override AP_SYSTEM_PARAMETERS.ALLOW_FLEX_OVERRIDE_FLAG%TYPE;
5424: l_error_found VARCHAR2(1) := 'N';
5425: l_error_code VARCHAR2(80);
5426: l_existing_distributions NUMBER := 0;
5427: l_count_undistributed_lines NUMBER := 1;
5751: SELECT gsob.chart_of_accounts_id, ap.base_currency_code,
5752: ap.allow_flex_override_flag
5753: INTO l_chart_of_accounts_id, l_base_currency_code,
5754: l_allow_po_override
5755: FROM ap_system_parameters ap, gl_sets_of_books gsob
5756: WHERE ap.set_of_books_id = gsob.set_of_books_id;
5757:
5758: l_pa_allows_overrides :=
5759: FND_PROFILE.VALUE('PA_ALLOW_FLEXBUILDER_OVERRIDES');
6780: X_CALLING_SEQUENCE IN OUT NOCOPY VARCHAR2) Return Boolean
6781:
6782: IS
6783: l_inv_currency_code ap_invoices.invoice_currency_code%TYPE;
6784: l_base_currency_code ap_system_parameters.base_currency_code%TYPE;
6785: l_dist_line_type VARCHAR2(25);
6786: l_inv_price ap_invoice_distributions.unit_price%TYPE;
6787: l_qty_invoiced NUMBER;
6788: l_po_qty NUMBER;
6840: D.corrected_invoice_dist_id, -- l_corrected_invoice_dist_id
6841: D.corrected_quantity, -- l_corrected_quantity
6842: PLL.matching_basis -- l_match_basis /* Amount Based Matching */
6843: FROM ap_invoices_all AI,
6844: ap_system_parameters_all ASP,
6845: ap_invoice_distributions D,
6846: po_distributions PD,
6847: po_lines PL,
6848: po_line_types PLT, -- Amount Based Matching