186: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
187: arp_standard.debug('Debug Info: ' || l_debug_info);
188: arp_standard.debug(SQLERRM);
189: END IF;
190: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
192: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
193: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
194: FND_MSG_PUB.ADD;
187: arp_standard.debug('Debug Info: ' || l_debug_info);
188: arp_standard.debug(SQLERRM);
189: END IF;
190: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
192: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
193: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
194: FND_MSG_PUB.ADD;
195: InformSysAdminError(p_procedure_name => l_procedure_name,
188: arp_standard.debug(SQLERRM);
189: END IF;
190: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
192: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
193: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
194: FND_MSG_PUB.ADD;
195: InformSysAdminError(p_procedure_name => l_procedure_name,
196: p_debug_info => l_debug_info,
189: END IF;
190: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
192: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
193: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
194: FND_MSG_PUB.ADD;
195: InformSysAdminError(p_procedure_name => l_procedure_name,
196: p_debug_info => l_debug_info,
197: p_error => SQLERRM);
260:
261: ----------------------------------------------------------------------------
262: l_debug_info := 'Retrieve Application Name';
263: ----------------------------------------------------------------------------
264: FND_MESSAGE.Set_Name('AR', 'ARI_REG_APP_NAME');
265: l_app_name := FND_MESSAGE.Get;
266:
267: ----------------------------------------------------------------------------
268: l_debug_info := 'Check if the registration service code passed in is valid';
261: ----------------------------------------------------------------------------
262: l_debug_info := 'Retrieve Application Name';
263: ----------------------------------------------------------------------------
264: FND_MESSAGE.Set_Name('AR', 'ARI_REG_APP_NAME');
265: l_app_name := FND_MESSAGE.Get;
266:
267: ----------------------------------------------------------------------------
268: l_debug_info := 'Check if the registration service code passed in is valid';
269: ----------------------------------------------------------------------------
275: AND REGSRVC.START_DATE <= SYSDATE
276: AND NVL(REGSRVC.END_DATE, SYSDATE+1) > SYSDATE;
277: EXCEPTION
278: WHEN OTHERS THEN
279: FND_MESSAGE.SET_NAME ('AR','ARI_REG_PROCESS_TYPE_ERROR');
280: FND_MESSAGE.SET_TOKEN('REG_PROCESS', p_reg_service_code);
281: FND_MSG_PUB.ADD;
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END;
276: AND NVL(REGSRVC.END_DATE, SYSDATE+1) > SYSDATE;
277: EXCEPTION
278: WHEN OTHERS THEN
279: FND_MESSAGE.SET_NAME ('AR','ARI_REG_PROCESS_TYPE_ERROR');
280: FND_MESSAGE.SET_TOKEN('REG_PROCESS', p_reg_service_code);
281: FND_MSG_PUB.ADD;
282: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
283: END;
284:
283: END;
284:
285: --Reg Service Type should be SELF_SERVICE when calling from Collections
286: IF l_reg_service_type <> 'SELF_SERVICE' THEN
287: FND_MESSAGE.SET_NAME ('AR','ARI_REG_PROCESS_TYPE_ERROR');
288: FND_MESSAGE.SET_TOKEN('REG_PROCESS', p_reg_service_code);
289: FND_MSG_PUB.ADD;
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
291: END IF;
284:
285: --Reg Service Type should be SELF_SERVICE when calling from Collections
286: IF l_reg_service_type <> 'SELF_SERVICE' THEN
287: FND_MESSAGE.SET_NAME ('AR','ARI_REG_PROCESS_TYPE_ERROR');
288: FND_MESSAGE.SET_TOKEN('REG_PROCESS', p_reg_service_code);
289: FND_MSG_PUB.ADD;
290: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
291: END IF;
292:
385: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
386: arp_standard.debug('Debug Info: ' || l_debug_info);
387: arp_standard.debug(SQLERRM);
388: END IF;
389: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
391: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
392: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
393: FND_MSG_PUB.ADD;
386: arp_standard.debug('Debug Info: ' || l_debug_info);
387: arp_standard.debug(SQLERRM);
388: END IF;
389: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
391: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
392: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
393: FND_MSG_PUB.ADD;
394: InformSysAdminError(p_procedure_name => l_procedure_name,
387: arp_standard.debug(SQLERRM);
388: END IF;
389: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
391: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
392: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
393: FND_MSG_PUB.ADD;
394: InformSysAdminError(p_procedure_name => l_procedure_name,
395: p_debug_info => l_debug_info,
388: END IF;
389: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
390: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
391: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
392: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
393: FND_MSG_PUB.ADD;
394: InformSysAdminError(p_procedure_name => l_procedure_name,
395: p_debug_info => l_debug_info,
396: p_error => SQLERRM);
451: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
452: arp_standard.debug('Debug Info: ' || l_debug_info);
453: arp_standard.debug(SQLERRM);
454: END IF;
455: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
456: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
457: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
458: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
459: FND_MSG_PUB.ADD;
452: arp_standard.debug('Debug Info: ' || l_debug_info);
453: arp_standard.debug(SQLERRM);
454: END IF;
455: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
456: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
457: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
458: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
459: FND_MSG_PUB.ADD;
460: InformSysAdminError(p_procedure_name => l_procedure_name,
453: arp_standard.debug(SQLERRM);
454: END IF;
455: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
456: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
457: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
458: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
459: FND_MSG_PUB.ADD;
460: InformSysAdminError(p_procedure_name => l_procedure_name,
461: p_debug_info => l_debug_info,
454: END IF;
455: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
456: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
457: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
458: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
459: FND_MSG_PUB.ADD;
460: InformSysAdminError(p_procedure_name => l_procedure_name,
461: p_debug_info => l_debug_info,
462: p_error => SQLERRM);
495: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
496: arp_standard.debug('Debug Info: ' || l_debug_info);
497: arp_standard.debug(SQLERRM);
498: END IF;
499: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
500: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
501: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
502: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
503: FND_MSG_PUB.ADD;
496: arp_standard.debug('Debug Info: ' || l_debug_info);
497: arp_standard.debug(SQLERRM);
498: END IF;
499: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
500: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
501: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
502: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
503: FND_MSG_PUB.ADD;
504: END IF;
497: arp_standard.debug(SQLERRM);
498: END IF;
499: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
500: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
501: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
502: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
503: FND_MSG_PUB.ADD;
504: END IF;
505: APP_EXCEPTION.RAISE_EXCEPTION;
498: END IF;
499: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
500: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
501: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
502: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
503: FND_MSG_PUB.ADD;
504: END IF;
505: APP_EXCEPTION.RAISE_EXCEPTION;
506: END InformSysAdminError;
602: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
603: arp_standard.debug('Debug Info: ' || l_debug_info);
604: arp_standard.debug(SQLERRM);
605: END IF;
606: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
607: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
608: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
609: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
610: FND_MSG_PUB.ADD;
603: arp_standard.debug('Debug Info: ' || l_debug_info);
604: arp_standard.debug(SQLERRM);
605: END IF;
606: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
607: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
608: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
609: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
610: FND_MSG_PUB.ADD;
611: InformSysAdminError(p_procedure_name => l_procedure_name,
604: arp_standard.debug(SQLERRM);
605: END IF;
606: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
607: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
608: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
609: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
610: FND_MSG_PUB.ADD;
611: InformSysAdminError(p_procedure_name => l_procedure_name,
612: p_debug_info => l_debug_info,
605: END IF;
606: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
607: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
608: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
609: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
610: FND_MSG_PUB.ADD;
611: InformSysAdminError(p_procedure_name => l_procedure_name,
612: p_debug_info => l_debug_info,
613: p_error => SQLERRM);
658: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
659: arp_standard.debug('ERROR =>'|| SQLERRM);
660: END IF;
661:
662: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
663: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
664: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
665: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
666: FND_MSG_PUB.ADD;
659: arp_standard.debug('ERROR =>'|| SQLERRM);
660: END IF;
661:
662: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
663: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
664: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
665: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
666: FND_MSG_PUB.ADD;
667:
660: END IF;
661:
662: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
663: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
664: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
665: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
666: FND_MSG_PUB.ADD;
667:
668:
661:
662: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
663: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
664: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
665: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
666: FND_MSG_PUB.ADD;
667:
668:
669: END;
753: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
754: arp_standard.debug('Debug Info: ' || l_debug_info);
755: arp_standard.debug(SQLERRM);
756: END IF;
757: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
758: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
759: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
760: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
761: FND_MSG_PUB.ADD;
754: arp_standard.debug('Debug Info: ' || l_debug_info);
755: arp_standard.debug(SQLERRM);
756: END IF;
757: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
758: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
759: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
760: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
761: FND_MSG_PUB.ADD;
762: InformSysAdminError(p_procedure_name => l_procedure_name,
755: arp_standard.debug(SQLERRM);
756: END IF;
757: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
758: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
759: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
760: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
761: FND_MSG_PUB.ADD;
762: InformSysAdminError(p_procedure_name => l_procedure_name,
763: p_debug_info => l_debug_info,
756: END IF;
757: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
758: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
759: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
760: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
761: FND_MSG_PUB.ADD;
762: InformSysAdminError(p_procedure_name => l_procedure_name,
763: p_debug_info => l_debug_info,
764: p_error => SQLERRM);
1219: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1220: arp_standard.debug('Debug Info: ' || l_debug_info);
1221: arp_standard.debug(SQLERRM);
1222: END IF;
1223: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1224: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1225: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1226: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1227: FND_MSG_PUB.ADD;
1220: arp_standard.debug('Debug Info: ' || l_debug_info);
1221: arp_standard.debug(SQLERRM);
1222: END IF;
1223: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1224: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1225: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1226: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1227: FND_MSG_PUB.ADD;
1228: InformSysAdminError(p_procedure_name => l_procedure_name,
1221: arp_standard.debug(SQLERRM);
1222: END IF;
1223: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1224: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1225: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1226: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1227: FND_MSG_PUB.ADD;
1228: InformSysAdminError(p_procedure_name => l_procedure_name,
1229: p_debug_info => l_debug_info,
1222: END IF;
1223: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1224: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1225: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1226: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1227: FND_MSG_PUB.ADD;
1228: InformSysAdminError(p_procedure_name => l_procedure_name,
1229: p_debug_info => l_debug_info,
1230: p_error => SQLERRM);
1511: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1512: arp_standard.debug('Debug Info: ' || l_debug_info);
1513: arp_standard.debug(SQLERRM);
1514: END IF;
1515: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1516: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1517: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1518: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1519: FND_MSG_PUB.ADD;
1512: arp_standard.debug('Debug Info: ' || l_debug_info);
1513: arp_standard.debug(SQLERRM);
1514: END IF;
1515: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1516: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1517: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1518: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1519: FND_MSG_PUB.ADD;
1520: InformSysAdminError(p_procedure_name => l_procedure_name,
1513: arp_standard.debug(SQLERRM);
1514: END IF;
1515: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1516: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1517: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1518: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1519: FND_MSG_PUB.ADD;
1520: InformSysAdminError(p_procedure_name => l_procedure_name,
1521: p_debug_info => l_debug_info,
1514: END IF;
1515: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1516: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1517: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1518: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1519: FND_MSG_PUB.ADD;
1520: InformSysAdminError(p_procedure_name => l_procedure_name,
1521: p_debug_info => l_debug_info,
1522: p_error => SQLERRM);
1826: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
1827: arp_standard.debug('Debug Info: ' || l_debug_info);
1828: arp_standard.debug(SQLERRM);
1829: END IF;
1830: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1831: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1832: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1833: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1834: FND_MSG_PUB.ADD;
1827: arp_standard.debug('Debug Info: ' || l_debug_info);
1828: arp_standard.debug(SQLERRM);
1829: END IF;
1830: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1831: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1832: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1833: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1834: FND_MSG_PUB.ADD;
1835: InformSysAdminError(p_procedure_name => l_procedure_name,
1828: arp_standard.debug(SQLERRM);
1829: END IF;
1830: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1831: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1832: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1833: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1834: FND_MSG_PUB.ADD;
1835: InformSysAdminError(p_procedure_name => l_procedure_name,
1836: p_debug_info => l_debug_info,
1829: END IF;
1830: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
1831: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
1832: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
1833: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1834: FND_MSG_PUB.ADD;
1835: InformSysAdminError(p_procedure_name => l_procedure_name,
1836: p_debug_info => l_debug_info,
1837: p_error => SQLERRM);
2043: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
2044: arp_standard.debug('Debug Info: ' || l_debug_info);
2045: arp_standard.debug(SQLERRM);
2046: END IF;
2047: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2048: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2049: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2050: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2051: FND_MSG_PUB.ADD;
2044: arp_standard.debug('Debug Info: ' || l_debug_info);
2045: arp_standard.debug(SQLERRM);
2046: END IF;
2047: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2048: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2049: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2050: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2051: FND_MSG_PUB.ADD;
2052: InformSysAdminError(p_procedure_name => l_procedure_name,
2045: arp_standard.debug(SQLERRM);
2046: END IF;
2047: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2048: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2049: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2050: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2051: FND_MSG_PUB.ADD;
2052: InformSysAdminError(p_procedure_name => l_procedure_name,
2053: p_debug_info => l_debug_info,
2046: END IF;
2047: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2048: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2049: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2050: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2051: FND_MSG_PUB.ADD;
2052: InformSysAdminError(p_procedure_name => l_procedure_name,
2053: p_debug_info => l_debug_info,
2054: p_error => SQLERRM);
2180: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
2181: arp_standard.debug('Debug Info: ' || l_debug_info);
2182: arp_standard.debug(SQLERRM);
2183: END IF;
2184: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2185: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2186: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2187: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2188: FND_MSG_PUB.ADD;
2181: arp_standard.debug('Debug Info: ' || l_debug_info);
2182: arp_standard.debug(SQLERRM);
2183: END IF;
2184: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2185: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2186: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2187: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2188: FND_MSG_PUB.ADD;
2189: InformSysAdminError(p_procedure_name => l_procedure_name,
2182: arp_standard.debug(SQLERRM);
2183: END IF;
2184: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2185: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2186: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2187: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2188: FND_MSG_PUB.ADD;
2189: InformSysAdminError(p_procedure_name => l_procedure_name,
2190: p_debug_info => l_debug_info,
2183: END IF;
2184: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
2185: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
2186: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
2187: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2188: FND_MSG_PUB.ADD;
2189: InformSysAdminError(p_procedure_name => l_procedure_name,
2190: p_debug_info => l_debug_info,
2191: p_error => SQLERRM);
3380: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3381: arp_standard.debug('Debug Info: ' || l_debug_info);
3382: arp_standard.debug(SQLERRM);
3383: END IF;
3384: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3385: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3386: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3387: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3388: FND_MSG_PUB.ADD;
3381: arp_standard.debug('Debug Info: ' || l_debug_info);
3382: arp_standard.debug(SQLERRM);
3383: END IF;
3384: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3385: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3386: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3387: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3388: FND_MSG_PUB.ADD;
3389: InformSysAdminError(p_procedure_name => l_procedure_name,
3382: arp_standard.debug(SQLERRM);
3383: END IF;
3384: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3385: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3386: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3387: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3388: FND_MSG_PUB.ADD;
3389: InformSysAdminError(p_procedure_name => l_procedure_name,
3390: p_debug_info => l_debug_info,
3383: END IF;
3384: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3385: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3386: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3387: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3388: FND_MSG_PUB.ADD;
3389: InformSysAdminError(p_procedure_name => l_procedure_name,
3390: p_debug_info => l_debug_info,
3391: p_error => SQLERRM);
3485: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3486: arp_standard.debug('Debug Info: ' || l_debug_info);
3487: arp_standard.debug(SQLERRM);
3488: END IF;
3489: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3490: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3491: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3492: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3493: FND_MSG_PUB.ADD;
3486: arp_standard.debug('Debug Info: ' || l_debug_info);
3487: arp_standard.debug(SQLERRM);
3488: END IF;
3489: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3490: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3491: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3492: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3493: FND_MSG_PUB.ADD;
3494: InformSysAdminError(p_procedure_name => l_procedure_name,
3487: arp_standard.debug(SQLERRM);
3488: END IF;
3489: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3490: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3491: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3492: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3493: FND_MSG_PUB.ADD;
3494: InformSysAdminError(p_procedure_name => l_procedure_name,
3495: p_debug_info => l_debug_info,
3488: END IF;
3489: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3490: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3491: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3492: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3493: FND_MSG_PUB.ADD;
3494: InformSysAdminError(p_procedure_name => l_procedure_name,
3495: p_debug_info => l_debug_info,
3496: p_error => SQLERRM);
3533: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3534: arp_standard.debug('Debug Info: ' || l_debug_info);
3535: arp_standard.debug(SQLERRM);
3536: END IF;
3537: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3538: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3539: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3540: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3541: FND_MSG_PUB.ADD;
3534: arp_standard.debug('Debug Info: ' || l_debug_info);
3535: arp_standard.debug(SQLERRM);
3536: END IF;
3537: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3538: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3539: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3540: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3541: FND_MSG_PUB.ADD;
3542: InformSysAdminError(p_procedure_name => l_procedure_name,
3535: arp_standard.debug(SQLERRM);
3536: END IF;
3537: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3538: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3539: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3540: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3541: FND_MSG_PUB.ADD;
3542: InformSysAdminError(p_procedure_name => l_procedure_name,
3543: p_debug_info => l_debug_info,
3536: END IF;
3537: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3538: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3539: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3540: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3541: FND_MSG_PUB.ADD;
3542: InformSysAdminError(p_procedure_name => l_procedure_name,
3543: p_debug_info => l_debug_info,
3544: p_error => SQLERRM);
3651: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3652: arp_standard.debug('Debug Info: ' || l_debug_info);
3653: arp_standard.debug(SQLERRM);
3654: END IF;
3655: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3657: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3658: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3659: FND_MSG_PUB.ADD;
3652: arp_standard.debug('Debug Info: ' || l_debug_info);
3653: arp_standard.debug(SQLERRM);
3654: END IF;
3655: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3657: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3658: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3659: FND_MSG_PUB.ADD;
3660: InformSysAdminError(p_procedure_name => l_procedure_name,
3653: arp_standard.debug(SQLERRM);
3654: END IF;
3655: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3657: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3658: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3659: FND_MSG_PUB.ADD;
3660: InformSysAdminError(p_procedure_name => l_procedure_name,
3661: p_debug_info => l_debug_info,
3654: END IF;
3655: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3656: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3657: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3658: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3659: FND_MSG_PUB.ADD;
3660: InformSysAdminError(p_procedure_name => l_procedure_name,
3661: p_debug_info => l_debug_info,
3662: p_error => SQLERRM);
3709: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3710: arp_standard.debug('Debug Info: ' || l_debug_info);
3711: arp_standard.debug(SQLERRM);
3712: END IF;
3713: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3714: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3715: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3716: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3717: FND_MSG_PUB.ADD;
3710: arp_standard.debug('Debug Info: ' || l_debug_info);
3711: arp_standard.debug(SQLERRM);
3712: END IF;
3713: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3714: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3715: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3716: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3717: FND_MSG_PUB.ADD;
3718: InformSysAdminError(p_procedure_name => l_procedure_name,
3711: arp_standard.debug(SQLERRM);
3712: END IF;
3713: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3714: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3715: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3716: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3717: FND_MSG_PUB.ADD;
3718: InformSysAdminError(p_procedure_name => l_procedure_name,
3719: p_debug_info => l_debug_info,
3712: END IF;
3713: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3714: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3715: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3716: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3717: FND_MSG_PUB.ADD;
3718: InformSysAdminError(p_procedure_name => l_procedure_name,
3719: p_debug_info => l_debug_info,
3720: p_error => SQLERRM);
3749: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3750: arp_standard.debug('Debug Info: ' || l_debug_info);
3751: arp_standard.debug(SQLERRM);
3752: END IF;
3753: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3754: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3755: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3756: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3757: FND_MSG_PUB.ADD;
3750: arp_standard.debug('Debug Info: ' || l_debug_info);
3751: arp_standard.debug(SQLERRM);
3752: END IF;
3753: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3754: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3755: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3756: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3757: FND_MSG_PUB.ADD;
3758: InformSysAdminError(p_procedure_name => l_procedure_name,
3751: arp_standard.debug(SQLERRM);
3752: END IF;
3753: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3754: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3755: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3756: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3757: FND_MSG_PUB.ADD;
3758: InformSysAdminError(p_procedure_name => l_procedure_name,
3759: p_debug_info => l_debug_info,
3752: END IF;
3753: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3754: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3755: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3756: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3757: FND_MSG_PUB.ADD;
3758: InformSysAdminError(p_procedure_name => l_procedure_name,
3759: p_debug_info => l_debug_info,
3760: p_error => SQLERRM);
3791: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3792: arp_standard.debug('Debug Info: ' || l_debug_info);
3793: arp_standard.debug(SQLERRM);
3794: END IF;
3795: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3796: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3797: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3799: FND_MSG_PUB.ADD;
3792: arp_standard.debug('Debug Info: ' || l_debug_info);
3793: arp_standard.debug(SQLERRM);
3794: END IF;
3795: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3796: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3797: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3799: FND_MSG_PUB.ADD;
3800: InformSysAdminError(p_procedure_name => l_procedure_name,
3793: arp_standard.debug(SQLERRM);
3794: END IF;
3795: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3796: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3797: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3799: FND_MSG_PUB.ADD;
3800: InformSysAdminError(p_procedure_name => l_procedure_name,
3801: p_debug_info => l_debug_info,
3794: END IF;
3795: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3796: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3797: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3798: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3799: FND_MSG_PUB.ADD;
3800: InformSysAdminError(p_procedure_name => l_procedure_name,
3801: p_debug_info => l_debug_info,
3802: p_error => SQLERRM);
3831: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3832: arp_standard.debug('Debug Info: ' || l_debug_info);
3833: arp_standard.debug(SQLERRM);
3834: END IF;
3835: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3836: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3837: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3838: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3839: FND_MSG_PUB.ADD;
3832: arp_standard.debug('Debug Info: ' || l_debug_info);
3833: arp_standard.debug(SQLERRM);
3834: END IF;
3835: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3836: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3837: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3838: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3839: FND_MSG_PUB.ADD;
3840: InformSysAdminError(p_procedure_name => l_procedure_name,
3833: arp_standard.debug(SQLERRM);
3834: END IF;
3835: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3836: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3837: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3838: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3839: FND_MSG_PUB.ADD;
3840: InformSysAdminError(p_procedure_name => l_procedure_name,
3841: p_debug_info => l_debug_info,
3834: END IF;
3835: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3836: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3837: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3838: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3839: FND_MSG_PUB.ADD;
3840: InformSysAdminError(p_procedure_name => l_procedure_name,
3841: p_debug_info => l_debug_info,
3842: p_error => SQLERRM);
3887: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3888: arp_standard.debug('Debug Info: ' || l_debug_info);
3889: arp_standard.debug(SQLERRM);
3890: END IF;
3891: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3892: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3893: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3894: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3895: FND_MSG_PUB.ADD;
3888: arp_standard.debug('Debug Info: ' || l_debug_info);
3889: arp_standard.debug(SQLERRM);
3890: END IF;
3891: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3892: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3893: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3894: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3895: FND_MSG_PUB.ADD;
3896: InformSysAdminError(p_procedure_name => l_procedure_name,
3889: arp_standard.debug(SQLERRM);
3890: END IF;
3891: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3892: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3893: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3894: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3895: FND_MSG_PUB.ADD;
3896: InformSysAdminError(p_procedure_name => l_procedure_name,
3897: p_debug_info => l_debug_info,
3890: END IF;
3891: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3892: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3893: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3894: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
3895: FND_MSG_PUB.ADD;
3896: InformSysAdminError(p_procedure_name => l_procedure_name,
3897: p_debug_info => l_debug_info,
3898: p_error => SQLERRM);
3924:
3925: --------------------------------------------------------------------
3926: l_debug_info := 'Retrieve Login URL';
3927: -------------------------------------------------------------------
3928: FND_MESSAGE.Set_Name('AR','ARI_REG_APPLICATION_LOGIN_URL');
3929:
3930: l_url := FND_MESSAGE.Get;
3931:
3932: ---------------------------------------------------------------------------
3926: l_debug_info := 'Retrieve Login URL';
3927: -------------------------------------------------------------------
3928: FND_MESSAGE.Set_Name('AR','ARI_REG_APPLICATION_LOGIN_URL');
3929:
3930: l_url := FND_MESSAGE.Get;
3931:
3932: ---------------------------------------------------------------------------
3933: l_debug_info := 'Set Login Url to access current application';
3934: ----------------------------------------------------------------------------
3969:
3970: EXCEPTION
3971: WHEN OTHERS THEN
3972: IF (SQLCODE = -20001) THEN
3973: l_error_msg := FND_MESSAGE.Get;
3974: ELSE
3975: l_error_msg := l_debug_info || 'error: ' || SQLERRM;
3976: END IF;
3977:
3975: l_error_msg := l_debug_info || 'error: ' || SQLERRM;
3976: END IF;
3977:
3978: IF (SQLCODE <> -20001) THEN
3979: l_error_msg := FND_MESSAGE.Get;
3980: IF (PG_DEBUG = 'Y') THEN
3981: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3982: arp_standard.debug('Debug Info: ' || l_debug_info);
3983: arp_standard.debug(l_error_msg);
3981: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
3982: arp_standard.debug('Debug Info: ' || l_debug_info);
3983: arp_standard.debug(l_error_msg);
3984: END IF;
3985: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3986: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3987: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3988: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
3989: FND_MSG_PUB.ADD;
3982: arp_standard.debug('Debug Info: ' || l_debug_info);
3983: arp_standard.debug(l_error_msg);
3984: END IF;
3985: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3986: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3987: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3988: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
3989: FND_MSG_PUB.ADD;
3990: InformSysAdminError(p_procedure_name => l_procedure_name,
3983: arp_standard.debug(l_error_msg);
3984: END IF;
3985: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3986: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3987: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3988: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
3989: FND_MSG_PUB.ADD;
3990: InformSysAdminError(p_procedure_name => l_procedure_name,
3991: p_debug_info => l_debug_info,
3984: END IF;
3985: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
3986: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
3987: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
3988: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
3989: FND_MSG_PUB.ADD;
3990: InformSysAdminError(p_procedure_name => l_procedure_name,
3991: p_debug_info => l_debug_info,
3992: p_error => l_error_msg);
4068:
4069: EXCEPTION
4070: WHEN OTHERS THEN
4071: IF (SQLCODE = -20001) THEN
4072: l_error_msg := FND_MESSAGE.Get;
4073: ELSE
4074: l_error_msg := l_debug_info || 'error: ' || SQLERRM;
4075: END IF;
4076:
4074: l_error_msg := l_debug_info || 'error: ' || SQLERRM;
4075: END IF;
4076:
4077: IF (SQLCODE <> -20001) THEN
4078: l_error_msg := FND_MESSAGE.Get;
4079: IF (PG_DEBUG = 'Y') THEN
4080: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
4081: arp_standard.debug('Debug Info: ' || l_debug_info);
4082: arp_standard.debug(l_error_msg);
4080: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
4081: arp_standard.debug('Debug Info: ' || l_debug_info);
4082: arp_standard.debug(l_error_msg);
4083: END IF;
4084: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4085: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4086: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4087: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4088: FND_MSG_PUB.ADD;
4081: arp_standard.debug('Debug Info: ' || l_debug_info);
4082: arp_standard.debug(l_error_msg);
4083: END IF;
4084: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4085: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4086: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4087: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4088: FND_MSG_PUB.ADD;
4089: InformSysAdminError(p_procedure_name => l_procedure_name,
4082: arp_standard.debug(l_error_msg);
4083: END IF;
4084: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4085: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4086: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4087: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4088: FND_MSG_PUB.ADD;
4089: InformSysAdminError(p_procedure_name => l_procedure_name,
4090: p_debug_info => l_debug_info,
4083: END IF;
4084: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4085: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4086: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4087: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4088: FND_MSG_PUB.ADD;
4089: InformSysAdminError(p_procedure_name => l_procedure_name,
4090: p_debug_info => l_debug_info,
4091: p_error => l_error_msg);
4166:
4167: EXCEPTION
4168: WHEN OTHERS THEN
4169: IF (SQLCODE = -20001) THEN
4170: l_error_msg := FND_MESSAGE.Get;
4171: ELSE
4172: l_error_msg := l_debug_info || 'error: ' || SQLERRM;
4173: END IF;
4174:
4172: l_error_msg := l_debug_info || 'error: ' || SQLERRM;
4173: END IF;
4174:
4175: IF (SQLCODE <> -20001) THEN
4176: l_error_msg := FND_MESSAGE.Get;
4177: IF (PG_DEBUG = 'Y') THEN
4178: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
4179: arp_standard.debug('Debug Info: ' || l_debug_info);
4180: arp_standard.debug(l_error_msg);
4178: arp_standard.debug('Unexpected Exception in ' || G_PKG_NAME || l_procedure_name);
4179: arp_standard.debug('Debug Info: ' || l_debug_info);
4180: arp_standard.debug(l_error_msg);
4181: END IF;
4182: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4183: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4184: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4185: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4186: FND_MSG_PUB.ADD;
4179: arp_standard.debug('Debug Info: ' || l_debug_info);
4180: arp_standard.debug(l_error_msg);
4181: END IF;
4182: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4183: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4184: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4185: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4186: FND_MSG_PUB.ADD;
4187: InformSysAdminError(p_procedure_name => l_procedure_name,
4180: arp_standard.debug(l_error_msg);
4181: END IF;
4182: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4183: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4184: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4185: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4186: FND_MSG_PUB.ADD;
4187: InformSysAdminError(p_procedure_name => l_procedure_name,
4188: p_debug_info => l_debug_info,
4181: END IF;
4182: FND_MESSAGE.SET_NAME ('AR','ARI_REG_DISPLAY_UNEXP_ERROR');
4183: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info);
4184: FND_MESSAGE.SET_TOKEN('PROCEDURE', G_PKG_NAME || l_procedure_name);
4185: FND_MESSAGE.SET_TOKEN('ERROR',l_error_msg);
4186: FND_MSG_PUB.ADD;
4187: InformSysAdminError(p_procedure_name => l_procedure_name,
4188: p_debug_info => l_debug_info,
4189: p_error => l_error_msg);