[Home] [Help]
367: l_invoice_id_list;
368: CLOSE shipment;
369:
370: ------------------------------------------------------
371: debug_info := 'Step 5b.Insert into ap_invoice_lines_interface';
372: -------------------------------------------------------
373: --Bugfix:4681253, added the IF condition and modified the FORALL from
374: --'1..count' to 'first..last'.
375: IF (l_po_line_loc_id_list.COUNT > 0) THEN
374: --'1..count' to 'first..last'.
375: IF (l_po_line_loc_id_list.COUNT > 0) THEN
376:
377: FORALL i IN nvl(l_po_line_loc_id_list.first,0) .. l_po_line_loc_id_list.last
378: INSERT INTO ap_invoice_lines_interface
379: (invoice_id,
380: invoice_line_id,
381: po_header_id,
382: po_number,
392: last_updated_by,
393: last_update_date,
394: last_update_login)
395: VALUES (l_invoice_id_list(i),
396: AP_INVOICE_LINES_INTERFACE_S.nextval,
397: l_po_header_id_list(i),
398: l_po_number_list(i),
399: l_po_line_id_list(i),
400: l_po_line_number_list(i),
649: current_calling_sequence);
650: END IF;
651:
652: ---------------------------------------------------------------
653: debug_info := 'Step 2c. Populate AP_INVOICE_LINES_INTERFACE';
654: ----------------------------------------------------------------
655: IF p_resubmit_flag <> 'Y' THEN
656:
657: AP_RETRO_PRICING_PKG.insert_ap_inv_lines_interface(
6806: requester_id,
6807: description,
6808: award_id,
6809: created_by
6810: FROM ap_invoice_lines_interface
6811: WHERE invoice_id = p_instruction_rec.invoice_id;
6812:
6813: l_invoice_id_list AP_RETRO_PRICING_PKG.id_list_type;
6814: l_base_match_lines_list AP_RETRO_PRICING_PKG.invoice_lines_list_type;
7901: SET invoice_adjustment_flag = 'R'
7902: WHERE invoice_adjustment_flag = 'S'
7903: AND line_location_id IN
7904: (select po_line_location_id
7905: FROM ap_invoice_lines_interface
7906: WHERE invoice_id = p_instruction_rec.invoice_id);
7907: END IF;
7908:
7909: IF ( instruction_lines%ISOPEN ) THEN