130:
131: PROCEDURE default_cm_info(
132: p_cm_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE,
133: p_cm_gl_date OUT NOCOPY DATE,
134: p_cm_amount_rem OUT NOCOPY ar_payment_schedules.amount_due_remaining%TYPE,
135: p_cm_trx_date OUT NOCOPY DATE,
136: p_cm_ps_id OUT NOCOPY ar_payment_schedules.payment_schedule_id%TYPE ,
137: p_cm_currency_code OUT NOCOPY fnd_currencies.currency_code%TYPE,
138: p_cm_customer_id OUT NOCOPY ra_customer_trx.paying_customer_id%TYPE,
132: p_cm_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE,
133: p_cm_gl_date OUT NOCOPY DATE,
134: p_cm_amount_rem OUT NOCOPY ar_payment_schedules.amount_due_remaining%TYPE,
135: p_cm_trx_date OUT NOCOPY DATE,
136: p_cm_ps_id OUT NOCOPY ar_payment_schedules.payment_schedule_id%TYPE ,
137: p_cm_currency_code OUT NOCOPY fnd_currencies.currency_code%TYPE,
138: p_cm_customer_id OUT NOCOPY ra_customer_trx.paying_customer_id%TYPE,
139: p_return_status OUT NOCOPY VARCHAR2
140: ) IS
162: p_cm_amount_rem,
163: p_cm_customer_id,
164: p_cm_currency_code
165: FROM ra_customer_trx cm,
166: ar_payment_schedules ps
167: WHERE ps.customer_trx_id = cm.customer_trx_id
168: AND cm.customer_trx_id = p_cm_customer_trx_id;
169:
170: EXCEPTION
374:
375: PROCEDURE default_amt_applied(
376: p_inv_currency_code IN fnd_currencies.currency_code%TYPE,
377: p_cm_currency_code IN fnd_currencies.currency_code%TYPE,
378: p_cm_amount_rem IN ar_payment_schedules.amount_due_remaining%TYPE,
379: p_inv_amount_rem IN ar_payment_schedules.amount_due_Remaining%TYPE,
380: p_amount_applied IN OUT NOCOPY NUMBER,
381: p_return_status OUT NOCOPY VARCHAR2
382: )
375: PROCEDURE default_amt_applied(
376: p_inv_currency_code IN fnd_currencies.currency_code%TYPE,
377: p_cm_currency_code IN fnd_currencies.currency_code%TYPE,
378: p_cm_amount_rem IN ar_payment_schedules.amount_due_remaining%TYPE,
379: p_inv_amount_rem IN ar_payment_schedules.amount_due_Remaining%TYPE,
380: p_amount_applied IN OUT NOCOPY NUMBER,
381: p_return_status OUT NOCOPY VARCHAR2
382: )
383:
578: BEGIN
579: SELECT ps.payment_schedule_id
580: INTO l_inv_ps_id
581: FROM ra_customer_trx ct,
582: ar_payment_schedules ps
583: WHERE ct.customer_trx_id = p_inv_customer_trx_id
584: AND ct.customer_trx_id = ps.customer_trx_id
585: --AND ps.class IN ('CB','CM','DEP','DM','INV','BR')
586: AND ps.terms_sequence_number = p_installment
604: BEGIN
605: SELECT ps.payment_schedule_id
606: INTO l_inv_ps_id
607: FROM ra_customer_trx ct,
608: ar_payment_schedules ps
609: WHERE ct.customer_trx_id = p_inv_customer_trx_id
610: AND ct.customer_trx_id = ps.customer_trx_id
611: --AND ps.class IN ('CB','CM','DEP','DM','INV','BR')
612: ;
647: ) IS
648: CURSOR rec_apppln IS
649: SELECT ra.applied_customer_trx_id, ra.applied_payment_schedule_id, ra.gl_date
650: FROM ar_receivable_applications ra,
651: ar_payment_schedules ps
652: WHERE ra.applied_payment_schedule_id = ps.payment_schedule_id
653: AND ra.receivable_application_id = p_ra_id
654: AND ra.display = 'Y'
655: AND ra.status = 'APP'
946:
947:
948: CURSOR c_pay_sched IS
949: SELECT customer_trx_id, terms_sequence_number
950: FROM ar_payment_schedules
951: WHERE payment_schedule_id = p_applied_payment_schedule_id and
952: payment_schedule_id >0 and
953: class in ('INV','DM'); -- Should we include DM, DEP, GUAR, CB?
954:
1013: IF p_installment IS NULL THEN
1014: BEGIN
1015: SELECT terms_sequence_number
1016: INTO p_installment
1017: FROM ar_payment_schedules
1018: WHERE customer_trx_id = p_inv_customer_trx_id;
1019: EXCEPTION
1020: WHEN no_data_found THEN
1021: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_TRX_ID_INVALID');
1341: ) IS
1342:
1343: CURSOR c_pay_sched IS
1344: SELECT customer_trx_id, terms_sequence_number
1345: FROM ar_payment_schedules
1346: WHERE payment_schedule_id = p_applied_payment_schedule_id and
1347: payment_schedule_id >0 and
1348: class in ('INV','DM'); -- Should we include BR, DEP, GUAR, CB?
1349:
1514: THEN
1515: BEGIN
1516: SELECT gl_date
1517: INTO p_cm_gl_date
1518: FROM ar_payment_schedules
1519: WHERE customer_trx_id = l_cm_customer_trx_id;
1520: EXCEPTION
1521: WHEN no_data_found THEN
1522: null;