27: l_default_gl_date DATE;
28:
29: BEGIN
30: IF PG_DEBUG in ('Y', 'C') THEN
31: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_gl_date ()+');
32: END IF;
33:
34: p_return_status := FND_API.G_RET_STS_SUCCESS;
35:
32: END IF;
33:
34: p_return_status := FND_API.G_RET_STS_SUCCESS;
35:
36: IF (arp_util.validate_and_default_gl_date(
37: p_entered_date ,
38: NULL ,
39: NULL ,
40: NULL ,
63:
64: END IF;
65:
66: IF PG_DEBUG in ('Y', 'C') THEN
67: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_gl_date ()-');
68: END IF;
69:
70: EXCEPTION
71: WHEN OTHERS THEN
69:
70: EXCEPTION
71: WHEN OTHERS THEN
72: IF PG_DEBUG in ('Y', 'C') THEN
73: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.default_gl_date () ');
74: arp_util.debug('Default_GL_date: ' || ' p_entered_date = ' || p_entered_date);
75: END IF;
76: RAISE;
77:
70: EXCEPTION
71: WHEN OTHERS THEN
72: IF PG_DEBUG in ('Y', 'C') THEN
73: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.default_gl_date () ');
74: arp_util.debug('Default_GL_date: ' || ' p_entered_date = ' || p_entered_date);
75: END IF;
76: RAISE;
77:
78: END default_gl_date;
95: l_drawee_site_use_id NUMBER;
96:
97: BEGIN
98: IF PG_DEBUG in ('Y', 'C') THEN
99: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Location ()+');
100: END IF;
101:
102: /* modified for tca uptake */
103: SELECT site_uses.SITE_USE_ID
110: AND site_uses.status = 'A'
111: AND site_uses.primary_flag = 'Y';
112:
113: IF PG_DEBUG in ('Y', 'C') THEN
114: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Location ()-');
115: END IF;
116:
117: EXCEPTION
118: WHEN NO_DATA_FOUND THEN
116:
117: EXCEPTION
118: WHEN NO_DATA_FOUND THEN
119: IF PG_DEBUG in ('Y', 'C') THEN
120: arp_util.debug ('Default_Drawee_Location: ' || '>>>>>>>>>> No Drawee Location could be Defaulted');
121: arp_util.debug ('Default_Drawee_Location: ' || '>>>>>>>>>> The Drawee Location is Mandatory');
122: END IF;
123: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_DRAWEE_SITE_NULL');
124: app_exception.raise_exception;
117: EXCEPTION
118: WHEN NO_DATA_FOUND THEN
119: IF PG_DEBUG in ('Y', 'C') THEN
120: arp_util.debug ('Default_Drawee_Location: ' || '>>>>>>>>>> No Drawee Location could be Defaulted');
121: arp_util.debug ('Default_Drawee_Location: ' || '>>>>>>>>>> The Drawee Location is Mandatory');
122: END IF;
123: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_DRAWEE_SITE_NULL');
124: app_exception.raise_exception;
125:
124: app_exception.raise_exception;
125:
126: WHEN TOO_MANY_ROWS THEN
127: IF PG_DEBUG in ('Y', 'C') THEN
128: arp_util.debug('>>>>> Default_Drawee_Location : Too Many rows');
129: arp_util.debug('Default_Drawee_Location: ' || ' p_drawee_id = ' || p_drawee_id );
130: END IF;
131:
132: WHEN OTHERS THEN
125:
126: WHEN TOO_MANY_ROWS THEN
127: IF PG_DEBUG in ('Y', 'C') THEN
128: arp_util.debug('>>>>> Default_Drawee_Location : Too Many rows');
129: arp_util.debug('Default_Drawee_Location: ' || ' p_drawee_id = ' || p_drawee_id );
130: END IF;
131:
132: WHEN OTHERS THEN
133: IF PG_DEBUG in ('Y', 'C') THEN
130: END IF;
131:
132: WHEN OTHERS THEN
133: IF PG_DEBUG in ('Y', 'C') THEN
134: arp_util.debug('>>>>>>>>>> EXCEPTION : Default_Drawee_Location () ');
135: arp_util.debug('Default_Drawee_Location: ' || ' p_drawee_id = ' || p_drawee_id);
136: END IF;
137: RAISE;
138:
131:
132: WHEN OTHERS THEN
133: IF PG_DEBUG in ('Y', 'C') THEN
134: arp_util.debug('>>>>>>>>>> EXCEPTION : Default_Drawee_Location () ');
135: arp_util.debug('Default_Drawee_Location: ' || ' p_drawee_id = ' || p_drawee_id);
136: END IF;
137: RAISE;
138:
139: END Default_Drawee_Location;
156:
157:
158: BEGIN
159: IF PG_DEBUG in ('Y', 'C') THEN
160: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Contact ()+');
161: END IF;
162:
163: /* modified for tca uptake */
164: /* fix bug 1883538: replace current role state with status column */
175: AND role_res.responsibility_type = 'BILL_TO'
176: AND role_res.primary_flag = 'Y';
177:
178: IF PG_DEBUG in ('Y', 'C') THEN
179: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Contact ()-');
180: END IF;
181:
182: EXCEPTION
183: WHEN NO_DATA_FOUND THEN
181:
182: EXCEPTION
183: WHEN NO_DATA_FOUND THEN
184: IF PG_DEBUG in ('Y', 'C') THEN
185: arp_util.debug('Default_Drawee_Contact: ' || '>>>>> No Drawee Contact could be defaulted');
186: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
187: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
188: END IF;
189:
182: EXCEPTION
183: WHEN NO_DATA_FOUND THEN
184: IF PG_DEBUG in ('Y', 'C') THEN
185: arp_util.debug('Default_Drawee_Contact: ' || '>>>>> No Drawee Contact could be defaulted');
186: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
187: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
188: END IF;
189:
190: WHEN TOO_MANY_ROWS THEN
183: WHEN NO_DATA_FOUND THEN
184: IF PG_DEBUG in ('Y', 'C') THEN
185: arp_util.debug('Default_Drawee_Contact: ' || '>>>>> No Drawee Contact could be defaulted');
186: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
187: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
188: END IF;
189:
190: WHEN TOO_MANY_ROWS THEN
191: IF PG_DEBUG in ('Y', 'C') THEN
188: END IF;
189:
190: WHEN TOO_MANY_ROWS THEN
191: IF PG_DEBUG in ('Y', 'C') THEN
192: arp_util.debug('>>>>> Default_Drawee_Contact : Too Many rows');
193: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
194: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
195: END IF;
196:
189:
190: WHEN TOO_MANY_ROWS THEN
191: IF PG_DEBUG in ('Y', 'C') THEN
192: arp_util.debug('>>>>> Default_Drawee_Contact : Too Many rows');
193: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
194: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
195: END IF;
196:
197: WHEN OTHERS THEN
190: WHEN TOO_MANY_ROWS THEN
191: IF PG_DEBUG in ('Y', 'C') THEN
192: arp_util.debug('>>>>> Default_Drawee_Contact : Too Many rows');
193: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
194: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
195: END IF;
196:
197: WHEN OTHERS THEN
198: IF PG_DEBUG in ('Y', 'C') THEN
195: END IF;
196:
197: WHEN OTHERS THEN
198: IF PG_DEBUG in ('Y', 'C') THEN
199: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Contact () ');
200: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
201: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
202: END IF;
203: RAISE;
196:
197: WHEN OTHERS THEN
198: IF PG_DEBUG in ('Y', 'C') THEN
199: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Contact () ');
200: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
201: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
202: END IF;
203: RAISE;
204:
197: WHEN OTHERS THEN
198: IF PG_DEBUG in ('Y', 'C') THEN
199: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Contact () ');
200: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_id = ' || p_drawee_id );
201: arp_util.debug('Default_Drawee_Contact: ' || ' p_drawee_site_use_id = ' || p_drawee_site_use_id);
202: END IF;
203: RAISE;
204:
205: END Default_Drawee_Contact;
220:
221:
222: BEGIN
223: IF PG_DEBUG in ('Y', 'C') THEN
224: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option ()+');
225: END IF;
226:
227: SELECT default_printing_option
228: INTO p_printing_option
229: FROM RA_CUST_TRX_TYPES
230: WHERE cust_trx_type_id = p_cust_trx_type_id;
231:
232: IF PG_DEBUG in ('Y', 'C') THEN
233: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option ()-');
234: END IF;
235:
236: EXCEPTION
237: WHEN NO_DATA_FOUND THEN
235:
236: EXCEPTION
237: WHEN NO_DATA_FOUND THEN
238: IF PG_DEBUG in ('Y', 'C') THEN
239: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option () () ');
240: arp_util.debug('Default_Printing_Option: ' || '>>>>>>>>>> Invalid Transaction Type');
241: arp_util.debug('Default_Printing_Option: ' || ' p_cust_trx_type_id = ' || p_cust_trx_type_id);
242: END IF;
243: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_INVALID_TRX_TYPE');
236: EXCEPTION
237: WHEN NO_DATA_FOUND THEN
238: IF PG_DEBUG in ('Y', 'C') THEN
239: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option () () ');
240: arp_util.debug('Default_Printing_Option: ' || '>>>>>>>>>> Invalid Transaction Type');
241: arp_util.debug('Default_Printing_Option: ' || ' p_cust_trx_type_id = ' || p_cust_trx_type_id);
242: END IF;
243: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_INVALID_TRX_TYPE');
244: app_exception.raise_exception;
237: WHEN NO_DATA_FOUND THEN
238: IF PG_DEBUG in ('Y', 'C') THEN
239: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option () () ');
240: arp_util.debug('Default_Printing_Option: ' || '>>>>>>>>>> Invalid Transaction Type');
241: arp_util.debug('Default_Printing_Option: ' || ' p_cust_trx_type_id = ' || p_cust_trx_type_id);
242: END IF;
243: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_INVALID_TRX_TYPE');
244: app_exception.raise_exception;
245:
244: app_exception.raise_exception;
245:
246: WHEN OTHERS THEN
247: IF PG_DEBUG in ('Y', 'C') THEN
248: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option () ');
249: arp_util.debug('Default_Printing_Option: ' || ' p_cust_trx_type_id = ' || p_cust_trx_type_id);
250: END IF;
251: RAISE;
252:
245:
246: WHEN OTHERS THEN
247: IF PG_DEBUG in ('Y', 'C') THEN
248: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Printing_Option () ');
249: arp_util.debug('Default_Printing_Option: ' || ' p_cust_trx_type_id = ' || p_cust_trx_type_id);
250: END IF;
251: RAISE;
252:
253: END Default_Printing_Option;
270:
271: BEGIN
272: /* PAYMENT_UPTAKE */
273: IF PG_DEBUG in ('Y', 'C') THEN
274: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Account ()+');
275: arp_util.debug('Default_Drawee_Account: ' || '>>>>> No Drawee Account could be defaulted');
276: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Account ()-');
277: END IF;
278:
271: BEGIN
272: /* PAYMENT_UPTAKE */
273: IF PG_DEBUG in ('Y', 'C') THEN
274: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Account ()+');
275: arp_util.debug('Default_Drawee_Account: ' || '>>>>> No Drawee Account could be defaulted');
276: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Account ()-');
277: END IF;
278:
279: END Default_Drawee_Account;
272: /* PAYMENT_UPTAKE */
273: IF PG_DEBUG in ('Y', 'C') THEN
274: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Account ()+');
275: arp_util.debug('Default_Drawee_Account: ' || '>>>>> No Drawee Account could be defaulted');
276: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Drawee_Account ()-');
277: END IF;
278:
279: END Default_Drawee_Account;
280:
298:
299: BEGIN
300:
301: IF PG_DEBUG in ('Y', 'C') THEN
302: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Get_Payment_Schedule_Id()+ ');
303: END IF;
304:
305: SELECT payment_schedule_id
306: INTO p_payment_schedule_id
307: FROM ar_payment_schedules
308: WHERE customer_trx_id = p_customer_trx_id;
309:
310: IF PG_DEBUG in ('Y', 'C') THEN
311: arp_util.debug('Get_Payment_Schedule_ID: ' || 'Payment Schedule Id : ' || p_payment_schedule_id);
312: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Get_Payment_Schedule_Id()- ');
313: END IF;
314:
315: EXCEPTION
308: WHERE customer_trx_id = p_customer_trx_id;
309:
310: IF PG_DEBUG in ('Y', 'C') THEN
311: arp_util.debug('Get_Payment_Schedule_ID: ' || 'Payment Schedule Id : ' || p_payment_schedule_id);
312: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Get_Payment_Schedule_Id()- ');
313: END IF;
314:
315: EXCEPTION
316: WHEN NO_DATA_FOUND THEN
314:
315: EXCEPTION
316: WHEN NO_DATA_FOUND THEN
317: IF PG_DEBUG in ('Y', 'C') THEN
318: arp_util.debug('Get_Payment_Schedule_ID: ' || '>>>>> No Payment Schedule for the BR could found');
319: arp_util.debug('Get_Payment_Schedule_ID: ' || ' p_customer_trx_id = ' || p_customer_trx_id);
320: END IF;
321:
322: WHEN OTHERS THEN
315: EXCEPTION
316: WHEN NO_DATA_FOUND THEN
317: IF PG_DEBUG in ('Y', 'C') THEN
318: arp_util.debug('Get_Payment_Schedule_ID: ' || '>>>>> No Payment Schedule for the BR could found');
319: arp_util.debug('Get_Payment_Schedule_ID: ' || ' p_customer_trx_id = ' || p_customer_trx_id);
320: END IF;
321:
322: WHEN OTHERS THEN
323: IF PG_DEBUG in ('Y', 'C') THEN
320: END IF;
321:
322: WHEN OTHERS THEN
323: IF PG_DEBUG in ('Y', 'C') THEN
324: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Get_Payment_Schedule_Id () ');
325: arp_util.debug('Get_Payment_Schedule_ID: ' || ' p_customer_trx_id = ' || p_customer_trx_id);
326: END IF;
327: RAISE;
328:
321:
322: WHEN OTHERS THEN
323: IF PG_DEBUG in ('Y', 'C') THEN
324: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Get_Payment_Schedule_Id () ');
325: arp_util.debug('Get_Payment_Schedule_ID: ' || ' p_customer_trx_id = ' || p_customer_trx_id);
326: END IF;
327: RAISE;
328:
329: END Get_Payment_Schedule_Id;
345: IS
346: BEGIN
347:
348: IF PG_DEBUG in ('Y', 'C') THEN
349: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Check_Header_Mandatory_Data ()+ ');
350: END IF;
351:
352: IF (p_trx_rec.batch_source_id IS NULL) THEN
353: IF PG_DEBUG in ('Y', 'C') THEN
350: END IF;
351:
352: IF (p_trx_rec.batch_source_id IS NULL) THEN
353: IF PG_DEBUG in ('Y', 'C') THEN
354: arp_util.debug('Check_Header_Mandatory_Data: ' || '>>>>>>>>>> Batch Source Missing');
355: END IF;
356: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_BATCH_SOURCE_NULL');
357: app_exception.raise_exception;
358: END IF;
359:
360:
361: IF (p_trx_rec.cust_trx_type_id IS NULL) THEN
362: IF PG_DEBUG in ('Y', 'C') THEN
363: arp_util.debug('Check_Header_Mandatory_Data: ' || '>>>>>>>>>> Transaction Type Missing');
364: END IF;
365: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_TRX_TYPE_NULL');
366: app_exception.raise_exception;
367: END IF;
368:
369:
370: IF (p_trx_rec.invoice_currency_code IS NULL) THEN
371: IF PG_DEBUG in ('Y', 'C') THEN
372: arp_util.debug('Check_Header_Mandatory_Data: ' || '>>>>>>>>>> Currency Code Missing');
373: END IF;
374: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_CURRENCY_NULL');
375: app_exception.raise_exception;
376: END IF;
377:
378:
379: IF (p_trx_rec.drawee_id IS NULL) THEN
380: IF PG_DEBUG in ('Y', 'C') THEN
381: arp_util.debug('Check_Header_Mandatory_Data: ' || '>>>>>>>>>> Drawee Id Missing');
382: END IF;
383: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_DRAWEE_ID_NULL');
384: app_exception.raise_exception;
385: END IF;
385: END IF;
386:
387: IF (p_trx_rec.legal_entity_id IS NULL) THEN
388: IF PG_DEBUG in ('Y', 'C') THEN
389: arp_util.debug('Check_Header_Mandatory_Data: ' || '>>>>>>>>>> Legal Entity Id Missing');
390: END IF;
391: FND_MESSAGE.SET_NAME ('AR', 'AR_LE_NAME_MANDATORY');
392: app_exception.raise_exception;
393: END IF;
392: app_exception.raise_exception;
393: END IF;
394:
395: IF PG_DEBUG in ('Y', 'C') THEN
396: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Check_Header_Mandatory_Data ()- ');
397: END IF;
398:
399: EXCEPTION
400: WHEN OTHERS THEN
398:
399: EXCEPTION
400: WHEN OTHERS THEN
401: IF PG_DEBUG in ('Y', 'C') THEN
402: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Check_Header_Mandatory_Data () ');
403: END IF;
404: RAISE;
405:
406: END Check_Header_Mandatory_Data;
437:
438: l_flex_name fnd_descriptive_flexs.descriptive_flexfield_name%type;
439: l_count NUMBER;
440: l_col_name VARCHAR2(50);
441: p_desc_flex_rec arp_util.attribute_rec_type;
442: l_return_status VARCHAR2(1);
443:
444:
445: BEGIN
444:
445: BEGIN
446:
447: IF PG_DEBUG in ('Y', 'C') THEN
448: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Validate_Desc_Flexfield ()+');
449: END IF;
450:
451: p_desc_flex_rec.attribute_category := p_attribute_category ;
452: p_desc_flex_rec.attribute1 := p_attribute1 ;
464: p_desc_flex_rec.attribute13 := p_attribute13 ;
465: p_desc_flex_rec.attribute14 := p_attribute14 ;
466: p_desc_flex_rec.attribute15 := p_attribute15 ;
467:
468: arp_util.Validate_Desc_Flexfield ( p_desc_flex_rec ,
469: p_desc_flex_name,
470: l_return_status );
471:
472: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
471:
472: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
473: THEN
474: IF PG_DEBUG in ('Y', 'C') THEN
475: arp_util.debug ('Validate_Desc_Flexfield: ' || '>>>>>>>>>> Flexfield Invalid : ' || p_desc_flex_name);
476: END IF;
477: FND_MESSAGE.SET_NAME ('AR' , 'AR_RAPI_DESC_FLEX_INVALID');
478: FND_MESSAGE.SET_TOKEN ('DFF_NAME', p_desc_flex_name);
479: app_exception.raise_exception;
496: p_attribute14 := p_desc_flex_rec.attribute14 ;
497: p_attribute15 := p_desc_flex_rec.attribute15 ;
498:
499: IF PG_DEBUG in ('Y', 'C') THEN
500: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Validate_Desc_Flexfield()-');
501: END IF;
502:
503: EXCEPTION
504: WHEN OTHERS THEN
502:
503: EXCEPTION
504: WHEN OTHERS THEN
505: IF PG_DEBUG in ('Y', 'C') THEN
506: arp_util.debug('EXCEPTION: AR_BILLS_CREATION_LIB_PVT.Validate_Desc_Flexfield');
507: END IF;
508: RAISE;
509:
510: END Validate_Desc_Flexfield;
531:
532: BEGIN
533:
534: IF PG_DEBUG in ('Y', 'C') THEN
535: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Create_BR_Header()+ ');
536: END IF;
537:
538:
539: Check_Header_Mandatory_Data (p_trx_rec);
579: IF AR_BILLS_MAINTAIN_STATUS_PUB.Is_Acceptance_Required(p_trx_rec.cust_trx_type_id)
580: THEN
581: Default_gl_date (sysdate, p_gl_date, l_return_status);
582: IF PG_DEBUG in ('Y', 'C') THEN
583: arp_util.debug('Default_Create_BR_Header: ' || 'l_default_gl_date_return_status : ' || l_return_status);
584: arp_util.debug('Default_Create_BR_Header: ' || 'GL Date defaulted : ' || p_gl_date);
585: END IF;
586: END IF;
587:
580: THEN
581: Default_gl_date (sysdate, p_gl_date, l_return_status);
582: IF PG_DEBUG in ('Y', 'C') THEN
583: arp_util.debug('Default_Create_BR_Header: ' || 'l_default_gl_date_return_status : ' || l_return_status);
584: arp_util.debug('Default_Create_BR_Header: ' || 'GL Date defaulted : ' || p_gl_date);
585: END IF;
586: END IF;
587:
588: ----------------------------------------------------------------------*/
619: IF (p_trx_rec.created_from not in ('ARBRMAIN', 'ARBRMAIB'))
620: THEN
621:
622: IF PG_DEBUG in ('Y', 'C') THEN
623: arp_util.debug('Default_Create_BR_Header: ' || 'Auto Creation Program Defaulting');
624: END IF;
625:
626:
627: /*----------------------------------------------+
697: END IF;
698:
699:
700: IF PG_DEBUG in ('Y', 'C') THEN
701: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Create_BR_Header ()-');
702: END IF;
703:
704: EXCEPTION
705: WHEN OTHERS THEN
703:
704: EXCEPTION
705: WHEN OTHERS THEN
706: IF PG_DEBUG in ('Y', 'C') THEN
707: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Create_BR_Header () ');
708: END IF;
709: RAISE;
710:
711:
728:
729: BEGIN
730:
731: IF PG_DEBUG in ('Y', 'C') THEN
732: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Update_BR_Header()+ ');
733: END IF;
734:
735: /*----------------------------------------------+
736: | Default the Batch Source ID |
742: WHERE customer_trx_id = p_trx_rec.customer_trx_id;
743:
744:
745: IF PG_DEBUG in ('Y', 'C') THEN
746: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Update_BR_Header()- ');
747: END IF;
748:
749: EXCEPTION
750: WHEN NO_DATA_FOUND THEN
748:
749: EXCEPTION
750: WHEN NO_DATA_FOUND THEN
751: IF PG_DEBUG in ('Y', 'C') THEN
752: arp_util.debug('Default_Update_BR_Header: ' || '>>>>> No Batch Source could be defaulted for the BR');
753: END IF;
754:
755: WHEN OTHERS THEN
756: IF PG_DEBUG in ('Y', 'C') THEN
753: END IF;
754:
755: WHEN OTHERS THEN
756: IF PG_DEBUG in ('Y', 'C') THEN
757: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Update_BR_Header () ');
758: END IF;
759: RAISE;
760:
761: END Default_Update_BR_Header;
783: l_count NUMBER;
784:
785: BEGIN
786: IF PG_DEBUG in ('Y', 'C') THEN
787: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Create_BR_Assignment()+ ');
788: END IF;
789:
790: /*----------------------------------------------+
791: | Check that the transaction is not already |
800:
801: IF (l_count > 0)
802: THEN
803: IF PG_DEBUG in ('Y', 'C') THEN
804: arp_util.debug ('Default_Create_BR_Assignment: ' || 'The transaction is already assigned to the BR');
805: END IF;
806: FND_MESSAGE.SET_NAME ('AR', 'AR_BR_TRX_ASSIGNED_BR');
807: FND_MESSAGE.SET_TOKEN ('TRXNUM', p_ps_rec.trx_number);
808: app_exception.raise_exception;
816: IF (p_trl_rec.extended_amount IS NULL) THEN
817: p_trl_rec.extended_amount := p_ps_rec.amount_due_remaining;
818: p_trl_rec.extended_acctd_amount := p_ps_rec.acctd_amount_due_remaining;
819: IF PG_DEBUG in ('Y', 'C') THEN
820: arp_util.debug('Default_Create_BR_Assignment: ' || 'Amount Defaulted : ' || p_trl_rec.extended_amount);
821: arp_util.debug('Default_Create_BR_Assignment: ' || 'Acctd Amount Defaulted : ' || p_trl_rec.extended_acctd_amount);
822: END IF;
823: END IF;
824:
817: p_trl_rec.extended_amount := p_ps_rec.amount_due_remaining;
818: p_trl_rec.extended_acctd_amount := p_ps_rec.acctd_amount_due_remaining;
819: IF PG_DEBUG in ('Y', 'C') THEN
820: arp_util.debug('Default_Create_BR_Assignment: ' || 'Amount Defaulted : ' || p_trl_rec.extended_amount);
821: arp_util.debug('Default_Create_BR_Assignment: ' || 'Acctd Amount Defaulted : ' || p_trl_rec.extended_acctd_amount);
822: END IF;
823: END IF;
824:
825:
830: p_trl_rec.br_ref_customer_trx_id := p_ps_rec.customer_trx_id;
831:
832:
833: IF PG_DEBUG in ('Y', 'C') THEN
834: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.Default_Create_BR_Assignment()-');
835: END IF;
836:
837: EXCEPTION
838: WHEN OTHERS THEN
836:
837: EXCEPTION
838: WHEN OTHERS THEN
839: IF PG_DEBUG in ('Y', 'C') THEN
840: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.Default_Create_BR_Assignment () ');
841: END IF;
842: RAISE;
843:
844: END Default_Create_BR_Assignment;
869: l_msg_data VARCHAR2(2000);
870:
871: BEGIN
872: IF PG_DEBUG in ('Y', 'C') THEN
873: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.DeAssign_BR()+ ');
874: END IF;
875:
876: FOR assignment_rec IN assignment_cur LOOP
877:
885:
886: IF (l_return_status <> 'S')
887: THEN
888: IF PG_DEBUG in ('Y', 'C') THEN
889: arp_util.debug('DeAssign_BR: ' || '>>>>>>>>>> Problems during BR deassignment');
890: arp_util.debug('DeAssign_BR: ' || 'l_return_status : ' || l_return_status);
891: END IF;
892: app_exception.raise_exception;
893: END IF;
886: IF (l_return_status <> 'S')
887: THEN
888: IF PG_DEBUG in ('Y', 'C') THEN
889: arp_util.debug('DeAssign_BR: ' || '>>>>>>>>>> Problems during BR deassignment');
890: arp_util.debug('DeAssign_BR: ' || 'l_return_status : ' || l_return_status);
891: END IF;
892: app_exception.raise_exception;
893: END IF;
894:
894:
895: END LOOP;
896:
897: IF PG_DEBUG in ('Y', 'C') THEN
898: arp_util.debug('AR_BILLS_CREATION_LIB_PVT.DeAssign_BR()- ');
899: END IF;
900:
901: EXCEPTION
902: WHEN OTHERS THEN
900:
901: EXCEPTION
902: WHEN OTHERS THEN
903: IF PG_DEBUG in ('Y', 'C') THEN
904: arp_util.debug('>>>>>>>>>> EXCEPTION : AR_BILLS_CREATION_LIB_PVT.DeAssign_BR () ');
905: END IF;
906: IF (assignment_cur%ISOPEN)
907: THEN
908: CLOSE assignment_cur;