18: p_return_status OUT NOCOPY VARCHAR2
19: ) IS
20: BEGIN
21: IF PG_DEBUG in ('Y', 'C') THEN
22: arp_util.debug('Default_customer_trx_id ()+');
23: END IF;
24: p_return_status := FND_API.G_RET_STS_SUCCESS;
25: IF p_customer_trx_id IS NULL THEN
26: IF p_trx_number IS NOT NULL THEN
50: END IF;
51: END IF;
52: END IF;
53: IF PG_DEBUG in ('Y', 'C') THEN
54: arp_util.debug('Default_customer_trx_id ()-');
55: END IF;
56: EXCEPTION
57: WHEN others THEN
58: IF PG_DEBUG in ('Y', 'C') THEN
55: END IF;
56: EXCEPTION
57: WHEN others THEN
58: IF PG_DEBUG in ('Y', 'C') THEN
59: arp_util.debug('EXCEPTION: Default_customer_trx_id()', G_MSG_UERROR);
60: END IF;
61: END Default_customer_trx_id;
62:
63: PROCEDURE Default_gl_date(p_entered_date IN DATE,
69: l_default_gl_date DATE;
70: BEGIN
71: p_return_status := FND_API.G_RET_STS_SUCCESS;
72: IF PG_DEBUG in ('Y', 'C') THEN
73: arp_util.debug('Default_gl_date ()+');
74: END IF;
75: IF p_gl_date IS NULL THEN
76: IF (arp_util.validate_and_default_gl_date(
77: p_entered_date,
72: IF PG_DEBUG in ('Y', 'C') THEN
73: arp_util.debug('Default_gl_date ()+');
74: END IF;
75: IF p_gl_date IS NULL THEN
76: IF (arp_util.validate_and_default_gl_date(
77: p_entered_date,
78: NULL,
79: p_validation_date,
80: NULL,
91: l_error_message) = TRUE)
92: THEN
93: p_gl_date := l_default_gl_date;
94: IF PG_DEBUG in ('Y', 'C') THEN
95: arp_util.debug('Default_gl_date: ' || 'Defaulted GL Date : '||to_char(p_gl_date,'DD-MON-YYYY'));
96: END IF;
97: ELSE
98: IF PG_DEBUG in ('Y', 'C') THEN
99: arp_util.debug('Default_gl_date: ' || 'GL Date could not be defaulted ');
95: arp_util.debug('Default_gl_date: ' || 'Defaulted GL Date : '||to_char(p_gl_date,'DD-MON-YYYY'));
96: END IF;
97: ELSE
98: IF PG_DEBUG in ('Y', 'C') THEN
99: arp_util.debug('Default_gl_date: ' || 'GL Date could not be defaulted ');
100: END IF;
101: -- Raise error message if failure in defaulting the gl_date
102: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
103: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
105: p_return_status := FND_API.G_RET_STS_ERROR;
106: END IF;
107: END IF;
108: IF PG_DEBUG in ('Y', 'C') THEN
109: arp_util.debug('Default_gl_date ()-');
110: END IF;
111: END default_gl_date;
112:
113: PROCEDURE Default_CM_Info(
122: ) IS
123:
124: BEGIN
125: IF PG_DEBUG in ('Y', 'C') THEN
126: arp_util.debug('Default_CM_Info ()+');
127: END IF;
128: p_return_status := FND_API.G_RET_STS_SUCCESS;
129:
130: IF p_customer_trx_id IS NOT NULL THEN
161:
162: END IF;
163:
164: IF PG_DEBUG in ('Y', 'C') THEN
165: arp_util.debug('Default_CM_Info ()-');
166: END IF;
167: EXCEPTION
168: WHEN no_data_found THEN
169: IF PG_DEBUG in ('Y', 'C') THEN
166: END IF;
167: EXCEPTION
168: WHEN no_data_found THEN
169: IF PG_DEBUG in ('Y', 'C') THEN
170: arp_util.debug('Default_CM_Info : No data found ');
171: END IF;
172:
173: p_return_status := FND_API.G_RET_STS_ERROR ;
174: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_TRX_ID_INVALID');
175: FND_MSG_PUB.ADD;
176:
177: WHEN others THEN
178: IF PG_DEBUG in ('Y', 'C') THEN
179: arp_util.debug('EXCEPTION: Default_CM_Info: sqlerrm()');
180: END IF;
181: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
182: raise;
183: END Default_CM_Info;
203: l_cm_unapp_amount NUMBER;
204:
205: BEGIN
206: IF PG_DEBUG in ('Y', 'C') THEN
207: arp_util.debug('Default_activity_info ()+');
208: END IF;
209: p_return_status := FND_API.G_RET_STS_SUCCESS;
210: l_cm_return_status := FND_API.G_RET_STS_SUCCESS;
211: l_gl_date_return_status := FND_API.G_RET_STS_SUCCESS;
221: p_cm_receipt_method_id,
222: l_cm_return_status
223: );
224: IF PG_DEBUG in ('Y', 'C') THEN
225: arp_util.debug('Default_activity_info: ' || 'CM defaulting return status :'||l_cm_return_status);
226: END IF;
227:
228: IF p_apply_date IS NULL THEN
229: p_apply_date := GREATEST(SYSDATE,(NVL(p_trx_date,SYSDATE)));
235: NULL,
236: l_gl_date_return_status);
237: END IF;
238: IF PG_DEBUG in ('Y', 'C') THEN
239: arp_util.debug('Default_activity_info: ' || 'Defaulting apply gl date return status :'|| l_gl_date_return_status);
240: END IF;
241:
242: --default the amount applied
243: IF l_amount_applied IS NULL THEN
243: IF l_amount_applied IS NULL THEN
244: l_amount_applied := p_cm_unapp_amount;
245: END IF;
246: IF PG_DEBUG in ('Y', 'C') THEN
247: arp_util.debug('Amount applied: ' || l_amount_applied );
248: END IF;
249:
250: --do the precision
251: p_amount_applied := arp_util.CurrRound(
247: arp_util.debug('Amount applied: ' || l_amount_applied );
248: END IF;
249:
250: --do the precision
251: p_amount_applied := arp_util.CurrRound(
252: l_amount_applied,
253: p_cm_currency_code
254: );
255: IF PG_DEBUG in ('Y', 'C') THEN
252: l_amount_applied,
253: p_cm_currency_code
254: );
255: IF PG_DEBUG in ('Y', 'C') THEN
256: arp_util.debug('Amount applied: ' || p_amount_applied );
257: END IF;
258:
259:
260: IF l_cm_return_status <> FND_API.G_RET_STS_SUCCESS OR
263: END IF;
264:
265:
266: IF PG_DEBUG in ('Y', 'C') THEN
267: arp_util.debug('Default_activity_info: ' || '***************Default Values *****************');
268: arp_util.debug('Default_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
264:
265:
266: IF PG_DEBUG in ('Y', 'C') THEN
267: arp_util.debug('Default_activity_info: ' || '***************Default Values *****************');
268: arp_util.debug('Default_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
265:
266: IF PG_DEBUG in ('Y', 'C') THEN
267: arp_util.debug('Default_activity_info: ' || '***************Default Values *****************');
268: arp_util.debug('Default_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
273: arp_util.debug('Default_activity_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
266: IF PG_DEBUG in ('Y', 'C') THEN
267: arp_util.debug('Default_activity_info: ' || '***************Default Values *****************');
268: arp_util.debug('Default_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
273: arp_util.debug('Default_activity_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
274: arp_util.debug('Default_activity_info ()-');
267: arp_util.debug('Default_activity_info: ' || '***************Default Values *****************');
268: arp_util.debug('Default_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
273: arp_util.debug('Default_activity_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
274: arp_util.debug('Default_activity_info ()-');
275: END IF;
268: arp_util.debug('Default_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
273: arp_util.debug('Default_activity_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
274: arp_util.debug('Default_activity_info ()-');
275: END IF;
276: EXCEPTION
269: arp_util.debug('Default_activity_info: ' || 'p_cm_gl_date : '||to_char(p_cm_gl_date,'DD-MON-YYYY'));
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
273: arp_util.debug('Default_activity_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
274: arp_util.debug('Default_activity_info ()-');
275: END IF;
276: EXCEPTION
277: WHEN others THEN
270: arp_util.debug('Default_activity_info: ' || 'p_cm_unapp_amount : '||to_char(p_cm_unapp_amount));
271: arp_util.debug('Default_activity_info: ' || 'p_amount_applied : '||to_char(p_amount_applied));
272: arp_util.debug('Default_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
273: arp_util.debug('Default_activity_info: ' || 'p_apply_date : '||to_char(p_apply_date,'DD-MON-YYYY'));
274: arp_util.debug('Default_activity_info ()-');
275: END IF;
276: EXCEPTION
277: WHEN others THEN
278: IF PG_DEBUG in ('Y', 'C') THEN
275: END IF;
276: EXCEPTION
277: WHEN others THEN
278: IF PG_DEBUG in ('Y', 'C') THEN
279: arp_util.debug('EXCEPTION: Default_activity_info() ');
280: END IF;
281: raise;
282: END Default_activity_info;
283:
293: l_customer_trx_id NUMBER;
294: BEGIN
295: p_return_status := FND_API.G_RET_STS_SUCCESS;
296: IF PG_DEBUG in ('Y', 'C') THEN
297: arp_util.debug('Derive_activity_unapp_ids ()+');
298: END IF;
299: --derive the customer_trx_id from the trx_number
300: IF p_trx_number IS NOT NULL THEN
301: Default_customer_trx_id (p_customer_trx_id ,
368: p_customer_trx_id := l_customer_trx_id;
369: END IF;
370:
371: IF PG_DEBUG in ('Y', 'C') THEN
372: arp_util.debug('Derive_activity_unapp_ids ()+');
373: END IF;
374: END Derive_activity_unapp_ids;
375:
376: PROCEDURE Default_unapp_activity_info(
391: l_defaulting_rule_used VARCHAR2(100);
392: l_error_message VARCHAR2(240);
393: BEGIN
394: IF PG_DEBUG in ('Y', 'C') THEN
395: arp_util.debug('Default_unapp_activity_info: ' || 'Default_unapp_activity_info ()+');
396: END IF;
397: l_apply_gl_date := p_apply_gl_date;
398: l_customer_trx_id := p_customer_trx_id;
399:
397: l_apply_gl_date := p_apply_gl_date;
398: l_customer_trx_id := p_customer_trx_id;
399:
400: IF p_reversal_gl_date is null THEN
401: IF (arp_util.validate_and_default_gl_date(
402: nvl(l_apply_gl_date,trunc(sysdate)),
403: NULL,
404: l_apply_gl_date,
405: NULL,
476: WHERE customer_trx_id = l_customer_trx_id;
477: EXCEPTION
478: WHEN no_data_found THEN
479: IF PG_DEBUG in ('Y', 'C') THEN
480: arp_util.debug('Default_unapp_activity_info: ' || 'Could not get the cm_gl_date. ');
481: END IF;
482: RAISE;
483: END;
484: END IF;
482: RAISE;
483: END;
484: END IF;
485: IF PG_DEBUG in ('Y', 'C') THEN
486: arp_util.debug('Default_unapp_activity_info: ' || '*****Defaulted Values *********');
487: arp_util.debug('Default_unapp_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
483: END;
484: END IF;
485: IF PG_DEBUG in ('Y', 'C') THEN
486: arp_util.debug('Default_unapp_activity_info: ' || '*****Defaulted Values *********');
487: arp_util.debug('Default_unapp_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
484: END IF;
485: IF PG_DEBUG in ('Y', 'C') THEN
486: arp_util.debug('Default_unapp_activity_info: ' || '*****Defaulted Values *********');
487: arp_util.debug('Default_unapp_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
492: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_ps_id : '||p_cm_ps_id);
485: IF PG_DEBUG in ('Y', 'C') THEN
486: arp_util.debug('Default_unapp_activity_info: ' || '*****Defaulted Values *********');
487: arp_util.debug('Default_unapp_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
492: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_ps_id : '||p_cm_ps_id);
493: arp_util.debug('Default_unapp_activity_info: ' || 'Default_unapp_on_acc_act_info ()-');
486: arp_util.debug('Default_unapp_activity_info: ' || '*****Defaulted Values *********');
487: arp_util.debug('Default_unapp_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
492: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_ps_id : '||p_cm_ps_id);
493: arp_util.debug('Default_unapp_activity_info: ' || 'Default_unapp_on_acc_act_info ()-');
494: END IF;
487: arp_util.debug('Default_unapp_activity_info: ' || 'p_customer_trx_id : '||to_char(p_customer_trx_id));
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
492: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_ps_id : '||p_cm_ps_id);
493: arp_util.debug('Default_unapp_activity_info: ' || 'Default_unapp_on_acc_act_info ()-');
494: END IF;
495:
488: arp_util.debug('Default_unapp_activity_info: ' || 'p_receivable_application_id : '||to_char(p_receivable_application_id));
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
492: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_ps_id : '||p_cm_ps_id);
493: arp_util.debug('Default_unapp_activity_info: ' || 'Default_unapp_on_acc_act_info ()-');
494: END IF;
495:
496: END Default_unapp_activity_info;
489: arp_util.debug('Default_unapp_activity_info: ' || 'p_apply_gl_date : '||to_char(p_apply_gl_date,'DD-MON-YYYY'));
490: arp_util.debug('Default_unapp_activity_info: ' || 'p_reversal_gl_date : '||to_char(p_reversal_gl_date,'DD-MON-YYYY'));
491: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_unapp_amount : '||p_cm_unapp_amount);
492: arp_util.debug('Default_unapp_activity_info: ' || 'p_cm_ps_id : '||p_cm_ps_id);
493: arp_util.debug('Default_unapp_activity_info: ' || 'Default_unapp_on_acc_act_info ()-');
494: END IF;
495:
496: END Default_unapp_activity_info;
497: