[Home] [Help]
188: CURSOR C_INTEREST_INVOICES IS
189: SELECT i.invoice_id
190: FROM ap_invoice_payments_all aip,
191: ap_checks_all c,
192: ap_invoices_all i,
193: ap_invoice_relationships ir
194: WHERE c.check_id = p_check_id
195: AND c.check_id = aip.check_id
196: AND aip.invoice_id = ir.related_invoice_id
250:
251: elsif l_return_code = 0 then
252:
253: /* Start - BUG 14364091 - Logging */
254: l_debug_info := 'updating ap_invoices_all ';
255: /* End - BUG 14364091 - Logging */
256: update ap_invoices_all
257: set doc_sequence_id = l_int_dbseqid,
258: doc_sequence_value = l_int_seqval,
252:
253: /* Start - BUG 14364091 - Logging */
254: l_debug_info := 'updating ap_invoices_all ';
255: /* End - BUG 14364091 - Logging */
256: update ap_invoices_all
257: set doc_sequence_id = l_int_dbseqid,
258: doc_sequence_value = l_int_seqval,
259: doc_category_code = 'INT INV'
260: where invoice_id = l_invoice_id;
855: SELECT Distinct AC.Check_ID,
856: APR.Reg_Application_ID
857: FROM AP_Checks_All AC,
858: AP_Invoice_Payments_All AIP,
859: AP_Invoices_All AI,
860: AP_Product_Registrations APR
861: WHERE AC.Checkrun_Name = l_checkrun_name
862: AND AC.Completed_Pmts_Group_ID = p_completed_pmts_group_id
863: AND AC.Org_ID = l_current_org_id
876: iby_amount_paid,
877: iby_discount_amount_taken,
878: AP_INVOICES_UTILITY_PKG.get_payment_status(inv.invoice_id),
879: inv.invoice_id
880: FROM ap_invoices_all inv,
881: ap_selected_invoices_all si,
882: (SELECT sum(ibydocs.payment_amount) iby_amount_paid,
883: nvl(sum(ibydocs.payment_curr_discount_taken),0) iby_discount_amount_taken,
884: ibydocs.calling_app_doc_unique_ref1 ref1,
929: Null,
930: ps.invoice_id,
931: ps.payment_num
932: FROM ap_payment_schedules_all ps,
933: ap_invoices_all inv,
934: ap_selected_invoices_all si,
935: /*iby_fd_payments_v ibypmts, Commented for Bug#9459810 */
936: iby_fd_docs_payable_v ibydocs
937: WHERE si.checkrun_name = p_checkrun_name
1267: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1268: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1269: END IF;
1270:
1271: INSERT INTO ap_invoices_all(
1272: invoice_id,
1273: last_update_date,
1274: last_updated_by,
1275: vendor_id,
1386: NVL(aps.vendor_id,-222), -- Modified for bug 8405513
1387: aps.vendor_site_code,
1388: NVL(ibypmts.supplier_site_id,-222), --modifed for bug 8405513
1389: ibypmts.relationship_id
1390: FROM ap_invoices_all orig,
1391: ap_supplier_sites_all aps, -- bug 7673570
1392: iby_fd_payments_v ibypmts,
1393: ap_selected_invoices_all new,
1394: iby_fd_docs_payable_v ibydocs,
1471: 'NOT REQUIRED',
1472: l_current_org_id
1473: FROM
1474: po_vendors pv,
1475: ap_invoices_all orig,
1476: iby_fd_payments_v ibypmts,
1477: iby_fd_docs_payable_v ibydocs,
1478: ap_selected_invoices_all new, -- Modified for bug 8744658
1479: fnd_currencies fcinv
1574: NVL(aps.vendor_id, -222), --Modified for bug 8405513
1575: aps.vendor_site_code,
1576: NVL(ibypmts.supplier_site_id, -222), --modifed for bug 8405513
1577: ibypmts.relationship_id
1578: FROM ap_invoices_all orig,
1579: ap_selected_invoices_all new,
1580: ap_supplier_sites_all aps, -- bug 7673570
1581: fnd_currencies fcinv,
1582: iby_fd_payments_v ibypmts,
1618: new.original_payment_num,
1619: l_last_updated_by,
1620: SYSDATE,
1621: l_checkrun_name
1622: FROM ap_invoices_all orig,
1623: ap_selected_invoices_all new,
1624: iby_fd_payments_v ibypmts,
1625: iby_fd_docs_payable_v ibydocs
1626: /* Bug 6950891 Added TO_CHAR */
1664: count(*),
1665: SYSDATE,
1666: l_last_updated_by,
1667: i.org_id
1668: FROM ap_invoices_all I,
1669: ap_lookup_codes LC
1670: WHERE I.batch_id= l_int_batch_id
1671: AND LC.lookup_type = 'NLS TRANSLATION' /* bug 9868737 */
1672: AND LC.lookup_code = 'INTEREST ON PAYMENTBATCH' /* bug 9868737 */
1863: WHEN inv.invoice_type_lookup_code = 'PAYMENT REQUEST' AND SIGN(inv.vendor_id)= -1
1864: THEN nvl(pv.vendor_id,-99) --bug 8657535. Changed -99 to nvl(pv.vendor_id,-99)
1865: ELSE nvl(vendor_id,-99)
1866: END --Bug7493630 and Bug 8260736 (8348480)
1867: from ap_invoices_all inv,iby_docs_payable_all idp
1868: where inv.invoice_id=idp.calling_app_doc_unique_ref2
1869: and idp.payment_id=iby.payment_id
1870: and idp.calling_app_doc_unique_ref1=l_checkrun_id
1871: and rownum=1
2103: payment_status_inv_l,
2104: invoice_id_inv_l
2105: LIMIT 1000;
2106:
2107: l_debug_info := 'UPDATE ap_invoices_all';
2108: fnd_file.put_line(FND_FILE.LOG,l_debug_info||' - '||systimestamp);
2109: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2110: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2111: END IF;
2110: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2111: END IF;
2112:
2113: FORALL i IN 1..invoice_id_inv_l.COUNT
2114: UPDATE ap_invoices_all
2115: SET last_update_date = last_update_date_inv_l(i)
2116: ,last_updated_by = last_updated_by_inv_l(i)
2117: ,amount_paid = nvl(amount_paid,0) + amount_paid_inv_l(i)
2118: ,discount_amount_taken = nvl(discount_amount_taken,0) + discount_taken_inv_l(i)
2320: iby_fd_docs_payable_v ibydocs,
2321: ap_selected_invoices_all SI,
2322: fnd_currencies FORE,
2323: ap_payment_schedules_all PS,
2324: ap_invoices_all AI,
2325: ap_checks_all ac,
2326: --ap_supplier_sites_all aps, -- bug 7673570 --Removed by bug 9074840
2327: --ce_bank_acct_uses_all ceu, --Removed by bug 9074840
2328: ce_gl_accounts_ccid cegl,
2497: payment_status_inv_l,
2498: invoice_id_inv_l
2499: LIMIT 1000;
2500:
2501: l_debug_info := 'UPDATE ap_invoices_all';
2502: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2503: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2504: END IF;
2505:
2503: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2504: END IF;
2505:
2506: FORALL i IN 1..invoice_id_inv_l.COUNT
2507: UPDATE ap_invoices_all
2508: SET last_update_date = last_update_date_inv_l(i)
2509: ,last_updated_by = last_updated_by_inv_l(i)
2510: ,amount_paid = nvl(amount_paid,0) + amount_paid_inv_l(i)
2511: ,discount_amount_taken = nvl(discount_amount_taken,0) + discount_taken_inv_l(i)
2543: (SELECT SI3.invoice_id, SI3.payment_num
2544: FROM ap_selected_invoices_all SI3,
2545: iby_fd_payments_v ibypmts,
2546: iby_fd_docs_payable_v ibydocs,
2547: ap_invoices_all AI
2548: WHERE SI3.checkrun_name = l_checkrun_name
2549: AND ibydocs.calling_app_doc_unique_ref1 = to_char(si3.checkrun_id)
2550: AND ibydocs.calling_app_doc_unique_ref2 = to_char(si3.invoice_id)
2551: AND ibydocs.calling_app_doc_unique_ref3 = to_char(si3.payment_num)
2556: AND AI.invoice_id = SI3.invoice_id
2557: AND AI.invoice_type_lookup_code <> 'INTEREST');
2558:
2559:
2560: l_debug_info := 'UPDATE ap_invoices_all';
2561: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2562: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2563: END IF;
2564:
2564:
2565:
2566: --bug5020577
2567: --Modified the sql to prevent MJC.
2568: UPDATE ap_invoices_all inv1
2569: SET (last_update_date,
2570: last_updated_by,
2571: amount_paid,
2572: discount_amount_taken,
3219: SELECT COUNT(*) INTO l_prepay_app_exists
3220: FROM ap_checks_all ac,
3221: ap_invoice_payments_all aip,
3222: ap_invoice_distributions_all aid,
3223: ap_invoices_all ai
3224: WHERE ac.payment_id = p_payment_id
3225: AND ac.check_id = aip.check_id
3226: AND aip.invoice_id = ai.invoice_id
3227: AND ai.invoice_id = aid.invoice_id
3246: (SELECT 1
3247: FROM ap_invoice_distributions_all aid_prepay,
3248: ap_checks_all ac,
3249: ap_invoice_payments_all aip,
3250: ap_invoices_all ai_prepay,
3251: ap_invoice_distributions_all aid,
3252: ap_invoice_distributions_all aidp
3253: WHERE aip.check_id = ac.check_id
3254: AND ac.payment_id = p_payment_id