[Home] [Help]
181:
182: CURSOR get_recinv_csr(inv_action VARCHAR2) IS
183: SELECT fv.invoice_id, ap.invoice_num,
184: fv.accomplish_date, ap.payment_method_lookup_code
185: FROM Fv_Ipac_Recurring_Inv fv, Ap_Invoices ap
186: WHERE fv.invoice_id = ap.invoice_id
187: AND fv.batch_name = g_batch_name
188: AND fv.invoice_action = inv_action
189: ORDER BY ap.invoice_num;
188: AND fv.invoice_action = inv_action
189: ORDER BY ap.invoice_num;
190:
191: l_invoice_num Ap_Invoices_All.invoice_num%TYPE;
192: l_inv_action Fv_Ipac_Recurring_Inv.invoice_action%TYPE;
193: l_validate_flag VARCHAR2(1);
194:
195: BEGIN
196: Log_Mesg('O',' Invoice Approval and Payment Output Report '||
284: -- ------------------------------------------------------------------
285: -- Call_Approval_Api procedure is called from Validate_Invoices procedure.
286: -- This procedure calls the ap_approval_pkg to validate.
287: -- This procedure also updates the invoice_action column in the
288: -- Fv_Ipac_Recurring_Inv table, to show that the recurring invoice has
289: -- been validated and is ready to be picked up for payments.
290: -- Parameters:
291: -- p_invoice_id: Invoice Id that needs be validated by the approval api.
292: --
365:
366: IF ((p_invoice_flag = 'R') AND (p_validate_flag = 'Y')) THEN
367: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
368: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' Updating the invoice_action in the '||
369: 'Fv_Ipac_Recurring_Inv Table.');
370: END IF;
371:
372: UPDATE Fv_Ipac_Recurring_Inv
373: SET invoice_action = 'P'
368: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' Updating the invoice_action in the '||
369: 'Fv_Ipac_Recurring_Inv Table.');
370: END IF;
371:
372: UPDATE Fv_Ipac_Recurring_Inv
373: SET invoice_action = 'P'
374: WHERE invoice_id = p_invoice_id;
375: END IF;
376: