[Home] [Help]
251:
252: --added nvl for bug 7314487
253: IF l_temp_vendor_id is NULL
254: AND nvl(p_invoice_rec.invoice_type_lookup_code,'STANDARD') <> 'PAYMENT REQUEST'
255: THEN UPDATE ap_invoices_interface
256: SET vendor_id = l_vendor_id
257: WHERE invoice_id = p_invoice_rec.invoice_id;
258: END IF;
259:
5570: invalid_pay_curr_code_failure EXCEPTION;
5571: l_current_invoice_status VARCHAR2(1) := 'Y';
5572: l_start_date_active DATE;
5573: l_end_date_active DATE;
5574: l_payment_cross_rate AP_INVOICES_INTERFACE.payment_cross_rate%TYPE;
5575: l_warning VARCHAR2(240);
5576: current_calling_sequence VARCHAR2(2000);
5577: debug_info VARCHAR2(500);
5578:
19608: | FUNCTION - V_Check_Tax_Info()
19609: |
19610: | DESCRIPTION
19611: | This function will validate the following fields included in the
19612: | ap_invoices_interface table as part of the eTax Uptake project:
19613: | control_amount
19614: | tax_related_invoice_id
19615: | calc_tax_during_import_flag
19616: |
19788:
19789: BEGIN
19790: SELECT 'Y'
19791: INTO l_alloc_not_provided
19792: FROM ap_invoices_interface aii
19793: WHERE aii.invoice_id = p_invoice_rec.invoice_id
19794: AND 1 < (SELECT COUNT(*)
19795: FROM ap_invoice_lines_interface aili
19796: WHERE aili.line_type_lookup_code <> 'TAX'
19835:
19836: BEGIN
19837: SELECT 'Y'
19838: INTO l_tax_found_in_nontax_line
19839: FROM ap_invoices_interface aii
19840: WHERE aii.invoice_id = p_invoice_rec.invoice_id
19841: AND EXISTS (SELECT 'Y'
19842: FROM ap_invoice_lines_interface ail2
19843: WHERE ail2.invoice_id = aii.invoice_id
19891: IF (NVL(p_invoice_rec.tax_only_flag, 'N') = 'Y') THEN
19892: BEGIN
19893: SELECT 'Y'
19894: INTO l_tax_lines_cannot_coexist
19895: FROM ap_invoices_interface aii
19896: WHERE aii.invoice_id = p_invoice_rec.invoice_id
19897: AND EXISTS (SELECT 'Y'
19898: FROM ap_invoice_lines_interface ail2
19899: WHERE ail2.invoice_id = aii.invoice_id
20014: l_po_header_curr_conv_rate po_headers_all.rate%TYPE;
20015: l_uom_code mtl_units_of_measure.uom_code%TYPE;
20016:
20017: l_error_code VARCHAR2(500);
20018: l_inv_hdr_org_id ap_invoices_interface.org_id%TYPE;
20019: l_inv_hdr_vendor_id ap_invoices_interface.vendor_id%TYPE;
20020: l_inv_hdr_vendor_site_id ap_invoices_interface.vendor_site_id%TYPE;
20021: l_inv_hdr_inv_type ap_invoices_interface.invoice_type_lookup_code%TYPE;
20022:
20015: l_uom_code mtl_units_of_measure.uom_code%TYPE;
20016:
20017: l_error_code VARCHAR2(500);
20018: l_inv_hdr_org_id ap_invoices_interface.org_id%TYPE;
20019: l_inv_hdr_vendor_id ap_invoices_interface.vendor_id%TYPE;
20020: l_inv_hdr_vendor_site_id ap_invoices_interface.vendor_site_id%TYPE;
20021: l_inv_hdr_inv_type ap_invoices_interface.invoice_type_lookup_code%TYPE;
20022:
20023: l_event_class_code zx_trx_headers_gt.event_class_code%TYPE;
20016:
20017: l_error_code VARCHAR2(500);
20018: l_inv_hdr_org_id ap_invoices_interface.org_id%TYPE;
20019: l_inv_hdr_vendor_id ap_invoices_interface.vendor_id%TYPE;
20020: l_inv_hdr_vendor_site_id ap_invoices_interface.vendor_site_id%TYPE;
20021: l_inv_hdr_inv_type ap_invoices_interface.invoice_type_lookup_code%TYPE;
20022:
20023: l_event_class_code zx_trx_headers_gt.event_class_code%TYPE;
20024: --6412397
20017: l_error_code VARCHAR2(500);
20018: l_inv_hdr_org_id ap_invoices_interface.org_id%TYPE;
20019: l_inv_hdr_vendor_id ap_invoices_interface.vendor_id%TYPE;
20020: l_inv_hdr_vendor_site_id ap_invoices_interface.vendor_site_id%TYPE;
20021: l_inv_hdr_inv_type ap_invoices_interface.invoice_type_lookup_code%TYPE;
20022:
20023: l_event_class_code zx_trx_headers_gt.event_class_code%TYPE;
20024: --6412397
20025:
20076: --Bug 6925674 (Base bug6905106) Starts
20077: BEGIN
20078: SELECT aii.invoice_type_lookup_code
20079: INTO l_inv_hdr_inv_type
20080: FROM ap_invoices_interface aii,
20081: ap_invoice_lines_interface aili
20082: WHERE aii.invoice_id = aili.invoice_id
20083: AND aili.ROWID = p_invoice_lines_rec.row_id;
20084:
20197: INTO l_inv_hdr_org_id,
20198: l_inv_hdr_vendor_id,
20199: l_inv_hdr_vendor_site_id,
20200: l_inv_hdr_inv_type
20201: FROM ap_invoices_interface aii,
20202: ap_invoice_lines_interface aili
20203: WHERE aii.invoice_id = aili.invoice_id
20204: AND aili.ROWID = p_invoice_lines_rec.row_id;
20205: