53: END IF;
54:
55: -- Check p_init_msg_list
56: IF FND_API.to_Boolean( p_init_msg_list ) THEN
57: FND_MSG_PUB.initialize;
58: END IF;
59:
60: -- Initialize API return status to success
61: x_return_status := FND_API.G_RET_STS_SUCCESS;
211: COMMIT WORK;
212: END IF;
213:
214: -- Debug Message
215: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
216: THEN
217: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
218: FND_MSG_PUB.Add;
219: END IF;
214: -- Debug Message
215: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
216: THEN
217: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
218: FND_MSG_PUB.Add;
219: END IF;
220:
221: -- Standard call to get message count and IF count is 1, get message info.
222: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
218: FND_MSG_PUB.Add;
219: END IF;
220:
221: -- Standard call to get message count and IF count is 1, get message info.
222: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
223: p_data => x_msg_data );
224:
225:
226: --
232:
233: ROLLBACK TO Create_WebSwitch_PUB;
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235:
236: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
237: p_data => x_msg_data );
238:
239: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
240:
240:
241: ROLLBACK TO Create_WebSwitch_PUB;
242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
243:
244: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
245: p_data => x_msg_data );
246:
247: WHEN OTHERS THEN
248:
248:
249: ROLLBACK TO Create_WebSwitch_PUB;
250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
251:
252: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
255: END IF;
256:
250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
251:
252: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
255: END IF;
256:
257: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
258: p_data => x_msg_data );
253: THEN
254: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
255: END IF;
256:
257: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
258: p_data => x_msg_data );
259:
260: END;
261:
294: END IF;
295:
296: -- Check p_init_msg_list
297: IF FND_API.to_Boolean( p_init_msg_list ) THEN
298: FND_MSG_PUB.initialize;
299: END IF;
300:
301:
302: -- Initialize API return status to success
370: COMMIT WORK;
371: END IF;
372:
373: -- Standard call to get message count and IF count is 1, get message info.
374: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
375: p_data => x_msg_data );
376:
377:
378: --
384:
385: ROLLBACK TO Update_WebSwitch_PVT;
386: x_return_status := FND_API.G_RET_STS_ERROR ;
387:
388: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
389: p_data => x_msg_data );
390:
391: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
392:
392:
393: ROLLBACK TO Update_WebSwitch_PVT;
394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
395:
396: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
397: p_data => x_msg_data );
398:
399: WHEN OTHERS THEN
400:
400:
401: ROLLBACK TO Update_WebSwitch_PVT;
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
403:
404: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
405: THEN
406: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
407: END IF;
408:
402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
403:
404: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
405: THEN
406: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
407: END IF;
408:
409: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
410: p_data => x_msg_data );
405: THEN
406: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
407: END IF;
408:
409: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
410: p_data => x_msg_data );
411:
412: END;
413:
445: END IF;
446:
447: -- Check p_init_msg_list
448: IF FND_API.to_Boolean( p_init_msg_list ) THEN
449: FND_MSG_PUB.initialize;
450: END IF;
451:
452: -- Initialize API return status to success
453: x_return_status := FND_API.G_RET_STS_SUCCESS;
478: END;
479:
480:
481: -- Success Message
482: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
483: THEN
484: FND_MESSAGE.Set_Name('ast', 'API_ROWS_UPDATED');
485: FND_MESSAGE.Set_Token('ROW', 'ast_QUERY_STRING', TRUE);
486: FND_MESSAGE.Set_Token('NUMBER', 1, FALSE);
483: THEN
484: FND_MESSAGE.Set_Name('ast', 'API_ROWS_UPDATED');
485: FND_MESSAGE.Set_Token('ROW', 'ast_QUERY_STRING', TRUE);
486: FND_MESSAGE.Set_Token('NUMBER', 1, FALSE);
487: FND_MSG_PUB.Add;
488: END IF;
489:
490: -- END of API body
491:
496: COMMIT WORK;
497: END IF;
498:
499: -- Standard call to get message count and IF count is 1, get message info.
500: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
501: p_data => x_msg_data );
502:
503:
504: --
510:
511: ROLLBACK TO Lock_WebSwitch_PVT;
512: x_return_status := FND_API.G_RET_STS_ERROR ;
513:
514: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
515: p_data => x_msg_data );
516:
517: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
518:
518:
519: ROLLBACK TO Lock_WebSwitch_PVT;
520: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
521:
522: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
523: p_data => x_msg_data );
524:
525: WHEN OTHERS THEN
526:
526:
527: ROLLBACK TO Lock_WebSwitch_PVT;
528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
529:
530: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
531: THEN
532: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
533: END IF;
534:
528: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
529:
530: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
531: THEN
532: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
533: END IF;
534:
535: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
536: p_data => x_msg_data );
531: THEN
532: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
533: END IF;
534:
535: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
536: p_data => x_msg_data );
537:
538: END;
539:
572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
573: END IF;
574: -- Check p_init_msg_list
575: IF FND_API.to_Boolean( p_init_msg_list ) THEN
576: FND_MSG_PUB.initialize;
577: END IF;
578:
579: -- Initialize API return status to success
580: x_return_status := FND_API.G_RET_STS_SUCCESS;
596: COMMIT WORK;
597: END IF;
598:
599: -- Debug Message
600: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
601: THEN
602: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
603: FND_MSG_PUB.Add;
604: END IF;
599: -- Debug Message
600: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW)
601: THEN
602: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
603: FND_MSG_PUB.Add;
604: END IF;
605:
606: -- Standard call to get message count and IF count is 1, get message info.
607: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
603: FND_MSG_PUB.Add;
604: END IF;
605:
606: -- Standard call to get message count and IF count is 1, get message info.
607: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
608: p_data => x_msg_data );
609:
610:
611: --
617:
618: ROLLBACK TO Delete_WebSwitch_PUB;
619: x_return_status := FND_API.G_RET_STS_ERROR ;
620:
621: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
622: p_data => x_msg_data );
623:
624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
625:
625:
626: ROLLBACK TO Delete_WebSwitch_PUB;
627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
628:
629: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
630: p_data => x_msg_data );
631:
632: WHEN OTHERS THEN
633:
633:
634: ROLLBACK TO Delete_WebSwitch_PUB;
635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
636:
637: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
638: THEN
639: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
640: END IF;
641:
635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
636:
637: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
638: THEN
639: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
640: END IF;
641:
642: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
643: p_data => x_msg_data );
638: THEN
639: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
640: END IF;
641:
642: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
643: p_data => x_msg_data );
644:
645: END;
646: