1: PACKAGE BODY AP_WEB_PAYMENTS_PKG AS
2: /* $Header: apwxpayb.pls 120.5.12010000.3 2009/08/12 08:48:52 dsadipir ship $ */
3:
4: -----------------------------------------------------------------------
5: -- Declare record type used to hold records returned from generic cursor
132: LOOP
133: FETCH payment_cursor INTO l_payment_record;
134: EXIT WHEN payment_cursor%NOTFOUND;
135:
136: l_paid_by := AP_WEB_PAYMENTS_PKG.CONCAT_DOCUMENT_NUM_TYPE(l_payment_record);
137:
138: IF (l_paid_by_list IS NOT NULL) THEN
139: l_paid_by_list := l_paid_by_list || ', ';
140: END IF;
452: RETURN 0;
453: END get_line_prepay_balance;
454:
455:
456: END AP_WEB_PAYMENTS_PKG;
457:
458: