249: -- do nothing
250: NULL;
251:
252: WHEN OTHERS THEN
253: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
254: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
255: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
256: FND_MESSAGE.Set_Token('REASON', SQLERRM);
257: FND_MSG_PUB.Add;
250: NULL;
251:
252: WHEN OTHERS THEN
253: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
254: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
255: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
256: FND_MESSAGE.Set_Token('REASON', SQLERRM);
257: FND_MSG_PUB.Add;
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
251:
252: WHEN OTHERS THEN
253: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
254: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
255: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
256: FND_MESSAGE.Set_Token('REASON', SQLERRM);
257: FND_MSG_PUB.Add;
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
259:
252: WHEN OTHERS THEN
253: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
254: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
255: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
256: FND_MESSAGE.Set_Token('REASON', SQLERRM);
257: FND_MSG_PUB.Add;
258: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
259:
260: END;
278: p_data => x_msg_data,
279: p_encoded => 'F');
280:
281: WHEN OTHERS THEN
282: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
283: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
284: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
285: FND_MESSAGE.Set_Token('REASON', SQLERRM);
286: FND_MSG_PUB.Add;
279: p_encoded => 'F');
280:
281: WHEN OTHERS THEN
282: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
283: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
284: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
285: FND_MESSAGE.Set_Token('REASON', SQLERRM);
286: FND_MSG_PUB.Add;
287:
280:
281: WHEN OTHERS THEN
282: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
283: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
284: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
285: FND_MESSAGE.Set_Token('REASON', SQLERRM);
286: FND_MSG_PUB.Add;
287:
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
281: WHEN OTHERS THEN
282: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
283: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
284: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
285: FND_MESSAGE.Set_Token('REASON', SQLERRM);
286: FND_MSG_PUB.Add;
287:
288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
289:
344: -- mini site id
345: IF ((p_mini_site_id IS NULL) OR
346: (p_mini_site_id = FND_API.G_MISS_NUM))
347: THEN
348: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_MSITE_ID');
349: FND_MSG_PUB.Add;
350: RAISE FND_API.G_EXC_ERROR;
351: END IF;
352:
353: -- section item id
354: IF ((p_section_item_id IS NULL) OR
355: (p_section_item_id = FND_API.G_MISS_NUM))
356: THEN
357: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_SI_ID');
358: FND_MSG_PUB.Add;
359: RAISE FND_API.G_EXC_ERROR;
360: END IF;
361:
362: -- start_date_active
363: IF ((p_start_date_active IS NULL) OR
364: (p_start_date_active = FND_API.G_MISS_DATE))
365: THEN
366: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_START_DATE');
367: FND_MSG_PUB.Add;
368: RAISE FND_API.G_EXC_ERROR;
369: END IF;
370:
378: SELECT msite_id INTO l_mini_site_id FROM ibe_msites_b
379: WHERE msite_id = p_mini_site_id and site_type = 'I';
380: EXCEPTION
381: WHEN NO_DATA_FOUND THEN
382: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_MSITE_ID');
383: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
384: FND_MSG_PUB.Add;
385: RAISE FND_API.G_EXC_ERROR;
386: WHEN OTHERS THEN
379: WHERE msite_id = p_mini_site_id and site_type = 'I';
380: EXCEPTION
381: WHEN NO_DATA_FOUND THEN
382: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_MSITE_ID');
383: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
384: FND_MSG_PUB.Add;
385: RAISE FND_API.G_EXC_ERROR;
386: WHEN OTHERS THEN
387: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
383: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
384: FND_MSG_PUB.Add;
385: RAISE FND_API.G_EXC_ERROR;
386: WHEN OTHERS THEN
387: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
388: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
389: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
390: FND_MESSAGE.Set_Token('REASON', SQLERRM);
391: FND_MSG_PUB.Add;
384: FND_MSG_PUB.Add;
385: RAISE FND_API.G_EXC_ERROR;
386: WHEN OTHERS THEN
387: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
388: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
389: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
390: FND_MESSAGE.Set_Token('REASON', SQLERRM);
391: FND_MSG_PUB.Add;
392:
385: RAISE FND_API.G_EXC_ERROR;
386: WHEN OTHERS THEN
387: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
388: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
389: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
390: FND_MESSAGE.Set_Token('REASON', SQLERRM);
391: FND_MSG_PUB.Add;
392:
393: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_MSITE_ID');
386: WHEN OTHERS THEN
387: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
388: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
389: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
390: FND_MESSAGE.Set_Token('REASON', SQLERRM);
391: FND_MSG_PUB.Add;
392:
393: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_MSITE_ID');
394: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
389: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
390: FND_MESSAGE.Set_Token('REASON', SQLERRM);
391: FND_MSG_PUB.Add;
392:
393: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_MSITE_ID');
394: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
395: FND_MSG_PUB.Add;
396: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
397: END;
390: FND_MESSAGE.Set_Token('REASON', SQLERRM);
391: FND_MSG_PUB.Add;
392:
393: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_MSITE_ID');
394: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
395: FND_MSG_PUB.Add;
396: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
397: END;
398:
402: SELECT section_item_id INTO l_section_item_id FROM ibe_dsp_section_items
403: WHERE section_item_id = p_section_item_id;
404: EXCEPTION
405: WHEN NO_DATA_FOUND THEN
406: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SI_ID');
407: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
408: FND_MSG_PUB.Add;
409: RAISE FND_API.G_EXC_ERROR;
410: WHEN OTHERS THEN
403: WHERE section_item_id = p_section_item_id;
404: EXCEPTION
405: WHEN NO_DATA_FOUND THEN
406: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SI_ID');
407: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
408: FND_MSG_PUB.Add;
409: RAISE FND_API.G_EXC_ERROR;
410: WHEN OTHERS THEN
411: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
407: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
408: FND_MSG_PUB.Add;
409: RAISE FND_API.G_EXC_ERROR;
410: WHEN OTHERS THEN
411: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
412: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
413: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
414: FND_MESSAGE.Set_Token('REASON', SQLERRM);
415: FND_MSG_PUB.Add;
408: FND_MSG_PUB.Add;
409: RAISE FND_API.G_EXC_ERROR;
410: WHEN OTHERS THEN
411: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
412: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
413: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
414: FND_MESSAGE.Set_Token('REASON', SQLERRM);
415: FND_MSG_PUB.Add;
416:
409: RAISE FND_API.G_EXC_ERROR;
410: WHEN OTHERS THEN
411: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
412: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
413: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
414: FND_MESSAGE.Set_Token('REASON', SQLERRM);
415: FND_MSG_PUB.Add;
416:
417: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SI_ID');
410: WHEN OTHERS THEN
411: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
412: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
413: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
414: FND_MESSAGE.Set_Token('REASON', SQLERRM);
415: FND_MSG_PUB.Add;
416:
417: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SI_ID');
418: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
413: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
414: FND_MESSAGE.Set_Token('REASON', SQLERRM);
415: FND_MSG_PUB.Add;
416:
417: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SI_ID');
418: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
419: FND_MSG_PUB.Add;
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: END;
414: FND_MESSAGE.Set_Token('REASON', SQLERRM);
415: FND_MSG_PUB.Add;
416:
417: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SI_ID');
418: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
419: FND_MSG_PUB.Add;
420: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
421: END;
422:
430:
431: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: ELSIF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
434: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_DUPLICATE_ENTRY');
435: FND_MSG_PUB.Add;
436: RAISE FND_API.G_EXC_ERROR; -- duplicate entry
437: END IF;
438:
450: p_data => x_msg_data,
451: p_encoded => 'F');
452:
453: WHEN OTHERS THEN
454: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
455: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
456: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
457: FND_MESSAGE.Set_Token('REASON', SQLERRM);
458: FND_MSG_PUB.Add;
451: p_encoded => 'F');
452:
453: WHEN OTHERS THEN
454: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
455: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
456: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
457: FND_MESSAGE.Set_Token('REASON', SQLERRM);
458: FND_MSG_PUB.Add;
459:
452:
453: WHEN OTHERS THEN
454: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
455: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
456: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
457: FND_MESSAGE.Set_Token('REASON', SQLERRM);
458: FND_MSG_PUB.Add;
459:
460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
453: WHEN OTHERS THEN
454: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
455: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
456: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
457: FND_MESSAGE.Set_Token('REASON', SQLERRM);
458: FND_MSG_PUB.Add;
459:
460: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
461:
515: --
516:
517: -- mini_site_section_item_id
518: IF (p_mini_site_section_item_id IS NULL) THEN
519: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NULL_PRIMARY_KEY');
520: FND_MSG_PUB.Add;
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
523:
522: END IF;
523:
524: -- start_date_active
525: IF (p_start_date_active IS NULL) THEN
526: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_START_DATE');
527: FND_MSG_PUB.Add;
528: RAISE FND_API.G_EXC_ERROR;
529: END IF;
530:
543: p_data => x_msg_data,
544: p_encoded => 'F');
545:
546: WHEN OTHERS THEN
547: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
548: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
549: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
550: FND_MESSAGE.Set_Token('REASON', SQLERRM);
551: FND_MSG_PUB.Add;
544: p_encoded => 'F');
545:
546: WHEN OTHERS THEN
547: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
548: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
549: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
550: FND_MESSAGE.Set_Token('REASON', SQLERRM);
551: FND_MSG_PUB.Add;
552:
545:
546: WHEN OTHERS THEN
547: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
548: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
549: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
550: FND_MESSAGE.Set_Token('REASON', SQLERRM);
551: FND_MSG_PUB.Add;
552:
553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
546: WHEN OTHERS THEN
547: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
548: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
549: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
550: FND_MESSAGE.Set_Token('REASON', SQLERRM);
551: FND_MSG_PUB.Add;
552:
553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
554:
639:
640: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
641: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
642: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
643: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INVALID_CREATE');
644: FND_MSG_PUB.Add;
645: RAISE FND_API.G_EXC_ERROR; -- invalid
646: END IF;
647:
666: x_mini_site_section_item_id
667: );
668: EXCEPTION
669: WHEN NO_DATA_FOUND THEN
670: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INSERT_FAIL');
671: FND_MSG_PUB.Add;
672: RAISE FND_API.G_EXC_ERROR;
673: WHEN OTHERS THEN
674: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
670: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INSERT_FAIL');
671: FND_MSG_PUB.Add;
672: RAISE FND_API.G_EXC_ERROR;
673: WHEN OTHERS THEN
674: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
675: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
676: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
677: FND_MESSAGE.Set_Token('REASON', SQLERRM);
678: FND_MSG_PUB.Add;
671: FND_MSG_PUB.Add;
672: RAISE FND_API.G_EXC_ERROR;
673: WHEN OTHERS THEN
674: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
675: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
676: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
677: FND_MESSAGE.Set_Token('REASON', SQLERRM);
678: FND_MSG_PUB.Add;
679:
672: RAISE FND_API.G_EXC_ERROR;
673: WHEN OTHERS THEN
674: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
675: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
676: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
677: FND_MESSAGE.Set_Token('REASON', SQLERRM);
678: FND_MSG_PUB.Add;
679:
680: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INSERT_FAIL');
673: WHEN OTHERS THEN
674: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
675: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
676: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
677: FND_MESSAGE.Set_Token('REASON', SQLERRM);
678: FND_MSG_PUB.Add;
679:
680: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INSERT_FAIL');
681: FND_MSG_PUB.Add;
676: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
677: FND_MESSAGE.Set_Token('REASON', SQLERRM);
678: FND_MSG_PUB.Add;
679:
680: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INSERT_FAIL');
681: FND_MSG_PUB.Add;
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END;
684:
705: p_encoded => 'F');
706:
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
709: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
710: FND_MESSAGE.Set_Token('ROUTINE', l_api_name || 'xxx');
711: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
712: FND_MESSAGE.Set_Token('REASON', p_mini_site_id || ':' || p_section_item_id);
713: FND_MSG_PUB.Add;
706:
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
709: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
710: FND_MESSAGE.Set_Token('ROUTINE', l_api_name || 'xxx');
711: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
712: FND_MESSAGE.Set_Token('REASON', p_mini_site_id || ':' || p_section_item_id);
713: FND_MSG_PUB.Add;
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
709: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
710: FND_MESSAGE.Set_Token('ROUTINE', l_api_name || 'xxx');
711: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
712: FND_MESSAGE.Set_Token('REASON', p_mini_site_id || ':' || p_section_item_id);
713: FND_MSG_PUB.Add;
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
708: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
709: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
710: FND_MESSAGE.Set_Token('ROUTINE', l_api_name || 'xxx');
711: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
712: FND_MESSAGE.Set_Token('REASON', p_mini_site_id || ':' || p_section_item_id);
713: FND_MSG_PUB.Add;
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
716: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
719:
720: WHEN OTHERS THEN
721: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
722:
723: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
724: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
725: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
726: FND_MESSAGE.Set_Token('REASON', SQLERRM);
727: FND_MSG_PUB.Add;
720: WHEN OTHERS THEN
721: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
722:
723: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
724: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
725: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
726: FND_MESSAGE.Set_Token('REASON', SQLERRM);
727: FND_MSG_PUB.Add;
728:
721: ROLLBACK TO CREATE_MSITE_SCT_ITEM_PVT;
722:
723: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
724: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
725: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
726: FND_MESSAGE.Set_Token('REASON', SQLERRM);
727: FND_MSG_PUB.Add;
728:
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
722:
723: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
724: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
725: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
726: FND_MESSAGE.Set_Token('REASON', SQLERRM);
727: FND_MSG_PUB.Add;
728:
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
730:
815: AND section_item_id = p_section_item_id;
816:
817: EXCEPTION
818: WHEN NO_DATA_FOUND THEN
819: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
820: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
821: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
822: FND_MSG_PUB.Add;
823: RAISE FND_API.G_EXC_ERROR;
816:
817: EXCEPTION
818: WHEN NO_DATA_FOUND THEN
819: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
820: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
821: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
822: FND_MSG_PUB.Add;
823: RAISE FND_API.G_EXC_ERROR;
824: WHEN OTHERS THEN
817: EXCEPTION
818: WHEN NO_DATA_FOUND THEN
819: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
820: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
821: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
822: FND_MSG_PUB.Add;
823: RAISE FND_API.G_EXC_ERROR;
824: WHEN OTHERS THEN
825: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
821: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
822: FND_MSG_PUB.Add;
823: RAISE FND_API.G_EXC_ERROR;
824: WHEN OTHERS THEN
825: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
826: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
827: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
828: FND_MESSAGE.Set_Token('REASON', SQLERRM);
829: FND_MSG_PUB.Add;
822: FND_MSG_PUB.Add;
823: RAISE FND_API.G_EXC_ERROR;
824: WHEN OTHERS THEN
825: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
826: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
827: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
828: FND_MESSAGE.Set_Token('REASON', SQLERRM);
829: FND_MSG_PUB.Add;
830:
823: RAISE FND_API.G_EXC_ERROR;
824: WHEN OTHERS THEN
825: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
826: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
827: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
828: FND_MESSAGE.Set_Token('REASON', SQLERRM);
829: FND_MSG_PUB.Add;
830:
831: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
824: WHEN OTHERS THEN
825: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
826: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
827: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
828: FND_MESSAGE.Set_Token('REASON', SQLERRM);
829: FND_MSG_PUB.Add;
830:
831: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
832: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
827: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
828: FND_MESSAGE.Set_Token('REASON', SQLERRM);
829: FND_MSG_PUB.Add;
830:
831: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
832: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
833: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
834: FND_MSG_PUB.Add;
835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: FND_MESSAGE.Set_Token('REASON', SQLERRM);
829: FND_MSG_PUB.Add;
830:
831: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
832: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
833: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
834: FND_MSG_PUB.Add;
835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
836: END;
829: FND_MSG_PUB.Add;
830:
831: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
832: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
833: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
834: FND_MSG_PUB.Add;
835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
836: END;
837: ELSE
836: END;
837: ELSE
838: -- neither mini_site_section_item_id nor combination of
839: -- mini_site_id and section_item_id is specified
840: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_IDS_SPEC');
841: FND_MSG_PUB.Add;
842: RAISE FND_API.G_EXC_ERROR;
843: END IF;
844:
860:
861: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
862: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
863: ELSIF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
864: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_INVALID_UPDATE');
865: FND_MSG_PUB.Add;
866: RAISE FND_API.G_EXC_ERROR; -- invalid
867: END IF;
868:
879: FND_GLOBAL.login_id
880: );
881: EXCEPTION
882: WHEN NO_DATA_FOUND THEN
883: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_UPDATE_FAIL');
884: FND_MSG_PUB.Add;
885: RAISE FND_API.G_EXC_ERROR;
886: WHEN OTHERS THEN
887: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
883: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_UPDATE_FAIL');
884: FND_MSG_PUB.Add;
885: RAISE FND_API.G_EXC_ERROR;
886: WHEN OTHERS THEN
887: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
888: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
889: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
890: FND_MESSAGE.Set_Token('REASON', SQLERRM);
891: FND_MSG_PUB.Add;
884: FND_MSG_PUB.Add;
885: RAISE FND_API.G_EXC_ERROR;
886: WHEN OTHERS THEN
887: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
888: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
889: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
890: FND_MESSAGE.Set_Token('REASON', SQLERRM);
891: FND_MSG_PUB.Add;
892:
885: RAISE FND_API.G_EXC_ERROR;
886: WHEN OTHERS THEN
887: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
888: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
889: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
890: FND_MESSAGE.Set_Token('REASON', SQLERRM);
891: FND_MSG_PUB.Add;
892:
893: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_UPDATE_FAIL');
886: WHEN OTHERS THEN
887: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
888: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
889: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
890: FND_MESSAGE.Set_Token('REASON', SQLERRM);
891: FND_MSG_PUB.Add;
892:
893: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_UPDATE_FAIL');
894: FND_MSG_PUB.Add;
889: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
890: FND_MESSAGE.Set_Token('REASON', SQLERRM);
891: FND_MSG_PUB.Add;
892:
893: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MSI_UPDATE_FAIL');
894: FND_MSG_PUB.Add;
895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
896: END;
897:
926:
927: WHEN OTHERS THEN
928: ROLLBACK TO UPDATE_MSITE_SCT_ITEM_PVT;
929:
930: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
931: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
932: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
933: FND_MESSAGE.Set_Token('REASON', SQLERRM);
934: FND_MSG_PUB.Add;
927: WHEN OTHERS THEN
928: ROLLBACK TO UPDATE_MSITE_SCT_ITEM_PVT;
929:
930: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
931: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
932: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
933: FND_MESSAGE.Set_Token('REASON', SQLERRM);
934: FND_MSG_PUB.Add;
935:
928: ROLLBACK TO UPDATE_MSITE_SCT_ITEM_PVT;
929:
930: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
931: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
932: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
933: FND_MESSAGE.Set_Token('REASON', SQLERRM);
934: FND_MSG_PUB.Add;
935:
936: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
929:
930: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
931: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
932: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
933: FND_MESSAGE.Set_Token('REASON', SQLERRM);
934: FND_MSG_PUB.Add;
935:
936: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
937:
1016: AND section_item_id = p_section_item_id;
1017:
1018: EXCEPTION
1019: WHEN NO_DATA_FOUND THEN
1020: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1021: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1022: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1023: FND_MSG_PUB.Add;
1024: RAISE FND_API.G_EXC_ERROR;
1017:
1018: EXCEPTION
1019: WHEN NO_DATA_FOUND THEN
1020: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1021: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1022: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1023: FND_MSG_PUB.Add;
1024: RAISE FND_API.G_EXC_ERROR;
1025: WHEN OTHERS THEN
1018: EXCEPTION
1019: WHEN NO_DATA_FOUND THEN
1020: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1021: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1022: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1023: FND_MSG_PUB.Add;
1024: RAISE FND_API.G_EXC_ERROR;
1025: WHEN OTHERS THEN
1026: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1022: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1023: FND_MSG_PUB.Add;
1024: RAISE FND_API.G_EXC_ERROR;
1025: WHEN OTHERS THEN
1026: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1027: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1028: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1029: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1030: FND_MSG_PUB.Add;
1023: FND_MSG_PUB.Add;
1024: RAISE FND_API.G_EXC_ERROR;
1025: WHEN OTHERS THEN
1026: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1027: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1028: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1029: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1030: FND_MSG_PUB.Add;
1031:
1024: RAISE FND_API.G_EXC_ERROR;
1025: WHEN OTHERS THEN
1026: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1027: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1028: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1029: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1030: FND_MSG_PUB.Add;
1031:
1032: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1025: WHEN OTHERS THEN
1026: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1027: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1028: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1029: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1030: FND_MSG_PUB.Add;
1031:
1032: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1033: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1028: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1029: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1030: FND_MSG_PUB.Add;
1031:
1032: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1033: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1034: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1035: FND_MSG_PUB.Add;
1036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1029: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1030: FND_MSG_PUB.Add;
1031:
1032: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1033: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1034: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1035: FND_MSG_PUB.Add;
1036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1037: END;
1030: FND_MSG_PUB.Add;
1031:
1032: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_ID');
1033: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
1034: FND_MESSAGE.Set_Token('SECTION_ITEM_ID', p_section_item_id);
1035: FND_MSG_PUB.Add;
1036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1037: END;
1038:
1038:
1039: ELSE
1040: -- neither mini_site_section_item_id nor combination of
1041: -- mini_site_id and section_item_id is specified
1042: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSI_IDS_SPEC');
1043: FND_MSG_PUB.Add;
1044: RAISE FND_API.G_EXC_ERROR;
1045: END IF;
1046:
1071: IF (p_call_from_trigger = FALSE) THEN
1072: ROLLBACK TO DELETE_MSITE_SCT_ITEM_PVT;
1073: END IF;
1074:
1075: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1076: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1077: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1078: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1079: FND_MSG_PUB.Add;
1072: ROLLBACK TO DELETE_MSITE_SCT_ITEM_PVT;
1073: END IF;
1074:
1075: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1076: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1077: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1078: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1079: FND_MSG_PUB.Add;
1080:
1073: END IF;
1074:
1075: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1076: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1077: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1078: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1079: FND_MSG_PUB.Add;
1080:
1081: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1074:
1075: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1076: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1077: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1078: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1079: FND_MSG_PUB.Add;
1080:
1081: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1082: