30: IS
31: l_flag varchar2(1) := 'N';
32: cursor payment_cursor is
33: SELECT 'Y'
34: FROM ap_invoice_payments_all
35: WHERE invoice_id = P_invoice_id
36: AND nvl(discount_taken,0) <> 0;
37:
38: BEGIN
76: IS
77: l_flag varchar2(1) := 'N';
78: cursor payments_exist_cursor is
79: SELECT 'Y'
80: FROM ap_invoice_payments_all
81: WHERE invoice_id = P_invoice_id;
82:
83: BEGIN
84: