[Home] [Help]
1395: CURSOR c_rejected_invoices(l_request_id IN NUMBER) IS
1396: SELECT to_number(aii.reference_key1) report_header_id,
1397: reject_lookup_code,
1398: aii.invoice_id
1399: FROM ap_interface_rejections air, ap_invoices_interface aii
1400: WHERE air.parent_table = 'AP_INVOICES_INTERFACE'
1401: AND air.parent_id = aii.invoice_id
1402: AND aii.request_id = l_request_id
1403: UNION ALL
1403: UNION ALL
1404: SELECT to_number(aii.reference_key1) report_header_id,
1405: reject_lookup_code,
1406: aii.invoice_id
1407: FROM ap_interface_rejections air,
1408: ap_invoices_interface aii,
1409: ap_invoice_lines_interface aili
1410: WHERE air.parent_table = 'AP_INVOICE_LINES_INTERFACE'
1411: AND air.parent_id = aili.invoice_line_id
1687: l_sys_apply_advances_flag ap_system_parameters.apply_advances_default%TYPE;
1688:
1689: TYPE ReportHeaderIdType IS TABLE OF ap_expense_report_headers.report_header_id%TYPE
1690: INDEX BY BINARY_INTEGER;
1691: TYPE RejectCodeType IS TABLE OF ap_interface_rejections.reject_lookup_code%TYPE
1692: INDEX BY BINARY_INTEGER;
1693: TYPE InvoiceIdType IS TABLE OF ap_invoices_interface.invoice_id%TYPE
1694: INDEX BY BINARY_INTEGER;
1695: TYPE AdvAppliedType IS TABLE OF ap_expense_report_headers.maximum_amount_to_apply%TYPE
2929: raise batch_failure;
2930: END IF;
2931:
2932: --Bug#8464009 - Deleting records from Interface tables that are left out by IMPORT_PURGE
2933: DELETE FROM ap_interface_rejections
2934: WHERE parent_table = 'AP_INVOICES_INTERFACE'
2935: AND parent_id IN (SELECT invoice_id
2936: FROM ap_invoices_interface
2937: WHERE request_id = l_request_id
2936: FROM ap_invoices_interface
2937: WHERE request_id = l_request_id
2938: );
2939:
2940: DELETE FROM ap_interface_rejections
2941: WHERE parent_table = 'AP_INVOICE_LINES_INTERFACE'
2942: and parent_id IN (SELECT aili.invoice_line_id
2943: FROM ap_invoices_interface aii, ap_invoice_lines_interface aili
2944: WHERE aii.invoice_id = aili.invoice_id