60: AND object_type = l_obj_type
61: ;
62:
63: BEGIN
64: -- Standard Start of API savepoint
65: SAVEPOINT CREATE_Code_Definition_PVT;
66:
67: -- Standard call to check for call compatibility.
68: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
63: BEGIN
64: -- Standard Start of API savepoint
65: SAVEPOINT CREATE_Code_Definition_PVT;
66:
67: -- Standard call to check for call compatibility.
68: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
69: p_api_version_number,
70: l_api_name,
71: G_PKG_NAME)
176: --
177: -- End of API body
178: --
179:
180: -- Standard check for p_commit
181: IF FND_API.to_Boolean( p_commit )
182: THEN
183: COMMIT WORK;
184: END IF;
186:
187: -- Debug Message
188: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
189:
190: -- Standard call to get message count and if count is 1, get message info.
191: FND_MSG_PUB.Count_And_Get
192: (p_count => x_msg_count,
193: p_data => x_msg_data
194: );
200:
201: WHEN FND_API.G_EXC_ERROR THEN
202: ROLLBACK TO CREATE_Code_Definition_PVT;
203: x_return_status := FND_API.G_RET_STS_ERROR;
204: -- Standard call to get message count and if count=1, get the message
205: FND_MSG_PUB.Count_And_Get (
206: p_encoded => FND_API.G_FALSE,
207: p_count => x_msg_count,
208: p_data => x_msg_data
210:
211: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
212: ROLLBACK TO CREATE_Code_Definition_PVT;
213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
214: -- Standard call to get message count and if count=1, get the message
215: FND_MSG_PUB.Count_And_Get (
216: p_encoded => FND_API.G_FALSE,
217: p_count => x_msg_count,
218: p_data => x_msg_data
224: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
225: THEN
226: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
227: END IF;
228: -- Standard call to get message count and if count=1, get the message
229: FND_MSG_PUB.Count_And_Get (
230: p_encoded => FND_API.G_FALSE,
231: p_count => x_msg_count,
232: p_data => x_msg_data
337: l_tar_code_def_rec AMS_Code_Definition_PVT.code_def_rec_type := P_code_def_rec;
338: l_rowid ROWID;
339:
340: BEGIN
341: -- Standard Start of API savepoint
342: SAVEPOINT UPDATE_Code_Definition_PVT;
343:
344: -- Standard call to check for call compatibility.
345: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
340: BEGIN
341: -- Standard Start of API savepoint
342: SAVEPOINT UPDATE_Code_Definition_PVT;
343:
344: -- Standard call to check for call compatibility.
345: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
346: p_api_version_number,
347: l_api_name,
348: G_PKG_NAME)
441: --
442: -- End of API body.
443: --
444:
445: -- Standard check for p_commit
446: IF FND_API.to_Boolean( p_commit )
447: THEN
448: COMMIT WORK;
449: END IF;
451:
452: -- Debug Message
453: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
454:
455: -- Standard call to get message count and if count is 1, get message info.
456: FND_MSG_PUB.Count_And_Get
457: (p_count => x_msg_count,
458: p_data => x_msg_data
459: );
465:
466: WHEN FND_API.G_EXC_ERROR THEN
467: ROLLBACK TO UPDATE_Code_Definition_PVT;
468: x_return_status := FND_API.G_RET_STS_ERROR;
469: -- Standard call to get message count and if count=1, get the message
470: FND_MSG_PUB.Count_And_Get (
471: p_encoded => FND_API.G_FALSE,
472: p_count => x_msg_count,
473: p_data => x_msg_data
475:
476: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
477: ROLLBACK TO UPDATE_Code_Definition_PVT;
478: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
479: -- Standard call to get message count and if count=1, get the message
480: FND_MSG_PUB.Count_And_Get (
481: p_encoded => FND_API.G_FALSE,
482: p_count => x_msg_count,
483: p_data => x_msg_data
489: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
490: THEN
491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
492: END IF;
493: -- Standard call to get message count and if count=1, get the message
494: FND_MSG_PUB.Count_And_Get (
495: p_encoded => FND_API.G_FALSE,
496: p_count => x_msg_count,
497: p_data => x_msg_data
516: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
517: l_object_version_number NUMBER;
518:
519: BEGIN
520: -- Standard Start of API savepoint
521: SAVEPOINT DELETE_Code_Definition_PVT;
522:
523: -- Standard call to check for call compatibility.
524: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
519: BEGIN
520: -- Standard Start of API savepoint
521: SAVEPOINT DELETE_Code_Definition_PVT;
522:
523: -- Standard call to check for call compatibility.
524: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
525: p_api_version_number,
526: l_api_name,
527: G_PKG_NAME)
554: --
555: -- End of API body
556: --
557:
558: -- Standard check for p_commit
559: IF FND_API.to_Boolean( p_commit )
560: THEN
561: COMMIT WORK;
562: END IF;
564:
565: -- Debug Message
566: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
567:
568: -- Standard call to get message count and if count is 1, get message info.
569: FND_MSG_PUB.Count_And_Get
570: (p_count => x_msg_count,
571: p_data => x_msg_data
572: );
578:
579: WHEN FND_API.G_EXC_ERROR THEN
580: ROLLBACK TO DELETE_Code_Definition_PVT;
581: x_return_status := FND_API.G_RET_STS_ERROR;
582: -- Standard call to get message count and if count=1, get the message
583: FND_MSG_PUB.Count_And_Get (
584: p_encoded => FND_API.G_FALSE,
585: p_count => x_msg_count,
586: p_data => x_msg_data
588:
589: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
590: ROLLBACK TO DELETE_Code_Definition_PVT;
591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
592: -- Standard call to get message count and if count=1, get the message
593: FND_MSG_PUB.Count_And_Get (
594: p_encoded => FND_API.G_FALSE,
595: p_count => x_msg_count,
596: p_data => x_msg_data
602: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
603: THEN
604: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
605: END IF;
606: -- Standard call to get message count and if count=1, get the message
607: FND_MSG_PUB.Count_And_Get (
608: p_encoded => FND_API.G_FALSE,
609: p_count => x_msg_count,
610: p_data => x_msg_data
649: THEN
650: FND_MSG_PUB.initialize;
651: END IF;
652:
653: -- Standard call to check for call compatibility.
654: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
655: p_api_version_number,
656: l_api_name,
657: G_PKG_NAME)
696:
697: WHEN FND_API.G_EXC_ERROR THEN
698: ROLLBACK TO LOCK_Code_Definition_PVT;
699: x_return_status := FND_API.G_RET_STS_ERROR;
700: -- Standard call to get message count and if count=1, get the message
701: FND_MSG_PUB.Count_And_Get (
702: p_encoded => FND_API.G_FALSE,
703: p_count => x_msg_count,
704: p_data => x_msg_data
706:
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: ROLLBACK TO LOCK_Code_Definition_PVT;
709: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
710: -- Standard call to get message count and if count=1, get the message
711: FND_MSG_PUB.Count_And_Get (
712: p_encoded => FND_API.G_FALSE,
713: p_count => x_msg_count,
714: p_data => x_msg_data
720: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
721: THEN
722: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
723: END IF;
724: -- Standard call to get message count and if count=1, get the message
725: FND_MSG_PUB.Count_And_Get (
726: p_encoded => FND_API.G_FALSE,
727: p_count => x_msg_count,
728: p_data => x_msg_data
894: l_object_version_number NUMBER;
895: l_code_def_rec AMS_Code_Definition_PVT.code_def_rec_type;
896:
897: BEGIN
898: -- Standard Start of API savepoint
899: SAVEPOINT VALIDATE_Code_Definition_;
900:
901: -- Standard call to check for call compatibility.
902: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
897: BEGIN
898: -- Standard Start of API savepoint
899: SAVEPOINT VALIDATE_Code_Definition_;
900:
901: -- Standard call to check for call compatibility.
902: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
903: p_api_version_number,
904: l_api_name,
905: G_PKG_NAME)
958:
959: -- Debug Message
960: -- AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
961:
962: -- Standard call to get message count and if count is 1, get message info.
963: FND_MSG_PUB.Count_And_Get
964: (p_count => x_msg_count,
965: p_data => x_msg_data
966: );
972:
973: WHEN FND_API.G_EXC_ERROR THEN
974: ROLLBACK TO VALIDATE_Code_Definition_;
975: x_return_status := FND_API.G_RET_STS_ERROR;
976: -- Standard call to get message count and if count=1, get the message
977: FND_MSG_PUB.Count_And_Get (
978: p_encoded => FND_API.G_FALSE,
979: p_count => x_msg_count,
980: p_data => x_msg_data
982:
983: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
984: ROLLBACK TO VALIDATE_Code_Definition_;
985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
986: -- Standard call to get message count and if count=1, get the message
987: FND_MSG_PUB.Count_And_Get (
988: p_encoded => FND_API.G_FALSE,
989: p_count => x_msg_count,
990: p_data => x_msg_data
996: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
997: THEN
998: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
999: END IF;
1000: -- Standard call to get message count and if count=1, get the message
1001: FND_MSG_PUB.Count_And_Get (
1002: p_encoded => FND_API.G_FALSE,
1003: p_count => x_msg_count,
1004: p_data => x_msg_data
1031: -- x_return_status := FND_API.G_RET_STS_ERROR;
1032:
1033: -- Debug Message
1034: -- AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1035: -- Standard call to get message count and if count is 1, get message info.
1036: FND_MSG_PUB.Count_And_Get
1037: (p_count => x_msg_count,
1038: p_data => x_msg_data
1039: );