[Home] [Help]
77: efd.attribute14,
78: efd.attribute15
79: from ap_expense_feed_lines efl,
80: ap_expense_feed_dists efd,
81: ap_card_programs cp
82: where efl.feed_line_id = efd.feed_line_id
83: and efl.card_program_id = P_CARD_PROGRAM_ID
84: and efl.card_program_id = cp.card_program_id
85: and nvl(efd.invoiced_flag,'N') = 'N'
141: AP_EXPENSE_FEED_DISTS.amount_includes_tax_flag%TYPE;
142:
143: l_description AP_EXPENSE_FEED_DISTS.description%TYPE := ''; */
144: l_invoice_currency_code
145: AP_CARD_PROGRAMS.card_program_currency_code%TYPE := '';
146: l_transaction_date date;
147: l_count number := 0;
148: l_sum number := 0;
149: l_invoice_id number;
348: and nvl(efd.amount_includes_tax_flag,'N')= rec_lines_int.amount_includes_tax_flag --9727870
349: and exists
350: (select 'Parent record meets group criteria from lines_cursor'
351: from AP_EXPENSE_FEED_LINES EFL,
352: AP_CARD_PROGRAMS CP
353: where EFL.feed_line_id = EFD.feed_line_id
354: and EFL.card_program_id = P_CARD_PROGRAM_ID
355: and EFL.card_program_id = CP.card_program_id
356: and EFL.merchant_name = rec_lines_int.merchant_name --9727870
389: -- then insert a single header record into AP_INVOICES_INTERFACE.
390: --
391: if (l_count > 0) then
392: --
393: -- Need vendor (payee) information from AP_CARD_PROGRAMS
394: --
395: -----------------------------------------------------------------------
396: l_debug_info := 'Retrieving vendor info from card program';
397: -----------------------------------------------------------------------
400: card_program_currency_code
401: into l_vendor_id,
402: l_vendor_site_id,
403: l_invoice_currency_code
404: from ap_card_programs
405: where card_program_id = P_CARD_PROGRAM_ID;
406:
407: -----------------------------------------------------------------------
408: l_debug_info := 'Inserting into AP_INVOICES_INTERFACE';