[Home] [Help]
152:
153: CURSOR C_Interest_Inv_Cur IS
154: SELECT aid.invoice_id invoice_id,
155: aid.dist_code_combination_id dist_code_combination_id,
156: ap_invoice_distributions_s.NEXTVAL invoice_distribution_id,
157: aid.invoice_line_number invoice_line_number, /* bug 5169128 */
158: aid.invoice_distribution_id parent_reversal_id, -- 2806074
159: aid.set_of_books_id set_of_books_id,
160: aid.amount * -1 amount,
167: -- aid.ussgl_transaction_code ussgl_transaction_code,
168: aid.org_id org_id,
169: aid.type_1099 type_1099,
170: aid.income_tax_region income_tax_region
171: FROM ap_invoice_distributions aid,
172: gl_code_combinations gl,
173: ap_invoice_payments aip,
174: ap_invoice_relationships air,
175: ap_lookup_codes alc
441: WHERE AIP.invoice_id = AIR.related_invoice_id
442: AND AIP.check_id = P_Check_Id
443: AND NVL(aip.reversal_flag, 'N') <> 'Y');
444:
445: l_debug_info := 'INSERT ap_invoice_distributions for Interest Invoice';
446:
447: SELECT MAX(aid.distribution_line_number)
448: INTO l_max_dist_line_num
449: FROM ap_invoice_distributions aid,
445: l_debug_info := 'INSERT ap_invoice_distributions for Interest Invoice';
446:
447: SELECT MAX(aid.distribution_line_number)
448: INTO l_max_dist_line_num
449: FROM ap_invoice_distributions aid,
450: gl_code_combinations gl,
451: ap_invoice_payments aip,
452: ap_invoice_relationships air,
453: ap_lookup_codes alc
469:
470: l_max_dist_line_num := l_max_dist_line_num + 1;
471:
472:
473: INSERT INTO ap_invoice_distributions_all
474: (INVOICE_ID,
475: DIST_CODE_COMBINATION_ID,
476: INVOICE_DISTRIBUTION_ID,
477: INVOICE_LINE_NUMBER, /* bug 5169128 */
571: Interest_Inv_Cur.income_tax_region);
572:
573: --Bug 4539462 DBI logging
574: AP_DBI_PKG.Maintain_DBI_Summary
575: (p_table_name => 'AP_INVOICE_DISTRIBUTIONS',
576: p_operation => 'I',
577: p_key_value1 => Interest_Inv_Cur.invoice_id,
578: p_key_value2 => Interest_Inv_Cur.invoice_distribution_id,
579: p_calling_sequence => l_curr_calling_sequence);