[Home] [Help]
319: Current_calling_sequence);
320:
321:
322: /*--------------------------------------------------------------------------
323: * -- Step 6p : case p : Prepayment : Insert AP_INVOICE_PAYMENTS
324: * Call appp_insert_invoice_payment :
325: * Create new positive Invoice Payments for the Prepayment (converse
326: * for Unapplication)
327: *--------------------------------------------------------------------------*/
786: WHERE invoice_id = X_prepay_id;
787:
788:
789: ---------------------------------------------------------------------
790: -- Get max_inv_pay and copy_inv_pay_id from ap_invoice_payments
791: ---------------------------------------------------------------------
792: debug_info := 'Get max_inv_pay and copy_inv_pay_id';
793: SELECT max(payment_num),
794: max(decode(payment_num,1,invoice_payment_id,0))
793: SELECT max(payment_num),
794: max(decode(payment_num,1,invoice_payment_id,0))
795: INTO X_max_inv_pay,
796: X_copy_inv_pay_id
797: FROM ap_invoice_payments
798: WHERE invoice_id = X_prepay_id;
799:
800:
801: ---------------------------------------------------------------------
1556:
1557:
1558: /*===========================================================================
1559: This procedure is used for creating the new payment records on the check.
1560: (Maintain Table AP_INVOICE_PAYMENTS, and AP_PAYMENT_SCHEDULES)
1561:
1562: It include 3 steps. In step 3, there are 2 cases:
1563:
1564: 1. Invoice type is prepayment: insert ap_payment_distribution. It separate
1622: --
1623: debug_info := 'Get check_id';
1624: SELECT check_id
1625: INTO C_check_id
1626: FROM ap_invoice_payments
1627: WHERE invoice_payment_id = X_copy_inv_pay_id;
1628: --
1629: -- Get the invoice_type for X_new_invoice_id (prepayment or invoice)
1630: --
1657: ,P_checkrun_name => NULL
1658: ,P_calling_sequence => current_calling_sequence);
1659:
1660: ----------------------------------------------------------------
1661: -- Step 2: Insert into ap_invoice_payments
1662: ----------------------------------------------------------------
1663: debug_info := 'Create the new payment records for ap_invoice_payments';
1664:
1665: INSERT INTO AP_INVOICE_PAYMENTS(
1659:
1660: ----------------------------------------------------------------
1661: -- Step 2: Insert into ap_invoice_payments
1662: ----------------------------------------------------------------
1663: debug_info := 'Create the new payment records for ap_invoice_payments';
1664:
1665: INSERT INTO AP_INVOICE_PAYMENTS(
1666: invoice_payment_id,
1667: invoice_id,
1661: -- Step 2: Insert into ap_invoice_payments
1662: ----------------------------------------------------------------
1663: debug_info := 'Create the new payment records for ap_invoice_payments';
1664:
1665: INSERT INTO AP_INVOICE_PAYMENTS(
1666: invoice_payment_id,
1667: invoice_id,
1668: payment_num,
1669: check_id,
1697: created_by,
1698: invoice_payment_type,
1699: other_invoice_id,
1700: org_id ) /* Bug 3700128. MOAC Project */
1701: SELECT ap_invoice_payments_s.nextval,
1702: X_new_invoice_id,
1703: new_line_num,
1704: P.check_id,
1705: DECODE(P.invoice_id, X_new_invoice_id,
1778: X_user_id,
1779: 'PREPAY',
1780: X_prepay_id,
1781: I.org_id /* Bug 3700128. MOAC Project */
1782: FROM ap_invoice_payments P, ap_invoices I, ap_system_parameters ASP
1783: WHERE I.invoice_id = X_new_invoice_id
1784: AND P.invoice_payment_id = X_copy_inv_pay_id
1785: AND ASP.set_of_books_id = I.set_of_books_id;
1786: