[Home] [Help]
30: l_payment_num_to_add number;
31: l_amount_remaining number;
32: l_payment_status_flag ap_payment_schedules.payment_status_flag%TYPE;
33: l_allow_paid_invoice_adjust
34: ap_system_parameters.allow_paid_invoice_adjust%TYPE;
35: l_add_new_payment_schedule varchar2(1) := 'Y';
36: l_sum_ps_amount_remaining number;
37: l_payment_currency_code ap_invoices.payment_currency_code%TYPE;
38: l_invoice_currency_code ap_invoices.invoice_currency_code%TYPE;
63: AI.payment_cross_rate,
64: nvl(AI.amount_paid,0), --bug 8891266
65: nvl(AI.pay_curr_invoice_amount, AI.invoice_amount)
66: from ap_invoices AI,
67: ap_system_parameters SP
68: where invoice_id = X_invoice_id;
69:
70: -- If we're adding a new payment schedule and not adjusting
71: -- an existing one, then the payment_status_flag of the
554: l_wt_amt_to_subtract,
555: 0)))),
556: X_currency_code),0) --Bug7717053, added the decode
557: INTO l_discount_available
558: FROM ap_invoices_ready_to_pay_v air, ap_system_parameters_all asp
559: WHERE invoice_id = X_invoice_id
560: AND payment_num = X_payment_num
561: AND air.org_id = asp.org_id; --Added for bug #8506044;
562: ELSE l_discount_available := 0;