40: -- added these for user hooks
41: l_cgi_switch_rec cgi_switch_rec_type;
42: l_switch_data_rec switch_data_rec_type;
43: begin
44: -- Standard begin of API savepoint
45: SAVEPOINT Create_WebSwitch_PUB;
46:
47: -- Standard call to check for call compatibility.
48: IF NOT FND_API.Compatible_API_Call (l_api_version,
43: begin
44: -- Standard begin of API savepoint
45: SAVEPOINT Create_WebSwitch_PUB;
46:
47: -- Standard call to check for call compatibility.
48: IF NOT FND_API.Compatible_API_Call (l_api_version,
49: p_api_version,
50: l_api_name,
51: G_PKG_NAME)
302: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
303: END IF;
304: END IF;
305:
306: -- Standard check of p_commit.
307: IF FND_API.To_Boolean ( p_commit ) THEN
308: COMMIT WORK;
309: END IF;
310:
314: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
315: FND_MSG_PUB.Add;
316: END IF;
317:
318: -- Standard call to get message count and IF count is 1, get message info.
319: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
320: p_data => x_msg_data );
321:
322:
378: l_cgi_switch_rec cgi_switch_rec_type;
379: l_switch_data_rec switch_data_rec_type;
380:
381: begin
382: -- Standard begin of API savepoint
383: SAVEPOINT Update_WebSwitch_PVT;
384:
385: -- Standard call to check for call compatibility.
386: IF NOT FND_API.Compatible_API_Call (l_api_version,
381: begin
382: -- Standard begin of API savepoint
383: SAVEPOINT Update_WebSwitch_PVT;
384:
385: -- Standard call to check for call compatibility.
386: IF NOT FND_API.Compatible_API_Call (l_api_version,
387: p_api_version,
388: l_api_name,
389: G_PKG_NAME)
559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
560: END IF;
561: END IF;
562:
563: -- Standard check of p_commit.
564: IF FND_API.To_Boolean ( p_commit ) THEN
565: COMMIT WORK;
566: END IF;
567:
571: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
572: FND_MSG_PUB.Add;
573: END IF;
574:
575: -- Standard call to get message count and IF count is 1, get message info.
576: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
577: p_data => x_msg_data );
578:
579:
635: l_cgi_switch_rec cgi_switch_rec_type;
636: l_switch_data_rec switch_data_rec_type;
637:
638: begin
639: -- Standard begin of API savepoint
640: SAVEPOINT Lock_WebSwitch_PVT;
641: -- Standard call to check for call compatibility.
642: IF NOT FND_API.Compatible_API_Call (l_api_version,
643: p_api_version,
637:
638: begin
639: -- Standard begin of API savepoint
640: SAVEPOINT Lock_WebSwitch_PVT;
641: -- Standard call to check for call compatibility.
642: IF NOT FND_API.Compatible_API_Call (l_api_version,
643: p_api_version,
644: l_api_name,
645: G_PKG_NAME)
777: -- END of API body
778:
779:
780:
781: -- Standard check of p_commit.
782: IF FND_API.To_Boolean ( p_commit ) THEN
783: COMMIT WORK;
784: END IF;
785:
789: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
790: FND_MSG_PUB.Add;
791: END IF;
792:
793: -- Standard call to get message count and IF count is 1, get message info.
794: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
795: p_data => x_msg_data );
796:
797:
854: l_cgi_switch_rec cgi_switch_rec_type;
855: l_switch_data_rec switch_data_rec_type;
856:
857: begin
858: -- Standard begin of API savepoint
859: SAVEPOINT Delete_WebSwitch_PUB;
860:
861: -- Standard call to check for call compatibility.
862: IF NOT FND_API.Compatible_API_Call (l_api_version,
857: begin
858: -- Standard begin of API savepoint
859: SAVEPOINT Delete_WebSwitch_PUB;
860:
861: -- Standard call to check for call compatibility.
862: IF NOT FND_API.Compatible_API_Call (l_api_version,
863: p_api_version,
864: l_api_name,
865: G_PKG_NAME)
980: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
981: END IF;
982: END IF;
983:
984: -- Standard check of p_commit.
985: IF FND_API.To_Boolean ( p_commit ) THEN
986: COMMIT WORK;
987: END IF;
988:
992: FND_MESSAGE.Set_Name('ast', 'Pvt WebAssist API: End');
993: FND_MSG_PUB.Add;
994: END IF;
995:
996: -- Standard call to get message count and IF count is 1, get message info.
997: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
998: p_data => x_msg_data );
999:
1000: