[Home] [Help]
366: l_invoice_id_list;
367: CLOSE shipment;
368:
369: ------------------------------------------------------
370: debug_info := 'Step 5b.Insert into ap_invoice_lines_interface';
371: -------------------------------------------------------
372: --Bugfix:4681253, added the IF condition and modified the FORALL from
373: --'1..count' to 'first..last'.
374: IF (l_po_line_loc_id_list.COUNT > 0) THEN
373: --'1..count' to 'first..last'.
374: IF (l_po_line_loc_id_list.COUNT > 0) THEN
375:
376: FORALL i IN nvl(l_po_line_loc_id_list.first,0) .. l_po_line_loc_id_list.last
377: INSERT INTO ap_invoice_lines_interface
378: (invoice_id,
379: invoice_line_id,
380: po_header_id,
381: po_number,
391: last_updated_by,
392: last_update_date,
393: last_update_login)
394: VALUES (l_invoice_id_list(i),
395: AP_INVOICE_LINES_INTERFACE_S.nextval,
396: l_po_header_id_list(i),
397: l_po_number_list(i),
398: l_po_line_id_list(i),
399: l_po_line_number_list(i),
639: current_calling_sequence);
640: END IF;
641:
642: ---------------------------------------------------------------
643: debug_info := 'Step 2c. Populate AP_INVOICE_LINES_INTERFACE';
644: ----------------------------------------------------------------
645: IF p_resubmit_flag <> 'Y' THEN
646:
647: AP_RETRO_PRICING_PKG.insert_ap_inv_lines_interface(
6335: requester_id,
6336: description,
6337: award_id,
6338: created_by
6339: FROM ap_invoice_lines_interface
6340: WHERE invoice_id = p_instruction_rec.invoice_id;
6341:
6342: l_invoice_id_list AP_RETRO_PRICING_PKG.id_list_type;
6343: l_base_match_lines_list AP_RETRO_PRICING_PKG.invoice_lines_list_type;